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