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