95e041dc2cc6659b02cb3b13f0fcbb2616488881
[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 int volOffline(register struct cmd_syndesc *as)
1467 {
1468     afs_int32 server, partition, volid;
1469     afs_int32 code, err=0;
1470     afs_int32 transflag, sleeptime, transdone;
1471
1472     server = GetServer(as->parms[0].items->data);
1473     if (server == 0) {
1474         fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[0].items->data);
1475         return -1;
1476     }
1477
1478     partition = volutil_GetPartitionID(as->parms[1].items->data);
1479     if (partition < 0) {
1480         fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[1].items->data);
1481         return ENOENT;
1482     }
1483
1484     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err); /* -id */
1485     if (!volid) {
1486        if (err) PrintError("", err);
1487        else fprintf(STDERR, "Unknown volume ID or name '%s'\n", as->parms[0].items->data);
1488        return -1;
1489     }
1490
1491     transflag = (as->parms[4].items ? ITBusy : ITOffline);
1492     sleeptime = (as->parms[3].items ? atol(as->parms[3].items->data) : 0);
1493     transdone = (sleeptime ? 0/*online*/ : VTOutOfService);
1494     if (as->parms[4].items && !as->parms[3].items) {
1495         fprintf(STDERR,"-sleep option must be used with -busy flag\n");
1496         return -1;
1497     }
1498
1499     code = UV_SetVolume(server, partition, volid, transflag, transdone, sleeptime);
1500     if (code) {
1501        fprintf(STDERR, "Failed to set volume. Code = %d\n", code);
1502        return -1;
1503     }
1504
1505     return 0;
1506 }
1507
1508 static int CreateVolume(register struct cmd_syndesc *as)
1509 {
1510     afs_int32 pname;
1511     char part[10];
1512     afs_int32 volid,code;
1513     struct nvldbentry entry;
1514     afs_int32 vcode;
1515     afs_int32 quota;
1516
1517     quota = 5000;
1518     tserver = GetServer(as->parms[0].items->data);
1519     if (!tserver) {
1520         fprintf(STDERR,"vos: host '%s' not found in host table\n",as->parms[0].items->data );
1521         return ENOENT;
1522     }
1523     pname = volutil_GetPartitionID(as->parms[1].items->data);
1524     if (pname < 0) {
1525         fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
1526         return ENOENT;
1527     }
1528     if (!IsPartValid(pname,tserver,&code)){/*check for validity of the partition */
1529         if(code) PrintError("",code);
1530         else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
1531         return ENOENT;
1532     }
1533     if(!ISNAMEVALID(as->parms[2].items->data)) {
1534         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);
1535         return E2BIG;
1536     }
1537     if(!VolNameOK(as->parms[2].items->data)){
1538         fprintf(STDERR,"Illegal volume name %s, should not end in .readonly or .backup\n",as->parms[2].items->data);
1539         return EINVAL;
1540     }
1541     if(IsNumeric(as->parms[2].items->data)){
1542         fprintf(STDERR,"Illegal volume name %s, should not be a number\n",as->parms[2].items->data);
1543         return EINVAL;
1544     }
1545     vcode = VLDB_GetEntryByName(as->parms[2].items->data, &entry);
1546     if(!vcode) {
1547         fprintf(STDERR,"Volume %s already exists\n",as->parms[2].items->data);
1548         PrintDiagnostics("create", code);
1549         return EEXIST;
1550     }
1551
1552     if (as->parms[3].items) {
1553        if (!IsNumeric(as->parms[3].items->data)){
1554          fprintf(STDERR,"Initial quota %s should be numeric.\n", as->parms[3].items->data);
1555          return EINVAL;
1556        }
1557
1558       code = util_GetInt32(as->parms[3].items->data, &quota);
1559       if (code) {
1560         fprintf(STDERR,"vos: bad integer specified for quota.\n");
1561         return code;
1562       }
1563     }
1564
1565     code = UV_CreateVolume2(tserver, pname,as->parms[2].items->data,
1566                             quota, 0, 0, 0, 0, &volid);
1567     if (code) {
1568         PrintDiagnostics("create", code);
1569         return code;
1570     }
1571     MapPartIdIntoName(pname, part);
1572     fprintf(STDOUT,"Volume %u created on partition %s of %s\n", volid, part,as->parms[0].items->data );
1573
1574     return 0;
1575 }
1576
1577 static afs_int32 DeleteAll(entry)
1578 struct nvldbentry *entry;
1579 {
1580     int i;
1581     afs_int32 error, code, curserver, curpart, volid;
1582
1583     MapHostToNetwork(entry);
1584     error = 0;
1585     for(i=0; i < entry->nServers; i++){
1586         curserver = entry->serverNumber[i];
1587         curpart = entry->serverPartition[i];
1588         if(entry->serverFlags[i] & ITSROVOL){
1589             volid = entry->volumeId[ROVOL];
1590         }
1591         else{
1592             volid = entry->volumeId[RWVOL];
1593         }
1594         code = UV_DeleteVolume(curserver,curpart,volid);
1595         if(code && !error)
1596             error = code;
1597     }
1598     return error;
1599 }
1600
1601 static DeleteVolume(as)
1602     struct cmd_syndesc *as;
1603 {
1604     afs_int32 err, code = 0;
1605     afs_int32 server = 0, partition = -1, volid;
1606     char pname[10];
1607     afs_int32 idx, j;
1608
1609     if (as->parms[0].items) {
1610        server = GetServer(as->parms[0].items->data);
1611        if (!server) {
1612           fprintf(STDERR,"vos: server '%s' not found in host table\n",
1613                   as->parms[0].items->data);
1614           return ENOENT;
1615        }
1616     }
1617
1618     if (as->parms[1].items) {
1619        partition = volutil_GetPartitionID(as->parms[1].items->data);
1620        if (partition < 0) {
1621           fprintf(STDERR,"vos: could not interpret partition name '%s'\n",
1622                   as->parms[1].items->data );
1623           return EINVAL;
1624        }
1625
1626        /* Check for validity of the partition */
1627        if (!IsPartValid(partition, server, &code)) {
1628           if (code) {
1629              PrintError("", code);
1630           } else {
1631              fprintf(STDERR,"vos : partition %s does not exist on the server\n",
1632                      as->parms[1].items->data);
1633           }
1634           return ENOENT;
1635        }
1636     }
1637
1638     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
1639     if (volid == 0) {
1640         fprintf(STDERR, "Can't find volume name '%s' in VLDB\n",
1641                 as->parms[2].items->data);
1642         if (err) PrintError("", err);
1643         return ENOENT;
1644     }
1645
1646     /* If the server or partition option are not complete, try to fill
1647      * them in from the VLDB entry.
1648      */
1649     if ((partition == -1) || !server) {
1650        struct nvldbentry entry;
1651
1652        code = VLDB_GetEntryByID(volid, -1, &entry);
1653        if (code) {
1654           fprintf(STDERR,"Could not fetch the entry for volume %u from VLDB\n",
1655                   volid);
1656           PrintError("",code);
1657           return (code);
1658        }
1659        
1660        if (((volid == entry.volumeId[RWVOL])   && (entry.flags & RW_EXISTS)) ||
1661            ((volid == entry.volumeId[BACKVOL]) && (entry.flags & BACK_EXISTS)) ) {
1662           idx = Lp_GetRwIndex(&entry);
1663           if ( (idx == -1) ||
1664                (server && (server != entry.serverNumber[idx])) ||
1665                ((partition != -1) && (partition != entry.serverPartition[idx])) ) {
1666              fprintf(STDERR,"VLDB: Volume '%s' no match\n", as->parms[2].items->data);
1667              return ENOENT;
1668           }
1669        } 
1670        else if ((volid == entry.volumeId[ROVOL]) && (entry.flags & RO_EXISTS)) {
1671           for (idx=-1,j=0; j<entry.nServers; j++) {
1672              if (entry.serverFlags[j] != ITSROVOL) continue;
1673
1674              if ( ((server    ==  0) || (server    == entry.serverNumber[j])) &&
1675                   ((partition == -1) || (partition == entry.serverPartition[j])) ) {
1676                 if (idx != -1) {
1677                    fprintf(STDERR,"VLDB: Volume '%s' matches more than one RO\n",
1678                            as->parms[2].items->data);
1679                    return ENOENT;
1680                 }
1681                 idx = j;
1682              }
1683           }
1684           if (idx == -1) {
1685              fprintf(STDERR,"VLDB: Volume '%s' no match\n", as->parms[2].items->data);
1686              return ENOENT;
1687           }
1688        }
1689        else {
1690           fprintf(STDERR,"VLDB: Volume '%s' no match\n", as->parms[2].items->data);
1691           return ENOENT;
1692        }
1693
1694        server    = htonl(entry.serverNumber[idx]);
1695        partition = entry.serverPartition[idx];
1696     }
1697
1698
1699     code = UV_DeleteVolume(server, partition, volid);
1700     if (code) {
1701        PrintDiagnostics("remove", code);
1702        return code;
1703     }
1704
1705     MapPartIdIntoName(partition, pname);
1706     fprintf(STDOUT,"Volume %u on partition %s server %s deleted\n",
1707             volid, pname, hostutil_GetNameByINet(server));
1708     return 0;
1709 }
1710
1711 #define TESTM   0       /* set for move space tests, clear for production */
1712 static MoveVolume(as)
1713 register struct cmd_syndesc *as;
1714 {
1715     
1716     afs_int32 volid, fromserver, toserver, frompart, topart,code, err;
1717     char fromPartName[10], toPartName[10];
1718
1719         struct diskPartition partition;         /* for space check */
1720         volintInfo *p;
1721
1722         volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
1723         if (volid == 0) {
1724         if (err) PrintError("", err);
1725         else  fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
1726                     as->parms[0].items->data);
1727             return ENOENT;
1728         }
1729         fromserver = GetServer(as->parms[1].items->data);
1730         if (fromserver == 0) {
1731             fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[1].items->data);
1732             return ENOENT;
1733         }
1734         toserver = GetServer(as->parms[3].items->data);
1735         if (toserver == 0) {
1736             fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[3].items->data);
1737             return ENOENT;
1738         }
1739         frompart = volutil_GetPartitionID(as->parms[2].items->data);
1740         if (frompart < 0) {
1741             fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[2].items->data);
1742             return EINVAL;
1743         }
1744         if (!IsPartValid(frompart,fromserver,&code)){/*check for validity of the partition */
1745             if(code) PrintError("",code);
1746             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[2].items->data);
1747             return ENOENT;
1748         }
1749         topart = volutil_GetPartitionID(as->parms[4].items->data);
1750         if (topart < 0) {
1751             fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[4].items->data);
1752             return EINVAL;
1753         }
1754         if (!IsPartValid(topart,toserver,&code)){/*check for validity of the partition */
1755             if(code) PrintError("",code);
1756             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[4].items->data);
1757             return ENOENT;
1758         }
1759
1760         /*
1761                 check source partition for space to clone volume
1762         */
1763
1764         MapPartIdIntoName(topart,toPartName);
1765         MapPartIdIntoName(frompart, fromPartName);
1766
1767         /*
1768                 check target partition for space to move volume
1769         */
1770
1771         code=UV_PartitionInfo(toserver,toPartName,&partition);
1772         if(code)
1773         {
1774                 fprintf(STDERR,"vos: cannot access partition %s\n",toPartName);
1775                 exit(1);
1776         }
1777         if(TESTM)
1778                 fprintf(STDOUT,"target partition %s free space %d\n",
1779                         toPartName,partition.free);
1780
1781         p=(volintInfo *)0;
1782         code=UV_ListOneVolume(fromserver,frompart,volid,&p);
1783         if(code)
1784         {
1785                 fprintf(STDERR,"vos:cannot access volume %u\n",volid);
1786                 free(p);
1787                 exit(1);
1788         }
1789         if(TESTM)
1790                 fprintf(STDOUT,"volume %u size %d\n",volid,p->size);
1791         if(partition.free<=p->size)
1792         {
1793                 fprintf(STDERR,"vos: no space on target partition %s to move volume %u\n",
1794                         toPartName,volid);
1795                 free(p);
1796                 exit(1);
1797         }
1798         free(p);
1799
1800         if(TESTM)
1801         {
1802                 fprintf(STDOUT,"size test - don't do move\n");
1803                 exit(0);
1804         }
1805
1806         /* successful move still not guaranteed but shoot for it */
1807
1808         code = UV_MoveVolume(volid, fromserver, frompart, toserver, topart);
1809         if (code) {
1810             PrintDiagnostics("move", code);
1811             return code;
1812         }
1813         MapPartIdIntoName(topart,toPartName);
1814         MapPartIdIntoName(frompart, fromPartName);
1815         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);
1816
1817     return 0;
1818 }
1819
1820 static CopyVolume(as)
1821 register struct cmd_syndesc *as;
1822 {
1823     afs_int32 volid, fromserver, toserver, frompart, topart,code, err;
1824     char fromPartName[10], toPartName[10], *tovolume;
1825     struct nvldbentry entry;
1826     struct diskPartition partition; /* for space check */
1827     volintInfo *p;
1828
1829     volid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
1830     if (volid == 0) {
1831         if (err) PrintError("", err);
1832         else  fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
1833                       as->parms[0].items->data);
1834         return ENOENT;
1835     }
1836     fromserver = GetServer(as->parms[1].items->data);
1837     if (fromserver == 0) {
1838         fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[1].items->data);
1839         return ENOENT;
1840     }
1841
1842     toserver = GetServer(as->parms[4].items->data);
1843     if (toserver == 0) {
1844         fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[3].items->data);
1845         return ENOENT;
1846     }
1847
1848     tovolume = as->parms[3].items->data;
1849     if(!ISNAMEVALID(tovolume)) {
1850         fprintf(STDERR,"vos: the name of the root volume %s exceeds the size limit of %d\n",
1851                 tovolume,VOLSER_OLDMAXVOLNAME - 10);
1852         return E2BIG;
1853     }
1854     if(!VolNameOK(tovolume)){
1855         fprintf(STDERR,"Illegal volume name %s, should not end in .readonly or .backup\n",tovolume);
1856         return EINVAL;
1857     }
1858     if(IsNumeric(tovolume)){
1859         fprintf(STDERR,"Illegal volume name %s, should not be a number\n",tovolume);
1860         return EINVAL;
1861     }
1862     code = VLDB_GetEntryByName(tovolume, &entry);
1863     if(!code) {
1864         fprintf(STDERR,"Volume %s already exists\n",tovolume);
1865         PrintDiagnostics("copy", code);
1866         return EEXIST;
1867     }
1868
1869     frompart = volutil_GetPartitionID(as->parms[2].items->data);
1870     if (frompart < 0) {
1871         fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[2].items->data);
1872         return EINVAL;
1873     }
1874     if (!IsPartValid(frompart,fromserver,&code)){ /*check for validity of the partition */
1875         if(code) PrintError("",code);
1876         else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[2].items->data);
1877         return ENOENT;
1878     }
1879
1880     topart = volutil_GetPartitionID(as->parms[5].items->data);
1881     if (topart < 0) {
1882         fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[4].items->data);
1883         return EINVAL;
1884     }
1885     if (!IsPartValid(topart,toserver,&code)){ /*check for validity of the partition */
1886         if(code) PrintError("",code);
1887         else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[4].items->data);
1888         return ENOENT;
1889     }
1890
1891     /*
1892      * check source partition for space to clone volume
1893      */
1894
1895     MapPartIdIntoName(topart,toPartName);
1896     MapPartIdIntoName(frompart, fromPartName);
1897
1898     /*
1899      * check target partition for space to move volume
1900      */
1901
1902     code=UV_PartitionInfo(toserver,toPartName,&partition);
1903     if(code)
1904     {
1905         fprintf(STDERR,"vos: cannot access partition %s\n",toPartName);
1906         exit(1);
1907     }
1908     if(TESTM)
1909         fprintf(STDOUT,"target partition %s free space %d\n",
1910                 toPartName,partition.free);
1911
1912     p=(volintInfo *)0;
1913     code=UV_ListOneVolume(fromserver,frompart,volid,&p);
1914     if(code)
1915     {
1916         fprintf(STDERR,"vos:cannot access volume %u\n",volid);
1917         free(p);
1918         exit(1);
1919     }
1920
1921     if(partition.free<=p->size)
1922     {
1923         fprintf(STDERR,"vos: no space on target partition %s to copy volume %u\n",
1924                 toPartName,volid);
1925         free(p);
1926         exit(1);
1927     }
1928     free(p);
1929
1930     /* successful copy still not guaranteed but shoot for it */
1931
1932     code = UV_CopyVolume(volid, fromserver, frompart, tovolume, toserver, topart);
1933     if (code) {
1934         PrintDiagnostics("copy", code);
1935         return code;
1936     }
1937     MapPartIdIntoName(topart,toPartName);
1938     MapPartIdIntoName(frompart, fromPartName);
1939     fprintf(STDOUT,"Volume %u copied from %s %s to %s on %s %s \n",volid,
1940             as->parms[1].items->data,fromPartName,
1941             tovolume, as->parms[4].items->data,toPartName);
1942
1943     return 0;
1944 }
1945
1946
1947 static BackupVolume(as)
1948 register struct cmd_syndesc *as;
1949 {
1950    afs_int32 avolid, aserver, apart,vtype,code, err;
1951    struct nvldbentry entry;
1952
1953         afs_int32 buvolid,buserver,bupart,butype;
1954         struct nvldbentry buentry;
1955         struct rx_connection *conn;
1956         volEntries volInfo;
1957         struct nvldbentry store;
1958    
1959         avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
1960         if (avolid == 0) {
1961             if (err) PrintError("", err);
1962             else fprintf(STDERR, "vos: can't find volume ID or name '%s'\n",
1963                     as->parms[0].items->data);
1964             return ENOENT;
1965         }
1966         code = GetVolumeInfo( avolid,&aserver, &apart,&vtype,&entry);
1967         if(code) exit(1);
1968
1969         /* verify this is a readwrite volume */
1970
1971         if(vtype != RWVOL)
1972         {
1973                 fprintf(STDERR,"%s not RW volume\n",as->parms[0].items->data);
1974                 exit(1);
1975         }
1976
1977         /* is there a backup volume already? */
1978
1979         if(entry.flags & BACK_EXISTS)
1980         {
1981                 /* yep, where is it? */
1982
1983                 buvolid=entry.volumeId[BACKVOL];
1984                 code=GetVolumeInfo(buvolid,&buserver,&bupart,&butype,&buentry);
1985                 if(code) exit(1);
1986
1987                 /* is it local? */
1988                 code = VLDB_IsSameAddrs(buserver, aserver, &err);
1989                 if (err) {
1990                     fprintf(STDERR,"Failed to get info about server's %d address(es) from vlserver; aborting call!\n", buserver);
1991                     exit(1);
1992                 }
1993                 if (!code)
1994                 {
1995                         fprintf(STDERR,"FATAL ERROR: backup volume %u exists on server %u\n",
1996                                 buvolid,buserver);
1997                         exit(1);
1998                 }
1999         }
2000
2001         /* nope, carry on */
2002
2003         code = UV_BackupVolume(aserver, apart, avolid);
2004
2005         if (code) {
2006             PrintDiagnostics("backup", code);
2007             return code;
2008         }
2009         fprintf(STDOUT,"Created backup volume for %s \n",as->parms[0].items->data); 
2010    return 0;
2011 }
2012 static ReleaseVolume(as)
2013 register struct cmd_syndesc *as;
2014 {
2015
2016     struct nvldbentry entry;
2017     afs_int32 avolid, aserver, apart,vtype,code, err;
2018     int force = 0;
2019
2020     if(as->parms[1].items) force = 1;
2021     avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2022     if (avolid == 0) {
2023         if (err) PrintError("", err);
2024         else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[0].items->data);
2025         return ENOENT;
2026     }
2027     code = GetVolumeInfo( avolid,&aserver, &apart,&vtype,&entry);
2028     if(code) return code;
2029
2030     if (vtype != RWVOL) {
2031        fprintf(STDERR,"%s not a RW volume\n", as->parms[0].items->data);
2032        return(ENOENT);
2033     }
2034
2035     if(!ISNAMEVALID(entry.name)){
2036         fprintf(STDERR,"Volume name %s is too long, rename before releasing\n",entry.name);
2037         return E2BIG;
2038     }
2039
2040     code = UV_ReleaseVolume(avolid, aserver, apart, force);
2041     if (code) {
2042         PrintDiagnostics("release", code);
2043         return code;
2044     }
2045     fprintf(STDOUT,"Released volume %s successfully\n",as->parms[0].items->data );
2046     return 0;
2047 }
2048 static DumpVolume(as)
2049 register struct cmd_syndesc *as;
2050
2051 {    
2052         afs_int32 avolid, aserver, apart,voltype,fromdate=0,code, err, i;
2053         char filename[NameLen];
2054         struct nvldbentry entry;
2055
2056         rx_SetRxDeadTime(60 * 10);
2057         for (i = 0; i<MAXSERVERS; i++) {
2058             struct rx_connection *rxConn = ubik_GetRPCConn(cstruct,i);
2059             if (rxConn == 0) break;
2060             rx_SetConnDeadTime(rxConn, rx_connDeadTime);
2061             if (rxConn->service)  rxConn->service->connDeadTime = rx_connDeadTime;
2062         }
2063
2064         avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2065         if (avolid == 0) {
2066             if (err) PrintError("", err);
2067             else  fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[0].items->data);
2068             return ENOENT;
2069         }
2070
2071         if (as->parms[3].items || as->parms[4].items) {
2072            if (!as->parms[3].items || !as->parms[4].items) {
2073               fprintf(STDERR, "Must specify both -server and -partition options\n");
2074               return -1;
2075            }
2076            aserver = GetServer(as->parms[3].items->data);
2077            if (aserver == 0) {
2078               fprintf(STDERR, "Invalid server name\n");
2079               return -1;
2080            }
2081            apart = volutil_GetPartitionID(as->parms[4].items->data);
2082            if (apart < 0) {
2083               fprintf(STDERR, "Invalid partition name\n");
2084               return -1;
2085            }
2086         } else {
2087            code = GetVolumeInfo(avolid, &aserver, &apart, &voltype, &entry);
2088            if (code) return code;
2089         }
2090
2091         if (as->parms[1].items && strcmp(as->parms[1].items->data,"0")) {
2092             code = ktime_DateToInt32(as->parms[1].items->data, &fromdate);
2093             if (code) {
2094                fprintf(STDERR,"vos: failed to parse date '%s' (error=%d))\n",
2095                        as->parms[1].items->data, code);
2096                return code;
2097             }
2098         }
2099         if(as->parms[2].items){
2100             strcpy(filename,as->parms[2].items->data);
2101         }
2102         else{
2103             strcpy(filename,"");
2104         }
2105
2106     if (as->parms[5].items) {
2107                 code = UV_DumpClonedVolume(avolid, aserver, apart, fromdate, DumpFunction, filename);
2108         } else {
2109                 code = UV_DumpVolume(avolid, aserver, apart, fromdate, DumpFunction, filename);
2110         }               
2111         if (code) {
2112             PrintDiagnostics("dump", code);
2113             return code;
2114         }
2115         if(strcmp(filename,""))
2116             fprintf(STDERR,"Dumped volume %s in file %s\n",as->parms[0].items->data, filename);
2117         else
2118             fprintf(STDERR,"Dumped volume %s in stdout \n",as->parms[0].items->data);
2119         return 0;
2120 }
2121
2122 #define ASK   0
2123 #define ABORT 1
2124 #define FULL  2
2125 #define INC   3
2126
2127 static RestoreVolume(as)
2128 register struct cmd_syndesc *as;
2129
2130 {    
2131         afs_int32 avolid, aserver, apart, code,vcode, err;
2132         afs_int32 aoverwrite = ASK;
2133         int restoreflags, readonly = 0, offline = 0, voltype = RWVOL;
2134         char prompt;
2135         char afilename[NameLen], avolname[VOLSER_MAXVOLNAME +1],apartName[10];
2136         char volname[VOLSER_MAXVOLNAME +1];
2137         struct nvldbentry entry;
2138
2139         prompt = 'n';
2140
2141         if(as->parms[4].items){
2142             avolid = vsu_GetVolumeID(as->parms[4].items->data, cstruct, &err);
2143             if (avolid == 0) {
2144                 if (err) PrintError("", err);
2145                 else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[4].items->data);
2146                 exit(1);
2147             }
2148         }
2149         else
2150             avolid = 0;
2151
2152         if (as->parms[5].items) {
2153             if ( (strcmp(as->parms[5].items->data, "a")     == 0) ||
2154                  (strcmp(as->parms[5].items->data, "abort") == 0) ) {
2155                 aoverwrite = ABORT;
2156             }
2157             else if ( (strcmp(as->parms[5].items->data, "f")    == 0) ||
2158                       (strcmp(as->parms[5].items->data, "full") == 0) ) {
2159                 aoverwrite = FULL;
2160             }
2161             else if ( (strcmp(as->parms[5].items->data, "i")           == 0) ||
2162                       (strcmp(as->parms[5].items->data, "inc")         == 0) ||
2163                       (strcmp(as->parms[5].items->data, "increment")   == 0) ||
2164                       (strcmp(as->parms[5].items->data, "incremental") == 0) ) {
2165                 aoverwrite = INC;
2166             }
2167             else {
2168                 fprintf(STDERR, "vos: %s is not a valid argument to -overwrite\n", 
2169                         as->parms[5].items->data);
2170                 exit(1);
2171             }
2172         }
2173         if (as->parms[6].items) offline = 1;
2174         if (as->parms[7].items) {
2175             readonly = 1;
2176             voltype = ROVOL;
2177         }
2178
2179         aserver = GetServer(as->parms[0].items->data);
2180         if (aserver == 0) {
2181             fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[0].items->data);
2182             exit(1);
2183         }
2184         apart = volutil_GetPartitionID(as->parms[1].items->data);
2185         if (apart < 0) {
2186             fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
2187             exit(1);
2188         }
2189         if (!IsPartValid(apart,aserver,&code)){/*check for validity of the partition */
2190             if(code) PrintError("",code);
2191             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2192             exit(1);
2193         }
2194         strcpy(avolname,as->parms[2].items->data );
2195         if(!ISNAMEVALID(avolname)) {
2196             fprintf(STDERR,"vos: the name of the volume %s exceeds the size limit\n",avolname);
2197             exit(1);
2198         }
2199         if(!VolNameOK(avolname)){
2200             fprintf(STDERR,"Illegal volume name %s, should not end in .readonly or .backup\n",avolname);
2201             exit(1);
2202         }
2203         if(as->parms[3].items){
2204             strcpy(afilename,as->parms[3].items->data );
2205             if(!FileExists(afilename)){
2206                 fprintf(STDERR,"Can't access file %s\n",afilename);
2207                 exit(1);
2208             }
2209         }
2210         else {
2211             strcpy(afilename,"");
2212         }
2213
2214         /* Check if volume exists or not */
2215
2216         vsu_ExtractName(volname,avolname);
2217         vcode = VLDB_GetEntryByName(volname, &entry);
2218         if (vcode) {              /* no volume - do a full restore */
2219             restoreflags = RV_FULLRST;
2220             if ( (aoverwrite == INC) || (aoverwrite == ABORT) )
2221                 fprintf(STDERR,"Volume does not exist; Will perform a full restore\n");
2222         }
2223
2224         else if ((!readonly && Lp_GetRwIndex(&entry) == -1)        /* RW volume does not exist - do a full */
2225              ||  (readonly && !Lp_ROMatch(0, 0, &entry))) {        /* RO volume does not exist - do a full */
2226             restoreflags = RV_FULLRST;
2227             if ( (aoverwrite == INC) || (aoverwrite == ABORT) )
2228                 fprintf(STDERR,"%s Volume does not exist; Will perform a full restore\n",
2229                         readonly ? "RO" : "RW");
2230
2231             if (avolid == 0) {
2232                 avolid = entry.volumeId[voltype];
2233             }
2234             else if (entry.volumeId[voltype] != 0  && entry.volumeId[voltype] != avolid) {
2235                 avolid = entry.volumeId[voltype];
2236             }
2237         }
2238
2239         else {                    /* volume exists - do we do a full incremental or abort */
2240             int Oserver, Opart, Otype, vol_elsewhere = 0;
2241             struct nvldbentry Oentry;
2242             int   c, dc;
2243
2244             if(avolid == 0) {
2245                 avolid = entry.volumeId[voltype];
2246             }
2247             else if(entry.volumeId[voltype] != 0  && entry.volumeId[voltype] != avolid) {
2248                 avolid = entry.volumeId[voltype];
2249             }
2250             
2251             /* A file name was specified  - check if volume is on another partition */
2252             vcode = GetVolumeInfo(avolid, &Oserver, &Opart, &Otype, &Oentry);
2253             if (vcode) exit(1);
2254
2255             vcode = VLDB_IsSameAddrs(Oserver, aserver, &err);
2256             if (err) {
2257                 fprintf(STDERR,"Failed to get info about server's %d address(es) from vlserver (err=%d); aborting call!\n", 
2258                         Oserver, err);
2259                 exit(1);
2260             }
2261             if (!vcode || (Opart != apart)) vol_elsewhere = 1;
2262
2263             if (aoverwrite == ASK) {
2264                 if (strcmp(afilename,"") == 0) {  /* The file is from standard in */
2265                     fprintf(STDERR,"Volume exists and no -overwrite option specified; Aborting restore command\n");
2266                     exit(1);
2267                 }
2268                 
2269                 /* Ask what to do */
2270                 if (vol_elsewhere) {
2271                     fprintf(STDERR,"The volume %s %u already exists on a different server/part\n",
2272                             volname, entry.volumeId[voltype]);
2273                     fprintf(STDERR, 
2274                             "Do you want to do a full restore or abort? [fa](a): ");
2275                 }
2276                 else
2277                 {
2278                     fprintf(STDERR,"The volume %s %u already exists in the VLDB\n",
2279                             volname, entry.volumeId[voltype]);
2280                     fprintf(STDERR, 
2281                             "Do you want to do a full/incremental restore or abort? [fia](a): ");
2282                 }
2283                 dc = c = getchar();
2284                 while (!(dc==EOF || dc=='\n')) dc=getchar(); /* goto end of line */
2285                 if      ((c == 'f') || (c == 'F')) aoverwrite = FULL;
2286                 else if ((c == 'i') || (c == 'I')) aoverwrite = INC;
2287                 else aoverwrite = ABORT;
2288             }
2289
2290             if (aoverwrite == ABORT) {
2291                 fprintf(STDERR,"Volume exists; Aborting restore command\n");
2292                 exit(1);
2293             }
2294             else if (aoverwrite == FULL) {
2295                 restoreflags = RV_FULLRST;
2296                 fprintf(STDERR,"Volume exists; Will delete and perform full restore\n");
2297             }
2298             else if (aoverwrite == INC) {
2299                 restoreflags = 0;
2300                 if (vol_elsewhere) {
2301                     fprintf(STDERR,
2302                             "%s volume %u already exists on a different server/part; not allowed\n",
2303                             readonly ? "RO" : "RW", avolid);
2304                     exit(1);
2305                 }
2306             }
2307         }
2308         if (offline)  restoreflags |= RV_OFFLINE;
2309         if (readonly) restoreflags |= RV_RDONLY;
2310         code = UV_RestoreVolume(aserver, apart, avolid, avolname,
2311                                 restoreflags, WriteData, afilename);
2312         if (code) {
2313             PrintDiagnostics("restore", code);
2314             exit(1);
2315         }
2316         MapPartIdIntoName(apart,apartName);
2317
2318         /*
2319                 patch typo here - originally "parms[1]", should be "parms[0]"
2320         */
2321
2322         fprintf(STDOUT,"Restored volume %s on %s %s\n",
2323                 avolname, as->parms[0].items->data, apartName);
2324         return 0;
2325 }
2326 static LockReleaseCmd(as)
2327 register struct cmd_syndesc *as;
2328
2329 {
2330     afs_int32 avolid,code, err;
2331
2332         avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
2333         if (avolid == 0) {
2334             if (err) PrintError("", err);
2335             else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[0].items->data);
2336             exit(1);
2337         }
2338         
2339         code = UV_LockRelease(avolid);
2340         if (code) {
2341             PrintDiagnostics("unlock", code);
2342             exit(1);
2343         }
2344         fprintf(STDOUT,"Released lock on vldb entry for volume %s\n",as->parms[0].items->data);
2345     return 0;
2346 }
2347 static AddSite(as)
2348 register struct cmd_syndesc *as;
2349 {
2350    afs_int32 avolid, aserver, apart,code, err;
2351    char apartName[10], avolname[VOLSER_MAXVOLNAME+1];
2352
2353         vsu_ExtractName(avolname, as->parms[2].items->data);;
2354         avolid = vsu_GetVolumeID(avolname, cstruct, &err);
2355         if (avolid == 0) {
2356             if (err) PrintError("", err);
2357             else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[2].items->data);
2358             exit(1);
2359         }
2360         aserver = GetServer(as->parms[0].items->data);
2361         if (aserver == 0) {
2362             fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[0].items->data);
2363             exit(1);
2364         }
2365         apart = volutil_GetPartitionID(as->parms[1].items->data);
2366         if (apart < 0) {
2367             fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
2368             exit(1);
2369         }
2370         if (!IsPartValid(apart,aserver,&code)){/*check for validity of the partition */
2371             if(code) PrintError("",code);
2372             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2373             exit(1);
2374         }
2375         code = UV_AddSite(aserver, apart, avolid);
2376         if (code) {
2377             PrintDiagnostics("addsite", code);
2378             exit(1);
2379         }
2380         MapPartIdIntoName(apart,apartName);
2381         fprintf(STDOUT,"Added replication site %s %s for volume %s\n",as->parms[0].items->data, apartName,as->parms[2].items->data);
2382    return 0;
2383 }
2384
2385 static RemoveSite(as)
2386 register struct cmd_syndesc *as;
2387
2388
2389     afs_int32 avolid, aserver, apart, code, err;
2390     char apartName[10], avolname[VOLSER_MAXVOLNAME+1];
2391
2392         vsu_ExtractName(avolname, as->parms[2].items->data);
2393         avolid = vsu_GetVolumeID(avolname, cstruct, &err);
2394         if (avolid == 0) {
2395             if (err) PrintError("", err);
2396             else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[2].items->data);
2397             exit(1);
2398         }
2399         aserver = GetServer(as->parms[0].items->data);
2400         if (aserver == 0) {
2401             fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[0].items->data);
2402             exit(1);
2403         }
2404         apart = volutil_GetPartitionID(as->parms[1].items->data);
2405         if (apart < 0) {
2406             fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
2407             exit(1);
2408         }
2409 /*
2410  *skip the partition validity check, since it is possible that the partition
2411  *has since been decomissioned.
2412  */
2413 /*
2414         if (!IsPartValid(apart,aserver,&code)){
2415             if(code) PrintError("",code);
2416             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2417             exit(1);
2418         }
2419 */
2420         code = UV_RemoveSite(aserver, apart, avolid);
2421         if (code) {
2422             PrintDiagnostics("remsite", code);
2423             exit(1);
2424         }
2425         MapPartIdIntoName(apart,apartName);
2426         fprintf(STDOUT,"Removed replication site %s %s for volume %s\n",as->parms[0].items->data,apartName,as->parms[2].items->data);
2427     return 0;
2428 }
2429 static ChangeLocation(as)
2430 register struct cmd_syndesc *as;
2431 {
2432    afs_int32 avolid, aserver, apart,code, err;
2433    char apartName[10];
2434
2435         avolid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
2436         if (avolid == 0) {
2437             if (err) PrintError("", err);
2438             else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[2].items->data);
2439             exit(1);
2440         }
2441         aserver = GetServer(as->parms[0].items->data);
2442         if (aserver == 0) {
2443             fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[0].items->data);
2444             exit(1);
2445         }
2446         apart = volutil_GetPartitionID(as->parms[1].items->data);
2447         if (apart < 0) {
2448             fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
2449             exit(1);
2450         }
2451         if (!IsPartValid(apart,aserver,&code)){/*check for validity of the partition */
2452             if(code) PrintError("",code);
2453             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2454             exit(1);
2455         }
2456         code = UV_ChangeLocation(aserver, apart, avolid);
2457         if (code) {
2458             PrintDiagnostics("addsite", code);
2459             exit(1);
2460         }
2461         MapPartIdIntoName(apart,apartName);
2462         fprintf(STDOUT,"Changed location to %s %s for volume %s\n",as->parms[0].items->data, apartName,as->parms[2].items->data);
2463    return 0;
2464 }
2465
2466 static ListPartitions(as)
2467 register struct cmd_syndesc *as;
2468 {
2469     afs_int32 aserver,code;
2470     struct partList dummyPartList;
2471     int i;
2472     char pname[10];
2473     int total, cnt;
2474
2475     aserver = GetServer(as->parms[0].items->data);
2476     if (aserver == 0) {
2477         fprintf(STDERR,"vos: server '%s' not found in host table\n", as->parms[0].items->data);
2478         exit(1);
2479     }
2480
2481
2482     code = UV_ListPartitions(aserver,&dummyPartList, &cnt);
2483     if (code) {
2484         PrintDiagnostics("listpart", code);
2485         exit(1);
2486     }
2487     total = 0;
2488     fprintf(STDOUT,"The partitions on the server are:\n");
2489     for(i = 0 ; i < cnt ; i++){
2490         if(dummyPartList.partFlags[i] & PARTVALID){
2491             memset(pname, 0, sizeof(pname));
2492             MapPartIdIntoName(dummyPartList.partId[i],pname);
2493             fprintf(STDOUT," %10s ",pname);
2494             total++;
2495             if( (i % 5) == 0 && (i != 0)) fprintf(STDOUT,"\n");
2496         }
2497     }
2498     fprintf(STDOUT,"\n");
2499     fprintf(STDOUT,"Total: %d\n",total);
2500     return 0;
2501         
2502 }
2503
2504 static int CompareVolName(p1,p2)
2505 char *p1,*p2;
2506 {
2507     volintInfo *arg1,*arg2;
2508
2509     arg1 = (volintInfo *)p1;
2510     arg2 = (volintInfo *)p2;
2511     return(strcmp(arg1->name,arg2->name));
2512     
2513 }
2514
2515 /*------------------------------------------------------------------------
2516  * PRIVATE XCompareVolName
2517  *
2518  * Description:
2519  *      Comparison routine for volume names coming from an extended
2520  *      volume listing.
2521  *
2522  * Arguments:
2523  *      a_obj1P : Char ptr to first extended vol info object
2524  *      a_obj1P : Char ptr to second extended vol info object
2525  *
2526  * Returns:
2527  *      The value of strcmp() on the volume names within the passed
2528  *      objects (i,e., -1, 0, or 1).
2529  *
2530  * Environment:
2531  *      Passed to qsort() as the designated comparison routine.
2532  *
2533  * Side Effects:
2534  *      As advertised.
2535  *------------------------------------------------------------------------*/
2536
2537 static int XCompareVolName(a_obj1P, a_obj2P)
2538     char *a_obj1P, *a_obj2P;
2539
2540 { /*XCompareVolName*/
2541
2542     return(strcmp(((struct volintXInfo *)(a_obj1P))->name,
2543                   ((struct volintXInfo *)(a_obj2P))->name));
2544
2545 } /*XCompareVolName*/
2546
2547 static int CompareVolID(p1,p2)
2548 char *p1,*p2;
2549 {
2550     volintInfo *arg1,*arg2;
2551
2552     arg1 = (volintInfo *)p1;
2553     arg2 = (volintInfo *)p2;
2554     if(arg1->volid == arg2->volid) return 0;
2555     if(arg1->volid > arg2->volid) return 1;
2556     else return -1;
2557     
2558 }
2559
2560 /*------------------------------------------------------------------------
2561  * PRIVATE XCompareVolID
2562  *
2563  * Description:
2564  *      Comparison routine for volume IDs coming from an extended
2565  *      volume listing.
2566  *
2567  * Arguments:
2568  *      a_obj1P : Char ptr to first extended vol info object
2569  *      a_obj1P : Char ptr to second extended vol info object
2570  *
2571  * Returns:
2572  *      The value of strcmp() on the volume names within the passed
2573  *      objects (i,e., -1, 0, or 1).
2574  *
2575  * Environment:
2576  *      Passed to qsort() as the designated comparison routine.
2577  *
2578  * Side Effects:
2579  *      As advertised.
2580  *------------------------------------------------------------------------*/
2581
2582 static int XCompareVolID(a_obj1P, a_obj2P)
2583     char *a_obj1P, *a_obj2P;
2584
2585 { /*XCompareVolID*/
2586
2587     afs_int32 id1, id2; /*Volume IDs we're comparing*/
2588
2589     id1 = ((struct volintXInfo *)(a_obj1P))->volid;
2590     id2 = ((struct volintXInfo *)(a_obj2P))->volid;
2591     if (id1 == id2)
2592         return(0);
2593     else
2594         if (id1 > id2)
2595             return(1);
2596     else
2597        return(-1);
2598
2599 } /*XCompareVolID*/
2600
2601 /*------------------------------------------------------------------------
2602  * PRIVATE ListVolumes
2603  *
2604  * Description:
2605  *      Routine used to list volumes, contacting the Volume Server
2606  *      directly, bypassing the VLDB.
2607  *
2608  * Arguments:
2609  *      as : Ptr to parsed command line arguments.
2610  *
2611  * Returns:
2612  *      0                       Successful operation
2613  *
2614  * Environment:
2615  *      Nothing interesting.
2616  *
2617  * Side Effects:
2618  *      As advertised.
2619  *------------------------------------------------------------------------*/
2620
2621 static ListVolumes(as)
2622 register struct cmd_syndesc *as;
2623 {  
2624     afs_int32 apart,int32list,fast;
2625     afs_int32 aserver,code;
2626     volintInfo *pntr,*oldpntr;
2627     afs_int32 count;
2628     int i;
2629     char *base;
2630     volintXInfo *xInfoP, *origxInfoP;   /*Ptr to current/orig extended vol info*/
2631     int wantExtendedInfo;               /*Do we want extended vol info?*/
2632
2633     char pname[10];
2634     struct partList dummyPartList;
2635     int all;
2636     int quiet, cnt;
2637
2638     apart = -1;
2639     fast = 0;
2640     int32list = 0;
2641
2642     if(as->parms[3].items) int32list = 1;
2643     if(as->parms[4].items) quiet = 1;
2644     else quiet = 0;
2645     if(as->parms[2].items) fast = 1;
2646     if(fast) all = 0;
2647     else all = 1;
2648     if (as->parms[5].items) {
2649         /*
2650          * We can't coexist with the fast flag.
2651          */
2652         if (fast) {
2653             fprintf(STDERR,
2654                     "vos: Can't use the -fast and -extended flags together\n");
2655             exit(1);
2656         }
2657
2658         /*
2659          * We need to turn on ``long'' listings to get the full effect.
2660          */
2661         wantExtendedInfo = 1;
2662         int32list = 1;
2663     }
2664     else
2665         wantExtendedInfo = 0;
2666     if(as->parms[1].items){
2667         apart = volutil_GetPartitionID(as->parms[1].items->data);
2668         if (apart < 0) {
2669             fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[1].items->data);
2670             exit(1);
2671         }
2672         dummyPartList.partId[0] = apart;
2673         dummyPartList.partFlags[0] = PARTVALID;
2674         cnt = 1;
2675     }
2676     aserver = GetServer(as->parms[0].items->data);
2677     if (aserver == 0) {
2678         fprintf(STDERR,"vos: server '%s' not found in host table\n",as->parms[0].items->data );
2679         exit(1);
2680     }
2681
2682     if(apart != -1) {
2683         if (!IsPartValid(apart,aserver,&code)){/*check for validity of the partition */
2684             if(code) PrintError("",code);
2685             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2686             exit(1);
2687         }
2688     }
2689     else {
2690         code = UV_ListPartitions(aserver,&dummyPartList, &cnt);
2691         if (code) {
2692             PrintDiagnostics("listvol", code);
2693             exit(1);
2694         }
2695     }
2696     for(i = 0 ; i < cnt ; i++){
2697         if(dummyPartList.partFlags[i] & PARTVALID){
2698             if (wantExtendedInfo)
2699                 code = UV_XListVolumes(aserver,
2700                                        dummyPartList.partId[i],
2701                                        all,
2702                                        &xInfoP,
2703                                        &count);
2704             else
2705                 code = UV_ListVolumes(aserver,
2706                                       dummyPartList.partId[i],
2707                                       all,
2708                                       &pntr,
2709                                       &count);
2710             if (code) {
2711                 PrintDiagnostics("listvol", code);
2712                 if(pntr) free(pntr);
2713                 exit(1);
2714             }
2715             if (wantExtendedInfo) {
2716                 origxInfoP = xInfoP;
2717                 base = (char *)xInfoP;
2718             } else {
2719                 oldpntr = pntr;
2720                 base = (char *)pntr;
2721             }
2722
2723             if(!fast) {
2724                 if (wantExtendedInfo) 
2725                     qsort(base, count, sizeof(volintXInfo), XCompareVolName);
2726                 else
2727                     qsort(base, count, sizeof(volintInfo), CompareVolName);
2728             } else {
2729                 if (wantExtendedInfo) 
2730                     qsort(base, count, sizeof(volintXInfo), XCompareVolID);
2731                 else
2732                     qsort(base, count, sizeof(volintInfo), CompareVolID);
2733             }
2734             MapPartIdIntoName(dummyPartList.partId[i],pname);
2735             if(!quiet)
2736                 fprintf(STDOUT,"Total number of volumes on server %s partition %s: %u \n",as->parms[0].items->data,pname,count);
2737             if (wantExtendedInfo) {
2738                 XDisplayVolumes(aserver,
2739                                 dummyPartList.partId[i],
2740                                 origxInfoP,
2741                                 count,
2742                                 int32list,
2743                                 fast,
2744                                 quiet);
2745                 if(xInfoP)
2746                     free(xInfoP);
2747                 xInfoP = (volintXInfo *)0;
2748             }
2749             else {
2750 #ifdef FULL_LISTVOL_SWITCH
2751               if (as->parms[6].items)
2752                 DisplayVolumes2(aserver, dummyPartList.partId[i], oldpntr, 
2753                                 count);
2754               else
2755 #endif /* FULL_LISTVOL_SWITCH */
2756                 DisplayVolumes(aserver,
2757                                dummyPartList.partId[i],
2758                                oldpntr,
2759                                count,
2760                                int32list,
2761                                fast,
2762                                quiet);
2763                 if (pntr)
2764                     free(pntr);
2765                 pntr = (volintInfo *)0;
2766             }
2767         }
2768     }
2769     return 0;
2770 }
2771
2772 static SyncVldb(as)
2773   register struct cmd_syndesc *as;
2774 {
2775   afs_int32 pname, code;        /* part name */
2776   char part[10];
2777   int flags = 0;
2778   char *volname = 0;
2779
2780   tserver = 0;
2781   if (as->parms[0].items) {
2782      tserver = GetServer(as->parms[0].items->data);
2783      if (!tserver) {
2784         fprintf(STDERR,"vos: host '%s' not found in host table\n",as->parms[0].items->data );
2785         exit(1);
2786      }
2787   }
2788
2789   if (as->parms[1].items) {
2790      pname = volutil_GetPartitionID(as->parms[1].items->data);
2791      if (pname < 0) {
2792         fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
2793         exit(1);
2794      }
2795      if (!IsPartValid(pname,tserver,&code)) { /*check for validity of the partition */
2796         if(code) PrintError("",code);
2797         else fprintf(STDERR,"vos: partition %s does not exist on the server\n",
2798                      as->parms[1].items->data);
2799         exit(1);
2800      }
2801      flags = 1;
2802      
2803      if (!tserver) {
2804         fprintf(STDERR,"The -partition option requires a -server option\n");
2805         exit(1);
2806      }
2807   }
2808
2809   if (as->parms[2].items) {
2810      /* Synchronize an individual volume */
2811      volname = as->parms[2].items->data;
2812      code = UV_SyncVolume(tserver, pname, volname, flags);
2813   } else {
2814      if (!tserver) {
2815         fprintf(STDERR,"Without a -volume option, the -server option is required\n");
2816         exit(1);
2817      }
2818      code = UV_SyncVldb(tserver, pname, flags, 0/*unused*/);
2819   }
2820
2821   if (code) {
2822      PrintDiagnostics("syncvldb", code);
2823      exit(1);
2824   }
2825
2826   /* Print a summary of what we did */
2827   if (volname) fprintf(STDOUT,"VLDB volume %s synchronized", volname);
2828   else         fprintf(STDOUT,"VLDB synchronized");
2829   if (tserver) {
2830      fprintf(STDOUT," with state of server %s", as->parms[0].items->data);
2831   }
2832   if (flags) {
2833      MapPartIdIntoName(pname,part);
2834      fprintf(STDOUT," partition %s\n", part);
2835   }
2836   fprintf(STDOUT, "\n");
2837
2838   return 0;
2839 }
2840     
2841 static SyncServer(as)
2842 register struct cmd_syndesc *as;
2843
2844 {
2845     afs_int32 pname,code;       /* part name */
2846     char part[10];
2847         
2848         int flags = 0;
2849
2850         tserver = GetServer(as->parms[0].items->data);
2851         if (!tserver) {
2852             fprintf(STDERR,"vos: host '%s' not found in host table\n",as->parms[0].items->data );
2853             exit(1);
2854         }
2855         if(as->parms[1].items){
2856             pname = volutil_GetPartitionID(as->parms[1].items->data);
2857             if (pname < 0) {
2858                 fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data);
2859                 exit(1);
2860             }
2861             if (!IsPartValid(pname,tserver,&code)){/*check for validity of the partition */
2862                 if(code) PrintError("",code);
2863                 else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2864                 exit(1);
2865             }
2866             flags = 1;
2867         }
2868         
2869         code = UV_SyncServer(tserver, pname, flags, 0/*unused*/);
2870         if (code) {
2871             PrintDiagnostics("syncserv", code);
2872             exit(1);
2873         }
2874         if(flags){
2875             MapPartIdIntoName(pname,part);
2876             fprintf(STDOUT,"Server %s partition %s synchronized with VLDB\n",as->parms[0].items->data,part);
2877         }
2878         else fprintf(STDOUT,"Server %s synchronized with VLDB\n",as->parms[0].items->data);
2879     return 0;
2880         
2881 }
2882
2883 static VolumeInfoCmd(name)
2884 char *name;
2885 {  
2886     struct nvldbentry entry;
2887     afs_int32 vcode;
2888
2889     /* The vlserver will handle names with the .readonly
2890      * and .backup extension as well as volume ids.
2891      */
2892     vcode = VLDB_GetEntryByName(name, &entry);
2893     if (vcode) {
2894         PrintError("", vcode);
2895         exit(1);
2896     }
2897     MapHostToNetwork(&entry);
2898     EnumerateEntry(&entry);
2899
2900     /* Defect #3027: grubby check to handle locked volume.
2901      * If VLOP_ALLOPERS is set, the entry is locked.
2902      * Leave this routine as is, but put in correct check.
2903      */
2904     if (entry.flags & VLOP_ALLOPERS)
2905         fprintf(STDOUT,"    Volume is currently LOCKED  \n");
2906
2907     return 0;
2908 }
2909
2910 static VolumeZap(as)
2911 register struct cmd_syndesc *as;
2912
2913 {
2914     struct nvldbentry entry;
2915     afs_int32 volid,code,server,part, zapbackupid=0, backupid=0, err;
2916     
2917     if (as->parms[3].items) {
2918         /* force flag is on, use the other version */
2919         return NukeVolume(as);
2920     }
2921
2922     if (as->parms[4].items) {
2923         zapbackupid = 1;
2924     }
2925
2926     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
2927     if(volid == 0) {
2928         if (err) PrintError("", err);
2929         else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[2].items->data);
2930         exit(1);
2931     }
2932     part = volutil_GetPartitionID(as->parms[1].items->data);
2933     if (part < 0) {
2934         fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
2935         exit(1);
2936     }
2937     server = GetServer(as->parms[0].items->data);
2938     if (!server) {
2939             fprintf(STDERR,"vos: host '%s' not found in host table\n",as->parms[0].items->data );
2940             exit(1);
2941     }
2942     if (!IsPartValid(part,server,&code)){/*check for validity of the partition */
2943             if(code) PrintError("",code);
2944             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
2945             exit(1);
2946         }
2947     code = VLDB_GetEntryByID(volid,-1, &entry);
2948     if (!code) {
2949         if (volid == entry.volumeId[RWVOL])
2950             backupid = entry.volumeId[BACKVOL];
2951         fprintf(STDERR,"Warning: Entry for volume number %u exists in VLDB (but we're zapping it anyway!)\n",
2952                 volid);
2953     }
2954     if (zapbackupid) {
2955         volintInfo *pntr = (volintInfo *)0;
2956
2957         if (!backupid) {
2958             code = UV_ListOneVolume(server, part, volid, &pntr);
2959             if (!code) {
2960                 if (volid == pntr->parentID)
2961                     backupid = pntr->backupID;
2962                 if (pntr) free(pntr);
2963             }
2964         }
2965         if (backupid) {
2966             code = UV_VolumeZap(server,part, backupid);
2967             if (code) {
2968                 PrintDiagnostics("zap", code);
2969                 exit(1);
2970             }
2971             fprintf(STDOUT,"Backup Volume %u deleted\n", backupid);
2972         }
2973     }
2974     code = UV_VolumeZap(server,part,volid);
2975     if (code) {
2976         PrintDiagnostics("zap", code);
2977         exit(1);
2978     }
2979     fprintf(STDOUT,"Volume %u deleted\n",volid);
2980
2981     return 0;
2982 }
2983    
2984 static VolserStatus(as)
2985 register struct cmd_syndesc *as;
2986
2987 {   
2988     afs_int32 server, code;
2989     transDebugInfo *pntr,*oldpntr;
2990     afs_int32 count;
2991     int i;
2992     char pname[10];
2993
2994     server = GetServer(as->parms[0].items->data);
2995     if (!server) {
2996             fprintf(STDERR,"vos: host '%s' not found in host table\n",as->parms[0].items->data );
2997             exit(1);
2998     }
2999     code = UV_VolserStatus(server,&pntr,&count);
3000     if(code) {
3001         PrintDiagnostics("status",code);
3002         exit(1);
3003     }
3004     oldpntr = pntr;
3005     if(count == 0) 
3006         fprintf(STDOUT,"No active transactions on %s\n",as->parms[0].items->data);
3007     else {
3008         fprintf(STDOUT,"Total transactions: %d\n",count);
3009     }
3010     for(i = 0; i < count ; i++){
3011         /*print out the relevant info */
3012         fprintf(STDOUT,"--------------------------------------\n");
3013         fprintf(STDOUT,"transaction: %u  created: %s",pntr->tid,
3014                 ctime((time_t *)&pntr->time));
3015         if(pntr->returnCode){
3016             fprintf(STDOUT,"returnCode: %u\n",pntr->returnCode);
3017         }
3018         if(pntr->iflags){
3019             fprintf(STDOUT,"attachFlags:  ");
3020             switch(pntr->iflags){
3021               case ITOffline: fprintf(STDOUT,"offline ");
3022                 break;
3023               case ITBusy: fprintf(STDOUT,"busy ");
3024                 break;
3025               case ITReadOnly: fprintf(STDOUT,"readonly ");
3026                 break;
3027               case ITCreate: fprintf(STDOUT,"create ");
3028                 break;
3029               case ITCreateVolID: fprintf(STDOUT,"create volid ");
3030                 break;
3031             }
3032             fprintf(STDOUT,"\n");
3033         }
3034         if(pntr->vflags){
3035             fprintf(STDOUT,"volumeStatus: ");
3036             switch(pntr->vflags){
3037               case VTDeleteOnSalvage: fprintf(STDOUT,"deleteOnSalvage ");
3038               case VTOutOfService: fprintf(STDOUT,"outOfService ");
3039               case VTDeleted: fprintf(STDOUT,"deleted ");
3040             }
3041             fprintf(STDOUT,"\n");
3042         }
3043         if(pntr->tflags){
3044             fprintf(STDOUT,"transactionFlags: ");
3045             fprintf(STDOUT,"delete\n");
3046         }
3047         MapPartIdIntoName(pntr->partition ,pname);
3048         fprintf(STDOUT,"volume: %u  partition: %s  procedure: %s\n",pntr->volid,pname, pntr->lastProcName);
3049         if(pntr->callValid){
3050             fprintf(STDOUT,"packetRead: %u  lastReceiveTime: %d  packetSend: %u  lastSendTime: %d\n",pntr->readNext,pntr->lastReceiveTime,pntr->transmitNext, pntr->lastSendTime);
3051         }
3052         pntr++;
3053         fprintf(STDOUT,"--------------------------------------\n");
3054         fprintf(STDOUT,"\n");
3055     }
3056     if(oldpntr) free(oldpntr);
3057     return 0;
3058 }
3059  
3060 static RenameVolume(as)
3061 register struct cmd_syndesc *as;
3062 {
3063    afs_int32 code1,code2,code;
3064    struct nvldbentry entry;
3065
3066         code1 = VLDB_GetEntryByName(as->parms[0].items->data, &entry);
3067         if(code1){
3068             fprintf(STDERR,"vos: Could not find entry for volume %s\n",as->parms[0].items->data);
3069             exit(1);
3070         }
3071         code2 = VLDB_GetEntryByName(as->parms[1].items->data, &entry);
3072         if((!code1) && (!code2)) { /*the newname already exists */
3073             fprintf(STDERR,"vos: volume %s already exists\n",as->parms[1].items->data);
3074             exit(1);
3075         }
3076
3077         if(code1 && code2){
3078             fprintf(STDERR,"vos: Could not find entry for volume %s or %s\n",as->parms[0].items->data,as->parms[1].items->data);
3079             exit(1);
3080         }
3081     if(!VolNameOK(as->parms[0].items->data)){
3082         fprintf(STDERR,"Illegal volume name %s, should not end in .readonly or .backup\n",as->parms[0].items->data);
3083         exit(1);
3084     }
3085    if(!ISNAMEVALID(as->parms[1].items->data)) {
3086         fprintf(STDERR,"vos: the new volume name %s exceeds the size limit of %d\n",as->parms[1].items->data,VOLSER_OLDMAXVOLNAME - 10);
3087         exit(1);
3088     }
3089     if(!VolNameOK(as->parms[1].items->data)){
3090         fprintf(STDERR,"Illegal volume name %s, should not end in .readonly or .backup\n",as->parms[1].items->data);
3091         exit(1);
3092     }
3093     if(IsNumeric(as->parms[1].items->data)){
3094         fprintf(STDERR,"Illegal volume name %s, should not be a number\n",as->parms[1].items->data);
3095         exit(1);
3096     }
3097         MapHostToNetwork(&entry);
3098         code = UV_RenameVolume(&entry,as->parms[0].items->data,as->parms[1].items->data);
3099         if (code) {
3100             PrintDiagnostics("rename", code);
3101             exit(1);
3102         }
3103         fprintf(STDOUT,"Renamed volume %s to %s\n",as->parms[0].items->data,as->parms[1].items->data); 
3104    return 0;
3105 }
3106
3107 GetVolumeInfo(volid, server, part, voltype,rentry)
3108 afs_int32 *server, volid, *part, *voltype;
3109 register struct nvldbentry *rentry;
3110 {
3111     afs_int32 vcode;
3112     int i,index = -1;
3113
3114     vcode = VLDB_GetEntryByID(volid, -1, rentry);
3115     if(vcode) {
3116                 fprintf(STDERR,"Could not fetch the entry for volume %u from VLDB \n",volid);
3117                 PrintError("",vcode);
3118                 return (vcode);
3119     }
3120     MapHostToNetwork(rentry);
3121     if(volid == rentry->volumeId[ROVOL]){
3122         *voltype = ROVOL;
3123         for (i = 0; i < rentry->nServers; i++) {
3124             if ( (index == -1) && (rentry->serverFlags[i] & ITSROVOL) &&
3125                 !(rentry->serverFlags[i] & RO_DONTUSE) )
3126                 index = i;
3127         }
3128         if(index == -1) {
3129             fprintf(STDERR,"RO volume is not found in VLDB entry for volume %u\n", volid);
3130             return -1;
3131         }
3132
3133         *server = rentry->serverNumber[index];
3134         *part = rentry->serverPartition[index];
3135         return 0;
3136     }
3137                 
3138     index = Lp_GetRwIndex(rentry);
3139     if(index == -1) {
3140         fprintf(STDERR,"RW Volume is not found in VLDB entry for volume %u\n", volid);
3141         return -1;
3142     }
3143     if(volid == rentry->volumeId[RWVOL]){
3144         *voltype = RWVOL;
3145         *server = rentry->serverNumber[index];
3146         *part = rentry->serverPartition[index];
3147         return 0;
3148     }
3149     if(volid == rentry->volumeId[BACKVOL]){
3150         *voltype = BACKVOL;
3151         *server = rentry->serverNumber[index];
3152         *part = rentry->serverPartition[index];
3153         return 0;
3154     }
3155 }
3156
3157 static DeleteEntry(as)
3158 register struct cmd_syndesc *as;
3159
3160 {
3161     afs_int32 apart;
3162     afs_int32 avolid;
3163     afs_int32 vcode;
3164     struct VldbListByAttributes attributes;
3165     nbulkentries arrayEntries;
3166     register struct nvldbentry *vllist;
3167     struct cmd_item *itp;
3168     afs_int32 nentries;
3169     int j;
3170     char prefix[VOLSER_MAXVOLNAME+1];
3171     int seenprefix=0;
3172     afs_int32 totalBack=0, totalFail=0, err;
3173
3174     if (as->parms[0].items) { /* -id */
3175        if (as->parms[1].items || as->parms[2].items || as->parms[3].items) {
3176           fprintf(STDERR,"You cannot use -server, -partition, or -prefix with the -id argument\n");
3177           exit(-2);
3178        }
3179        for (itp=as->parms[0].items; itp; itp=itp->next) {
3180           avolid = vsu_GetVolumeID(itp->data, cstruct, &err);
3181           if (avolid == 0) {
3182              if (err) PrintError("", err);
3183              else fprintf(STDERR, "vos: can't find volume '%s'\n", itp->data);
3184              continue;
3185           }
3186           if (as->parms[4].items) { /* -noexecute */
3187              fprintf(STDOUT,"Would have deleted VLDB entry for %s \n", itp->data);
3188              fflush(STDOUT);
3189              continue;
3190           }
3191           vcode = ubik_Call(VL_DeleteEntry,cstruct, 0, avolid, RWVOL);
3192           if (vcode) {
3193              fprintf(STDERR,"Could not delete entry for volume %s\n", itp->data);
3194              fprintf(STDERR,"You must specify a RW volume name or ID "
3195                             "(the entire VLDB entry will be deleted)\n", itp->data);
3196              PrintError("",vcode);
3197              totalFail++;
3198              continue;
3199           }
3200           totalBack++;
3201        }
3202        fprintf(STDOUT,"Deleted %d VLDB entries\n", totalBack);
3203        return(totalFail);
3204     }
3205
3206     if (!as->parms[1].items && !as->parms[2].items && !as->parms[3].items) {
3207        fprintf(STDERR,"You must specify an option\n");
3208        exit(-2);
3209     }
3210
3211     /* Zero out search attributes */
3212     memset(&attributes, 0, sizeof(struct VldbListByAttributes));
3213
3214     if (as->parms[1].items) { /* -prefix */
3215        strncpy(prefix, as->parms[1].items->data, VOLSER_MAXVOLNAME);
3216        seenprefix = 1;
3217        if (!as->parms[2].items && !as->parms[3].items) { /* a single entry only */
3218           fprintf(STDERR,"You must provide -server with the -prefix argument\n");
3219           exit(-2);
3220        }
3221     }
3222
3223     if (as->parms[2].items) { /* -server */
3224        afs_int32 aserver;
3225        aserver = GetServer(as->parms[2].items->data);
3226        if (aserver == 0) {
3227           fprintf(STDERR,"vos: server '%s' not found in host table\n",as->parms[2].items->data );
3228           exit(-1);
3229        }
3230        attributes.server = ntohl(aserver);
3231        attributes.Mask |= VLLIST_SERVER;
3232     }
3233     
3234     if (as->parms[3].items) { /* -partition */
3235        if (!as->parms[2].items) {
3236           fprintf(STDERR,"You must provide -server with the -partition argument\n");
3237           exit(-2);
3238        }
3239        apart = volutil_GetPartitionID(as->parms[3].items->data);
3240        if (apart < 0) {
3241           fprintf(STDERR,"vos: could not interpret partition name '%s'\n",
3242                   as->parms[3].items->data);
3243           exit(-1);
3244         }
3245        attributes.partition = apart;
3246        attributes.Mask |= VLLIST_PARTITION;
3247     }
3248
3249     /* Print status line of what we are doing */
3250     fprintf(STDOUT,"Deleting VLDB entries for ");
3251     if (as->parms[2].items) {
3252        fprintf(STDOUT,"server %s ", as->parms[2].items->data);
3253     }
3254     if (as->parms[3].items) {
3255        char pname[10];
3256        MapPartIdIntoName(apart, pname);
3257        fprintf(STDOUT,"partition %s ", pname);
3258     }
3259     if (seenprefix) {
3260        fprintf(STDOUT,"which are prefixed with %s ", prefix);
3261     }
3262     fprintf(STDOUT,"\n");
3263     fflush(STDOUT);
3264
3265     /* Get all the VLDB entries on a server and/or partition */
3266     memset(&arrayEntries, 0, sizeof(arrayEntries));
3267     vcode = VLDB_ListAttributes(&attributes, &nentries, &arrayEntries);
3268     if (vcode) {
3269        fprintf(STDERR,"Could not access the VLDB for attributes\n");
3270        PrintError("",vcode);
3271        exit(-1);
3272     }
3273
3274     /* Process each entry */
3275     for (j=0; j<nentries; j++) {
3276        vllist = &arrayEntries.nbulkentries_val[j];
3277        if (seenprefix) {
3278           /* It only deletes the RW volumes */
3279           if (strncmp(vllist->name, prefix, strlen(prefix))){
3280              if (verbose) {
3281                 fprintf(STDOUT,"Omitting to delete %s due to prefix %s mismatch\n",
3282                         vllist->name, prefix);
3283              }
3284              fflush(STDOUT);
3285              continue;
3286           }
3287        }
3288                 
3289        if (as->parms[4].items) { /* -noexecute */
3290           fprintf(STDOUT,"Would have deleted VLDB entry for %s \n", vllist->name);
3291           fflush(STDOUT);
3292           continue;
3293        }
3294
3295        /* Only matches the RW volume name */
3296        avolid = vllist->volumeId[RWVOL];
3297        vcode = ubik_Call(VL_DeleteEntry, cstruct, 0, avolid, RWVOL);
3298        if (vcode){
3299           fprintf(STDOUT,"Could not delete VDLB entry for  %s\n",vllist->name);
3300           totalFail++;
3301           PrintError("",vcode);
3302           continue;
3303        } else {
3304           totalBack++;
3305           if (verbose)
3306              fprintf(STDOUT,"Deleted VLDB entry for %s \n",vllist->name);
3307        }
3308        fflush(STDOUT);
3309     } /*for*/
3310
3311     fprintf(STDOUT,"----------------------\n");
3312     fprintf(STDOUT,"Total VLDB entries deleted: %u; failed to delete: %u\n",totalBack,totalFail);
3313     if (arrayEntries.nbulkentries_val) free(arrayEntries.nbulkentries_val);
3314     return 0;
3315 }
3316
3317
3318 static int CompareVldbEntryByName(p1,p2)
3319 char *p1,*p2;
3320 {
3321     struct nvldbentry *arg1,*arg2;
3322
3323     arg1 = (struct nvldbentry *)p1;
3324     arg2 = (struct nvldbentry *)p2;
3325     return(strcmp(arg1->name,arg2->name));
3326 }
3327
3328 /*
3329 static int CompareVldbEntry(p1,p2)
3330 char *p1,*p2;
3331 {
3332     struct nvldbentry *arg1,*arg2;
3333     int i;
3334     int pos1, pos2;
3335     char comp1[100],comp2[100];
3336     char temp1[20],temp2[20];
3337
3338     arg1 = (struct nvldbentry *)p1;
3339     arg2 = (struct nvldbentry *)p2;
3340     pos1 = -1;
3341     pos2 = -1;
3342
3343     for(i = 0; i < arg1->nServers; i++)
3344         if(arg1->serverFlags[i] & ITSRWVOL) pos1 = i;
3345     for(i = 0; i < arg2->nServers; i++)
3346         if(arg2->serverFlags[i] & ITSRWVOL) pos2 = i;
3347     if(pos1 == -1 || pos2 == -1){
3348         pos1 = 0;
3349         pos2 = 0;
3350     }
3351     sprintf(comp1,"%10u",arg1->serverNumber[pos1]);
3352     sprintf(comp2,"%10u",arg2->serverNumber[pos2]);
3353     sprintf(temp1,"%10u",arg1->serverPartition[pos1]);
3354     sprintf(temp2,"%10u",arg2->serverPartition[pos2]);
3355     strcat(comp1,temp1);
3356     strcat(comp2,temp2);
3357     strcat(comp1,arg1->name);
3358     strcat(comp1,arg2->name);
3359     return(strcmp(comp1,comp2));
3360
3361 }
3362
3363 */      
3364 static ListVLDB(as)
3365     struct cmd_syndesc *as;
3366 {   
3367     afs_int32 apart;
3368     afs_int32 aserver,code;
3369     afs_int32 vcode;
3370     struct VldbListByAttributes attributes;
3371     nbulkentries arrayEntries;
3372     struct nvldbentry *vllist, *tarray=0, *ttarray;
3373     afs_int32 centries, nentries = 0, tarraysize, parraysize;
3374     int j;
3375     char pname[10];
3376     int quiet, sort, lock;
3377     afs_int32 thisindex, nextindex;
3378
3379     aserver = 0;
3380     apart = 0;
3381
3382     attributes.Mask = 0;
3383     lock   = (as->parms[3].items ? 1 : 0);  /* -lock   flag */
3384     quiet  = (as->parms[4].items ? 1 : 0);  /* -quit   flag */
3385     sort   = (as->parms[5].items ? 0 : 1);  /* -nosort flag */
3386
3387     /* If the volume name is given, Use VolumeInfoCmd to look it up
3388      * and not ListAttributes.
3389      */
3390     if (as->parms[0].items) {
3391        if (lock) {
3392           fprintf(STDERR,"vos: illegal use of '-locked' switch, need to specify server and/or partition\n");
3393           exit(1);
3394        }
3395        code = VolumeInfoCmd(as->parms[0].items->data);
3396        if (code) {
3397           PrintError("",code);
3398           exit(1);
3399        }
3400        return 0;
3401     }
3402
3403     /* Server specified */
3404     if (as->parms[1].items) {
3405        aserver = GetServer(as->parms[1].items->data);
3406        if (aserver == 0) {
3407           fprintf(STDERR,"vos: server '%s' not found in host table\n",as->parms[1].items->data );
3408           exit(1);
3409        }
3410        attributes.server = ntohl(aserver);
3411        attributes.Mask |= VLLIST_SERVER;
3412     }
3413     
3414     /* Partition specified */
3415     if (as->parms[2].items) {
3416        apart = volutil_GetPartitionID(as->parms[2].items->data);
3417        if (apart < 0) {
3418           fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[2].items->data);
3419           exit(1);
3420        }
3421        attributes.partition = apart;
3422        attributes.Mask |= VLLIST_PARTITION;
3423     }
3424
3425     if (lock) {
3426        attributes.Mask |= VLLIST_FLAG;
3427        attributes.flag =  VLOP_ALLOPERS;
3428     }
3429
3430     /* Print header information */
3431     if (!quiet) {
3432        MapPartIdIntoName(apart, pname);
3433        fprintf(STDOUT,"VLDB entries for %s %s%s%s %s\n",
3434                (as->parms[1].items ? "server"                 : "all"    ),
3435                (as->parms[1].items ? as->parms[1].items->data : "servers"),
3436                (as->parms[2].items ? " partition "            : ""),
3437                (as->parms[2].items ? pname                    : ""),
3438                (lock               ? "which are locked:"      : ""));
3439     }
3440
3441     for (thisindex = 0; (thisindex != -1); thisindex = nextindex) {
3442        memset(&arrayEntries, 0, sizeof(arrayEntries));
3443        centries = 0;
3444        nextindex = -1;
3445
3446        vcode = VLDB_ListAttributesN2(&attributes, 0, thisindex,
3447                                      &centries, &arrayEntries, &nextindex);
3448        if (vcode == RXGEN_OPCODE) {
3449           /* Vlserver not running with ListAttributesN2. Fall back */
3450           vcode = VLDB_ListAttributes(&attributes, &centries, &arrayEntries);
3451           nextindex = -1;
3452        }
3453        if (vcode) {
3454           fprintf(STDERR,"Could not access the VLDB for attributes\n");
3455           PrintError("",vcode);
3456           exit(1);
3457        }
3458        nentries += centries;
3459
3460        /* We don't sort, so just print the entries now */
3461        if (!sort) {
3462           for (j = 0; j < centries; j++) {                   /* process each entry */
3463              vllist = &arrayEntries.nbulkentries_val[j];
3464              MapHostToNetwork(vllist);
3465              EnumerateEntry(vllist);
3466
3467              if(vllist->flags & VLOP_ALLOPERS)
3468                 fprintf(STDOUT,"    Volume is currently LOCKED  \n");
3469           }
3470        } 
3471
3472        /* So we sort. First we must collect all the entries and keep
3473         * them in memory.
3474         */
3475        else if (centries > 0) {
3476           if (!tarray) {
3477              /* steal away the first bulk entries array */
3478              tarray = (struct nvldbentry *)arrayEntries.nbulkentries_val;
3479              tarraysize = centries * sizeof(struct nvldbentry);
3480              arrayEntries.nbulkentries_val = 0;
3481           } else {
3482              /* Grow the tarray to keep the extra entries */
3483              parraysize = (centries * sizeof(struct nvldbentry));
3484              ttarray = (struct nvldbentry *) realloc(tarray, tarraysize + parraysize);
3485              if (!ttarray) {
3486                 fprintf(STDERR,"Could not allocate enough space for  the VLDB entries\n");
3487                 goto bypass;
3488              }
3489              tarray = ttarray;
3490              
3491              /* Copy them in */
3492              memcpy(((char *)tarray)+tarraysize, (char *)arrayEntries.nbulkentries_val, parraysize);
3493              tarraysize += parraysize;
3494           }
3495        }
3496
3497        /* Free the bulk array */
3498        if (arrayEntries.nbulkentries_val) {
3499           free(arrayEntries.nbulkentries_val);
3500           arrayEntries.nbulkentries_val = 0;
3501        }
3502     }
3503
3504     /* Here is where we now sort all the entries and print them */
3505     if (sort && (nentries > 0)) {
3506        qsort((char *)tarray, nentries, sizeof(struct nvldbentry), CompareVldbEntryByName);
3507        for (vllist=tarray, j=0; j<nentries; j++, vllist++) {
3508           MapHostToNetwork(vllist);
3509           EnumerateEntry(vllist);
3510
3511           if(vllist->flags & VLOP_ALLOPERS)
3512              fprintf(STDOUT,"    Volume is currently LOCKED  \n");
3513        }
3514     }
3515
3516 bypass:
3517     if (!quiet) fprintf(STDOUT,"\nTotal entries: %u\n", nentries);
3518     if (tarray) free(tarray);
3519     return 0;
3520 }
3521
3522 static BackSys(as)
3523     register struct cmd_syndesc *as;
3524 {   
3525     afs_int32 apart=0, avolid;
3526     afs_int32 aserver=0, code, aserver1, apart1;
3527     afs_int32 vcode;
3528     struct VldbListByAttributes attributes;
3529     nbulkentries arrayEntries;
3530     register struct nvldbentry *vllist;
3531     afs_int32 nentries;
3532     int j;
3533     char pname[10];
3534     int seenprefix, seenxprefix, exclude, ex, exp, noaction;
3535     afs_int32 totalBack=0;
3536     afs_int32 totalFail=0;
3537     int previdx=-1, error, same;
3538     int comp=0;
3539     char compstr[50];
3540     struct cmd_item *ti;
3541     char *ccode;
3542     int match;
3543
3544     memset(&attributes, 0, sizeof(struct VldbListByAttributes));
3545     attributes.Mask = 0;
3546
3547     seenprefix  = (as->parms[0].items ? 1 : 0);
3548     exclude     = (as->parms[3].items ? 1 : 0);
3549     seenxprefix = (as->parms[4].items ? 1 : 0);
3550     noaction    = (as->parms[5].items ? 1 : 0);
3551
3552     if (as->parms[1].items) {                         /* -server */
3553         aserver = GetServer(as->parms[1].items->data);
3554         if (aserver == 0) {
3555             fprintf(STDERR,"vos: server '%s' not found in host table\n",as->parms[1].items->data );
3556             exit(1);
3557         }
3558         attributes.server  = ntohl(aserver);
3559         attributes.Mask   |= VLLIST_SERVER;
3560     }
3561
3562     if (as->parms[2].items) {                         /* -partition */
3563         apart = volutil_GetPartitionID(as->parms[2].items->data);
3564         if (apart < 0) {
3565             fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[2].items->data);
3566             exit(1);
3567         }
3568         attributes.partition  = apart;
3569         attributes.Mask      |= VLLIST_PARTITION;
3570     }
3571
3572     /* Check to make sure the prefix and xprefix expressions compile ok */
3573     if (seenprefix) {
3574        for (ti=as->parms[0].items; ti; ti=ti->next) {
3575           if (strncmp(ti->data,"^",1) == 0) {
3576              ccode = (char *)re_comp(ti->data);
3577              if (ccode) {
3578                 fprintf(STDERR,"Unrecognizable -prefix regular expression: '%s': %s\n",
3579                         ti->data, ccode);
3580                 exit(1);        
3581              }
3582           }
3583        }
3584     }
3585     if (seenxprefix) {
3586        for (ti=as->parms[4].items; ti; ti=ti->next) {
3587           if (strncmp(ti->data,"^",1) == 0) {
3588              ccode = (char *)re_comp(ti->data);
3589              if (ccode) {
3590                 fprintf(STDERR,"Unrecognizable -xprefix regular expression: '%s': %s\n",
3591                         ti->data, ccode);
3592                 exit(1);        
3593              }
3594           }
3595        }
3596     }
3597
3598     memset(&arrayEntries, 0, sizeof(arrayEntries)); /* initialize to hint the stub to alloc space */
3599     vcode = VLDB_ListAttributes(&attributes, &nentries, &arrayEntries);
3600     if (vcode) {
3601         fprintf(STDERR,"Could not access the VLDB for attributes\n");
3602         PrintError("",vcode);
3603         exit(1);
3604     }
3605
3606     if (as->parms[1].items || as->parms[2].items || verbose) {
3607         fprintf(STDOUT,"%s up volumes", (noaction?"Would have backed":"Backing"));
3608
3609         if (as->parms[1].items) {
3610             fprintf(STDOUT," on server %s", as->parms[1].items->data);
3611         } else if (as->parms[2].items) {
3612             fprintf(STDOUT," for all servers");
3613         }
3614
3615         if (as->parms[2].items) {
3616             MapPartIdIntoName(apart, pname);
3617             fprintf(STDOUT," partition %s", pname);
3618         }
3619
3620         if (seenprefix || (!seenprefix && seenxprefix)) {
3621             ti  = (seenprefix ? as->parms[0].items : as->parms[4].items);
3622             ex  = (seenprefix ? exclude : !exclude);
3623             exp = (strncmp(ti->data,"^",1) == 0);
3624             fprintf(STDOUT," which %smatch %s '%s'", (ex ? "do not " : ""),
3625                     (exp?"expression":"prefix"), ti->data);
3626             for (ti=ti->next; ti; ti=ti->next) {
3627                exp = (strncmp(ti->data,"^",1) == 0);
3628                printf(" %sor %s '%s'", (ex ? "n" : ""),
3629                       (exp?"expression":"prefix"), ti->data);
3630             }
3631         }
3632
3633         if (seenprefix && seenxprefix) {
3634             ti  = as->parms[4].items;
3635             exp = (strncmp(ti->data,"^",1) == 0);
3636             fprintf(STDOUT," %swhich match %s '%s'",
3637                     (exclude?"adding those ":"removing those "),
3638                     (exp?"expression":"prefix"), ti->data);
3639             for (ti=ti->next; ti; ti=ti->next) {
3640                exp = (strncmp(ti->data,"^",1) == 0);
3641                printf(" or %s '%s'", (exp?"expression":"prefix"), ti->data);
3642             }
3643         }
3644         fprintf(STDOUT," .. ");
3645         if (verbose) fprintf(STDOUT,"\n");
3646         fflush(STDOUT);
3647     }
3648
3649     for (j=0; j<nentries; j++) {        /* process each vldb entry */
3650         vllist = &arrayEntries.nbulkentries_val[j];
3651
3652         if (seenprefix) {
3653            for (ti=as->parms[0].items; ti; ti=ti->next) {
3654               if (strncmp(ti->data,"^",1) == 0) {
3655                  ccode = (char *)re_comp(ti->data);
3656                  if (ccode) {
3657                     fprintf(STDERR,"Error in -prefix regular expression: '%s': %s\n",
3658                             ti->data, ccode);
3659                     exit(1);    
3660                  }
3661                  match = (re_exec(vllist->name) == 1);
3662               } else {
3663                  match = (strncmp(vllist->name,ti->data,strlen(ti->data)) == 0);
3664               }
3665               if (match) break;
3666            }
3667         } else {
3668            match = 1;
3669         }
3670         
3671         /* Without the -exclude flag: If it matches the prefix, then
3672          *    check if we want to exclude any from xprefix.
3673          * With the -exclude flag: If it matches the prefix, then
3674          *    check if we want to add any from xprefix.
3675          */
3676         if (match && seenxprefix) {
3677            for (ti=as->parms[4].items; ti; ti=ti->next) {
3678               if (strncmp(ti->data,"^",1) == 0) {
3679                  ccode = (char *)re_comp(ti->data);
3680                  if (ccode) {
3681                     fprintf(STDERR,"Error in -xprefix regular expression: '%s': %s\n",
3682                             ti->data, ccode);
3683                     exit(1);    
3684                  }
3685                  if (re_exec(vllist->name) == 1) {
3686                     match = 0;
3687                     break;
3688                  }
3689               } else {
3690                  if (strncmp(vllist->name,ti->data,strlen(ti->data)) == 0) {
3691                    match = 0;
3692                    break;
3693                  }
3694               }
3695            }
3696         }
3697
3698         if (exclude) match = !match;     /* -exclude will reverse the match */
3699         if (!match) continue;             /* Skip if no match */
3700
3701         /* Print list of volumes to backup */
3702         if (noaction) {
3703             fprintf(STDOUT,"     %s\n", vllist->name);
3704             continue;
3705         }
3706
3707         if(!(vllist->flags & RW_EXISTS)){
3708             if(verbose) {
3709                 fprintf(STDOUT,"Omitting to backup %s since RW volume does not exist \n", vllist->name);
3710                 fprintf(STDOUT,"\n");
3711             }
3712             fflush(STDOUT);
3713             continue;
3714         }
3715         
3716         avolid = vllist->volumeId[RWVOL];
3717         MapHostToNetwork(vllist);
3718         GetServerAndPart(vllist,RWVOL,&aserver1,&apart1,&previdx);
3719         if(aserver1 == -1 || apart1 == -1){
3720             fprintf(STDOUT,"could not backup %s, invalid VLDB entry\n",vllist->name);
3721             totalFail++;
3722             continue;
3723         }
3724         if (aserver) {
3725             same = VLDB_IsSameAddrs(aserver, aserver1, &error);
3726             if (error) {
3727                 fprintf(STDERR,"Failed to get info about server's %d address(es) from vlserver (err=%d); aborting call!\n", 
3728                         aserver, error);
3729                 totalFail++;
3730                 continue;
3731             }
3732         }
3733         if ((aserver && !same) || (apart && (apart != apart1))) {
3734             if(verbose) {
3735                 fprintf(STDOUT, "Omitting to backup %s since the RW is in a different location\n", vllist->name);
3736             }
3737             continue;
3738         }
3739         if(verbose){
3740             time_t now = time(0);
3741             fprintf(STDOUT,"Creating backup volume for %s on %s",vllist->name, ctime(&now));
3742             fflush(STDOUT);
3743         }
3744
3745         code = UV_BackupVolume(aserver1, apart1, avolid);
3746         if (code) {
3747            fprintf(STDOUT,"Could not backup %s\n",vllist->name);
3748            totalFail++;
3749         }
3750         else {
3751             totalBack++;
3752         }
3753         if (verbose) fprintf(STDOUT,"\n");
3754         fflush(STDOUT);
3755     } /* process each vldb entry */
3756     fprintf(STDOUT,"done\n");
3757     fprintf(STDOUT,"Total volumes backed up: %u; failed to backup: %u\n",totalBack,totalFail);
3758     fflush(STDOUT);
3759     if(arrayEntries.nbulkentries_val) free(arrayEntries.nbulkentries_val);
3760     return 0;
3761 }
3762
3763 static UnlockVLDB(as)
3764 register struct cmd_syndesc *as;
3765 {   
3766     afs_int32 apart;
3767     afs_int32 aserver,code;
3768     afs_int32 vcode;
3769     struct VldbListByAttributes attributes;
3770     nbulkentries arrayEntries;
3771     register struct nvldbentry *vllist;
3772     afs_int32 nentries;
3773     int j;
3774     afs_int32 volid;
3775     afs_int32 totalE;
3776     char pname[10];
3777
3778     apart = -1;
3779     totalE = 0;
3780     attributes.Mask = 0;
3781
3782     if(as->parms[0].items) {/* server specified */
3783         aserver = GetServer(as->parms[0].items->data);
3784         if (aserver == 0) {
3785             fprintf(STDERR,"vos: server '%s' not found in host table\n",as->parms[0].items->data );
3786             exit(1);
3787         }
3788         attributes.server = ntohl(aserver);
3789         attributes.Mask |= VLLIST_SERVER;
3790     }
3791     if(as->parms[1].items) {/* partition specified */
3792         apart = volutil_GetPartitionID(as->parms[1].items->data);
3793         if (apart < 0) {
3794             fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[1].items->data);
3795             exit(1);
3796         }
3797         if (!IsPartValid(apart,aserver,&code)){/*check for validity of the partition */
3798             if(code) PrintError("",code);
3799             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
3800             exit(1);
3801         }
3802         attributes.partition = apart;
3803         attributes.Mask |= VLLIST_PARTITION;
3804     }
3805     attributes.flag = VLOP_ALLOPERS;
3806     attributes.Mask |=  VLLIST_FLAG;
3807     memset(&arrayEntries, 0, sizeof(arrayEntries)); /*initialize to hint the stub  to alloc space */
3808     vcode = VLDB_ListAttributes(&attributes, &nentries, &arrayEntries);
3809     if(vcode) {
3810         fprintf(STDERR,"Could not access the VLDB for attributes\n");
3811         PrintError("",vcode);
3812         exit(1);
3813     }
3814     for(j=0;j<nentries;j++) {   /* process each entry */
3815         vllist = &arrayEntries.nbulkentries_val[j];
3816         volid = vllist->volumeId[RWVOL];
3817         vcode = ubik_Call(VL_ReleaseLock,cstruct, 0, volid,-1, LOCKREL_OPCODE | LOCKREL_AFSID | LOCKREL_TIMESTAMP);
3818         if(vcode){
3819             fprintf(STDERR,"Could not unlock entry for volume %s\n",vllist->name);
3820             PrintError("",vcode);
3821             totalE++;
3822         }
3823             
3824     }
3825     MapPartIdIntoName(apart,pname);
3826     if(totalE) fprintf(STDOUT,"Could not lock %u VLDB entries of %u locked entries\n",totalE,nentries);
3827     else {
3828         if(as->parms[0].items) {
3829             fprintf(STDOUT,"Unlocked all the VLDB entries for volumes on server %s ",as->parms[0].items->data);
3830             if(as->parms[1].items){
3831                 MapPartIdIntoName(apart,pname);
3832                 fprintf(STDOUT,"partition %s\n",pname);
3833             }
3834             else  fprintf(STDOUT,"\n");
3835
3836         }
3837         else if(as->parms[1].items){
3838             MapPartIdIntoName(apart,pname);
3839             fprintf(STDOUT,"Unlocked all the VLDB entries for volumes on partition %s on all servers\n",pname);
3840         }
3841     }
3842     
3843     if(arrayEntries.nbulkentries_val) free(arrayEntries.nbulkentries_val);
3844     return 0;
3845 }
3846
3847 static PartitionInfo(as)
3848 register struct cmd_syndesc *as;
3849 {   
3850     afs_int32 apart;
3851     afs_int32 aserver,code;
3852     char pname[10];
3853     struct diskPartition partition;
3854     struct partList dummyPartList;
3855     int i, cnt;
3856
3857     apart = -1;
3858     aserver = GetServer(as->parms[0].items->data);
3859     if (aserver == 0) {
3860         fprintf(STDERR,"vos: server '%s' not found in host table\n",as->parms[0].items->data );
3861         exit(1);
3862     }
3863     if(as->parms[1].items){
3864         apart = volutil_GetPartitionID(as->parms[1].items->data);
3865         if (apart < 0) {
3866             fprintf(STDERR,"vos: could not interpret partition name '%s'\n", as->parms[1].items->data);
3867             exit(1);
3868         }
3869         dummyPartList.partId[0] = apart;
3870         dummyPartList.partFlags[0] = PARTVALID;
3871         cnt = 1;
3872     }
3873     if(apart != -1) {
3874         if (!IsPartValid(apart,aserver,&code)){/*check for validity of the partition */
3875             if(code) PrintError("",code);
3876             else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
3877             exit(1);
3878         }
3879     }
3880     else {
3881         code = UV_ListPartitions(aserver,&dummyPartList, &cnt);
3882         if (code) {
3883             PrintDiagnostics("listpart", code);
3884             exit(1);
3885         }
3886     }
3887     for(i = 0 ; i < cnt ; i++){
3888         if(dummyPartList.partFlags[i] & PARTVALID){
3889             MapPartIdIntoName(dummyPartList.partId[i],pname);
3890             code = UV_PartitionInfo(aserver,pname,&partition);
3891             if(code){
3892                 fprintf(STDERR,"Could not get information on partition %s\n",pname);
3893                 PrintError("",code);
3894                 exit(1);
3895             }
3896             fprintf(STDOUT,"Free space on partition %s: %d K blocks out of total %d\n",pname,partition.free,partition.minFree);
3897         }
3898     }
3899     return 0;
3900 }
3901
3902 static ChangeAddr(as)
3903 register struct cmd_syndesc *as;
3904
3905 {
3906     afs_int32 ip1, ip2, vcode;
3907     int remove=0;
3908
3909     ip1 = GetServer(as->parms[0].items->data);
3910     if (!ip1) {
3911       fprintf(STDERR, "vos: invalid host address\n");
3912       return( EINVAL );
3913     }
3914
3915     if ( ( as->parms[1].items &&  as->parms[2].items) ||
3916          (!as->parms[1].items && !as->parms[2].items) ) {
3917        fprintf(STDERR, "vos: Must specify either '-newaddr <addr>' or '-remove' flag\n");
3918        return(EINVAL);
3919     }
3920
3921     if (as->parms[1].items) {
3922        ip2 = GetServer(as->parms[1].items->data);
3923        if (!ip2) {
3924           fprintf(STDERR, "vos: invalid host address\n");
3925           return( EINVAL );
3926        }
3927     } else {
3928        /* Play a trick here. If we are removing an address, ip1 will be -1
3929         * and ip2 will be the original address. This switch prevents an 
3930         * older revision vlserver from removing the IP address.
3931         */
3932        remove = 1;
3933        ip2 = ip1;
3934        ip1 = 0xffffffff;
3935     }
3936
3937     vcode = ubik_Call_New(VL_ChangeAddr, cstruct, 0, ntohl(ip1), ntohl(ip2) );
3938     if (vcode) {
3939         if (remove) {
3940            fprintf(STDERR,"Could not remove server %s from the VLDB\n",
3941                    as->parms[0].items->data);
3942            if (vcode == VL_NOENT) {
3943               fprintf(STDERR, "vlserver does not support the remove flag or ");
3944            }
3945         } else {
3946            fprintf(STDERR,"Could not change server %s to server %s\n", 
3947                    as->parms[0].items->data, as->parms[1].items->data);
3948         }
3949         PrintError("",vcode);
3950         return( vcode );
3951     }
3952
3953     if (remove) {
3954        fprintf(STDOUT,"Removed server %s from the VLDB\n",
3955                as->parms[0].items->data);
3956     } else {
3957        fprintf(STDOUT,"Changed server %s to server %s\n",
3958                as->parms[0].items->data, as->parms[1].items->data);
3959     }
3960     return 0;
3961 }
3962
3963 static void
3964 print_addrs(const bulkaddrs *addrs, const afsUUID *m_uuid, int nentries, int print, int noresolve)
3965 {
3966   afs_int32 vcode;
3967   afs_int32 i, j;
3968   struct VLCallBack    unused;
3969   afs_int32            *addrp;
3970   bulkaddrs            m_addrs;
3971   ListAddrByAttributes m_attrs;
3972   afs_int32            m_unique, m_nentries, *m_addrp;
3973   afs_int32            base, index;
3974   char buf[1024];
3975
3976   if (print) {
3977       afsUUID_to_string(m_uuid, buf, sizeof(buf));
3978       printf("UUID: %s\n", buf);
3979   }
3980
3981   /* print out the list of all the server */
3982   addrp = (afs_int32 *)addrs->bulkaddrs_val;
3983   for (i=0; i<nentries; i++, addrp++) {
3984      /* If it is a multihomed address, then we will need to 
3985       * get the addresses for this multihomed server from
3986       * the vlserver and print them.
3987       */
3988      if ( ((*addrp & 0xff000000) == 0xff000000) && ((*addrp)&0xffff) ) {
3989         /* Get the list of multihomed fileservers */
3990         base =  (*addrp>>16) & 0xff;
3991         index = (*addrp)     & 0xffff;
3992
3993         if ( (base  >= 0) && (base  <= VL_MAX_ADDREXTBLKS) &&
3994              (index >= 1) && (index <= VL_MHSRV_PERBLK)    ) {
3995            m_attrs.Mask  = VLADDR_INDEX;
3996            m_attrs.index = (base * VL_MHSRV_PERBLK) + index;
3997            m_nentries            = 0;
3998            m_addrs.bulkaddrs_val = 0;
3999            m_addrs.bulkaddrs_len = 0;
4000            vcode = ubik_Call(VL_GetAddrsU, cstruct, 0,
4001                              &m_attrs, &m_uuid, &m_unique, &m_nentries, &m_addrs);
4002            if (vcode) {
4003               fprintf(STDERR,"vos: could not list the multi-homed server addresses\n");
4004               PrintError("",vcode);
4005            }
4006
4007            /* Print the list */
4008            m_addrp = (afs_int32 *)m_addrs.bulkaddrs_val;
4009            for (j=0; j<m_nentries; j++, m_addrp++) {
4010               *m_addrp = htonl(*m_addrp);       
4011               if (noresolve) {
4012                   char hoststr[16];
4013                   printf("%s ", afs_inet_ntoa_r(*m_addrp,hoststr));
4014               } else {
4015                   printf("%s ", hostutil_GetNameByINet(*m_addrp));
4016               }
4017            }
4018            if (j==0) {
4019               printf("<unknown>\n");
4020            } else {
4021               printf("\n");
4022            }
4023
4024            continue;
4025         }
4026      }
4027
4028      /* Otherwise, it is a non-multihomed entry and contains
4029       * the IP address of the server - print it.
4030       */
4031      *addrp = htonl(*addrp);    
4032      if (noresolve) {
4033          char hoststr[16];
4034          printf("%s\n", afs_inet_ntoa_r(*addrp,hoststr));
4035      } else {
4036          printf("%s\n", hostutil_GetNameByINet(*addrp));
4037      }
4038   }
4039
4040   if (print) {
4041       printf("\n");
4042   }
4043   return;
4044 }
4045
4046 static ListAddrs(as)
4047 register struct cmd_syndesc *as;
4048 {
4049   afs_int32 vcode;
4050   afs_int32 i, j, noresolve=0, printuuid=0;
4051   struct VLCallBack    unused;
4052   afs_int32                nentries, *addrp;
4053   bulkaddrs            addrs, m_addrs;
4054   ListAddrByAttributes m_attrs;
4055   afsUUID              m_uuid, askuuid;
4056   afs_int32                m_unique, m_nentries, *m_addrp;
4057   afs_int32                base, index;
4058
4059   memset(&m_attrs, 0, sizeof(struct ListAddrByAttributes));
4060   m_attrs.Mask = VLADDR_INDEX;
4061
4062   memset(&m_addrs, 0, sizeof(bulkaddrs));
4063   memset(&askuuid, 0, sizeof(afsUUID));
4064   if (as->parms[0].items) {
4065       /* -uuid */
4066       afsUUID_from_string(as->parms[0].items->data, &askuuid);
4067       m_attrs.Mask = VLADDR_UUID;
4068       m_attrs.uuid = askuuid;
4069   }
4070   if (as->parms[1].items) {
4071       /* -host */
4072       struct hostent       *he; 
4073       afs_int32 saddr;
4074       he = hostutil_GetHostByName((char*)as->parms[1].items->data);
4075       if (he == NULL) {
4076           fprintf(stderr,
4077                   "Can't get host info for '%s'\n",
4078                   as->parms[1].items->data);
4079           exit(-1);
4080       }
4081       memcpy(&saddr, he->h_addr, 4);
4082       m_attrs.Mask = VLADDR_IPADDR;
4083       m_attrs.ipaddr = ntohl(saddr);
4084   }
4085   if (as->parms[2].items) {
4086       noresolve=1;
4087   }
4088   if (as->parms[3].items) {
4089       printuuid=1;
4090   }
4091
4092   m_addrs.bulkaddrs_val = 0;
4093   m_addrs.bulkaddrs_len = 0;
4094
4095   vcode = ubik_Call_New(VL_GetAddrs, cstruct, 0,
4096                         0, 0, &m_unique, &nentries, &m_addrs);
4097   if (vcode) {
4098     fprintf(STDERR,"vos: could not list the server addresses\n");
4099     PrintError("",vcode);
4100     return( vcode );
4101   }
4102
4103   m_nentries            = 0;
4104   m_addrs.bulkaddrs_val = 0;
4105   m_addrs.bulkaddrs_len = 0;
4106   i=1;
4107   while (1) {
4108       m_attrs.index = i;
4109
4110       vcode = ubik_Call_New(VL_GetAddrsU, cstruct, 0, &m_attrs, &m_uuid, 
4111                         &m_unique, &m_nentries, &m_addrs);
4112       if(vcode == VL_NOENT) {
4113           i++;
4114           nentries++;
4115           continue;
4116       }
4117
4118       if (vcode == VL_INDEXERANGE) {
4119           break;
4120       }
4121
4122       if (vcode) {
4123           fprintf(STDERR,"vos: could not list the server addresses\n");
4124           PrintError("",vcode);
4125           return( vcode );
4126       }
4127
4128       print_addrs(&m_addrs, &m_uuid, m_nentries, printuuid, noresolve);
4129       i++;
4130
4131       if ((as->parms[1].items)||(as->parms[0].items)||(i>nentries))
4132           break;
4133   }
4134     
4135   return 0;
4136 }
4137
4138 static LockEntry(as)
4139 register struct cmd_syndesc *as;
4140
4141 {
4142     afs_int32 avolid,vcode, err;
4143
4144     avolid = vsu_GetVolumeID(as->parms[0].items->data, cstruct, &err);
4145     if (avolid == 0) {
4146         if (err) PrintError("", err);
4147         else fprintf(STDERR, "vos: can't find volume '%s'\n", as->parms[0].items->data);
4148         exit(1);
4149     }
4150     vcode = ubik_Call(VL_SetLock,cstruct, 0, avolid, -1, VLOP_DELETE);
4151     if(vcode){
4152         fprintf(STDERR,"Could not lock VLDB entry for volume %s\n",as->parms[0].items->data);
4153         PrintError("",vcode);
4154         exit(1);
4155     }
4156     fprintf(STDOUT,"Locked VLDB entry for volume %s\n",as->parms[0].items->data);
4157     return 0;
4158 }
4159
4160 static ConvertRO(as)
4161 register struct cmd_syndesc *as;
4162
4163 {
4164     afs_int32 partition = -1;
4165     afs_int32 server, volid, code, i, same;
4166     struct nvldbentry entry, storeEntry;
4167     afs_int32 vcode;
4168     afs_int32 rwindex;
4169     afs_int32 rwserver = 0;
4170     afs_int32 rwpartition;
4171     afs_int32 roindex;
4172     afs_int32 roserver = 0;
4173     afs_int32 ropartition;
4174     int force = 0;
4175     struct rx_connection *aconn;
4176     char c, dc;
4177
4178     server = GetServer(as->parms[0].items->data);
4179     if (!server) {
4180         fprintf(STDERR,"vos: host '%s' not found in host table\n",as->parms[0].items->data );
4181         return ENOENT;
4182     }
4183      partition = volutil_GetPartitionID(as->parms[1].items->data);
4184     if (partition < 0) {
4185         fprintf(STDERR,"vos: could not interpret partition name '%s'\n",as->parms[1].items->data );
4186         return ENOENT;
4187     }
4188     if (!IsPartValid(partition, server, &code)) {
4189         if(code) PrintError("",code);
4190         else fprintf(STDERR,"vos : partition %s does not exist on the server\n",as->parms[1].items->data);
4191         return ENOENT;
4192     }
4193     volid = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &code);
4194     if (volid == 0) {
4195         if (code) PrintError("", code);
4196         else fprintf(STDERR, "Unknown volume ID or name '%s'\n", as->parms[0].items->data);
4197         return -1;
4198     }
4199     if (as->parms[3].items)
4200         force = 1;
4201
4202     vcode = VLDB_GetEntryByID (volid, -1, &entry);
4203     if(vcode) {
4204         fprintf(STDERR,"Could not fetch the entry for volume %u from VLDB\n",
4205                 volid);
4206         PrintError("convertROtoRW", code);
4207         return vcode;
4208     }
4209
4210     /* use RO volid even if user specified RW or BK volid */
4211
4212     if (volid != entry.volumeId[ROVOL])
4213         volid = entry.volumeId[ROVOL];
4214
4215     MapHostToNetwork(&entry);
4216     for (i=0; i< entry.nServers; i++) {
4217         if (entry.serverFlags[i] & ITSRWVOL) {
4218             rwindex = i;
4219             rwserver = entry.serverNumber[i];
4220             rwpartition = entry.serverPartition[i];
4221         }
4222         if (entry.serverFlags[i] & ITSROVOL) {
4223             same = VLDB_IsSameAddrs(server, entry.serverNumber[i], &code);
4224             if (code) {
4225                 fprintf(STDERR, "Failed to get info about server's %d address(es) from vlserver (err=%d); aborting call!\n",
4226                                 server, code);
4227                 return ENOENT;
4228             }
4229             if (same) {
4230                 roindex = i;
4231                 roserver = entry.serverNumber[i];
4232                 ropartition = entry.serverPartition[i];
4233                 break;
4234             }
4235         }
4236     }
4237     if (!roserver) {
4238         fprintf(STDERR, "Warning: RO volume didn't exist in vldb!\n");
4239     }
4240     if (ropartition != partition) {
4241         fprintf(STDERR, "Warning: RO volume should be in partition %d instead of %d (vldb)\n", ropartition, partition);
4242     }
4243
4244     if (rwserver) {
4245         fprintf(STDERR,
4246                 "VLDB indicates that a RW volume exists already on %s in partition %s.\n", hostutil_GetNameByINet(rwserver), volutil_PartitionName(rwpartition));
4247         if (!force) {
4248             fprintf(STDERR, "Overwrite this VLDB entry? [y|n] (n)\n");
4249             dc = c = getchar();
4250             while (!(dc==EOF || dc=='\n')) dc=getchar(); /* goto end of line */
4251             if ((c != 'y') && (c != 'Y')) {
4252                fprintf(STDERR, "aborted.\n");
4253                return -1;
4254             }
4255         }
4256     }
4257
4258     vcode = ubik_Call(VL_SetLock, cstruct, 0, entry.volumeId[RWVOL], RWVOL,
4259                                                         VLOP_MOVE);
4260     aconn = UV_Bind(server, AFSCONF_VOLUMEPORT);
4261     code = AFSVolConvertROtoRWvolume(aconn, partition, volid);
4262     if (code) {
4263         fprintf(STDERR,"Converting RO volume %u to RW volume failed with code %d\n", volid, code);
4264         PrintError("convertROtoRW ", code);
4265         return -1;
4266     }
4267     entry.serverFlags[roindex] = ITSRWVOL;
4268     entry.flags |= RW_EXISTS;
4269     entry.flags &= ~BACK_EXISTS;
4270     if (rwserver) {
4271         (entry.nServers)--;
4272         if (rwindex != entry.nServers) {
4273             entry.serverNumber[rwindex] = entry.serverNumber[entry.nServers];
4274             entry.serverPartition[rwindex] = entry.serverPartition[entry.nServers];
4275             entry.serverFlags[rwindex] = entry.serverFlags[entry.nServers];
4276             entry.serverNumber[entry.nServers] = 0;
4277             entry.serverPartition[entry.nServers] = 0;
4278             entry.serverFlags[entry.nServers] = 0;
4279         }
4280     }
4281     entry.flags &= ~RO_EXISTS;
4282     for (i=0; i<entry.nServers; i++) {
4283         if (entry.serverFlags[i] & ITSROVOL) {
4284             if (!(entry.serverFlags[i] & (RO_DONTUSE | NEW_REPSITE)))
4285                 entry.flags |= RO_EXISTS;
4286         }
4287     }
4288     MapNetworkToHost(&entry, &storeEntry);
4289     code = VLDB_ReplaceEntry(entry.volumeId[RWVOL], RWVOL, &storeEntry,
4290                        (LOCKREL_OPCODE | LOCKREL_AFSID | LOCKREL_TIMESTAMP));
4291     if (code)  {
4292         fprintf(STDERR, "Warning: volume converted, but vldb update failed with code %d!\n", code);
4293     }
4294     vcode = UV_LockRelease(entry.volumeId[RWVOL]);
4295     if (vcode) {
4296         PrintDiagnostics("unlock", vcode);
4297     }
4298     return code;
4299 }
4300
4301 PrintDiagnostics(astring, acode)
4302     char *astring;
4303     afs_int32 acode;
4304 {
4305     if (acode == EACCES) {
4306         fprintf(STDERR,"You are not authorized to perform the 'vos %s' command (%d)\n",
4307                 astring, acode);
4308     }
4309     else {
4310         fprintf(STDERR,"Error in vos %s command.\n", astring);
4311         PrintError("", acode);
4312     }
4313     return 0;
4314 }
4315
4316
4317 static MyBeforeProc(as, arock)
4318 struct cmd_syndesc *as;
4319 char *arock; {
4320     register char *tcell;
4321     register afs_int32 code;
4322     register afs_int32 sauth;
4323
4324     /* Initialize the ubik_client connection */
4325     rx_SetRxDeadTime(90);
4326     cstruct = (struct ubik_client *)0;
4327
4328     sauth = 0;
4329     tcell = NULL;
4330     if (as->parms[12].items)    /* if -cell specified */
4331         tcell = as->parms[12].items->data;
4332     if(as->parms[14].items)     /* -serverauth specified */
4333         sauth = 1;
4334     if(as->parms[16].items)     /* -crypt specified */
4335         vsu_SetCrypt(1);
4336     if (code = vsu_ClientInit((as->parms[13].items != 0), confdir, tcell, sauth,
4337                               &cstruct, UV_SetSecurity)) {