d5df2e5c38c735eb237016723b61bd8b178cdafe
[openafs.git] / src / volser / vos.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 #include <afsconfig.h>
11 #include <afs/param.h>
12
13 #ifdef IGNORE_SOME_GCC_WARNINGS
14 # pragma GCC diagnostic warning "-Wimplicit-function-declaration"
15 #endif
16
17 #include <sys/types.h>
18 #include <string.h>
19 #ifdef AFS_NT40_ENV
20 #include <fcntl.h>
21 #include <io.h>
22 #include <winsock2.h>
23 #include <WINNT/afsreg.h>
24 #else
25 #include <sys/time.h>
26 #include <sys/file.h>
27 #include <netdb.h>
28 #include <netinet/in.h>
29 #include <arpa/inet.h>
30 #endif
31 #include <sys/stat.h>
32 #ifdef AFS_AIX_ENV
33 #include <sys/statfs.h>
34 #endif
35 #include <errno.h>
36
37 #include <lock.h>
38 #include <afs/stds.h>
39 #include <rx/xdr.h>
40 #include <rx/rx.h>
41 #include <rx/rx_globals.h>
42 #include <afs/nfs.h>
43 #include <afs/vlserver.h>
44 #include <afs/cellconfig.h>
45 #include <afs/keys.h>
46 #include <afs/afsutil.h>
47 #include <ubik.h>
48 #include <afs/afsint.h>
49 #include <afs/cmd.h>
50 #include <afs/usd.h>
51 #include "volser.h"
52 #include "volint.h"
53 #include <afs/ihandle.h>
54 #include <afs/vnode.h>
55 #include <afs/volume.h>
56 #include "dump.h"
57 #include "lockdata.h"
58
59 #ifdef  AFS_AIX32_ENV
60 #include <signal.h>
61 #endif
62 #include "volser_internal.h"
63 #include "volser_prototypes.h"
64 #include "vsutils_prototypes.h"
65 #include "lockprocs_prototypes.h"
66
67 #ifdef HAVE_POSIX_REGEX
68 #include <regex.h>
69 #endif
70
71 /* Local Prototypes */
72 int PrintDiagnostics(char *astring, afs_int32 acode);
73 int GetVolumeInfo(afs_uint32 volid, afs_int32 *server, afs_int32 *part, 
74                   afs_int32 *voltype, struct nvldbentry *rentry);
75
76 struct tqElem {
77     afs_uint32 volid;
78     struct tqElem *next;
79 };
80
81 struct tqHead {
82     afs_int32 count;
83     struct tqElem *next;
84 };
85
86 #define COMMONPARMS     cmd_Seek(ts, 12);\
87 cmd_AddParm(ts, "-cell", CMD_SINGLE, CMD_OPTIONAL, "cell name");\
88 cmd_AddParm(ts, "-noauth", CMD_FLAG, CMD_OPTIONAL, "don't authenticate");\
89 cmd_AddParm(ts, "-localauth",CMD_FLAG,CMD_OPTIONAL,"use server tickets");\
90 cmd_AddParm(ts, "-verbose", CMD_FLAG, CMD_OPTIONAL, "verbose");\
91 cmd_AddParm(ts, "-encrypt", CMD_FLAG, CMD_OPTIONAL, "encrypt commands");\
92 cmd_AddParm(ts, "-noresolve", CMD_FLAG, CMD_OPTIONAL, "don't resolve addresses"); \
93
94 #define ERROR_EXIT(code) {error=(code); goto error_exit;}
95
96 int rxInitDone = 0;
97 struct rx_connection *tconn;
98 afs_int32 tserver;
99 extern struct ubik_client *cstruct;
100 const char *confdir;
101
102 static struct tqHead busyHead, notokHead;
103
104 static void
105 qInit(struct tqHead *ahead)
106 {
107     memset((char *)ahead, 0, sizeof(struct tqHead));
108     return;
109 }
110
111
112 static void
113 qPut(struct tqHead *ahead, afs_uint32 volid)
114 {
115     struct tqElem *elem;
116
117     elem = (struct tqElem *)malloc(sizeof(struct tqElem));
118     elem->next = ahead->next;
119     elem->volid = volid;
120     ahead->next = elem;
121     ahead->count++;
122     return;
123 }
124
125 static void
126 qGet(struct tqHead *ahead, afs_uint32 *volid)
127 {
128     struct tqElem *tmp;
129
130     if (ahead->count <= 0)
131         return;
132     *volid = ahead->next->volid;
133     tmp = ahead->next;
134     ahead->next = tmp->next;
135     ahead->count--;
136     free(tmp);
137     return;
138 }
139
140 /* returns 1 if <filename> exists else 0 */
141 static int
142 FileExists(char *filename)
143 {
144     usd_handle_t ufd;
145     int code;
146     afs_hyper_t size;
147
148     code = usd_Open(filename, USD_OPEN_RDONLY, 0, &ufd);
149     if (code) {
150         return 0;
151     }
152     code = USD_IOCTL(ufd, USD_IOCTL_GETSIZE, &size);
153     USD_CLOSE(ufd);
154     if (code) {
155         return 0;
156     }
157     return 1;
158 }
159
160 /* returns 1 if <name> doesnot end in .readonly or .backup, else 0 */
161 static int
162 VolNameOK(char *name)
163 {
164     int total;
165
166
167     total = strlen(name);
168     if (!strcmp(&name[total - 9], ".readonly")) {
169         return 0;
170     } else if (!strcmp(&name[total - 7], ".backup")) {
171         return 0;
172     } else {
173         return 1;
174     }
175 }
176
177 /* return 1 if name is a number else 0 */
178 static int
179 IsNumeric(char *name)
180 {
181     int result, len, i;
182     char *ptr;
183
184     result = 1;
185     ptr = name;
186     len = strlen(name);
187     for (i = 0; i < len; i++) {
188         if (*ptr < '0' || *ptr > '9') {
189             result = 0;
190             break;
191         }
192         ptr++;
193
194     }
195     return result;
196 }
197
198
199 /*
200  * Parse a server name/address and return the address in HOST BYTE order
201  */
202 afs_int32
203 GetServer(char *aname)
204 {
205     register struct hostent *th;
206     afs_int32 addr;
207     int b1, b2, b3, b4;
208     register afs_int32 code;
209     char hostname[MAXHOSTCHARS];
210
211     code = sscanf(aname, "%d.%d.%d.%d", &b1, &b2, &b3, &b4);
212     if (code == 4) {
213         addr = (b1 << 24) | (b2 << 16) | (b3 << 8) | b4;
214         addr = ntohl(addr);     /* convert to host order */
215     } else {
216         th = gethostbyname(aname);
217         if (!th)
218             return 0;
219         memcpy(&addr, th->h_addr, sizeof(addr));
220     }
221
222     if (addr == htonl(0x7f000001)) {    /* local host */
223         code = gethostname(hostname, MAXHOSTCHARS);
224         if (code)
225             return 0;
226         th = gethostbyname(hostname);   /* returns host byte order */
227         if (!th)
228             return 0;
229         memcpy(&addr, th->h_addr, sizeof(addr));
230     }
231
232     return (addr);
233 }
234
235 afs_int32
236 GetVolumeType(char *aname)
237 {
238
239     if (!strcmp(aname, "ro"))
240         return (ROVOL);
241     else if (!strcmp(aname, "rw"))
242         return (RWVOL);
243     else if (!strcmp(aname, "bk"))
244         return (BACKVOL);
245     else
246         return (-1);
247 }
248
249 int
250 IsPartValid(afs_int32 partId, afs_int32 server, afs_int32 *code)
251 {
252     struct partList dummyPartList;
253     int i, success, cnt;
254
255     success = 0;
256     *code = 0;
257
258     *code = UV_ListPartitions(server, &dummyPartList, &cnt);
259     if (*code)
260         return success;
261     for (i = 0; i < cnt; i++) {
262         if (dummyPartList.partFlags[i] & PARTVALID)
263             if (dummyPartList.partId[i] == partId)
264                 success = 1;
265     }
266     return success;
267 }
268
269
270
271  /*sends the contents of file associated with <fd> and <blksize>  to Rx Stream 
272   * associated  with <call> */
273 int 
274 SendFile(usd_handle_t ufd, register struct rx_call *call, long blksize)
275 {
276     char *buffer = (char *)0;
277     afs_int32 error = 0;
278     int done = 0;
279     afs_uint32 nbytes;
280
281     buffer = (char *)malloc(blksize);
282     if (!buffer) {
283         fprintf(STDERR, "malloc failed\n");
284         return -1;
285     }
286
287     while (!error && !done) {
288 #ifndef AFS_NT40_ENV            /* NT csn't select on non-socket fd's */
289         fd_set in;
290         FD_ZERO(&in);
291         FD_SET((intptr_t)(ufd->handle), &in);
292         /* don't timeout if read blocks */
293 #if defined(AFS_PTHREAD_ENV)
294         select(((int)(ufd->handle)) + 1, &in, 0, 0, 0);
295 #else
296         IOMGR_Select(((intptr_t)(ufd->handle)) + 1, &in, 0, 0, 0);
297 #endif
298 #endif
299         error = USD_READ(ufd, buffer, blksize, &nbytes);
300         if (error) {
301             fprintf(STDERR, "File system read failed\n");
302             break;
303         }
304         if (nbytes == 0) {
305             done = 1;
306             break;
307         }
308         if (rx_Write(call, buffer, nbytes) != nbytes) {
309             error = -1;
310             break;
311         }
312     }
313     if (buffer)
314         free(buffer);
315     return error;
316 }
317
318 /* function invoked by UV_RestoreVolume, reads the data from rx_trx_stream and
319  * writes it out to the volume. */
320 afs_int32
321 WriteData(struct rx_call *call, void *rock)
322 {
323     char *filename = (char *) rock;
324     usd_handle_t ufd;
325     long blksize;
326     afs_int32 error, code;
327     int ufdIsOpen = 0;
328     afs_hyper_t filesize, currOffset; 
329     afs_uint32 buffer;          
330     afs_uint32 got;             
331
332     error = 0;
333
334     if (!filename || !*filename) {
335         usd_StandardInput(&ufd);
336         blksize = 4096;
337         ufdIsOpen = 1;
338     } else {
339         code = usd_Open(filename, USD_OPEN_RDONLY, 0, &ufd);
340         if (code == 0) {
341             ufdIsOpen = 1;
342             code = USD_IOCTL(ufd, USD_IOCTL_GETBLKSIZE, &blksize);
343         }
344         if (code) {
345             fprintf(STDERR, "Could not access file '%s'\n", filename);
346             error = VOLSERBADOP;
347             goto wfail;
348         }
349         /* test if we have a valid dump */
350         hset64(filesize, 0, 0);
351         USD_SEEK(ufd, filesize, SEEK_END, &currOffset);
352         hset64(filesize, hgethi(currOffset), hgetlo(currOffset)-sizeof(afs_uint32));
353         USD_SEEK(ufd, filesize, SEEK_SET, &currOffset);
354         USD_READ(ufd, (char *)&buffer, sizeof(afs_uint32), &got);
355         if ((got != sizeof(afs_uint32)) || (ntohl(buffer) != DUMPENDMAGIC)) {
356             fprintf(STDERR, "Signature missing from end of file '%s'\n", filename);
357             error = VOLSERBADOP;
358             goto wfail;
359         }
360         /* rewind, we are done */
361         hset64(filesize, 0, 0);
362         USD_SEEK(ufd, filesize, SEEK_SET, &currOffset);
363     }
364     code = SendFile(ufd, call, blksize);
365     if (code) {
366         error = code;
367         goto wfail;
368     }
369   wfail:
370     if (ufdIsOpen) {
371         code = USD_CLOSE(ufd);
372         if (code) {
373             fprintf(STDERR, "Could not close dump file %s\n",
374                     (filename && *filename) ? filename : "STDOUT");
375             if (!error)
376                 error = code;
377         }
378     }
379     return error;
380 }
381
382 /* Receive data from <call> stream into file associated
383  * with <fd> <blksize>
384  */
385 int
386 ReceiveFile(usd_handle_t ufd, struct rx_call *call, long blksize)
387 {
388     char *buffer = NULL;
389     afs_int32 bytesread;
390     afs_uint32 bytesleft, w;
391     afs_int32 error = 0;
392
393     buffer = (char *)malloc(blksize);
394     if (!buffer) {
395         fprintf(STDERR, "memory allocation failed\n");
396         ERROR_EXIT(-1);
397     }
398
399     while ((bytesread = rx_Read(call, buffer, blksize)) > 0) {
400         for (bytesleft = bytesread; bytesleft; bytesleft -= w) {
401 #ifndef AFS_NT40_ENV            /* NT csn't select on non-socket fd's */
402             fd_set out;
403             FD_ZERO(&out);
404             FD_SET((intptr_t)(ufd->handle), &out);
405             /* don't timeout if write blocks */
406 #if defined(AFS_PTHREAD_ENV)
407             select(((int)(ufd->handle)) + 1, &out, 0, 0, 0);
408 #else
409             IOMGR_Select(((intptr_t)(ufd->handle)) + 1, 0, &out, 0, 0);
410 #endif
411 #endif
412             error =
413                 USD_WRITE(ufd, &buffer[bytesread - bytesleft], bytesleft, &w);
414             if (error) {
415                 fprintf(STDERR, "File system write failed\n");
416                 ERROR_EXIT(-1);
417             }
418         }
419     }
420
421   error_exit:
422     if (buffer)
423         free(buffer);
424     return (error);
425 }
426
427 afs_int32
428 DumpFunction(struct rx_call *call, void *rock)
429 {
430     char *filename = (char *)rock;
431     usd_handle_t ufd;           /* default is to stdout */
432     afs_int32 error = 0, code;
433     afs_hyper_t size;
434     long blksize;
435     int ufdIsOpen = 0;
436
437     /* Open the output file */
438     if (!filename || !*filename) {
439         usd_StandardOutput(&ufd);
440         blksize = 4096;
441         ufdIsOpen = 1;
442     } else {
443         code =
444             usd_Open(filename, USD_OPEN_CREATE | USD_OPEN_RDWR, 0666, &ufd);
445         if (code == 0) {
446             ufdIsOpen = 1;
447             hzero(size);
448             code = USD_IOCTL(ufd, USD_IOCTL_SETSIZE, &size);
449         }
450         if (code == 0) {
451             code = USD_IOCTL(ufd, USD_IOCTL_GETBLKSIZE, &blksize);
452         }
453         if (code) {
454             fprintf(STDERR, "Could not create file '%s'\n", filename);
455             ERROR_EXIT(VOLSERBADOP);
456         }
457     }
458
459     code = ReceiveFile(ufd, call, blksize);
460     if (code)
461         ERROR_EXIT(code);
462
463   error_exit:
464     /* Close the output file */
465     if (ufdIsOpen) {
466         code = USD_CLOSE(ufd);
467         if (code) {
468             fprintf(STDERR, "Could not close dump file %s\n",
469                     (filename && *filename) ? filename : "STDIN");
470             if (!error)
471                 error = code;
472         }
473     }
474
475     return (error);
476 }
477
478 static void
479 DisplayFormat(volintInfo *pntr, afs_int32 server, afs_int32 part,
480               int *totalOK, int *totalNotOK, int *totalBusy, int fast,
481               int longlist, int disp)
482 {
483     char pname[10];
484     time_t t;
485
486     if (fast) {
487         fprintf(STDOUT, "%-10lu\n", (unsigned long)pntr->volid);
488     } else if (longlist) {
489         if (pntr->status == VOK) {
490             fprintf(STDOUT, "%-32s ", pntr->name);
491             fprintf(STDOUT, "%10lu ", (unsigned long)pntr->volid);
492             if (pntr->type == 0)
493                 fprintf(STDOUT, "RW ");
494             if (pntr->type == 1)
495                 fprintf(STDOUT, "RO ");
496             if (pntr->type == 2)
497                 fprintf(STDOUT, "BK ");
498             fprintf(STDOUT, "%10d K  ", pntr->size);
499             if (pntr->inUse == 1) {
500                 fprintf(STDOUT, "On-line");
501                 *totalOK += 1;
502             } else {
503                 fprintf(STDOUT, "Off-line");
504                 *totalNotOK += 1;
505             }
506             if (pntr->needsSalvaged == 1)
507                 fprintf(STDOUT, "**needs salvage**");
508             fprintf(STDOUT, "\n");
509             MapPartIdIntoName(part, pname);
510             fprintf(STDOUT, "    %s %s \n", hostutil_GetNameByINet(server),
511                     pname);
512             fprintf(STDOUT, "    RWrite %10lu ROnly %10lu Backup %10lu \n",
513                     (unsigned long)pntr->parentID,
514                     (unsigned long)pntr->cloneID,
515                     (unsigned long)pntr->backupID);
516             fprintf(STDOUT, "    MaxQuota %10d K \n", pntr->maxquota);
517             t = pntr->creationDate;
518             fprintf(STDOUT, "    Creation    %s",
519                     ctime(&t));
520 #ifdef FULL_LISTVOL_SWITCH
521             t = pntr->copyDate;
522             fprintf(STDOUT, "    Copy        %s",
523                     ctime(&t));
524
525             t = pntr->backupDate;
526             if (!t)
527                 fprintf(STDOUT, "    Backup      Never\n");
528             else
529                 fprintf(STDOUT, "    Backup      %s",
530                         ctime(&t));
531
532             t = pntr->accessDate;
533             if (t)
534                 fprintf(STDOUT, "    Last Access %s",
535                         ctime(&t));
536 #endif
537             t = pntr->updateDate;
538             if (!t)
539                 fprintf(STDOUT, "    Last Update Never\n");
540             else
541                 fprintf(STDOUT, "    Last Update %s",
542                         ctime(&t));
543             fprintf(STDOUT,
544                     "    %d accesses in the past day (i.e., vnode references)\n",
545                     pntr->dayUse);
546         } else if (pntr->status == VBUSY) {
547             *totalBusy += 1;
548             qPut(&busyHead, pntr->volid);
549             if (disp)
550                 fprintf(STDOUT, "**** Volume %lu is busy ****\n",
551                         (unsigned long)pntr->volid);
552         } else {
553             *totalNotOK += 1;
554             qPut(&notokHead, pntr->volid);
555             if (disp)
556                 fprintf(STDOUT, "**** Could not attach volume %lu ****\n",
557                         (unsigned long)pntr->volid);
558         }
559         fprintf(STDOUT, "\n");
560     } else {                    /* default listing */
561         if (pntr->status == VOK) {
562             fprintf(STDOUT, "%-32s ", pntr->name);
563             fprintf(STDOUT, "%10lu ", (unsigned long)pntr->volid);
564             if (pntr->type == 0)
565                 fprintf(STDOUT, "RW ");
566             if (pntr->type == 1)
567                 fprintf(STDOUT, "RO ");
568             if (pntr->type == 2)
569                 fprintf(STDOUT, "BK ");
570             fprintf(STDOUT, "%10d K ", pntr->size);
571             if (pntr->inUse == 1) {
572                 fprintf(STDOUT, "On-line");
573                 *totalOK += 1;
574             } else {
575                 fprintf(STDOUT, "Off-line");
576                 *totalNotOK += 1;
577             }
578             if (pntr->needsSalvaged == 1)
579                 fprintf(STDOUT, "**needs salvage**");
580             fprintf(STDOUT, "\n");
581         } else if (pntr->status == VBUSY) {
582             *totalBusy += 1;
583             qPut(&busyHead, pntr->volid);
584             if (disp)
585                 fprintf(STDOUT, "**** Volume %lu is busy ****\n",
586                         (unsigned long)pntr->volid);
587         } else {
588             *totalNotOK += 1;
589             qPut(&notokHead, pntr->volid);
590             if (disp)
591                 fprintf(STDOUT, "**** Could not attach volume %lu ****\n",
592                         (unsigned long)pntr->volid);
593         }
594     }
595 }
596
597 /*------------------------------------------------------------------------
598  * PRIVATE XDisplayFormat
599  *
600  * Description:
601  *      Display the contents of one extended volume info structure.
602  *
603  * Arguments:
604  *      a_xInfoP        : Ptr to extended volume info struct to print.
605  *      a_servID        : Server ID to print.
606  *      a_partID        : Partition ID to print.
607  *      a_totalOKP      : Ptr to total-OK counter.
608  *      a_totalNotOKP   : Ptr to total-screwed counter.
609  *      a_totalBusyP    : Ptr to total-busy counter.
610  *      a_fast          : Fast listing?
611  *      a_int32         : Int32 listing?
612  *      a_showProblems  : Show volume problems?
613  *
614  * Returns:
615  *      Nothing.
616  *
617  * Environment:
618  *      Nothing interesting.
619  *
620  * Side Effects:
621  *      As advertised.
622  *------------------------------------------------------------------------*/
623
624 static void
625 XDisplayFormat(volintXInfo *a_xInfoP, afs_int32 a_servID, afs_int32 a_partID,
626                int *a_totalOKP, int *a_totalNotOKP, int *a_totalBusyP,
627                int a_fast, int a_int32, int a_showProblems)
628 {                               /*XDisplayFormat */
629     time_t t;
630     char pname[10];
631
632     if (a_fast) {
633         /*
634          * Short & sweet.
635          */
636         fprintf(STDOUT, "%-10lu\n", (unsigned long)a_xInfoP->volid);
637     } else if (a_int32) {
638         /*
639          * Fully-detailed listing.
640          */
641         if (a_xInfoP->status == VOK) {
642             /*
643              * Volume's status is OK - all the fields are valid.
644              */
645             fprintf(STDOUT, "%-32s ", a_xInfoP->name);
646             fprintf(STDOUT, "%10lu ", (unsigned long)a_xInfoP->volid);
647             if (a_xInfoP->type == 0)
648                 fprintf(STDOUT, "RW ");
649             if (a_xInfoP->type == 1)
650                 fprintf(STDOUT, "RO ");
651             if (a_xInfoP->type == 2)
652                 fprintf(STDOUT, "BK ");
653             fprintf(STDOUT, "%10d K used ", a_xInfoP->size);
654             fprintf(STDOUT, "%d files ", a_xInfoP->filecount);
655             if (a_xInfoP->inUse == 1) {
656                 fprintf(STDOUT, "On-line");
657                 (*a_totalOKP)++;
658             } else {
659                 fprintf(STDOUT, "Off-line");
660                 (*a_totalNotOKP)++;
661             }
662             fprintf(STDOUT, "\n");
663             MapPartIdIntoName(a_partID, pname);
664             fprintf(STDOUT, "    %s %s \n", hostutil_GetNameByINet(a_servID),
665                     pname);
666             fprintf(STDOUT, "    RWrite %10lu ROnly %10lu Backup %10lu \n",
667                     (unsigned long)a_xInfoP->parentID,
668                     (unsigned long)a_xInfoP->cloneID,
669                     (unsigned long)a_xInfoP->backupID);
670             fprintf(STDOUT, "    MaxQuota %10d K \n", a_xInfoP->maxquota);
671
672             t = a_xInfoP->creationDate;
673             fprintf(STDOUT, "    Creation    %s",
674                     ctime(&t));
675 #ifdef FULL_LISTVOL_SWITCH
676             t = a_xInfoP->copyDate;
677             fprintf(STDOUT, "    Copy        %s",
678                     ctime(&t));
679
680             t = a_xInfoP->backupDate;
681             if (!t)
682                 fprintf(STDOUT, "    Backup      Never\n");
683             else
684                 fprintf(STDOUT, "    Backup      %s",
685                         ctime(&t));
686
687             t = a_xInfoP->accessDate;
688             if (t)
689                 fprintf(STDOUT, "    Last Access %s",
690                         ctime(&t));
691 #endif
692             t = a_xInfoP->updateDate;
693             if (!t)
694                 fprintf(STDOUT, "    Last Update Never\n");
695             else
696                 fprintf(STDOUT, "    Last Update %s",
697                         ctime(&t));
698             fprintf(STDOUT,
699                     "    %d accesses in the past day (i.e., vnode references)\n",
700                     a_xInfoP->dayUse);
701
702             /*
703              * Print all the read/write and authorship stats.
704              */
705             fprintf(STDOUT, "\n                      Raw Read/Write Stats\n");
706             fprintf(STDOUT,
707                     "          |-------------------------------------------|\n");
708             fprintf(STDOUT,
709                     "          |    Same Network     |    Diff Network     |\n");
710             fprintf(STDOUT,
711                     "          |----------|----------|----------|----------|\n");
712             fprintf(STDOUT,
713                     "          |  Total   |   Auth   |   Total  |   Auth   |\n");
714             fprintf(STDOUT,
715                     "          |----------|----------|----------|----------|\n");
716             fprintf(STDOUT, "Reads     | %8d | %8d | %8d | %8d |\n",
717                     a_xInfoP->stat_reads[VOLINT_STATS_SAME_NET],
718                     a_xInfoP->stat_reads[VOLINT_STATS_SAME_NET_AUTH],
719                     a_xInfoP->stat_reads[VOLINT_STATS_DIFF_NET],
720                     a_xInfoP->stat_reads[VOLINT_STATS_DIFF_NET_AUTH]);
721             fprintf(STDOUT, "Writes    | %8d | %8d | %8d | %8d |\n",
722                     a_xInfoP->stat_writes[VOLINT_STATS_SAME_NET],
723                     a_xInfoP->stat_writes[VOLINT_STATS_SAME_NET_AUTH],
724                     a_xInfoP->stat_writes[VOLINT_STATS_DIFF_NET],
725                     a_xInfoP->stat_writes[VOLINT_STATS_DIFF_NET_AUTH]);
726             fprintf(STDOUT,
727                     "          |-------------------------------------------|\n\n");
728
729             fprintf(STDOUT,
730                     "                   Writes Affecting Authorship\n");
731             fprintf(STDOUT,
732                     "          |-------------------------------------------|\n");
733             fprintf(STDOUT,
734                     "          |   File Authorship   | Directory Authorship|\n");
735             fprintf(STDOUT,
736                     "          |----------|----------|----------|----------|\n");
737             fprintf(STDOUT,
738                     "          |   Same   |   Diff   |    Same  |   Diff   |\n");
739             fprintf(STDOUT,
740                     "          |----------|----------|----------|----------|\n");
741             fprintf(STDOUT, "0-60 sec  | %8d | %8d | %8d | %8d |\n",
742                     a_xInfoP->stat_fileSameAuthor[VOLINT_STATS_TIME_IDX_0],
743                     a_xInfoP->stat_fileDiffAuthor[VOLINT_STATS_TIME_IDX_0],
744                     a_xInfoP->stat_dirSameAuthor[VOLINT_STATS_TIME_IDX_0],
745                     a_xInfoP->stat_dirDiffAuthor[VOLINT_STATS_TIME_IDX_0]);
746             fprintf(STDOUT, "1-10 min  | %8d | %8d | %8d | %8d |\n",
747                     a_xInfoP->stat_fileSameAuthor[VOLINT_STATS_TIME_IDX_1],
748                     a_xInfoP->stat_fileDiffAuthor[VOLINT_STATS_TIME_IDX_1],
749                     a_xInfoP->stat_dirSameAuthor[VOLINT_STATS_TIME_IDX_1],
750                     a_xInfoP->stat_dirDiffAuthor[VOLINT_STATS_TIME_IDX_1]);
751             fprintf(STDOUT, "10min-1hr | %8d | %8d | %8d | %8d |\n",
752                     a_xInfoP->stat_fileSameAuthor[VOLINT_STATS_TIME_IDX_2],
753                     a_xInfoP->stat_fileDiffAuthor[VOLINT_STATS_TIME_IDX_2],
754                     a_xInfoP->stat_dirSameAuthor[VOLINT_STATS_TIME_IDX_2],
755                     a_xInfoP->stat_dirDiffAuthor[VOLINT_STATS_TIME_IDX_2]);
756             fprintf(STDOUT, "1hr-1day  | %8d | %8d | %8d | %8d |\n",
757                     a_xInfoP->stat_fileSameAuthor[VOLINT_STATS_TIME_IDX_3],
758                     a_xInfoP->stat_fileDiffAuthor[VOLINT_STATS_TIME_IDX_3],
759                     a_xInfoP->stat_dirSameAuthor[VOLINT_STATS_TIME_IDX_3],
760                     a_xInfoP->stat_dirDiffAuthor[VOLINT_STATS_TIME_IDX_3]);
761             fprintf(STDOUT, "1day-1wk  | %8d | %8d | %8d | %8d |\n",
762                     a_xInfoP->stat_fileSameAuthor[VOLINT_STATS_TIME_IDX_4],
763                     a_xInfoP->stat_fileDiffAuthor[VOLINT_STATS_TIME_IDX_4],
764                     a_xInfoP->stat_dirSameAuthor[VOLINT_STATS_TIME_IDX_4],
765                     a_xInfoP->stat_dirDiffAuthor[VOLINT_STATS_TIME_IDX_4]);
766             fprintf(STDOUT, "> 1wk     | %8d | %8d | %8d | %8d |\n",
767                     a_xInfoP->stat_fileSameAuthor[VOLINT_STATS_TIME_IDX_5],
768                     a_xInfoP->stat_fileDiffAuthor[VOLINT_STATS_TIME_IDX_5],
769                     a_xInfoP->stat_dirSameAuthor[VOLINT_STATS_TIME_IDX_5],
770                     a_xInfoP->stat_dirDiffAuthor[VOLINT_STATS_TIME_IDX_5]);
771             fprintf(STDOUT,
772                     "          |-------------------------------------------|\n");
773         } /*Volume status OK */
774         else if (a_xInfoP->status == VBUSY) {
775             (*a_totalBusyP)++;
776             qPut(&busyHead, a_xInfoP->volid);
777             if (a_showProblems)
778                 fprintf(STDOUT, "**** Volume %lu is busy ****\n",
779                         (unsigned long)a_xInfoP->volid);
780         } /*Busy volume */
781         else {
782             (*a_totalNotOKP)++;
783             qPut(&notokHead, a_xInfoP->volid);
784             if (a_showProblems)
785                 fprintf(STDOUT, "**** Could not attach volume %lu ****\n",
786                         (unsigned long)a_xInfoP->volid);
787         }                       /*Screwed volume */
788         fprintf(STDOUT, "\n");
789     } /*Long listing */
790     else {
791         /*
792          * Default listing.
793          */
794         if (a_xInfoP->status == VOK) {
795             fprintf(STDOUT, "%-32s ", a_xInfoP->name);
796             fprintf(STDOUT, "%10lu ", (unsigned long)a_xInfoP->volid);
797             if (a_xInfoP->type == 0)
798                 fprintf(STDOUT, "RW ");
799             if (a_xInfoP->type == 1)
800                 fprintf(STDOUT, "RO ");
801             if (a_xInfoP->type == 2)
802                 fprintf(STDOUT, "BK ");
803             fprintf(STDOUT, "%10d K ", a_xInfoP->size);
804             if (a_xInfoP->inUse == 1) {
805                 fprintf(STDOUT, "On-line");
806                 (*a_totalOKP)++;
807             } else {
808                 fprintf(STDOUT, "Off-line");
809                 (*a_totalNotOKP)++;
810             }
811             fprintf(STDOUT, "\n");
812         } /*Volume OK */
813         else if (a_xInfoP->status == VBUSY) {
814             (*a_totalBusyP)++;
815             qPut(&busyHead, a_xInfoP->volid);
816             if (a_showProblems)
817                 fprintf(STDOUT, "**** Volume %lu is busy ****\n",
818                         (unsigned long)a_xInfoP->volid);
819         } /*Busy volume */
820         else {
821             (*a_totalNotOKP)++;
822             qPut(&notokHead, a_xInfoP->volid);
823             if (a_showProblems)
824                 fprintf(STDOUT, "**** Could not attach volume %lu ****\n",
825                         (unsigned long)a_xInfoP->volid);
826         }                       /*Screwed volume */
827     }                           /*Default listing */
828 }                               /*XDisplayFormat */
829
830 #ifdef FULL_LISTVOL_SWITCH
831 /*------------------------------------------------------------------------
832  * PRIVATE XDisplayFormat2
833  *
834  * Description:
835  *      Display the formated contents of one extended volume info structure.
836  *
837  * Arguments:
838  *      a_xInfoP        : Ptr to extended volume info struct to print.
839  *      a_servID        : Server ID to print.
840  *      a_partID        : Partition ID to print.
841  *      a_totalOKP      : Ptr to total-OK counter.
842  *      a_totalNotOKP   : Ptr to total-screwed counter.
843  *      a_totalBusyP    : Ptr to total-busy counter.
844  *      a_fast          : Fast listing?
845  *      a_int32         : Int32 listing?
846  *      a_showProblems  : Show volume problems?
847  *
848  * Returns:
849  *      Nothing.
850  *
851  * Environment:
852  *      Nothing interesting.
853  *
854  * Side Effects:
855  *      As advertised.
856  *------------------------------------------------------------------------*/
857
858 static void
859 XDisplayFormat2(volintXInfo *a_xInfoP, afs_int32 a_servID, afs_int32 a_partID,
860                 int *a_totalOKP, int *a_totalNotOKP, int *a_totalBusyP,
861                 int a_fast, int a_int32, int a_showProblems)
862 {                               /*XDisplayFormat */
863     time_t t;
864     if (a_fast) {
865         /*
866          * Short & sweet.
867          */
868         fprintf(STDOUT, "vold_id\t%-10lu\n", (unsigned long)a_xInfoP->volid);
869     } else if (a_int32) {
870         /*
871          * Fully-detailed listing.
872          */
873         if (a_xInfoP->status == VOK) {
874             /*
875              * Volume's status is OK - all the fields are valid.
876              */
877
878                 static long server_cache = -1, partition_cache = -1;
879                 static char hostname[256], address[32], pname[16];
880                 int i,ai[] = {VOLINT_STATS_TIME_IDX_0,VOLINT_STATS_TIME_IDX_1,VOLINT_STATS_TIME_IDX_2,
881                               VOLINT_STATS_TIME_IDX_3,VOLINT_STATS_TIME_IDX_4,VOLINT_STATS_TIME_IDX_5};
882
883                 if (a_servID != server_cache) {
884                         struct in_addr s;
885
886                         s.s_addr = a_servID;
887                         strcpy(hostname, hostutil_GetNameByINet(a_servID));
888                         strcpy(address, inet_ntoa(s));
889                         server_cache = a_servID;
890                 }
891                 if (a_partID != partition_cache) {
892                         MapPartIdIntoName(a_partID, pname);
893                         partition_cache = a_partID;
894                 }
895
896                 fprintf(STDOUT, "name\t\t%s\n", a_xInfoP->name);
897                 fprintf(STDOUT, "id\t\t%lu\n", afs_printable_uint32_lu(a_xInfoP->volid));
898                 fprintf(STDOUT, "serv\t\t%s\t%s\n", address, hostname);
899                 fprintf(STDOUT, "part\t\t%s\n", pname);
900                 fprintf(STDOUT, "status\t\tOK\n");
901                 fprintf(STDOUT, "backupID\t%lu\n", 
902                         afs_printable_uint32_lu(a_xInfoP->backupID));
903                 fprintf(STDOUT, "parentID\t%lu\n", 
904                         afs_printable_uint32_lu(a_xInfoP->parentID));
905                 fprintf(STDOUT, "cloneID\t\t%lu\n", 
906                         afs_printable_uint32_lu(a_xInfoP->cloneID));
907                 fprintf(STDOUT, "inUse\t\t%s\n", a_xInfoP->inUse ? "Y" : "N");
908                 switch (a_xInfoP->type) {
909                 case 0:
910                         fprintf(STDOUT, "type\t\tRW\n");
911                         break;
912                 case 1:
913                         fprintf(STDOUT, "type\t\tRO\n");
914                         break;
915                 case 2:
916                         fprintf(STDOUT, "type\t\tBK\n");
917                         break;
918                 default:
919                         fprintf(STDOUT, "type\t\t?\n");
920                         break;
921                 }
922                 t = a_xInfoP->creationDate;
923                 fprintf(STDOUT, "creationDate\t%-9lu\t%s", 
924                         afs_printable_uint32_lu(a_xInfoP->creationDate),
925                         ctime(&t));
926
927                 t = a_xInfoP->accessDate;
928                 fprintf(STDOUT, "accessDate\t%-9lu\t%s", 
929                         afs_printable_uint32_lu(a_xInfoP->accessDate),
930                         ctime(&t));
931
932                 t = a_xInfoP->updateDate;
933                 fprintf(STDOUT, "updateDate\t%-9lu\t%s", 
934                         afs_printable_uint32_lu(a_xInfoP->updateDate),
935                         ctime(&t));
936
937                 t = a_xInfoP->backupDate;
938                 fprintf(STDOUT, "backupDate\t%-9lu\t%s", 
939                         afs_printable_uint32_lu(a_xInfoP->backupDate),
940                         ctime(&t));
941
942                 t = a_xInfoP->copyDate;
943                 fprintf(STDOUT, "copyDate\t%-9lu\t%s", 
944                         afs_printable_uint32_lu(a_xInfoP->copyDate),
945                         ctime(&t));
946                 
947                 fprintf(STDOUT, "diskused\t%u\n", a_xInfoP->size);
948                 fprintf(STDOUT, "maxquota\t%u\n", a_xInfoP->maxquota);
949
950                 fprintf(STDOUT, "filecount\t%u\n", a_xInfoP->filecount);
951                 fprintf(STDOUT, "dayUse\t\t%u\n", a_xInfoP->dayUse);
952
953
954
955                 fprintf(STDOUT,"reads_same_net\t%8d\n",a_xInfoP->stat_reads[VOLINT_STATS_SAME_NET]);
956                 fprintf(STDOUT,"reads_same_net_auth\t%8d\n",a_xInfoP->stat_reads[VOLINT_STATS_SAME_NET_AUTH]);
957                 fprintf(STDOUT,"reads_diff_net\t%8d\n",a_xInfoP->stat_reads[VOLINT_STATS_DIFF_NET]);
958                 fprintf(STDOUT,"reads_diff_net_auth\t%8d\n",a_xInfoP->stat_reads[VOLINT_STATS_DIFF_NET_AUTH]);
959
960                 fprintf(STDOUT,"writes_same_net\t%8d\n",a_xInfoP->stat_writes[VOLINT_STATS_SAME_NET]);
961                 fprintf(STDOUT,"writes_same_net_auth\t%8d\n",a_xInfoP->stat_writes[VOLINT_STATS_SAME_NET_AUTH]);
962                 fprintf(STDOUT,"writes_diff_net\t%8d\n",a_xInfoP->stat_writes[VOLINT_STATS_DIFF_NET]);
963                 fprintf(STDOUT,"writes_diff_net_auth\t%8d\n",a_xInfoP->stat_writes[VOLINT_STATS_DIFF_NET_AUTH]);
964
965                 for(i=0;i<5;i++)
966                 {
967                         fprintf(STDOUT,"file_same_author_idx_%d\t%8d\n",i+1,a_xInfoP->stat_fileSameAuthor[ai[i]]);
968                         fprintf(STDOUT,"file_diff_author_idx_%d\t%8d\n",i+1,a_xInfoP->stat_fileDiffAuthor[ai[i]]);
969                         fprintf(STDOUT,"dir_same_author_idx_%d\t%8d\n",i+1,a_xInfoP->stat_dirSameAuthor[ai[i]]);
970                         fprintf(STDOUT,"dir_dif_author_idx_%d\t%8d\n",i+1,a_xInfoP->stat_dirDiffAuthor[ai[i]]);
971                 }
972
973         } /*Volume status OK */
974         else if (a_xInfoP->status == VBUSY) {
975             (*a_totalBusyP)++;
976             qPut(&busyHead, a_xInfoP->volid);
977             if (a_showProblems)
978                 fprintf(STDOUT, "BUSY_VOL\t%lu\n",
979                         (unsigned long)a_xInfoP->volid);
980         } /*Busy volume */
981         else {
982             (*a_totalNotOKP)++;
983             qPut(&notokHead, a_xInfoP->volid);
984             if (a_showProblems)
985                 fprintf(STDOUT, "COULD_NOT_ATTACH\t%lu\n",
986                         (unsigned long)a_xInfoP->volid);
987         }                       /*Screwed volume */
988     } /*Long listing */
989     else {
990         /*
991          * Default listing.
992          */
993         if (a_xInfoP->status == VOK) {
994             fprintf(STDOUT, "name\t%-32s\n", a_xInfoP->name);
995             fprintf(STDOUT, "volID\t%10lu\n", (unsigned long)a_xInfoP->volid);
996             if (a_xInfoP->type == 0)
997                 fprintf(STDOUT, "type\tRW\n");
998             if (a_xInfoP->type == 1)
999                 fprintf(STDOUT, "type\tRO\n");
1000             if (a_xInfoP->type == 2)
1001                 fprintf(STDOUT, "type\tBK\n");
1002             fprintf(STDOUT, "size\t%10dK\n", a_xInfoP->size);
1003
1004             fprintf(STDOUT, "inUse\t%d\n",a_xInfoP->inUse);
1005             if (a_xInfoP->inUse == 1)
1006                 (*a_totalOKP)++;
1007             else
1008                 (*a_totalNotOKP)++;
1009
1010         } /*Volume OK */
1011         else if (a_xInfoP->status == VBUSY) {
1012             (*a_totalBusyP)++;
1013             qPut(&busyHead, a_xInfoP->volid);
1014             if (a_showProblems)
1015                 fprintf(STDOUT, "VOLUME_BUSY\t%lu\n",
1016                         (unsigned long)a_xInfoP->volid);
1017         } /*Busy volume */
1018         else {
1019             (*a_totalNotOKP)++;
1020             qPut(&notokHead, a_xInfoP->volid);
1021             if (a_showProblems)
1022                 fprintf(STDOUT, "COULD_NOT_ATTACH_VOLUME\t%lu\n",
1023                         (unsigned long)a_xInfoP->volid);
1024         }                       /*Screwed volume */
1025     }                           /*Default listing */
1026 }                               /*XDisplayFormat */
1027 #endif /*FULL_LISTVOL_SWITCH*/
1028
1029 #ifdef FULL_LISTVOL_SWITCH
1030 static void
1031 DisplayFormat2(long server, long partition, volintInfo *pntr)
1032 {
1033     static long server_cache = -1, partition_cache = -1;
1034     static char hostname[256], address[32], pname[16];
1035     time_t t;
1036
1037     if (server != server_cache) {
1038         struct in_addr s;
1039
1040         s.s_addr = server;
1041         strcpy(hostname, hostutil_GetNameByINet(server));
1042         strcpy(address, inet_ntoa(s));
1043         server_cache = server;
1044     }
1045     if (partition != partition_cache) {
1046         MapPartIdIntoName(partition, pname);
1047         partition_cache = partition;
1048     }
1049
1050     if (pntr->status == VOK)
1051         fprintf(STDOUT, "name\t\t%s\n", pntr->name);
1052
1053     fprintf(STDOUT, "id\t\t%lu\n", 
1054             afs_printable_uint32_lu(pntr->volid));
1055     fprintf(STDOUT, "serv\t\t%s\t%s\n", address, hostname);
1056     fprintf(STDOUT, "part\t\t%s\n", pname);
1057     switch (pntr->status) {
1058     case VOK:
1059         fprintf(STDOUT, "status\t\tOK\n");
1060         break;
1061     case VBUSY:
1062         fprintf(STDOUT, "status\t\tBUSY\n");
1063         return;
1064     default:
1065         fprintf(STDOUT, "status\t\tUNATTACHABLE\n");
1066         return;
1067     }
1068     fprintf(STDOUT, "backupID\t%lu\n", 
1069             afs_printable_uint32_lu(pntr->backupID));
1070     fprintf(STDOUT, "parentID\t%lu\n", 
1071             afs_printable_uint32_lu(pntr->parentID));
1072     fprintf(STDOUT, "cloneID\t\t%lu\n", 
1073             afs_printable_uint32_lu(pntr->cloneID));
1074     fprintf(STDOUT, "inUse\t\t%s\n", pntr->inUse ? "Y" : "N");
1075     fprintf(STDOUT, "needsSalvaged\t%s\n", pntr->needsSalvaged ? "Y" : "N");
1076     /* 0xD3 is from afs/volume.h since I had trouble including the file */
1077     fprintf(STDOUT, "destroyMe\t%s\n", pntr->destroyMe == 0xD3 ? "Y" : "N");
1078     switch (pntr->type) {
1079     case 0:
1080         fprintf(STDOUT, "type\t\tRW\n");
1081         break;
1082     case 1:
1083         fprintf(STDOUT, "type\t\tRO\n");
1084         break;
1085     case 2:
1086         fprintf(STDOUT, "type\t\tBK\n");
1087         break;
1088     default:
1089         fprintf(STDOUT, "type\t\t?\n");
1090         break;
1091     }
1092     t = pntr->creationDate;
1093     fprintf(STDOUT, "creationDate\t%-9lu\t%s", 
1094             afs_printable_uint32_lu(pntr->creationDate),
1095             ctime(&t));
1096
1097     t = pntr->accessDate;
1098     fprintf(STDOUT, "accessDate\t%-9lu\t%s", 
1099             afs_printable_uint32_lu(pntr->accessDate),
1100             ctime(&t));
1101
1102     t = pntr->updateDate;
1103     fprintf(STDOUT, "updateDate\t%-9lu\t%s", 
1104             afs_printable_uint32_lu(pntr->updateDate),
1105             ctime(&t));
1106
1107     t = pntr->backupDate;
1108     fprintf(STDOUT, "backupDate\t%-9lu\t%s", 
1109             afs_printable_uint32_lu(pntr->backupDate),
1110             ctime(&t));
1111
1112     t = pntr->copyDate;
1113     fprintf(STDOUT, "copyDate\t%-9lu\t%s", 
1114             afs_printable_uint32_lu(pntr->copyDate),
1115             ctime(&t));
1116
1117     fprintf(STDOUT, "flags\t\t%#lx\t(Optional)\n", 
1118             afs_printable_uint32_lu(pntr->flags));
1119     fprintf(STDOUT, "diskused\t%u\n", pntr->size);
1120     fprintf(STDOUT, "maxquota\t%u\n", pntr->maxquota);
1121     fprintf(STDOUT, "minquota\t%lu\t(Optional)\n", 
1122             afs_printable_uint32_lu(pntr->spare0));
1123     fprintf(STDOUT, "filecount\t%u\n", pntr->filecount);
1124     fprintf(STDOUT, "dayUse\t\t%u\n", pntr->dayUse);
1125     fprintf(STDOUT, "weekUse\t\t%lu\t(Optional)\n",
1126             afs_printable_uint32_lu(pntr->spare1));
1127     fprintf(STDOUT, "spare2\t\t%lu\t(Optional)\n", 
1128             afs_printable_uint32_lu(pntr->spare2));
1129     fprintf(STDOUT, "spare3\t\t%lu\t(Optional)\n", 
1130             afs_printable_uint32_lu(pntr->spare3));
1131     return;
1132 }
1133
1134 static void
1135 DisplayVolumes2(long server, long partition, volintInfo *pntr, long count)
1136 {
1137     long i;
1138
1139     for (i = 0; i < count; i++) {
1140         fprintf(STDOUT, "BEGIN_OF_ENTRY\n");
1141         DisplayFormat2(server, partition, pntr);
1142         fprintf(STDOUT, "END_OF_ENTRY\n\n");
1143         pntr++;
1144     }
1145     return;
1146 }
1147 #endif /* FULL_LISTVOL_SWITCH */
1148
1149 static void
1150 DisplayVolumes(afs_int32 server, afs_int32 part, volintInfo *pntr,
1151                afs_int32 count, afs_int32 longlist, afs_int32 fast,
1152                int quiet)
1153 {
1154     int totalOK, totalNotOK, totalBusy, i;
1155     afs_uint32 volid = 0;
1156
1157     totalOK = 0;
1158     totalNotOK = 0;
1159     totalBusy = 0;
1160     qInit(&busyHead);
1161     qInit(&notokHead);
1162     for (i = 0; i < count; i++) {
1163         DisplayFormat(pntr, server, part, &totalOK, &totalNotOK, &totalBusy,
1164                       fast, longlist, 0);
1165         pntr++;
1166     }
1167     if (totalBusy) {
1168         while (busyHead.count) {
1169             qGet(&busyHead, &volid);
1170             fprintf(STDOUT, "**** Volume %lu is busy ****\n",
1171                     (unsigned long)volid);
1172         }
1173     }
1174     if (totalNotOK) {
1175         while (notokHead.count) {
1176             qGet(&notokHead, &volid);
1177             fprintf(STDOUT, "**** Could not attach volume %lu ****\n",
1178                     (unsigned long)volid);
1179         }
1180     }
1181     if (!quiet) {
1182         fprintf(STDOUT, "\n");
1183         if (!fast) {
1184             fprintf(STDOUT,
1185                     "Total volumes onLine %d ; Total volumes offLine %d ; Total busy %d\n\n",
1186                     totalOK, totalNotOK, totalBusy);
1187         }
1188     }
1189 }
1190 /*------------------------------------------------------------------------
1191  * PRIVATE XDisplayVolumes
1192  *
1193  * Description:
1194  *      Display extended volume information.
1195  *
1196  * Arguments:
1197  *      a_servID : Pointer to the Rx call we're performing.
1198  *      a_partID : Partition for which we want the extended list.
1199  *      a_xInfoP : Ptr to extended volume info.
1200  *      a_count  : Number of volume records contained above.
1201  *      a_int32   : Int32 listing generated?
1202  *      a_fast   : Fast listing generated?
1203  *      a_quiet  : Quiet listing generated?
1204  *
1205  * Returns:
1206  *      Nothing.
1207  *
1208  * Environment:
1209  *      Nothing interesting.
1210  *
1211  * Side Effects:
1212  *      As advertised.
1213  *------------------------------------------------------------------------*/
1214
1215 static void
1216 XDisplayVolumes(afs_int32 a_servID, afs_int32 a_partID, volintXInfo *a_xInfoP,
1217                 afs_int32 a_count, afs_int32 a_int32, afs_int32 a_fast,
1218                 int a_quiet)
1219 {                               /*XDisplayVolumes */
1220
1221     int totalOK;                /*Total OK volumes */
1222     int totalNotOK;             /*Total screwed volumes */
1223     int totalBusy;              /*Total busy volumes */
1224     int i;                      /*Loop variable */
1225     afs_uint32 volid = 0;       /*Current volume ID */
1226
1227     /*
1228      * Initialize counters and (global!!) queues.
1229      */
1230     totalOK = 0;
1231     totalNotOK = 0;
1232     totalBusy = 0;
1233     qInit(&busyHead);
1234     qInit(&notokHead);
1235
1236     /*
1237      * Display each volume in the list.
1238      */
1239     for (i = 0; i < a_count; i++) {
1240         XDisplayFormat(a_xInfoP, a_servID, a_partID, &totalOK, &totalNotOK,
1241                        &totalBusy, a_fast, a_int32, 0);
1242         a_xInfoP++;
1243     }
1244
1245     /*
1246      * If any volumes were found to be busy or screwed, display them.
1247      */
1248     if (totalBusy) {
1249         while (busyHead.count) {
1250             qGet(&busyHead, &volid);
1251             fprintf(STDOUT, "**** Volume %lu is busy ****\n",
1252                     (unsigned long)volid);
1253         }
1254     }
1255     if (totalNotOK) {
1256         while (notokHead.count) {
1257             qGet(&notokHead, &volid);
1258             fprintf(STDOUT, "**** Could not attach volume %lu ****\n",
1259                     (unsigned long)volid);
1260         }
1261     }
1262
1263     if (!a_quiet) {
1264         fprintf(STDOUT, "\n");
1265         if (!a_fast) {
1266             fprintf(STDOUT,
1267                     "Total volumes: %d on-line, %d off-line, %d  busyd\n\n",
1268                     totalOK, totalNotOK, totalBusy);
1269         }
1270     }
1271
1272 }                               /*XDisplayVolumes */
1273 #ifdef FULL_LISTVOL_SWITCH
1274 /*------------------------------------------------------------------------
1275  * PRIVATE XDisplayVolumes2
1276  *
1277  * Description:
1278  *      Display extended formated volume information.
1279  *
1280  * Arguments:
1281  *      a_servID : Pointer to the Rx call we're performing.
1282  *      a_partID : Partition for which we want the extended list.
1283  *      a_xInfoP : Ptr to extended volume info.
1284  *      a_count  : Number of volume records contained above.
1285  *      a_int32   : Int32 listing generated?
1286  *      a_fast   : Fast listing generated?
1287  *      a_quiet  : Quiet listing generated?
1288  *
1289  * Returns:
1290  *      Nothing.
1291  *
1292  * Environment:
1293  *      Nothing interesting.
1294  *
1295  * Side Effects:
1296  *      As advertised.
1297  *------------------------------------------------------------------------*/
1298
1299 static void
1300 XDisplayVolumes2(afs_int32 a_servID, afs_int32 a_partID, volintXInfo *a_xInfoP,
1301                  afs_int32 a_count, afs_int32 a_int32, afs_int32 a_fast,
1302                  int a_quiet)
1303 {                               /*XDisplayVolumes */
1304
1305     int totalOK;                /*Total OK volumes */
1306     int totalNotOK;             /*Total screwed volumes */
1307     int totalBusy;              /*Total busy volumes */
1308     int i;                      /*Loop variable */
1309     afs_uint32 volid = 0;       /*Current volume ID */
1310
1311     /*
1312      * Initialize counters and (global!!) queues.
1313      */
1314     totalOK = 0;
1315     totalNotOK = 0;
1316     totalBusy = 0;
1317     qInit(&busyHead);
1318     qInit(&notokHead);
1319
1320     /*
1321      * Display each volume in the list.
1322      */
1323     for (i = 0; i < a_count; i++) {
1324         fprintf(STDOUT, "BEGIN_OF_ENTRY\n");
1325         XDisplayFormat2(a_xInfoP, a_servID, a_partID, &totalOK, &totalNotOK,
1326                        &totalBusy, a_fast, a_int32, 0);
1327         fprintf(STDOUT, "END_OF_ENTRY\n");
1328         a_xInfoP++;
1329     }
1330
1331     /*
1332      * If any volumes were found to be busy or screwed, display them.
1333      */
1334     if (totalBusy) {
1335         while (busyHead.count) {
1336             qGet(&busyHead, &volid);
1337             fprintf(STDOUT, "BUSY_VOL\t%lu\n",
1338                     (unsigned long)volid);
1339         }
1340     }
1341     if (totalNotOK) {
1342         while (notokHead.count) {
1343             qGet(&notokHead, &volid);
1344             fprintf(STDOUT, "COULD_NOT_ATTACH\t%lu\n",
1345                     (unsigned long)volid);
1346         }
1347     }
1348
1349     if (!a_quiet) {
1350         fprintf(STDOUT, "\n");
1351         if (!a_fast) {
1352             fprintf(STDOUT,
1353                     "VOLUMES_ONLINE\t%d\nVOLUMES_OFFLINE\t%d\nVOLUMES_BUSY\t%d\n",
1354                     totalOK, totalNotOK, totalBusy);
1355         }
1356     }
1357
1358 }                               /*XDisplayVolumes2 */
1359 #endif /* FULL_LISTVOL_SWITCH */
1360
1361
1362 /* set <server> and <part> to the correct values depending on 
1363  * <voltype> and <entry> */
1364 static void
1365 GetServerAndPart(struct nvldbentry *entry, int voltype, afs_int32 *server,
1366                  afs_int32 *part, int *previdx)
1367 {
1368     int i, istart, vtype;
1369
1370     *server = -1;
1371     *part = -1;
1372
1373     /* Doesn't check for non-existance of backup volume */
1374     if ((voltype == RWVOL) || (voltype == BACKVOL)) {
1375         vtype = ITSRWVOL;
1376         istart = 0;             /* seach the entire entry */
1377     } else {
1378         vtype = ITSROVOL;
1379         /* Seach from beginning of entry or pick up where we left off */
1380         istart = ((*previdx < 0) ? 0 : *previdx + 1);
1381     }
1382
1383     for (i = istart; i < entry->nServers; i++) {
1384         if (entry->serverFlags[i] & vtype) {
1385             *server = entry->serverNumber[i];
1386             *part = entry->serverPartition[i];
1387             *previdx = i;
1388             return;
1389         }
1390     }
1391
1392     /* Didn't find any, return -1 */
1393     *previdx = -1;
1394     return;
1395 }
1396
1397 static void
1398 PostVolumeStats(struct nvldbentry *entry)
1399 {
1400     SubEnumerateEntry(entry);
1401     /* Check for VLOP_ALLOPERS */
1402     if (entry->flags & VLOP_ALLOPERS)
1403         fprintf(STDOUT, "    Volume is currently LOCKED  \n");
1404     return;
1405 }
1406
1407 /*------------------------------------------------------------------------
1408  * PRIVATE XVolumeStats
1409  *
1410  * Description:
1411  *      Display extended volume information.
1412  *
1413  * Arguments:
1414  *      a_xInfoP  : Ptr to extended volume info.
1415  *      a_entryP  : Ptr to the volume's VLDB entry.
1416  *      a_srvID   : Server ID.
1417  *      a_partID  : Partition ID.
1418  *      a_volType : Type of volume to print.
1419  *
1420  * Returns:
1421  *      Nothing.
1422  *
1423  * Environment:
1424  *      Nothing interesting.
1425  *
1426  * Side Effects:
1427  *      As advertised.
1428  *------------------------------------------------------------------------*/
1429
1430 static void
1431 XVolumeStats(volintXInfo *a_xInfoP, struct nvldbentry *a_entryP,
1432              afs_int32 a_srvID, afs_int32 a_partID, int a_volType)
1433 {                               /*XVolumeStats */
1434
1435     int totalOK, totalNotOK, totalBusy; /*Dummies - we don't really count here */
1436
1437     XDisplayFormat(a_xInfoP,    /*Ptr to extended volume info */
1438                    a_srvID,     /*Server ID to print */
1439                    a_partID,    /*Partition ID to print */
1440                    &totalOK,    /*Ptr to total-OK counter */
1441                    &totalNotOK, /*Ptr to total-screwed counter */
1442                    &totalBusy,  /*Ptr to total-busy counter */
1443                    0,           /*Don't do a fast listing */
1444                    1,           /*Do a long listing */
1445                    1);          /*Show volume problems */
1446     return;
1447
1448 }                               /*XVolumeStats */
1449
1450 static void
1451 VolumeStats_int(volintInfo *pntr, struct nvldbentry *entry, afs_int32 server, 
1452              afs_int32 part, int voltype)
1453 {
1454     int totalOK, totalNotOK, totalBusy;
1455
1456     DisplayFormat(pntr, server, part, &totalOK, &totalNotOK, &totalBusy, 0, 1,
1457                   1);
1458     return;
1459 }
1460
1461 /* command to forcibly remove a volume */
1462 static int
1463 NukeVolume(register struct cmd_syndesc *as)
1464 {
1465     register afs_int32 code;
1466     afs_uint32 volID;
1467     afs_int32  err;
1468     afs_int32 partID;
1469     afs_int32 server;
1470     register char *tp;
1471
1472     server = GetServer(tp = as->parms[0].items->data);
1473     if (!server) {
1474         fprintf(STDERR, "vos: server '%s' not found in host table\n", tp);
1475         return 1;
1476     }
1477
1478     partID = volutil_GetPartitionID(tp = as->parms[1].items->data);
1479     if (partID == -1) {
1480         fprintf(STDERR, "vos: could not parse '%s' as a partition name", tp);
1481         return 1;
1482     }
1483
1484     volID = vsu_GetVolumeID(tp = as->parms[2].items->data, cstruct, &err);
1485     if (volID == 0) {
1486         if (err)
1487             PrintError("", err);
1488         else
1489             fprintf(STDERR,
1490                     "vos: could not parse '%s' as a numeric volume ID", tp);
1491         return 1;
1492     }
1493
1494     fprintf(STDOUT,
1495             "vos: forcibly removing all traces of volume %d, please wait...",
1496             volID);
1497     fflush(STDOUT);
1498     code = UV_NukeVolume(server, partID, volID);
1499     if (code == 0)
1500         fprintf(STDOUT, "done.\n");
1501     else
1502         fprintf(STDOUT, "failed with code %d.\n", code);
1503     return code;
1504 }
1505
1506
1507 /*------------------------------------------------------------------------
1508  * PRIVATE ExamineVolume
1509  *
1510  * Description:
1511  *      Routine used to examine a single volume, contacting the VLDB as
1512  *      well as the Volume Server.
1513  *
1514  * Arguments:
1515  *      as : Ptr to parsed command line arguments.
1516  *
1517  * Returns:
1518  *      0 for a successful operation,
1519  *      Otherwise, one of the ubik or VolServer error values.
1520  *
1521  * Environment:
1522  *      Nothing interesting.
1523  *
1524  * Side Effects:
1525  *      As advertised.
1526  *------------------------------------------------------------------------
1527  */
1528 static int
1529 ExamineVolume(register struct cmd_syndesc *as, void *arock)
1530 {
1531     struct nvldbentry entry;
1532     afs_int32 vcode = 0;
1533     volintInfo *pntr = (volintInfo *) 0;
1534     volintXInfo *xInfoP = (volintXInfo *) 0;
1535     afs_uint32 volid;
1536     afs_int32 code, err, error = 0;
1537     int voltype, foundserv = 0, foundentry = 0;
1538     afs_int32 aserver, apart;
1539     int previdx = -1;
1540     int wantExtendedInfo;       /*Do we want extended vol info? */
1541
1542     wantExtendedInfo = (as->parms[1].items ? 1 : 0);    /* -extended */
1543
1544     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);   /* -id */
1545     if (volid == 0) {
1546         if (err)
1547             PrintError("", err);
1548         else
1549             fprintf(STDERR, "Unknown volume ID or name '%s'\n",
1550                     as->parms[0].items->data);
1551         return -1;
1552     }
1553
1554     if (verbose) {
1555         fprintf(STDOUT, "Fetching VLDB entry for %lu .. ",
1556                 (unsigned long)volid);
1557         fflush(STDOUT);
1558     }
1559     vcode = VLDB_GetEntryByID(volid, -1, &entry);
1560     if (vcode) {
1561         fprintf(STDERR,
1562                 "Could not fetch the entry for volume number %lu from VLDB \n",
1563                 (unsigned long)volid);
1564         return (vcode);
1565     }
1566     if (verbose)
1567         fprintf(STDOUT, "done\n");
1568     MapHostToNetwork(&entry);
1569
1570     if (entry.volumeId[RWVOL] == volid)
1571         voltype = RWVOL;
1572     else if (entry.volumeId[BACKVOL] == volid)
1573         voltype = BACKVOL;
1574     else                        /* (entry.volumeId[ROVOL] == volid) */
1575         voltype = ROVOL;
1576
1577     do {                        /* do {...} while (voltype == ROVOL) */
1578         /* Get the entry for the volume. If its a RW vol, get the RW entry.
1579          * It its a BK vol, get the RW entry (even if VLDB may say the BK doen't exist).
1580          * If its a RO vol, get the next RO entry.
1581          */
1582         GetServerAndPart(&entry, ((voltype == ROVOL) ? ROVOL : RWVOL),
1583                          &aserver, &apart, &previdx);
1584         if (previdx == -1) {    /* searched all entries */
1585             if (!foundentry) {
1586                 fprintf(STDERR, "Volume %s does not exist in VLDB\n\n",
1587                         as->parms[0].items->data);
1588                 error = ENOENT;
1589             }
1590             break;
1591         }
1592         foundentry = 1;
1593
1594         /* Get information about the volume from the server */
1595         if (verbose) {
1596             fprintf(STDOUT, "Getting volume listing from the server %s .. ",
1597                     hostutil_GetNameByINet(aserver));
1598             fflush(STDOUT);
1599         }
1600         if (wantExtendedInfo)
1601             code = UV_XListOneVolume(aserver, apart, volid, &xInfoP);
1602         else
1603             code = UV_ListOneVolume(aserver, apart, volid, &pntr);
1604         if (verbose)
1605             fprintf(STDOUT, "done\n");
1606
1607         if (code) {
1608             error = code;
1609             if (code == ENODEV) {
1610                 if ((voltype == BACKVOL) && !(entry.flags & BACK_EXISTS)) {
1611                     /* The VLDB says there is no backup volume and its not on disk */
1612                     fprintf(STDERR, "Volume %s does not exist\n",
1613                             as->parms[0].items->data);
1614                     error = ENOENT;
1615                 } else {
1616                     fprintf(STDERR,
1617                             "Volume does not exist on server %s as indicated by the VLDB\n",
1618                             hostutil_GetNameByINet(aserver));
1619                 }
1620             } else {
1621                 PrintDiagnostics("examine", code);
1622             }
1623             fprintf(STDOUT, "\n");
1624         } else {
1625             foundserv = 1;
1626             if (wantExtendedInfo)
1627                 XVolumeStats(xInfoP, &entry, aserver, apart, voltype);
1628             else
1629 #ifdef FULL_LISTVOL_SWITCH
1630             if (as->parms[2].items) {
1631                 DisplayFormat2(aserver, apart, pntr);
1632                 EnumerateEntry(&entry);
1633             } else
1634 #endif /* FULL_LISTVOL_SWITCH */
1635                 VolumeStats_int(pntr, &entry, aserver, apart, voltype);
1636
1637             if ((voltype == BACKVOL) && !(entry.flags & BACK_EXISTS)) {
1638                 /* The VLDB says there is no backup volume yet we found one on disk */
1639                 fprintf(STDERR, "Volume %s does not exist in VLDB\n",
1640                         as->parms[0].items->data);
1641                 error = ENOENT;
1642             }
1643         }
1644
1645         if (pntr)
1646             free(pntr);
1647         if (xInfoP)
1648             free(xInfoP);
1649     } while (voltype == ROVOL);
1650
1651     if (!foundserv) {
1652         fprintf(STDERR, "Dump only information from VLDB\n\n");
1653         fprintf(STDOUT, "%s \n", entry.name);   /* PostVolumeStats doesn't print name */
1654     }
1655     PostVolumeStats(&entry);
1656
1657     return (error);
1658 }
1659
1660 /*------------------------------------------------------------------------
1661  * PRIVATE SetFields
1662  *
1663  * Description:
1664  *      Routine used to change the status of a single volume.
1665  *
1666  * Arguments:
1667  *      as : Ptr to parsed command line arguments.
1668  *
1669  * Returns:
1670  *      0 for a successful operation,
1671  *      Otherwise, one of the ubik or VolServer error values.
1672  *
1673  * Environment:
1674  *      Nothing interesting.
1675  *
1676  * Side Effects:
1677  *      As advertised.
1678  *------------------------------------------------------------------------
1679  */
1680 static int
1681 SetFields(register struct cmd_syndesc *as, void *arock)
1682 {
1683     struct nvldbentry entry;
1684     volintInfo info;
1685     afs_uint32 volid;
1686     afs_int32 code, err;
1687     afs_int32 aserver, apart;
1688     int previdx = -1;
1689
1690     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);   /* -id */
1691     if (volid == 0) {
1692         if (err)
1693             PrintError("", err);
1694         else
1695             fprintf(STDERR, "Unknown volume ID or name '%s'\n",
1696                     as->parms[0].items->data);
1697         return -1;
1698     }
1699
1700     code = VLDB_GetEntryByID(volid, RWVOL, &entry);
1701     if (code) {
1702         fprintf(STDERR,
1703                 "Could not fetch the entry for volume number %lu from VLDB \n",
1704                 (unsigned long)volid);
1705         return (code);
1706     }
1707     MapHostToNetwork(&entry);
1708
1709     GetServerAndPart(&entry, RWVOL, &aserver, &apart, &previdx);
1710     if (previdx == -1) {
1711         fprintf(STDERR, "Volume %s does not exist in VLDB\n\n",
1712                 as->parms[0].items->data);
1713         return (ENOENT);
1714     }
1715
1716     init_volintInfo(&info);
1717     info.volid = volid;
1718     info.type = RWVOL;
1719
1720     if (as->parms[1].items) {
1721         /* -max <quota> */
1722         code = util_GetHumanInt32(as->parms[1].items->data, &info.maxquota);
1723         if (code) {
1724             fprintf(STDERR, "invalid quota value\n");
1725             return code;
1726         }
1727     }
1728     if (as->parms[2].items) {
1729         /* -clearuse */
1730         info.dayUse = 0;
1731     }
1732     if (as->parms[3].items) {
1733         /* -clearVolUpCounter */
1734         info.spare2 = 0;
1735     }
1736     code = UV_SetVolumeInfo(aserver, apart, volid, &info);
1737     if (code)
1738         fprintf(STDERR,
1739                 "Could not update volume info fields for volume number %lu\n",
1740                 (unsigned long)volid);
1741     return (code);
1742 }
1743
1744 /*------------------------------------------------------------------------
1745  * PRIVATE volOnline
1746  *
1747  * Description:
1748  *      Brings a volume online.
1749  *
1750  * Arguments:
1751  *      as : Ptr to parsed command line arguments.
1752  *
1753  * Returns:
1754  *      0 for a successful operation,
1755  *
1756  * Environment:
1757  *      Nothing interesting.
1758  *
1759  * Side Effects:
1760  *      As advertised.
1761  *------------------------------------------------------------------------
1762  */
1763 static int
1764 volOnline(register struct cmd_syndesc *as, void *arock)
1765 {
1766     afs_int32 server, partition;
1767     afs_uint32 volid;
1768     afs_int32 code, err = 0;
1769
1770     server = GetServer(as->parms[0].items->data);
1771     if (server == 0) {
1772         fprintf(STDERR, "vos: server '%s' not found in host table\n",
1773                 as->parms[0].items->data);
1774         return -1;
1775     }
1776
1777     partition = volutil_GetPartitionID(as->parms[1].items->data);
1778     if (partition < 0) {
1779         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
1780                 as->parms[1].items->data);
1781         return ENOENT;
1782     }
1783
1784     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);   /* -id */
1785     if (!volid) {
1786         if (err)
1787             PrintError("", err);
1788         else
1789             fprintf(STDERR, "Unknown volume ID or name '%s'\n",
1790                     as->parms[0].items->data);
1791         return -1;
1792     }
1793
1794     code = UV_SetVolume(server, partition, volid, ITOffline, 0 /*online */ ,
1795                         0 /*sleep */ );
1796     if (code) {
1797         fprintf(STDERR, "Failed to set volume. Code = %d\n", code);
1798         return -1;
1799     }
1800
1801     return 0;
1802 }
1803
1804 /*------------------------------------------------------------------------
1805  * PRIVATE volOffline
1806  *
1807  * Description:
1808  *      Brings a volume offline.
1809  *
1810  * Arguments:
1811  *      as : Ptr to parsed command line arguments.
1812  *
1813  * Returns:
1814  *      0 for a successful operation,
1815  *
1816  * Environment:
1817  *      Nothing interesting.
1818  *
1819  * Side Effects:
1820  *      As advertised.
1821  *------------------------------------------------------------------------
1822  */
1823 static int
1824 volOffline(register struct cmd_syndesc *as, void *arock)
1825 {
1826     afs_int32 server, partition;
1827     afs_uint32 volid;
1828     afs_int32 code, err = 0;
1829     afs_int32 transflag, sleeptime, transdone;
1830
1831     server = GetServer(as->parms[0].items->data);
1832     if (server == 0) {
1833         fprintf(STDERR, "vos: server '%s' not found in host table\n",
1834                 as->parms[0].items->data);
1835         return -1;
1836     }
1837
1838     partition = volutil_GetPartitionID(as->parms[1].items->data);
1839     if (partition < 0) {
1840         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
1841                 as->parms[1].items->data);
1842         return ENOENT;
1843     }
1844
1845     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);   /* -id */
1846     if (!volid) {
1847         if (err)
1848             PrintError("", err);
1849         else
1850             fprintf(STDERR, "Unknown volume ID or name '%s'\n",
1851                     as->parms[0].items->data);
1852         return -1;
1853     }
1854
1855     transflag = (as->parms[4].items ? ITBusy : ITOffline);
1856     sleeptime = (as->parms[3].items ? atol(as->parms[3].items->data) : 0);
1857     transdone = (sleeptime ? 0 /*online */ : VTOutOfService);
1858     if (as->parms[4].items && !as->parms[3].items) {
1859         fprintf(STDERR, "-sleep option must be used with -busy flag\n");
1860         return -1;
1861     }
1862
1863     code =
1864         UV_SetVolume(server, partition, volid, transflag, transdone,
1865                      sleeptime);
1866     if (code) {
1867         fprintf(STDERR, "Failed to set volume. Code = %d\n", code);
1868         return -1;
1869     }
1870
1871     return 0;
1872 }
1873
1874 static int
1875 CreateVolume(register struct cmd_syndesc *as, void *arock)
1876 {
1877     afs_int32 pnum;
1878     char part[10];
1879     afs_uint32 volid = 0, rovolid = 0, bkvolid = 0;
1880     afs_uint32 *arovolid;
1881     afs_int32 code;
1882     struct nvldbentry entry;
1883     afs_int32 vcode;
1884     afs_int32 quota;
1885
1886     arovolid = &rovolid;
1887
1888     quota = 5000;
1889     tserver = GetServer(as->parms[0].items->data);
1890     if (!tserver) {
1891         fprintf(STDERR, "vos: host '%s' not found in host table\n",
1892                 as->parms[0].items->data);
1893         return ENOENT;
1894     }
1895     pnum = volutil_GetPartitionID(as->parms[1].items->data);
1896     if (pnum < 0) {
1897         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
1898                 as->parms[1].items->data);
1899         return ENOENT;
1900     }
1901     if (!IsPartValid(pnum, tserver, &code)) {   /*check for validity of the partition */
1902         if (code)
1903             PrintError("", code);
1904         else
1905             fprintf(STDERR,
1906                     "vos : partition %s does not exist on the server\n",
1907                     as->parms[1].items->data);
1908         return ENOENT;
1909     }
1910     if (!ISNAMEVALID(as->parms[2].items->data)) {
1911         fprintf(STDERR,
1912                 "vos: the name of the root volume %s exceeds the size limit of %d\n",
1913                 as->parms[2].items->data, VOLSER_OLDMAXVOLNAME - 10);
1914         return E2BIG;
1915     }
1916     if (!VolNameOK(as->parms[2].items->data)) {
1917         fprintf(STDERR,
1918                 "Illegal volume name %s, should not end in .readonly or .backup\n",
1919                 as->parms[2].items->data);
1920         return EINVAL;
1921     }
1922     if (IsNumeric(as->parms[2].items->data)) {
1923         fprintf(STDERR, "Illegal volume name %s, should not be a number\n",
1924                 as->parms[2].items->data);
1925         return EINVAL;
1926     }
1927     vcode = VLDB_GetEntryByName(as->parms[2].items->data, &entry);
1928     if (!vcode) {
1929         fprintf(STDERR, "Volume %s already exists\n",
1930                 as->parms[2].items->data);
1931         PrintDiagnostics("create", code);
1932         return EEXIST;
1933     }
1934
1935     if (as->parms[3].items) {
1936         code = util_GetHumanInt32(as->parms[3].items->data, &quota);
1937         if (code) {
1938             fprintf(STDERR, "vos: bad integer specified for quota.\n");
1939             return code;
1940         }
1941     }
1942
1943     if (as->parms[4].items) {
1944         if (!IsNumeric(as->parms[4].items->data)) {
1945             fprintf(STDERR, "vos: Given volume ID %s should be numeric.\n",
1946                     as->parms[4].items->data);
1947             return EINVAL;
1948         }
1949
1950         code = util_GetUInt32(as->parms[4].items->data, &volid);
1951         if (code) {
1952             fprintf(STDERR, "vos: bad integer specified for volume ID.\n");
1953             return code;
1954         }
1955     }
1956
1957     if (as->parms[5].items) {
1958         if (!IsNumeric(as->parms[5].items->data)) {
1959             fprintf(STDERR, "vos: Given RO volume ID %s should be numeric.\n",
1960                     as->parms[5].items->data);
1961             return EINVAL;
1962         }
1963
1964         code = util_GetUInt32(as->parms[5].items->data, &rovolid);
1965         if (code) {
1966             fprintf(STDERR, "vos: bad integer specified for volume ID.\n");
1967             return code;
1968         }
1969
1970         if (rovolid == 0) {
1971             arovolid = NULL;
1972         }
1973     }
1974
1975     code =
1976         UV_CreateVolume3(tserver, pnum, as->parms[2].items->data, quota, 0,
1977                          0, 0, 0, &volid, arovolid, &bkvolid);
1978     if (code) {
1979         PrintDiagnostics("create", code);
1980         return code;
1981     }
1982     MapPartIdIntoName(pnum, part);
1983     fprintf(STDOUT, "Volume %lu created on partition %s of %s\n",
1984             (unsigned long)volid, part, as->parms[0].items->data);
1985
1986     return 0;
1987 }
1988
1989 #if 0
1990 static afs_int32
1991 DeleteAll(struct nvldbentry *entry)
1992 {
1993     int i;
1994     afs_int32 error, code, curserver, curpart;
1995     afs_uint32 volid;
1996
1997     MapHostToNetwork(entry);
1998     error = 0;
1999     for (i = 0; i < entry->nServers; i++) {
2000         curserver = entry->serverNumber[i];
2001         curpart = entry->serverPartition[i];
2002         if (entry->serverFlags[i] & ITSROVOL) {
2003             volid = entry->volumeId[ROVOL];
2004         } else {
2005             volid = entry->volumeId[RWVOL];
2006         }
2007         code = UV_DeleteVolume(curserver, curpart, volid);
2008         if (code && !error)
2009             error = code;
2010     }
2011     return error;
2012 }
2013 #endif
2014
2015 static int
2016 DeleteVolume(struct cmd_syndesc *as, void *arock)
2017 {
2018     afs_int32 err, code = 0;
2019     afs_int32 server = 0, partition = -1;
2020     afs_uint32 volid;
2021     char pname[10];
2022     afs_int32 idx, j;
2023
2024     if (as->parms[0].items) {
2025         server = GetServer(as->parms[0].items->data);
2026         if (!server) {
2027             fprintf(STDERR, "vos: server '%s' not found in host table\n",
2028                     as->parms[0].items->data);
2029             return ENOENT;
2030         }
2031     }
2032
2033     if (as->parms[1].items) {
2034         partition = volutil_GetPartitionID(as->parms[1].items->data);
2035         if (partition < 0) {
2036             fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2037                     as->parms[1].items->data);
2038             return EINVAL;
2039         }
2040
2041         /* Check for validity of the partition */
2042         if (!IsPartValid(partition, server, &code)) {
2043             if (code) {
2044                 PrintError("", code);
2045             } else {
2046                 fprintf(STDERR,
2047                         "vos : partition %s does not exist on the server\n",
2048                         as->parms[1].items->data);
2049             }
2050             return ENOENT;
2051         }
2052     }
2053
2054     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
2055     if (volid == 0) {
2056         fprintf(STDERR, "Can't find volume name '%s' in VLDB\n",
2057                 as->parms[2].items->data);
2058         if (err)
2059             PrintError("", err);
2060         return ENOENT;
2061     }
2062
2063     /* If the server or partition option are not complete, try to fill
2064      * them in from the VLDB entry.
2065      */
2066     if ((partition == -1) || !server) {
2067         struct nvldbentry entry;
2068
2069         code = VLDB_GetEntryByID(volid, -1, &entry);
2070         if (code) {
2071             fprintf(STDERR,
2072                     "Could not fetch the entry for volume %lu from VLDB\n",
2073                     (unsigned long)volid);
2074             PrintError("", code);
2075             return (code);
2076         }
2077
2078         if (((volid == entry.volumeId[RWVOL]) && (entry.flags & RW_EXISTS))
2079             || ((volid == entry.volumeId[BACKVOL])
2080                 && (entry.flags & BACK_EXISTS))) {
2081             idx = Lp_GetRwIndex(&entry);
2082             if ((idx == -1) || (server && (server != entry.serverNumber[idx]))
2083                 || ((partition != -1)
2084                     && (partition != entry.serverPartition[idx]))) {
2085                 fprintf(STDERR, "VLDB: Volume '%s' no match\n",
2086                         as->parms[2].items->data);
2087                 return ENOENT;
2088             }
2089         } else if ((volid == entry.volumeId[ROVOL])
2090                    && (entry.flags & RO_EXISTS)) {
2091             for (idx = -1, j = 0; j < entry.nServers; j++) {
2092                 if (entry.serverFlags[j] != ITSROVOL)
2093                     continue;
2094
2095                 if (((server == 0) || (server == entry.serverNumber[j]))
2096                     && ((partition == -1)
2097                         || (partition == entry.serverPartition[j]))) {
2098                     if (idx != -1) {
2099                         fprintf(STDERR,
2100                                 "VLDB: Volume '%s' matches more than one RO\n",
2101                                 as->parms[2].items->data);
2102                         return ENOENT;
2103                     }
2104                     idx = j;
2105                 }
2106             }
2107             if (idx == -1) {
2108                 fprintf(STDERR, "VLDB: Volume '%s' no match\n",
2109                         as->parms[2].items->data);
2110                 return ENOENT;
2111             }
2112         } else {
2113             fprintf(STDERR, "VLDB: Volume '%s' no match\n",
2114                     as->parms[2].items->data);
2115             return ENOENT;
2116         }
2117
2118         server = htonl(entry.serverNumber[idx]);
2119         partition = entry.serverPartition[idx];
2120     }
2121
2122
2123     code = UV_DeleteVolume(server, partition, volid);
2124     if (code) {
2125         PrintDiagnostics("remove", code);
2126         return code;
2127     }
2128
2129     MapPartIdIntoName(partition, pname);
2130     fprintf(STDOUT, "Volume %lu on partition %s server %s deleted\n",
2131             (unsigned long)volid, pname, hostutil_GetNameByINet(server));
2132     return 0;
2133 }
2134
2135 #define TESTM   0               /* set for move space tests, clear for production */
2136 static int
2137 MoveVolume(register struct cmd_syndesc *as, void *arock)
2138 {
2139
2140     afs_uint32 volid;
2141     afs_int32 fromserver, toserver, frompart, topart;
2142     afs_int32 flags, code, err;
2143     char fromPartName[10], toPartName[10];
2144
2145     struct diskPartition64 partition;   /* for space check */
2146     volintInfo *p;
2147
2148     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2149     if (volid == 0) {
2150         if (err)
2151             PrintError("", err);
2152         else
2153             fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2154                     as->parms[0].items->data);
2155         return ENOENT;
2156     }
2157     fromserver = GetServer(as->parms[1].items->data);
2158     if (fromserver == 0) {
2159         fprintf(STDERR, "vos: server '%s' not found in host table\n",
2160                 as->parms[1].items->data);
2161         return ENOENT;
2162     }
2163     toserver = GetServer(as->parms[3].items->data);
2164     if (toserver == 0) {
2165         fprintf(STDERR, "vos: server '%s' not found in host table\n",
2166                 as->parms[3].items->data);
2167         return ENOENT;
2168     }
2169     frompart = volutil_GetPartitionID(as->parms[2].items->data);
2170     if (frompart < 0) {
2171         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2172                 as->parms[2].items->data);
2173         return EINVAL;
2174     }
2175     if (!IsPartValid(frompart, fromserver, &code)) {    /*check for validity of the partition */
2176         if (code)
2177             PrintError("", code);
2178         else
2179             fprintf(STDERR,
2180                     "vos : partition %s does not exist on the server\n",
2181                     as->parms[2].items->data);
2182         return ENOENT;
2183     }
2184     topart = volutil_GetPartitionID(as->parms[4].items->data);
2185     if (topart < 0) {
2186         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2187                 as->parms[4].items->data);
2188         return EINVAL;
2189     }
2190     if (!IsPartValid(topart, toserver, &code)) {        /*check for validity of the partition */
2191         if (code)
2192             PrintError("", code);
2193         else
2194             fprintf(STDERR,
2195                     "vos : partition %s does not exist on the server\n",
2196                     as->parms[4].items->data);
2197         return ENOENT;
2198     }
2199
2200     flags = 0;
2201     if (as->parms[5].items) flags |= RV_NOCLONE;
2202
2203     /*
2204      * check source partition for space to clone volume
2205      */
2206
2207     MapPartIdIntoName(topart, toPartName);
2208     MapPartIdIntoName(frompart, fromPartName);
2209
2210     /*
2211      * check target partition for space to move volume
2212      */
2213
2214     code = UV_PartitionInfo64(toserver, toPartName, &partition);
2215     if (code) {
2216         fprintf(STDERR, "vos: cannot access partition %s\n", toPartName);
2217         exit(1);
2218     }
2219     if (TESTM)
2220         fprintf(STDOUT, "target partition %s free space %" AFS_INT64_FMT "\n", toPartName,
2221                 partition.free);
2222
2223     p = (volintInfo *) 0;
2224     code = UV_ListOneVolume(fromserver, frompart, volid, &p);
2225     if (code) {
2226         fprintf(STDERR, "vos:cannot access volume %lu\n",
2227                 (unsigned long)volid);
2228         exit(1);
2229     }
2230     if (TESTM)
2231         fprintf(STDOUT, "volume %lu size %d\n", (unsigned long)volid,
2232                 p->size);
2233     if (partition.free <= p->size) {
2234         fprintf(STDERR,
2235                 "vos: no space on target partition %s to move volume %lu\n",
2236                 toPartName, (unsigned long)volid);
2237         free(p);
2238         exit(1);
2239     }
2240     free(p);
2241
2242     if (TESTM) {
2243         fprintf(STDOUT, "size test - don't do move\n");
2244         exit(0);
2245     }
2246
2247     /* successful move still not guaranteed but shoot for it */
2248
2249     code =
2250         UV_MoveVolume2(volid, fromserver, frompart, toserver, topart, flags);
2251     if (code) {
2252         PrintDiagnostics("move", code);
2253         return code;
2254     }
2255     MapPartIdIntoName(topart, toPartName);
2256     MapPartIdIntoName(frompart, fromPartName);
2257     fprintf(STDOUT, "Volume %lu moved from %s %s to %s %s \n",
2258             (unsigned long)volid, as->parms[1].items->data, fromPartName,
2259             as->parms[3].items->data, toPartName);
2260
2261     return 0;
2262 }
2263
2264 static int
2265 CopyVolume(register struct cmd_syndesc *as, void *arock)
2266 {
2267     afs_uint32 volid;
2268     afs_int32 fromserver, toserver, frompart, topart, code, err, flags;
2269     char fromPartName[10], toPartName[10], *tovolume;
2270     struct nvldbentry entry;
2271     struct diskPartition64 partition;   /* for space check */
2272     volintInfo *p;
2273
2274     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2275     if (volid == 0) {
2276         if (err)
2277             PrintError("", err);
2278         else
2279             fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2280                     as->parms[0].items->data);
2281         return ENOENT;
2282     }
2283     fromserver = GetServer(as->parms[1].items->data);
2284     if (fromserver == 0) {
2285         fprintf(STDERR, "vos: server '%s' not found in host table\n",
2286                 as->parms[1].items->data);
2287         return ENOENT;
2288     }
2289
2290     toserver = GetServer(as->parms[4].items->data);
2291     if (toserver == 0) {
2292         fprintf(STDERR, "vos: server '%s' not found in host table\n",
2293                 as->parms[4].items->data);
2294         return ENOENT;
2295     }
2296
2297     tovolume = as->parms[3].items->data;
2298     if (!ISNAMEVALID(tovolume)) {
2299         fprintf(STDERR,
2300                 "vos: the name of the root volume %s exceeds the size limit of %d\n",
2301                 tovolume, VOLSER_OLDMAXVOLNAME - 10);
2302         return E2BIG;
2303     }
2304     if (!VolNameOK(tovolume)) {
2305         fprintf(STDERR,
2306                 "Illegal volume name %s, should not end in .readonly or .backup\n",
2307                 tovolume);
2308         return EINVAL;
2309     }
2310     if (IsNumeric(tovolume)) {
2311         fprintf(STDERR, "Illegal volume name %s, should not be a number\n",
2312                 tovolume);
2313         return EINVAL;
2314     }
2315     code = VLDB_GetEntryByName(tovolume, &entry);
2316     if (!code) {
2317         fprintf(STDERR, "Volume %s already exists\n", tovolume);
2318         PrintDiagnostics("copy", code);
2319         return EEXIST;
2320     }
2321
2322     frompart = volutil_GetPartitionID(as->parms[2].items->data);
2323     if (frompart < 0) {
2324         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2325                 as->parms[2].items->data);
2326         return EINVAL;
2327     }
2328     if (!IsPartValid(frompart, fromserver, &code)) {    /*check for validity of the partition */
2329         if (code)
2330             PrintError("", code);
2331         else
2332             fprintf(STDERR,
2333                     "vos : partition %s does not exist on the server\n",
2334                     as->parms[2].items->data);
2335         return ENOENT;
2336     }
2337
2338     topart = volutil_GetPartitionID(as->parms[5].items->data);
2339     if (topart < 0) {
2340         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2341                 as->parms[5].items->data);
2342         return EINVAL;
2343     }
2344     if (!IsPartValid(topart, toserver, &code)) {        /*check for validity of the partition */
2345         if (code)
2346             PrintError("", code);
2347         else
2348             fprintf(STDERR,
2349                     "vos : partition %s does not exist on the server\n",
2350                     as->parms[5].items->data);
2351         return ENOENT;
2352     }
2353
2354     flags = 0;
2355     if (as->parms[6].items) flags |= RV_OFFLINE;
2356     if (as->parms[7].items) flags |= RV_RDONLY;
2357     if (as->parms[8].items) flags |= RV_NOCLONE;
2358
2359     MapPartIdIntoName(topart, toPartName);
2360     MapPartIdIntoName(frompart, fromPartName);
2361
2362     /*
2363      * check target partition for space to move volume
2364      */
2365
2366     code = UV_PartitionInfo64(toserver, toPartName, &partition);
2367     if (code) {
2368         fprintf(STDERR, "vos: cannot access partition %s\n", toPartName);
2369         exit(1);
2370     }
2371     if (TESTM)
2372         fprintf(STDOUT, "target partition %s free space %" AFS_INT64_FMT "\n", toPartName,
2373                 partition.free);
2374
2375     p = (volintInfo *) 0;
2376     code = UV_ListOneVolume(fromserver, frompart, volid, &p);
2377     if (code) {
2378         fprintf(STDERR, "vos:cannot access volume %lu\n",
2379                 (unsigned long)volid);
2380         exit(1);
2381     }
2382
2383     if (partition.free <= p->size) {
2384         fprintf(STDERR,
2385                 "vos: no space on target partition %s to copy volume %lu\n",
2386                 toPartName, (unsigned long)volid);
2387         free(p);
2388         exit(1);
2389     }
2390     free(p);
2391
2392     /* successful copy still not guaranteed but shoot for it */
2393
2394     code =
2395         UV_CopyVolume2(volid, fromserver, frompart, tovolume, toserver,
2396                        topart, 0, flags);
2397     if (code) {
2398         PrintDiagnostics("copy", code);
2399         return code;
2400     }
2401     MapPartIdIntoName(topart, toPartName);
2402     MapPartIdIntoName(frompart, fromPartName);
2403     fprintf(STDOUT, "Volume %lu copied from %s %s to %s on %s %s \n",
2404             (unsigned long)volid, as->parms[1].items->data, fromPartName,
2405             tovolume, as->parms[4].items->data, toPartName);
2406
2407     return 0;
2408 }
2409
2410
2411 static int
2412 ShadowVolume(register struct cmd_syndesc *as, void *arock)
2413 {
2414     afs_uint32 volid, tovolid;
2415     afs_int32 fromserver, toserver, frompart, topart;
2416     afs_int32 code, err, flags;
2417     char fromPartName[10], toPartName[10], toVolName[32], *tovolume;
2418     struct diskPartition64 partition;   /* for space check */
2419     volintInfo *p, *q;
2420
2421     p = (volintInfo *) 0;
2422     q = (volintInfo *) 0;
2423
2424     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2425     if (volid == 0) {
2426         if (err)
2427             PrintError("", err);
2428         else
2429             fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2430                     as->parms[0].items->data);
2431         return ENOENT;
2432     }
2433     fromserver = GetServer(as->parms[1].items->data);
2434     if (fromserver == 0) {
2435         fprintf(STDERR, "vos: server '%s' not found in host table\n",
2436                 as->parms[1].items->data);
2437         return ENOENT;
2438     }
2439
2440     toserver = GetServer(as->parms[3].items->data);
2441     if (toserver == 0) {
2442         fprintf(STDERR, "vos: server '%s' not found in host table\n",
2443                 as->parms[3].items->data);
2444         return ENOENT;
2445     }
2446
2447     frompart = volutil_GetPartitionID(as->parms[2].items->data);
2448     if (frompart < 0) {
2449         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2450                 as->parms[2].items->data);
2451         return EINVAL;
2452     }
2453     if (!IsPartValid(frompart, fromserver, &code)) {    /*check for validity of the partition */
2454         if (code)
2455             PrintError("", code);
2456         else
2457             fprintf(STDERR,
2458                     "vos : partition %s does not exist on the server\n",
2459                     as->parms[2].items->data);
2460         return ENOENT;
2461     }
2462
2463     topart = volutil_GetPartitionID(as->parms[4].items->data);
2464     if (topart < 0) {
2465         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2466                 as->parms[4].items->data);
2467         return EINVAL;
2468     }
2469     if (!IsPartValid(topart, toserver, &code)) {        /*check for validity of the partition */
2470         if (code)
2471             PrintError("", code);
2472         else
2473             fprintf(STDERR,
2474                     "vos : partition %s does not exist on the server\n",
2475                     as->parms[4].items->data);
2476         return ENOENT;
2477     }
2478
2479     if (as->parms[5].items) {
2480         tovolume = as->parms[5].items->data;
2481         if (!ISNAMEVALID(tovolume)) {
2482             fprintf(STDERR,
2483                 "vos: the name of the root volume %s exceeds the size limit of %d\n",
2484                 tovolume, VOLSER_OLDMAXVOLNAME - 10);
2485             return E2BIG;
2486         }
2487         if (!VolNameOK(tovolume)) {
2488             fprintf(STDERR,
2489                 "Illegal volume name %s, should not end in .readonly or .backup\n",
2490                 tovolume);
2491             return EINVAL;
2492         }
2493         if (IsNumeric(tovolume)) {
2494             fprintf(STDERR,
2495                 "Illegal volume name %s, should not be a number\n",
2496                 tovolume);
2497             return EINVAL;
2498         }
2499     } else {
2500         /* use actual name of source volume */
2501         code = UV_ListOneVolume(fromserver, frompart, volid, &p);
2502         if (code) {
2503             fprintf(STDERR, "vos:cannot access volume %lu\n",
2504                 (unsigned long)volid);
2505             exit(1);
2506         }
2507         strcpy(toVolName, p->name);
2508         tovolume = toVolName;
2509         /* save p for size checks later */
2510     }
2511
2512     if (as->parms[6].items) {
2513         tovolid = vsu_GetVolumeID(as->parms[6].items->data, cstruct, &err);
2514         if (tovolid == 0) {
2515             if (err)
2516                 PrintError("", err);
2517             else
2518                 fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2519                         as->parms[6].items->data);
2520             if (p)
2521                 free(p);
2522             return ENOENT;
2523         }
2524     } else {
2525         tovolid = vsu_GetVolumeID(tovolume, cstruct, &err);
2526         if (tovolid == 0) {
2527             if (err)
2528                 PrintError("", err);
2529             else
2530                 fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2531                         tovolume);
2532             if (p)
2533                 free(p);
2534             return ENOENT;
2535         }
2536     }
2537
2538     flags = RV_NOVLDB;
2539     if (as->parms[7].items) flags |= RV_OFFLINE;
2540     if (as->parms[8].items) flags |= RV_RDONLY;
2541     if (as->parms[9].items) flags |= RV_NOCLONE;
2542     if (as->parms[10].items) flags |= RV_CPINCR;
2543
2544     MapPartIdIntoName(topart, toPartName);
2545     MapPartIdIntoName(frompart, fromPartName);
2546
2547     /*
2548      * check target partition for space to move volume
2549      */
2550
2551     code = UV_PartitionInfo64(toserver, toPartName, &partition);
2552     if (code) {
2553         fprintf(STDERR, "vos: cannot access partition %s\n", toPartName);
2554         exit(1);
2555     }
2556     if (TESTM)
2557         fprintf(STDOUT, "target partition %s free space %" AFS_INT64_FMT "\n", toPartName,
2558                 partition.free);
2559
2560     /* Don't do this again if we did it above */
2561     if (!p) {
2562         code = UV_ListOneVolume(fromserver, frompart, volid, &p);
2563         if (code) {
2564             fprintf(STDERR, "vos:cannot access volume %lu\n",
2565                 (unsigned long)volid);
2566             exit(1);
2567         }
2568     }
2569
2570     /* OK if this fails */
2571     code = UV_ListOneVolume(toserver, topart, tovolid, &q);
2572
2573     /* Treat existing volume size as "free" */
2574     if (q)
2575         p->size = (q->size < p->size) ? p->size - q->size : 0;
2576
2577     if (partition.free <= p->size) {
2578         fprintf(STDERR,
2579                 "vos: no space on target partition %s to copy volume %lu\n",
2580                 toPartName, (unsigned long)volid);
2581         free(p);
2582         if (q) free(q);
2583         exit(1);
2584     }
2585     free(p);
2586     if (q) free(q);
2587
2588     /* successful copy still not guaranteed but shoot for it */
2589
2590     code =
2591         UV_CopyVolume2(volid, fromserver, frompart, tovolume, toserver,
2592                        topart, tovolid, flags);
2593     if (code) {
2594         PrintDiagnostics("shadow", code);
2595         return code;
2596     }
2597     MapPartIdIntoName(topart, toPartName);
2598     MapPartIdIntoName(frompart, fromPartName);
2599     fprintf(STDOUT, "Volume %lu shadowed from %s %s to %s %s \n",
2600             (unsigned long)volid, as->parms[1].items->data, fromPartName,
2601             as->parms[3].items->data, toPartName);
2602
2603     return 0;
2604 }
2605
2606
2607 static int
2608 CloneVolume(register struct cmd_syndesc *as, void *arock)
2609 {
2610     afs_uint32 volid, cloneid;
2611     afs_int32 server, part, voltype;
2612     char partName[10], *volname;
2613     afs_int32 code, err, flags;
2614     struct nvldbentry entry;
2615
2616     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2617     if (volid == 0) {
2618         if (err)
2619             PrintError("", err);
2620         else
2621             fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2622                     as->parms[0].items->data);
2623         return ENOENT;
2624     }
2625
2626     if (as->parms[1].items || as->parms[2].items) {
2627         if (!as->parms[1].items || !as->parms[2].items) {
2628             fprintf(STDERR,
2629                     "Must specify both -server and -partition options\n");
2630             return -1;
2631         }
2632         server = GetServer(as->parms[1].items->data);
2633         if (server == 0) {
2634             fprintf(STDERR, "vos: server '%s' not found in host table\n",
2635                     as->parms[1].items->data);
2636             return ENOENT;
2637         }
2638         part = volutil_GetPartitionID(as->parms[2].items->data);
2639         if (part < 0) {
2640             fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
2641                     as->parms[2].items->data);
2642             return EINVAL;
2643         }
2644         if (!IsPartValid(part, server, &code)) {        /*check for validity of the partition */
2645             if (code)
2646                 PrintError("", code);
2647             else
2648                 fprintf(STDERR,
2649                     "vos : partition %s does not exist on the server\n",
2650                     as->parms[2].items->data);
2651             return ENOENT;
2652         }
2653     } else {
2654         code = GetVolumeInfo(volid, &server, &part, &voltype, &entry);
2655         if (code)
2656             return code;
2657     }
2658
2659     volname = 0;
2660     if (as->parms[3].items) {
2661         volname = as->parms[3].items->data;
2662         if (strlen(volname) > VOLSER_OLDMAXVOLNAME - 1) {
2663             fprintf(STDERR,
2664                 "vos: the name of the root volume %s exceeds the size limit of %d\n",
2665                 volname, VOLSER_OLDMAXVOLNAME - 1);
2666             return E2BIG;
2667         }
2668 #if 0
2669         /* 
2670          * In order that you be able to make clones of RO or BK, this
2671          * check must be omitted.
2672          */
2673         if (!VolNameOK(volname)) {
2674             fprintf(STDERR,
2675                 "Illegal volume name %s, should not end in .readonly or .backup\n",
2676                 volname);
2677             return EINVAL;
2678         }
2679 #endif
2680         if (IsNumeric(volname)) {
2681             fprintf(STDERR,
2682                 "Illegal volume name %s, should not be a number\n",
2683                 volname);
2684             return EINVAL;
2685         }
2686     }
2687
2688     cloneid = 0;
2689     if (as->parms[4].items) {
2690         cloneid = vsu_GetVolumeID(as->parms[4].items->data, cstruct, &err);
2691         if (cloneid == 0) {
2692             if (err)
2693                 PrintError("", err);
2694             else
2695                 fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2696                         as->parms[4].items->data);
2697             return ENOENT;
2698         }
2699     }
2700
2701     flags = 0;
2702     if (as->parms[5].items) flags |= RV_OFFLINE;
2703     if (as->parms[6].items) flags |= RV_RDONLY;
2704
2705
2706     code = 
2707         UV_CloneVolume(server, part, volid, cloneid, volname, flags);
2708
2709     if (code) {
2710         PrintDiagnostics("clone", code);
2711         return code;
2712     }
2713     MapPartIdIntoName(part, partName);
2714     fprintf(STDOUT, "Created clone for volume %s\n",
2715             as->parms[0].items->data);
2716
2717     return 0;
2718 }
2719
2720
2721 static int
2722 BackupVolume(register struct cmd_syndesc *as, void *arock)
2723 {
2724     afs_uint32 avolid;
2725     afs_int32 aserver, apart, vtype, code, err;
2726     struct nvldbentry entry;
2727
2728     afs_uint32 buvolid;
2729     afs_int32 buserver, bupart, butype;
2730     struct nvldbentry buentry;
2731
2732     avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2733     if (avolid == 0) {
2734         if (err)
2735             PrintError("", err);
2736         else
2737             fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
2738                     as->parms[0].items->data);
2739         return ENOENT;
2740     }
2741     code = GetVolumeInfo(avolid, &aserver, &apart, &vtype, &entry);
2742     if (code)
2743         exit(1);
2744
2745     /* verify this is a readwrite volume */
2746
2747     if (vtype != RWVOL) {
2748         fprintf(STDERR, "%s not RW volume\n", as->parms[0].items->data);
2749         exit(1);
2750     }
2751
2752     /* is there a backup volume already? */
2753
2754     if (entry.flags & BACK_EXISTS) {
2755         /* yep, where is it? */
2756
2757         buvolid = entry.volumeId[BACKVOL];
2758         code = GetVolumeInfo(buvolid, &buserver, &bupart, &butype, &buentry);
2759         if (code)
2760             exit(1);
2761
2762         /* is it local? */
2763         code = VLDB_IsSameAddrs(buserver, aserver, &err);
2764         if (err) {
2765             fprintf(STDERR,
2766                     "Failed to get info about server's %d address(es) from vlserver; aborting call!\n",
2767                     buserver);
2768             exit(1);
2769         }
2770         if (!code) {
2771             fprintf(STDERR,
2772                     "FATAL ERROR: backup volume %lu exists on server %lu\n",
2773                     (unsigned long)buvolid, (unsigned long)buserver);
2774             exit(1);
2775         }
2776     }
2777
2778     /* nope, carry on */
2779
2780     code = UV_BackupVolume(aserver, apart, avolid);
2781
2782     if (code) {
2783         PrintDiagnostics("backup", code);
2784         return code;
2785     }
2786     fprintf(STDOUT, "Created backup volume for %s \n",
2787             as->parms[0].items->data);
2788     return 0;
2789 }
2790
2791 static int
2792 ReleaseVolume(register struct cmd_syndesc *as, void *arock)
2793 {
2794
2795     struct nvldbentry entry;
2796     afs_uint32 avolid;
2797     afs_int32 aserver, apart, vtype, code, err;
2798     int force = 0;
2799
2800     if (as->parms[1].items)
2801         force = 1;
2802     avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2803     if (avolid == 0) {
2804         if (err)
2805             PrintError("", err);
2806         else
2807             fprintf(STDERR, "vos: can't find volume '%s'\n",
2808                     as->parms[0].items->data);
2809         return ENOENT;
2810     }
2811     code = GetVolumeInfo(avolid, &aserver, &apart, &vtype, &entry);
2812     if (code)
2813         return code;
2814
2815     if (vtype != RWVOL) {
2816         fprintf(STDERR, "%s not a RW volume\n", as->parms[0].items->data);
2817         return (ENOENT);
2818     }
2819
2820     if (!ISNAMEVALID(entry.name)) {
2821         fprintf(STDERR,
2822                 "Volume name %s is too long, rename before releasing\n",
2823                 entry.name);
2824         return E2BIG;
2825     }
2826
2827     code = UV_ReleaseVolume(avolid, aserver, apart, force);
2828     if (code) {
2829         PrintDiagnostics("release", code);
2830         return code;
2831     }
2832     fprintf(STDOUT, "Released volume %s successfully\n",
2833             as->parms[0].items->data);
2834     return 0;
2835 }
2836
2837 static int
2838 DumpVolumeCmd(register struct cmd_syndesc *as, void *arock)
2839 {
2840     afs_uint32 avolid;
2841     afs_int32 aserver, apart, voltype, fromdate = 0, code, err, i, flags;
2842     char filename[MAXPATHLEN];
2843     struct nvldbentry entry;
2844
2845     rx_SetRxDeadTime(60 * 10);
2846     for (i = 0; i < MAXSERVERS; i++) {
2847         struct rx_connection *rxConn = ubik_GetRPCConn(cstruct, i);
2848         if (rxConn == 0)
2849             break;
2850         rx_SetConnDeadTime(rxConn, rx_connDeadTime);
2851         if (rxConn->service)
2852             rxConn->service->connDeadTime = rx_connDeadTime;
2853     }
2854
2855     avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2856     if (avolid == 0) {
2857         if (err)
2858             PrintError("", err);
2859         else
2860             fprintf(STDERR, "vos: can't find volume '%s'\n",
2861                     as->parms[0].items->data);
2862         return ENOENT;
2863     }
2864
2865     if (as->parms[3].items || as->parms[4].items) {
2866         if (!as->parms[3].items || !as->parms[4].items) {
2867             fprintf(STDERR,
2868                     "Must specify both -server and -partition options\n");
2869             return -1;
2870         }
2871         aserver = GetServer(as->parms[3].items->data);
2872         if (aserver == 0) {
2873             fprintf(STDERR, "Invalid server name\n");
2874             return -1;
2875         }
2876         apart = volutil_GetPartitionID(as->parms[4].items->data);
2877         if (apart < 0) {
2878             fprintf(STDERR, "Invalid partition name\n");
2879             return -1;
2880         }
2881     } else {
2882         code = GetVolumeInfo(avolid, &aserver, &apart, &voltype, &entry);
2883         if (code)
2884             return code;
2885     }
2886
2887     if (as->parms[1].items && strcmp(as->parms[1].items->data, "0")) {
2888         code = ktime_DateToInt32(as->parms[1].items->data, &fromdate);
2889         if (code) {
2890             fprintf(STDERR, "vos: failed to parse date '%s' (error=%d))\n",
2891                     as->parms[1].items->data, code);
2892             return code;
2893         }
2894     }
2895     if (as->parms[2].items) {
2896         strcpy(filename, as->parms[2].items->data);
2897     } else {
2898         strcpy(filename, "");
2899     }
2900
2901     flags = as->parms[6].items ? VOLDUMPV2_OMITDIRS : 0;
2902 retry_dump:
2903     if (as->parms[5].items) {
2904         code =
2905             UV_DumpClonedVolume(avolid, aserver, apart, fromdate,
2906                                 DumpFunction, filename, flags);
2907     } else {
2908         code =
2909             UV_DumpVolume(avolid, aserver, apart, fromdate, DumpFunction,
2910                           filename, flags);
2911     }
2912     if ((code == RXGEN_OPCODE) && (as->parms[6].items)) {
2913         flags &= ~VOLDUMPV2_OMITDIRS;
2914         goto retry_dump;
2915     }
2916     if (code) {
2917         PrintDiagnostics("dump", code);
2918         return code;
2919     }
2920     if (strcmp(filename, ""))
2921         fprintf(STDERR, "Dumped volume %s in file %s\n",
2922                 as->parms[0].items->data, filename);
2923     else
2924         fprintf(STDERR, "Dumped volume %s in stdout \n",
2925                 as->parms[0].items->data);
2926     return 0;
2927 }
2928
2929 #define ASK   0
2930 #define ABORT 1
2931 #define FULL  2
2932 #define INC   3
2933
2934 #define TS_DUMP 1
2935 #define TS_KEEP 2
2936 #define TS_NEW  3
2937
2938 static int
2939 RestoreVolumeCmd(register struct cmd_syndesc *as, void *arock)
2940 {
2941     afs_uint32 avolid, aparentid;
2942     afs_int32 aserver, apart, code, vcode, err;
2943     afs_int32 aoverwrite = ASK;
2944     afs_int32 acreation = 0, alastupdate = 0;
2945     int restoreflags = 0;
2946     int readonly = 0, offline = 0, voltype = RWVOL;
2947     char prompt;
2948     char afilename[MAXPATHLEN], avolname[VOLSER_MAXVOLNAME + 1], apartName[10];
2949     char volname[VOLSER_MAXVOLNAME + 1];
2950     struct nvldbentry entry;
2951
2952     prompt = 'n';
2953
2954     aparentid = 0;
2955     if (as->parms[4].items) {
2956         avolid = vsu_GetVolumeID(as->parms[4].items->data, cstruct, &err);
2957         if (avolid == 0) {
2958             if (err)
2959                 PrintError("", err);
2960             else
2961                 fprintf(STDERR, "vos: can't find volume '%s'\n",
2962                         as->parms[4].items->data);
2963             exit(1);
2964         }
2965     } else
2966         avolid = 0;
2967
2968     if (as->parms[5].items) {
2969         if ((strcmp(as->parms[5].items->data, "a") == 0)
2970             || (strcmp(as->parms[5].items->data, "abort") == 0)) {
2971             aoverwrite = ABORT;
2972         } else if ((strcmp(as->parms[5].items->data, "f") == 0)
2973                    || (strcmp(as->parms[5].items->data, "full") == 0)) {
2974             aoverwrite = FULL;
2975         } else if ((strcmp(as->parms[5].items->data, "i") == 0)
2976                    || (strcmp(as->parms[5].items->data, "inc") == 0)
2977                    || (strcmp(as->parms[5].items->data, "increment") == 0)
2978                    || (strcmp(as->parms[5].items->data, "incremental") == 0)) {
2979             aoverwrite = INC;
2980         } else {
2981             fprintf(STDERR, "vos: %s is not a valid argument to -overwrite\n",
2982                     as->parms[5].items->data);
2983             exit(1);
2984         }
2985     }
2986     if (as->parms[6].items)
2987         offline = 1;
2988     if (as->parms[7].items) {
2989         readonly = 1;
2990         voltype = ROVOL;
2991     }
2992
2993     if (as->parms[8].items) {
2994         if ((strcmp(as->parms[8].items->data, "d") == 0)
2995             || (strcmp(as->parms[8].items->data, "dump") == 0)) {
2996             acreation = TS_DUMP;
2997         } else if ((strcmp(as->parms[8].items->data, "k") == 0)
2998             || (strcmp(as->parms[8].items->data, "keep") == 0)) {
2999             acreation = TS_KEEP;
3000         } else if ((strcmp(as->parms[8].items->data, "n") == 0)
3001             || (strcmp(as->parms[8].items->data, "new") == 0)) {
3002             acreation = TS_NEW;
3003         } else {
3004             fprintf(STDERR, "vos: %s is not a valid argument to -creation\n",
3005                     as->parms[8].items->data);
3006             exit(1);
3007         }
3008     }
3009
3010     if (as->parms[9].items) {
3011         if ((strcmp(as->parms[9].items->data, "d") == 0)
3012             || (strcmp(as->parms[9].items->data, "dump") == 0)) {
3013             alastupdate = TS_DUMP;
3014         } else if ((strcmp(as->parms[9].items->data, "k") == 0)
3015             || (strcmp(as->parms[9].items->data, "keep") == 0)) {
3016             alastupdate = TS_KEEP;
3017         } else if ((strcmp(as->parms[9].items->data, "n") == 0)
3018             || (strcmp(as->parms[9].items->data, "new") == 0)) {
3019             alastupdate = TS_NEW;
3020         } else {
3021             fprintf(STDERR, "vos: %s is not a valid argument to -lastupdate\n",
3022                     as->parms[9].items->data);
3023             exit(1);
3024         }
3025     }
3026
3027     aserver = GetServer(as->parms[0].items->data);
3028     if (aserver == 0) {
3029         fprintf(STDERR, "vos: server '%s' not found in host table\n",
3030                 as->parms[0].items->data);
3031         exit(1);
3032     }
3033     apart = volutil_GetPartitionID(as->parms[1].items->data);
3034     if (apart < 0) {
3035         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3036                 as->parms[1].items->data);
3037         exit(1);
3038     }
3039     if (!IsPartValid(apart, aserver, &code)) {  /*check for validity of the partition */
3040         if (code)
3041             PrintError("", code);
3042         else
3043             fprintf(STDERR,
3044                     "vos : partition %s does not exist on the server\n",
3045                     as->parms[1].items->data);
3046         exit(1);
3047     }
3048     strcpy(avolname, as->parms[2].items->data);
3049     if (!ISNAMEVALID(avolname)) {
3050         fprintf(STDERR,
3051                 "vos: the name of the volume %s exceeds the size limit\n",
3052                 avolname);
3053         exit(1);
3054     }
3055     if (!VolNameOK(avolname)) {
3056         fprintf(STDERR,
3057                 "Illegal volume name %s, should not end in .readonly or .backup\n",
3058                 avolname);
3059         exit(1);
3060     }
3061     if (as->parms[3].items) {
3062         strcpy(afilename, as->parms[3].items->data);
3063         if (!FileExists(afilename)) {
3064             fprintf(STDERR, "Can't access file %s\n", afilename);
3065             exit(1);
3066         }
3067     } else {
3068         strcpy(afilename, "");
3069     }
3070
3071     /* Check if volume exists or not */
3072
3073     vsu_ExtractName(volname, avolname);
3074     vcode = VLDB_GetEntryByName(volname, &entry);
3075     if (vcode) {                /* no volume - do a full restore */
3076         restoreflags = RV_FULLRST;
3077         if ((aoverwrite == INC) || (aoverwrite == ABORT))
3078             fprintf(STDERR,
3079                     "Volume does not exist; Will perform a full restore\n");
3080     }
3081
3082     else if ((!readonly && Lp_GetRwIndex(&entry) == -1) /* RW volume does not exist - do a full */
3083              ||(readonly && !Lp_ROMatch(0, 0, &entry))) {       /* RO volume does not exist - do a full */
3084         restoreflags = RV_FULLRST;
3085         if ((aoverwrite == INC) || (aoverwrite == ABORT))
3086             fprintf(STDERR,
3087                     "%s Volume does not exist; Will perform a full restore\n",
3088                     readonly ? "RO" : "RW");
3089
3090         if (avolid == 0) {
3091             avolid = entry.volumeId[voltype];
3092         } else if (entry.volumeId[voltype] != 0
3093                    && entry.volumeId[voltype] != avolid) {
3094             avolid = entry.volumeId[voltype];
3095         }
3096         aparentid = entry.volumeId[RWVOL];
3097     }
3098
3099     else {                      /* volume exists - do we do a full incremental or abort */
3100         int Oserver, Opart, Otype, vol_elsewhere = 0;
3101         struct nvldbentry Oentry;
3102         int c, dc;
3103
3104         if (avolid == 0) {
3105             avolid = entry.volumeId[voltype];
3106         } else if (entry.volumeId[voltype] != 0
3107                    && entry.volumeId[voltype] != avolid) {
3108             avolid = entry.volumeId[voltype];
3109         }
3110         aparentid = entry.volumeId[RWVOL];
3111
3112         /* A file name was specified  - check if volume is on another partition */
3113         vcode = GetVolumeInfo(avolid, &Oserver, &Opart, &Otype, &Oentry);
3114         if (vcode)
3115             exit(1);
3116
3117         vcode = VLDB_IsSameAddrs(Oserver, aserver, &err);
3118         if (err) {
3119             fprintf(STDERR,
3120                     "Failed to get info about server's %d address(es) from vlserver (err=%d); aborting call!\n",
3121                     Oserver, err);
3122             exit(1);
3123         }
3124         if (!vcode || (Opart != apart))
3125             vol_elsewhere = 1;
3126
3127         if (aoverwrite == ASK) {
3128             if (strcmp(afilename, "") == 0) {   /* The file is from standard in */
3129                 fprintf(STDERR,
3130                         "Volume exists and no -overwrite option specified; Aborting restore command\n");
3131                 exit(1);
3132             }
3133
3134             /* Ask what to do */
3135             if (vol_elsewhere) {
3136                 fprintf(STDERR,
3137                         "The volume %s %u already exists on a different server/part\n",
3138                         volname, entry.volumeId[voltype]);
3139                 fprintf(STDERR,
3140                         "Do you want to do a full restore or abort? [fa](a): ");
3141             } else {
3142                 fprintf(STDERR,
3143                         "The volume %s %u already exists in the VLDB\n",
3144                         volname, entry.volumeId[voltype]);
3145                 fprintf(STDERR,
3146                         "Do you want to do a full/incremental restore or abort? [fia](a): ");
3147             }
3148             dc = c = getchar();
3149             while (!(dc == EOF || dc == '\n'))
3150                 dc = getchar(); /* goto end of line */
3151             if ((c == 'f') || (c == 'F'))
3152                 aoverwrite = FULL;
3153             else if ((c == 'i') || (c == 'I'))
3154                 aoverwrite = INC;
3155             else
3156                 aoverwrite = ABORT;
3157         }
3158
3159         if (aoverwrite == ABORT) {
3160             fprintf(STDERR, "Volume exists; Aborting restore command\n");
3161             exit(1);
3162         } else if (aoverwrite == FULL) {
3163             restoreflags = RV_FULLRST;
3164             fprintf(STDERR,
3165                     "Volume exists; Will delete and perform full restore\n");
3166         } else if (aoverwrite == INC) {
3167             restoreflags = 0;
3168             if (vol_elsewhere) {
3169                 fprintf(STDERR,
3170                         "%s volume %lu already exists on a different server/part; not allowed\n",
3171                         readonly ? "RO" : "RW", (unsigned long)avolid);
3172                 exit(1);
3173             }
3174         }
3175     }
3176     if (offline)
3177         restoreflags |= RV_OFFLINE;
3178     if (readonly)
3179         restoreflags |= RV_RDONLY;
3180
3181     switch (acreation) {
3182         case TS_DUMP:
3183             restoreflags |= RV_CRDUMP;
3184             break;
3185         case TS_KEEP:
3186             restoreflags |= RV_CRKEEP;
3187             break;
3188         case TS_NEW:
3189             restoreflags |= RV_CRNEW;
3190             break;
3191         default:
3192             if (aoverwrite == FULL)
3193                 restoreflags |= RV_CRNEW;
3194             else
3195                 restoreflags |= RV_CRKEEP;
3196     }
3197
3198     switch (alastupdate) {
3199         case TS_DUMP:
3200             restoreflags |= RV_LUDUMP;
3201             break;
3202         case TS_KEEP:
3203             restoreflags |= RV_LUKEEP;
3204             break;
3205         case TS_NEW:
3206             restoreflags |= RV_LUNEW;
3207             break;
3208         default:
3209             restoreflags |= RV_LUDUMP;
3210     }
3211     if (as->parms[10].items) {
3212         restoreflags |= RV_NODEL;
3213     }
3214     
3215
3216     code =
3217         UV_RestoreVolume2(aserver, apart, avolid, aparentid,
3218                           avolname, restoreflags, WriteData, afilename);
3219     if (code) {
3220         PrintDiagnostics("restore", code);
3221         exit(1);
3222     }
3223     MapPartIdIntoName(apart, apartName);
3224
3225     /*
3226      * patch typo here - originally "parms[1]", should be "parms[0]"
3227      */
3228
3229     fprintf(STDOUT, "Restored volume %s on %s %s\n", avolname,
3230             as->parms[0].items->data, apartName);
3231     return 0;
3232 }
3233
3234 static int
3235 LockReleaseCmd(register struct cmd_syndesc *as, void *arock)
3236 {
3237     afs_uint32 avolid;
3238     afs_int32 code, err;
3239
3240     avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
3241     if (avolid == 0) {
3242         if (err)
3243             PrintError("", err);
3244         else
3245             fprintf(STDERR, "vos: can't find volume '%s'\n",
3246                     as->parms[0].items->data);
3247         exit(1);
3248     }
3249
3250     code = UV_LockRelease(avolid);
3251     if (code) {
3252         PrintDiagnostics("unlock", code);
3253         exit(1);
3254     }
3255     fprintf(STDOUT, "Released lock on vldb entry for volume %s\n",
3256             as->parms[0].items->data);
3257     return 0;
3258 }
3259
3260 static int
3261 AddSite(register struct cmd_syndesc *as, void *arock)
3262 {
3263     afs_uint32 avolid;
3264     afs_int32 aserver, apart, code, err, arovolid, valid = 0;
3265     char apartName[10], avolname[VOLSER_MAXVOLNAME + 1];
3266
3267     vsu_ExtractName(avolname, as->parms[2].items->data);;
3268     avolid = vsu_GetVolumeID(avolname, cstruct, &err);
3269     if (avolid == 0) {
3270         if (err)
3271             PrintError("", err);
3272         else
3273             fprintf(STDERR, "vos: can't find volume '%s'\n",
3274                     as->parms[2].items->data);
3275         exit(1);
3276     }
3277     arovolid = 0;
3278     if (as->parms[3].items) {
3279         vsu_ExtractName(avolname, as->parms[3].items->data);
3280         arovolid = vsu_GetVolumeID(avolname, cstruct, &err);
3281         if (!arovolid) {
3282             fprintf(STDERR, "vos: invalid ro volume id '%s'\n",
3283                     as->parms[3].items->data);
3284             exit(1);
3285         }
3286     }
3287     aserver = GetServer(as->parms[0].items->data);
3288     if (aserver == 0) {
3289         fprintf(STDERR, "vos: server '%s' not found in host table\n",
3290                 as->parms[0].items->data);
3291         exit(1);
3292     }
3293     apart = volutil_GetPartitionID(as->parms[1].items->data);
3294     if (apart < 0) {
3295         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3296                 as->parms[1].items->data);
3297         exit(1);
3298     }
3299     if (!IsPartValid(apart, aserver, &code)) {  /*check for validity of the partition */
3300         if (code)
3301             PrintError("", code);
3302         else
3303             fprintf(STDERR,
3304                     "vos : partition %s does not exist on the server\n",
3305                     as->parms[1].items->data);
3306         exit(1);
3307     }
3308     if (as->parms[4].items) {
3309         valid = 1;
3310     }
3311     code = UV_AddSite2(aserver, apart, avolid, arovolid, valid);
3312     if (code) {
3313         PrintDiagnostics("addsite", code);
3314         exit(1);
3315     }
3316     MapPartIdIntoName(apart, apartName);
3317     fprintf(STDOUT, "Added replication site %s %s for volume %s\n",
3318             as->parms[0].items->data, apartName, as->parms[2].items->data);
3319     return 0;
3320 }
3321
3322 static int
3323 RemoveSite(register struct cmd_syndesc *as, void *arock)
3324 {
3325
3326     afs_uint32 avolid;
3327     afs_int32 aserver, apart, code, err;
3328     char apartName[10], avolname[VOLSER_MAXVOLNAME + 1];
3329
3330     vsu_ExtractName(avolname, as->parms[2].items->data);
3331     avolid = vsu_GetVolumeID(avolname, cstruct, &err);
3332     if (avolid == 0) {
3333         if (err)
3334             PrintError("", err);
3335         else
3336             fprintf(STDERR, "vos: can't find volume '%s'\n",
3337                     as->parms[2].items->data);
3338         exit(1);
3339     }
3340     aserver = GetServer(as->parms[0].items->data);
3341     if (aserver == 0) {
3342         fprintf(STDERR, "vos: server '%s' not found in host table\n",
3343                 as->parms[0].items->data);
3344         exit(1);
3345     }
3346     apart = volutil_GetPartitionID(as->parms[1].items->data);
3347     if (apart < 0) {
3348         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3349                 as->parms[1].items->data);
3350         exit(1);
3351     }
3352 /*
3353  *skip the partition validity check, since it is possible that the partition
3354  *has since been decomissioned.
3355  */
3356 /*
3357         if (!IsPartValid(apart,aserver,&code)){
3358             if(code) PrintError("",code);
3359             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
3360             exit(1);
3361         }
3362 */
3363     code = UV_RemoveSite(aserver, apart, avolid);
3364     if (code) {
3365         PrintDiagnostics("remsite", code);
3366         exit(1);
3367     }
3368     MapPartIdIntoName(apart, apartName);
3369     fprintf(STDOUT, "Removed replication site %s %s for volume %s\n",
3370             as->parms[0].items->data, apartName, as->parms[2].items->data);
3371     return 0;
3372 }
3373
3374 static int
3375 ChangeLocation(register struct cmd_syndesc *as, void *arock)
3376 {
3377     afs_uint32 avolid;
3378     afs_int32 aserver, apart, code, err;
3379     char apartName[10];
3380
3381     avolid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
3382     if (avolid == 0) {
3383         if (err)
3384             PrintError("", err);
3385         else
3386             fprintf(STDERR, "vos: can't find volume '%s'\n",
3387                     as->parms[2].items->data);
3388         exit(1);
3389     }
3390     aserver = GetServer(as->parms[0].items->data);
3391     if (aserver == 0) {
3392         fprintf(STDERR, "vos: server '%s' not found in host table\n",
3393                 as->parms[0].items->data);
3394         exit(1);
3395     }
3396     apart = volutil_GetPartitionID(as->parms[1].items->data);
3397     if (apart < 0) {
3398         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3399                 as->parms[1].items->data);
3400         exit(1);
3401     }
3402     if (!IsPartValid(apart, aserver, &code)) {  /*check for validity of the partition */
3403         if (code)
3404             PrintError("", code);
3405         else
3406             fprintf(STDERR,
3407                     "vos : partition %s does not exist on the server\n",
3408                     as->parms[1].items->data);
3409         exit(1);
3410     }
3411     code = UV_ChangeLocation(aserver, apart, avolid);
3412     if (code) {
3413         PrintDiagnostics("addsite", code);
3414         exit(1);
3415     }
3416     MapPartIdIntoName(apart, apartName);
3417     fprintf(STDOUT, "Changed location to %s %s for volume %s\n",
3418             as->parms[0].items->data, apartName, as->parms[2].items->data);
3419     return 0;
3420 }
3421
3422 static int
3423 ListPartitions(register struct cmd_syndesc *as, void *arock)
3424 {
3425     afs_int32 aserver, code;
3426     struct partList dummyPartList;
3427     int i;
3428     char pname[10];
3429     int total, cnt;
3430
3431     aserver = GetServer(as->parms[0].items->data);
3432     if (aserver == 0) {
3433         fprintf(STDERR, "vos: server '%s' not found in host table\n",
3434                 as->parms[0].items->data);
3435         exit(1);
3436     }
3437
3438
3439     code = UV_ListPartitions(aserver, &dummyPartList, &cnt);
3440     if (code) {
3441         PrintDiagnostics("listpart", code);
3442         exit(1);
3443     }
3444     total = 0;
3445     fprintf(STDOUT, "The partitions on the server are:\n");
3446     for (i = 0; i < cnt; i++) {
3447         if (dummyPartList.partFlags[i] & PARTVALID) {
3448             memset(pname, 0, sizeof(pname));
3449             MapPartIdIntoName(dummyPartList.partId[i], pname);
3450             fprintf(STDOUT, " %10s ", pname);
3451             total++;
3452             if ((i % 5) == 0 && (i != 0))
3453                 fprintf(STDOUT, "\n");
3454         }
3455     }
3456     fprintf(STDOUT, "\n");
3457     fprintf(STDOUT, "Total: %d\n", total);
3458     return 0;
3459
3460 }
3461
3462 static int
3463 CompareVolName(const void *p1, const void *p2)
3464 {
3465     volintInfo *arg1, *arg2;
3466
3467     arg1 = (volintInfo *) p1;
3468     arg2 = (volintInfo *) p2;
3469     return (strcmp(arg1->name, arg2->name));
3470
3471 }
3472
3473 /*------------------------------------------------------------------------
3474  * PRIVATE XCompareVolName
3475  *
3476  * Description:
3477  *      Comparison routine for volume names coming from an extended
3478  *      volume listing.
3479  *
3480  * Arguments:
3481  *      a_obj1P : Char ptr to first extended vol info object
3482  *      a_obj1P : Char ptr to second extended vol info object
3483  *
3484  * Returns:
3485  *      The value of strcmp() on the volume names within the passed
3486  *      objects (i,e., -1, 0, or 1).
3487  *
3488  * Environment:
3489  *      Passed to qsort() as the designated comparison routine.
3490  *
3491  * Side Effects:
3492  *      As advertised.
3493  *------------------------------------------------------------------------*/
3494
3495 static int
3496 XCompareVolName(const void *a_obj1P, const void *a_obj2P)
3497 {                               /*XCompareVolName */
3498
3499     return (strcmp
3500             (((struct volintXInfo *)(a_obj1P))->name,
3501              ((struct volintXInfo *)(a_obj2P))->name));
3502
3503 }                               /*XCompareVolName */
3504
3505 static int
3506 CompareVolID(const void *p1, const void *p2)
3507 {
3508     volintInfo *arg1, *arg2;
3509
3510     arg1 = (volintInfo *) p1;
3511     arg2 = (volintInfo *) p2;
3512     if (arg1->volid == arg2->volid)
3513         return 0;
3514     if (arg1->volid > arg2->volid)
3515         return 1;
3516     else
3517         return -1;
3518
3519 }
3520
3521 /*------------------------------------------------------------------------
3522  * PRIVATE XCompareVolID
3523  *
3524  * Description:
3525  *      Comparison routine for volume IDs coming from an extended
3526  *      volume listing.
3527  *
3528  * Arguments:
3529  *      a_obj1P : Char ptr to first extended vol info object
3530  *      a_obj1P : Char ptr to second extended vol info object
3531  *
3532  * Returns:
3533  *      The value of strcmp() on the volume names within the passed
3534  *      objects (i,e., -1, 0, or 1).
3535  *
3536  * Environment:
3537  *      Passed to qsort() as the designated comparison routine.
3538  *
3539  * Side Effects:
3540  *      As advertised.
3541  *------------------------------------------------------------------------*/
3542
3543 static int
3544 XCompareVolID(const void *a_obj1P, const void *a_obj2P)
3545 {                               /*XCompareVolID */
3546
3547     afs_int32 id1, id2;         /*Volume IDs we're comparing */
3548
3549     id1 = ((struct volintXInfo *)(a_obj1P))->volid;
3550     id2 = ((struct volintXInfo *)(a_obj2P))->volid;
3551     if (id1 == id2)
3552         return (0);
3553     else if (id1 > id2)
3554         return (1);
3555     else
3556         return (-1);
3557
3558 }                               /*XCompareVolID */
3559
3560 /*------------------------------------------------------------------------
3561  * PRIVATE ListVolumes
3562  *
3563  * Description:
3564  *      Routine used to list volumes, contacting the Volume Server
3565  *      directly, bypassing the VLDB.
3566  *
3567  * Arguments:
3568  *      as : Ptr to parsed command line arguments.
3569  *
3570  * Returns:
3571  *      0                       Successful operation
3572  *
3573  * Environment:
3574  *      Nothing interesting.
3575  *
3576  * Side Effects:
3577  *      As advertised.
3578  *------------------------------------------------------------------------*/
3579
3580 static int
3581 ListVolumes(register struct cmd_syndesc *as, void *arock)
3582 {
3583     afs_int32 apart, int32list, fast;
3584     afs_int32 aserver, code;
3585     volintInfo *pntr;
3586     volintInfo *oldpntr = NULL;
3587     afs_int32 count;
3588     int i;
3589     char *base;
3590     volintXInfo *xInfoP;
3591     volintXInfo *origxInfoP = NULL; /*Ptr to current/orig extended vol info */
3592     int wantExtendedInfo;       /*Do we want extended vol info? */
3593
3594     char pname[10];
3595     struct partList dummyPartList;
3596     int all;
3597     int quiet, cnt;
3598
3599     apart = -1;
3600     fast = 0;
3601     int32list = 0;
3602
3603     if (as->parms[3].items)
3604         int32list = 1;
3605     if (as->parms[4].items)
3606         quiet = 1;
3607     else
3608         quiet = 0;
3609     if (as->parms[2].items)
3610         fast = 1;
3611     if (fast)
3612         all = 0;
3613     else
3614         all = 1;
3615     if (as->parms[5].items) {
3616         /*
3617          * We can't coexist with the fast flag.
3618          */
3619         if (fast) {
3620             fprintf(STDERR,
3621                     "vos: Can't use the -fast and -extended flags together\n");
3622             exit(1);
3623         }
3624
3625         /*
3626          * We need to turn on ``long'' listings to get the full effect.
3627          */
3628         wantExtendedInfo = 1;
3629         int32list = 1;
3630     } else
3631         wantExtendedInfo = 0;
3632     if (as->parms[1].items) {
3633         apart = volutil_GetPartitionID(as->parms[1].items->data);
3634         if (apart < 0) {
3635             fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3636                     as->parms[1].items->data);
3637             exit(1);
3638         }
3639         dummyPartList.partId[0] = apart;
3640         dummyPartList.partFlags[0] = PARTVALID;
3641         cnt = 1;
3642     }
3643     aserver = GetServer(as->parms[0].items->data);
3644     if (aserver == 0) {
3645         fprintf(STDERR, "vos: server '%s' not found in host table\n",
3646                 as->parms[0].items->data);
3647         exit(1);
3648     }
3649
3650     if (apart != -1) {
3651         if (!IsPartValid(apart, aserver, &code)) {      /*check for validity of the partition */
3652             if (code)
3653                 PrintError("", code);
3654             else
3655                 fprintf(STDERR,
3656                         "vos : partition %s does not exist on the server\n",
3657                         as->parms[1].items->data);
3658             exit(1);
3659         }
3660     } else {
3661         code = UV_ListPartitions(aserver, &dummyPartList, &cnt);
3662         if (code) {
3663             PrintDiagnostics("listvol", code);
3664             exit(1);
3665         }
3666     }
3667     for (i = 0; i < cnt; i++) {
3668         if (dummyPartList.partFlags[i] & PARTVALID) {
3669             if (wantExtendedInfo)
3670                 code =
3671                     UV_XListVolumes(aserver, dummyPartList.partId[i], all,
3672                                     &xInfoP, &count);
3673             else
3674                 code =
3675                     UV_ListVolumes(aserver, dummyPartList.partId[i], all,
3676                                    &pntr, &count);
3677             if (code) {
3678                 PrintDiagnostics("listvol", code);
3679                 if (pntr)
3680                     free(pntr);
3681                 exit(1);
3682             }
3683             if (wantExtendedInfo) {
3684                 origxInfoP = xInfoP;
3685                 base = (char *)xInfoP;
3686             } else {
3687                 oldpntr = pntr;
3688                 base = (char *)pntr;
3689             }
3690
3691             if (!fast) {
3692                 if (wantExtendedInfo)
3693                     qsort(base, count, sizeof(volintXInfo), XCompareVolName);
3694                 else
3695                     qsort(base, count, sizeof(volintInfo), CompareVolName);
3696             } else {
3697                 if (wantExtendedInfo)
3698                     qsort(base, count, sizeof(volintXInfo), XCompareVolID);
3699                 else
3700                     qsort(base, count, sizeof(volintInfo), CompareVolID);
3701             }
3702             MapPartIdIntoName(dummyPartList.partId[i], pname);
3703             if (!quiet)
3704                 fprintf(STDOUT,
3705                         "Total number of volumes on server %s partition %s: %lu \n",
3706                         as->parms[0].items->data, pname,
3707                         (unsigned long)count);
3708             if (wantExtendedInfo) {
3709 #ifdef FULL_LISTVOL_SWITCH
3710                 if (as->parms[6].items)
3711                     XDisplayVolumes2(aserver, dummyPartList.partId[i], origxInfoP,
3712                                 count, int32list, fast, quiet);
3713                 else
3714 #endif /* FULL_LISTVOL_SWITCH */
3715                 XDisplayVolumes(aserver, dummyPartList.partId[i], origxInfoP,
3716                                 count, int32list, fast, quiet);
3717                 if (xInfoP)
3718                     free(xInfoP);
3719                 xInfoP = (volintXInfo *) 0;
3720             } else {
3721 #ifdef FULL_LISTVOL_SWITCH
3722                 if (as->parms[6].items)
3723                     DisplayVolumes2(aserver, dummyPartList.partId[i], oldpntr,
3724                                     count);
3725                 else
3726 #endif /* FULL_LISTVOL_SWITCH */
3727                     DisplayVolumes(aserver, dummyPartList.partId[i], oldpntr,
3728                                    count, int32list, fast, quiet);
3729                 if (pntr)
3730                     free(pntr);
3731                 pntr = (volintInfo *) 0;
3732             }
3733         }
3734     }
3735     return 0;
3736 }
3737
3738 static int
3739 SyncVldb(register struct cmd_syndesc *as, void *arock)
3740 {
3741     afs_int32 pnum = 0, code;   /* part name */
3742     char part[10];
3743     int flags = 0;
3744     char *volname = 0;
3745
3746     tserver = 0;
3747     if (as->parms[0].items) {
3748         tserver = GetServer(as->parms[0].items->data);
3749         if (!tserver) {
3750             fprintf(STDERR, "vos: host '%s' not found in host table\n",
3751                     as->parms[0].items->data);
3752             exit(1);
3753         }
3754     }
3755
3756     if (as->parms[1].items) {
3757         pnum = volutil_GetPartitionID(as->parms[1].items->data);
3758         if (pnum < 0) {
3759             fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3760                     as->parms[1].items->data);
3761             exit(1);
3762         }
3763         if (!IsPartValid(pnum, tserver, &code)) {       /*check for validity of the partition */
3764             if (code)
3765                 PrintError("", code);
3766             else
3767                 fprintf(STDERR,
3768                         "vos: partition %s does not exist on the server\n",
3769                         as->parms[1].items->data);
3770             exit(1);
3771         }
3772         flags = 1;
3773
3774         if (!tserver) {
3775             fprintf(STDERR,
3776                     "The -partition option requires a -server option\n");
3777             exit(1);
3778         }
3779     }
3780
3781     if (as->parms[3].items) {
3782         flags |= 2; /* don't update */
3783     }
3784
3785     if (as->parms[2].items) {
3786         /* Synchronize an individual volume */
3787         volname = as->parms[2].items->data;
3788         code = UV_SyncVolume(tserver, pnum, volname, flags);
3789     } else {
3790         if (!tserver) {
3791             fprintf(STDERR,
3792                     "Without a -volume option, the -server option is required\n");
3793             exit(1);
3794         }
3795         code = UV_SyncVldb(tserver, pnum, flags, 0 /*unused */ );
3796     }
3797
3798     if (code) {
3799         PrintDiagnostics("syncvldb", code);
3800         exit(1);
3801     }
3802
3803     /* Print a summary of what we did */
3804     if (volname)
3805         fprintf(STDOUT, "VLDB volume %s synchronized", volname);
3806     else
3807         fprintf(STDOUT, "VLDB synchronized");
3808     if (tserver) {
3809         fprintf(STDOUT, " with state of server %s", as->parms[0].items->data);
3810     }
3811     if (flags & 1) {
3812         MapPartIdIntoName(pnum, part);
3813         fprintf(STDOUT, " partition %s\n", part);
3814     }
3815     fprintf(STDOUT, "\n");
3816
3817     return 0;
3818 }
3819
3820 static int
3821 SyncServer(register struct cmd_syndesc *as, void *arock)
3822 {
3823     afs_int32 pnum, code;       /* part name */
3824     char part[10];
3825
3826     int flags = 0;
3827
3828     tserver = GetServer(as->parms[0].items->data);
3829     if (!tserver) {
3830         fprintf(STDERR, "vos: host '%s' not found in host table\n",
3831                 as->parms[0].items->data);
3832         exit(1);
3833     }
3834     if (as->parms[1].items) {
3835         pnum = volutil_GetPartitionID(as->parms[1].items->data);
3836         if (pnum < 0) {
3837             fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3838                     as->parms[1].items->data);
3839             exit(1);
3840         }
3841         if (!IsPartValid(pnum, tserver, &code)) {       /*check for validity of the partition */
3842             if (code)
3843                 PrintError("", code);
3844             else
3845                 fprintf(STDERR,
3846                         "vos : partition %s does not exist on the server\n",
3847                         as->parms[1].items->data);
3848             exit(1);
3849         }
3850         flags = 1;
3851     } else {
3852         pnum = -1;
3853     }
3854
3855     if (as->parms[2].items) {
3856         flags |= 2; /* don't update */
3857     }
3858     code = UV_SyncServer(tserver, pnum, flags, 0 /*unused */ );
3859     if (code) {
3860         PrintDiagnostics("syncserv", code);
3861         exit(1);
3862     }
3863     if (flags & 1) {
3864         MapPartIdIntoName(pnum, part);
3865         fprintf(STDOUT, "Server %s partition %s synchronized with VLDB\n",
3866                 as->parms[0].items->data, part);
3867     } else
3868         fprintf(STDOUT, "Server %s synchronized with VLDB\n",
3869                 as->parms[0].items->data);
3870     return 0;
3871
3872 }
3873
3874 static int
3875 VolumeInfoCmd(char *name)
3876 {
3877     struct nvldbentry entry;
3878     afs_int32 vcode;
3879
3880     /* The vlserver will handle names with the .readonly
3881      * and .backup extension as well as volume ids.
3882      */
3883     vcode = VLDB_GetEntryByName(name, &entry);
3884     if (vcode) {
3885         PrintError("", vcode);
3886         exit(1);
3887     }
3888     MapHostToNetwork(&entry);
3889     EnumerateEntry(&entry);
3890
3891     /* Defect #3027: grubby check to handle locked volume.
3892      * If VLOP_ALLOPERS is set, the entry is locked.
3893      * Leave this routine as is, but put in correct check.
3894      */
3895     if (entry.flags & VLOP_ALLOPERS)
3896         fprintf(STDOUT, "    Volume is currently LOCKED  \n");
3897
3898     return 0;
3899 }
3900
3901 static int
3902 VolumeZap(register struct cmd_syndesc *as, void *arock)
3903 {
3904     struct nvldbentry entry;
3905     afs_uint32 volid, zapbackupid = 0, backupid = 0;
3906     afs_int32 code, server, part, err;
3907
3908     if (as->parms[3].items) {
3909         /* force flag is on, use the other version */
3910         return NukeVolume(as);
3911     }
3912
3913     if (as->parms[4].items) {
3914         zapbackupid = 1;
3915     }
3916
3917     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
3918     if (volid == 0) {
3919         if (err)
3920             PrintError("", err);
3921         else
3922             fprintf(STDERR, "vos: can't find volume '%s'\n",
3923                     as->parms[2].items->data);
3924         exit(1);
3925     }
3926     part = volutil_GetPartitionID(as->parms[1].items->data);
3927     if (part < 0) {
3928         fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
3929                 as->parms[1].items->data);
3930         exit(1);
3931     }
3932     server = GetServer(as->parms[0].items->data);
3933     if (!server) {
3934         fprintf(STDERR, "vos: host '%s' not found in host table\n",
3935                 as->parms[0].items->data);
3936         exit(1);
3937     }
3938     if (!IsPartValid(part, server, &code)) {    /*check for validity of the partition */
3939         if (code)
3940             PrintError("", code);
3941         else
3942             fprintf(STDERR,
3943                     "vos : partition %s does not exist on the server\n",
3944                     as->parms[1].items->data);
3945         exit(1);
3946     }
3947     code = VLDB_GetEntryByID(volid, -1, &entry);
3948     if (!code) {
3949         if (volid == entry.volumeId[RWVOL])
3950             backupid = entry.volumeId[BACKVOL];
3951         fprintf(STDERR,
3952                 "Warning: Entry for volume number %lu exists in VLDB (but we're zapping it anyway!)\n",
3953                 (unsigned long)volid);
3954     }
3955     if (zapbackupid) {
3956         volintInfo *pntr = (volintInfo *) 0;
3957
3958         if (!backupid) {
3959             code = UV_ListOneVolume(server, part, volid, &pntr);
3960             if (!code) {
3961                 if (volid == pntr->parentID)
3962                     backupid = pntr->backupID;
3963                 if (pntr)
3964                     free(pntr);
3965             }
3966         }
3967         if (backupid) {
3968             code = UV_VolumeZap(server, part, backupid);
3969             if (code) {
3970                 PrintDiagnostics("zap", code);
3971                 exit(1);
3972             }
3973             fprintf(STDOUT, "Backup Volume %lu deleted\n",
3974                     (unsigned long)backupid);
3975         }
3976     }
3977     code = UV_VolumeZap(server, part, volid);
3978     if (code) {
3979         PrintDiagnostics("zap", code);
3980         exit(1);
3981     }
3982     fprintf(STDOUT, "Volume %lu deleted\n", (unsigned long)volid);
3983
3984     return 0;
3985 }
3986
3987 static int
3988 VolserStatus(register struct cmd_syndesc *as, void *arock)
3989 {
3990     afs_int32 server, code;
3991     transDebugInfo *pntr, *oldpntr;
3992     afs_int32 count;
3993     int i;
3994     char pname[10];
3995     time_t t;
3996
3997     server = GetServer(as->parms[0].items->data);
3998     if (!server) {
3999         fprintf(STDERR, "vos: host '%s' not found in host table\n",
4000                 as->parms[0].items->data);
4001         exit(1);
4002     }
4003     code = UV_VolserStatus(server, &pntr, &count);
4004     if (code) {
4005         PrintDiagnostics("status", code);
4006         exit(1);
4007     }
4008     oldpntr = pntr;
4009     if (count == 0)
4010         fprintf(STDOUT, "No active transactions on %s\n",
4011                 as->parms[0].items->data);
4012     else {
4013         fprintf(STDOUT, "Total transactions: %d\n", count);
4014     }
4015     for (i = 0; i < count; i++) {
4016         /*print out the relevant info */
4017         fprintf(STDOUT, "--------------------------------------\n");
4018         t = pntr->time;
4019         fprintf(STDOUT, "transaction: %lu  created: %s",
4020                 (unsigned long)pntr->tid, ctime(&t));
4021         if (pntr->returnCode) {
4022             fprintf(STDOUT, "returnCode: %lu\n",
4023                     (unsigned long)pntr->returnCode);
4024         }
4025         if (pntr->iflags) {
4026             fprintf(STDOUT, "attachFlags:  ");
4027             switch (pntr->iflags) {
4028             case ITOffline:
4029                 fprintf(STDOUT, "offline ");
4030                 break;
4031             case ITBusy:
4032                 fprintf(STDOUT, "busy ");
4033                 break;
4034             case ITReadOnly:
4035                 fprintf(STDOUT, "readonly ");
4036                 break;
4037             case ITCreate:
4038                 fprintf(STDOUT, "create ");
4039                 break;
4040             case ITCreateVolID:
4041                 fprintf(STDOUT, "create volid ");
4042                 break;
4043             }
4044             fprintf(STDOUT, "\n");
4045         }
4046         if (pntr->vflags) {
4047             fprintf(STDOUT, "volumeStatus: ");
4048             switch (pntr->vflags) {
4049             case VTDeleteOnSalvage:
4050                 fprintf(STDOUT, "deleteOnSalvage ");
4051             case VTOutOfService:
4052                 fprintf(STDOUT, "outOfService ");
4053             case VTDeleted:
4054                 fprintf(STDOUT, "deleted ");
4055             }
4056             fprintf(STDOUT, "\n");
4057         }
4058         if (pntr->tflags) {
4059             fprintf(STDOUT, "transactionFlags: ");
4060             fprintf(STDOUT, "delete\n");
4061         }
4062         MapPartIdIntoName(pntr->partition, pname);
4063         fprintf(STDOUT, "volume: %lu  partition: %s  procedure: %s\n",
4064                 (unsigned long)pntr->volid, pname, pntr->lastProcName);
4065         if (pntr->callValid) {
4066             fprintf(STDOUT,
4067                     "packetRead: %lu  lastReceiveTime: %d  packetSend: %lu  lastSendTime: %d\n",
4068                     (unsigned long)pntr->readNext, pntr->lastReceiveTime,
4069                     (unsigned long)pntr->transmitNext, pntr->lastSendTime);
4070         }
4071         pntr++;
4072         fprintf(STDOUT, "--------------------------------------\n");
4073         fprintf(STDOUT, "\n");
4074     }
4075     if (oldpntr)
4076         free(oldpntr);
4077     return 0;
4078 }
4079
4080 static int
4081 RenameVolume(register struct cmd_syndesc *as, void *arock)
4082 {
4083     afs_int32 code1, code2, code;
4084     struct nvldbentry entry;
4085
4086     code1 = VLDB_GetEntryByName(as->parms[0].items->data, &entry);
4087     if (code1) {
4088         fprintf(STDERR, "vos: Could not find entry for volume %s\n",
4089                 as->parms[0].items->data);
4090         exit(1);
4091     }
4092     code2 = VLDB_GetEntryByName(as->parms[1].items->data, &entry);
4093     if ((!code1) && (!code2)) { /*the newname already exists */
4094         fprintf(STDERR, "vos: volume %s already exists\n",
4095                 as->parms[1].items->data);
4096         exit(1);
4097     }
4098
4099     if (code1 && code2) {
4100         fprintf(STDERR, "vos: Could not find entry for volume %s or %s\n",
4101                 as->parms[0].items->data, as->parms[1].items->data);
4102         exit(1);
4103     }
4104     if (!VolNameOK(as->parms[0].items->data)) {
4105         fprintf(STDERR,
4106                 "Illegal volume name %s, should not end in .readonly or .backup\n",
4107                 as->parms[0].items->data);
4108         exit(1);
4109     }
4110     if (!ISNAMEVALID(as->parms[1].items->data)) {
4111         fprintf(STDERR,
4112                 "vos: the new volume name %s exceeds the size limit of %d\n",
4113                 as->parms[1].items->data, VOLSER_OLDMAXVOLNAME - 10);
4114         exit(1);
4115     }
4116     if (!VolNameOK(as->parms[1].items->data)) {
4117         fprintf(STDERR,
4118                 "Illegal volume name %s, should not end in .readonly or .backup\n",
4119                 as->parms[1].items->data);
4120         exit(1);
4121     }
4122     if (IsNumeric(as->parms[1].items->data)) {
4123         fprintf(STDERR, "Illegal volume name %s, should not be a number\n",
4124                 as->parms[1].items->data);
4125         exit(1);
4126     }
4127     MapHostToNetwork(&entry);
4128     code =
4129         UV_RenameVolume(&entry, as->parms[0].items->data,
4130                         as->parms[1].items->data);
4131     if (code) {
4132         PrintDiagnostics("rename", code);
4133         exit(1);
4134     }
4135     fprintf(STDOUT, "Renamed volume %s to %s\n", as->parms[0].items->data,
4136             as->parms[1].items->data);
4137     return 0;
4138 }
4139
4140 int
4141 GetVolumeInfo(afs_uint32 volid, afs_int32 *server, afs_int32 *part, afs_int32 *voltype, 
4142               struct nvldbentry *rentry)
4143 {
4144     afs_int32 vcode;
4145     int i, index = -1;
4146
4147     vcode = VLDB_GetEntryByID(volid, -1, rentry);
4148     if (vcode) {
4149         fprintf(STDERR,
4150                 "Could not fetch the entry for volume %lu from VLDB \n",
4151                 (unsigned long)volid);
4152         PrintError("", vcode);
4153         return (vcode);
4154     }
4155     MapHostToNetwork(rentry);
4156     if (volid == rentry->volumeId[ROVOL]) {
4157         *voltype = ROVOL;
4158         for (i = 0; i < rentry->nServers; i++) {
4159             if ((index == -1) && (rentry->serverFlags[i] & ITSROVOL)
4160                 && !(rentry->serverFlags[i] & RO_DONTUSE))
4161                 index = i;
4162         }
4163         if (index == -1) {
4164             fprintf(STDERR,
4165                     "RO volume is not found in VLDB entry for volume %lu\n",
4166                     (unsigned long)volid);
4167             return -1;
4168         }
4169
4170         *server = rentry->serverNumber[index];
4171         *part = rentry->serverPartition[index];
4172         return 0;
4173     }
4174
4175     index = Lp_GetRwIndex(rentry);
4176     if (index == -1) {
4177         fprintf(STDERR,
4178                 "RW Volume is not found in VLDB entry for volume %lu\n",
4179                 (unsigned long)volid);
4180         return -1;
4181     }
4182     if (volid == rentry->volumeId[RWVOL]) {
4183         *voltype = RWVOL;
4184         *server = rentry->serverNumber[index];
4185         *part = rentry->serverPartition[index];
4186         return 0;
4187     }
4188     if (volid == rentry->volumeId[BACKVOL]) {
4189         *voltype = BACKVOL;
4190         *server = rentry->serverNumber[index];
4191         *part = rentry->serverPartition[index];
4192         return 0;
4193     }
4194     fprintf(STDERR,
4195             "unexpected volume type for volume %lu\n",
4196             (unsigned long)volid);
4197     return -1;
4198 }
4199
4200 static int
4201 DeleteEntry(register struct cmd_syndesc *as, void *arock)
4202 {
4203     afs_int32 apart = 0;
4204     afs_uint32 avolid;
4205     afs_int32 vcode;
4206     struct VldbListByAttributes attributes;
4207     nbulkentries arrayEntries;
4208     register struct nvldbentry *vllist;
4209     struct cmd_item *itp;
4210     afs_int32 nentries;
4211     int j;
4212     char prefix[VOLSER_MAXVOLNAME + 1];
4213     int seenprefix = 0;
4214     afs_int32 totalBack = 0, totalFail = 0, err;
4215
4216     if (as->parms[0].items) {   /* -id */
4217         if (as->parms[1].items || as->parms[2].items || as->parms[3].items) {
4218             fprintf(STDERR,
4219                     "You cannot use -server, -partition, or -prefix with the -id argument\n");
4220             exit(-2);
4221         }
4222         for (itp = as->parms[0].items; itp; itp = itp->next) {
4223             avolid = vsu_GetVolumeID(itp->data, cstruct, &err);
4224             if (avolid == 0) {
4225                 if (err)
4226                     PrintError("", err);
4227                 else
4228                     fprintf(STDERR, "vos: can't find volume '%s'\n",
4229                             itp->data);
4230                 continue;
4231             }
4232             if (as->parms[4].items) {   /* -noexecute */
4233                 fprintf(STDOUT, "Would have deleted VLDB entry for %s \n",
4234                         itp->data);
4235                 fflush(STDOUT);
4236                 continue;
4237             }
4238             vcode = ubik_VL_DeleteEntry(cstruct, 0, avolid, RWVOL);
4239             if (vcode) {
4240                 fprintf(STDERR, "Could not delete entry for volume %s\n",
4241                         itp->data);
4242                 fprintf(STDERR,
4243                         "You must specify a RW volume name or ID "
4244                         "(the entire VLDB entry will be deleted)\n");
4245                 PrintError("", vcode);
4246                 totalFail++;
4247                 continue;
4248             }
4249             totalBack++;
4250         }
4251         fprintf(STDOUT, "Deleted %d VLDB entries\n", totalBack);
4252         return (totalFail);
4253     }
4254
4255     if (!as->parms[1].items && !as->parms[2].items && !as->parms[3].items) {
4256         fprintf(STDERR, "You must specify an option\n");
4257         exit(-2);
4258     }
4259
4260     /* Zero out search attributes */
4261     memset(&attributes, 0, sizeof(struct VldbListByAttributes));
4262
4263     if (as->parms[1].items) {   /* -prefix */
4264         strncpy(prefix, as->parms[1].items->data, VOLSER_MAXVOLNAME);
4265         seenprefix = 1;
4266         if (!as->parms[2].items && !as->parms[3].items) {       /* a single entry only */
4267             fprintf(STDERR,
4268                     "You must provide -server with the -prefix argument\n");
4269             exit(-2);
4270         }
4271     }
4272
4273     if (as->parms[2].items) {   /* -server */
4274         afs_int32 aserver;
4275         aserver = GetServer(as->parms[2].items->data);
4276         if (aserver == 0) {
4277             fprintf(STDERR, "vos: server '%s' not found in host table\n",
4278                     as->parms[2].items->data);
4279             exit(-1);
4280         }
4281         attributes.server = ntohl(aserver);
4282         attributes.Mask |= VLLIST_SERVER;
4283     }
4284
4285     if (as->parms[3].items) {   /* -partition */
4286         if (!as->parms[2].items) {
4287             fprintf(STDERR,
4288                     "You must provide -server with the -partition argument\n");
4289             exit(-2);
4290         }
4291         apart = volutil_GetPartitionID(as->parms[3].items->data);
4292         if (apart < 0) {
4293             fprintf(STDERR, "vos: could not interpret partition name '%s'\n",
4294                     as->parms[3].items->data);
4295             exit(-1);
4296         }
4297         attributes.partition = apart;
4298         attributes.Mask |= VLLIST_PARTITION;
4299     }
4300
4301     /* Print status line of what we are doing */
4302     fprintf(STDOUT, "Deleting VLDB entries for ");
4303     if (as->parms[2].items) {
4304         fprintf(STDOUT, "server %s ", as->parms[2].items->data);
4305     }
4306     if (as->parms[3].items) {
4307         char pname[10];
4308         MapPartIdIntoName(apart, pname);
4309         fprintf(STDOUT, "partition %s ", pname);
4310     }
4311     if (seenprefix) {
4312         fprintf(STDOUT, "which are prefixed with %s ", prefix);
4313     }
4314     fprintf(STDOUT, "\n");
4315     fflush(STDOUT);
4316
4317     /* Get all the VLDB entries on a server and/or partition */
4318     memset(&arrayEntries, 0, sizeof(arrayEntries));
4319     vcode = VLDB_ListAttributes(&attributes, &nentries, &arrayEntries);
4320     if (vc