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