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