bos-mrafs-support-20010212
[openafs.git] / src / bozo / bos.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 <afs/param.h>
11 #include <afs/stds.h>
12 #include <stdlib.h>
13 #include <stddef.h>
14 #include <sys/types.h>
15 #ifdef AFS_NT40_ENV
16 #include <winsock2.h>
17 #include <io.h>
18 #include <fcntl.h>
19 #else
20 #include <sys/file.h>
21 #include <netinet/in.h>
22 #include <netdb.h>
23 #include <sys/socket.h>
24 #include <strings.h>
25 #endif /* AFS_NT40_ENV */
26 #include <string.h>
27 #include <afs/procmgmt.h>  /* signal(), kill(), wait(), etc. */
28 #include <time.h>
29 #include "bnode.h"
30 #include <errno.h>
31 #include <afs/afsutil.h>
32 #include <afs/cellconfig.h>
33 #include <rx/rx.h>
34 #include <sys/stat.h>
35 #include <rx/xdr.h>
36 #include <afs/auth.h>
37 #include <rx/rxkad.h>
38 #include <afs/cellconfig.h>
39 #include <stdio.h>
40 #include <afs/cmd.h>
41 #include <afs/com_err.h>
42 #include <ubik.h>
43 #include <afs/ktime.h>
44
45
46
47 extern char *volutil_PartitionName();
48 extern struct rx_call *rx_NewCall();
49 extern char *volutil_PartitionName();
50 extern struct hostent *hostutil_GetHostByName();
51
52 static IStatServer();
53 static DoStat();
54
55 #include "bosint.h"
56 #include "../permit_xprt.h"
57
58 #define MRAFS_OFFSET  9
59 #define ADDPARMOFFSET 26
60
61 static struct SalvageParms {
62     afs_int32 Optdebug;
63     afs_int32 Optnowrite;
64     afs_int32 Optforce;
65     afs_int32 Optoktozap;
66     afs_int32 Optrootfiles;
67     afs_int32 Optsalvagedirs;
68     afs_int32 Optblockreads;
69     afs_int32 OptListResidencies;
70     afs_int32 OptSalvageRemote;
71     afs_int32 OptSalvageArchival;
72     afs_int32 OptIgnoreCheck;
73     afs_int32 OptForceOnLine;
74     afs_int32 OptUseRootDirACL;
75     afs_int32 OptTraceBadLinkCounts;
76     afs_int32 OptDontAskFS;
77     afs_int32 OptLogLevel;
78     afs_int32 OptRxDebug;
79     afs_uint32 OptResidencies;
80 } mrafsParm;
81
82 /* dummy routine for the audit work.  It should do nothing since audits */
83 /* occur at the server level and bos is not a server. */
84 osi_audit() {return 0;}
85
86 /* keep those lines small */
87 static char *em(acode)
88 afs_int32 acode; {
89     if (acode == -1)
90         return "communications failure (-1)";
91     else if (acode == -3)
92         return "communications timeout (-3)";
93     else return (char *) error_message(acode);
94 }
95
96 /* get partition id from a name */
97 static afs_int32 GetPartitionID(aname)
98 char *aname; {
99     register char tc;
100     char ascii[3];
101
102     tc = *aname;
103     if (tc == 0) return -1;     /* unknown */
104     /* numbers go straight through */
105     if (tc >= '0' && tc <= '9') {
106         return atoi(aname);
107     }
108     /* otherwise check for vicepa or /vicepa, or just plain "a" */
109     ascii[2] = 0;
110     if (strlen(aname) <= 2) {
111         strcpy(ascii, aname);
112     }
113     else if (!strncmp(aname, "/vicep", 6)) {
114         strncpy(ascii, aname+6, 2);
115     }
116     else if (!strncmp(aname, "vicep", 5)) {
117         strncpy(ascii, aname+5, 2);
118     }
119     else return -1;     /* bad partition name */
120     /* now partitions are named /vicepa ... /vicepz, /vicepaa, /vicepab,
121      * .../vicepzz, and are numbered from 0.  Do the appropriate conversion */
122     if (ascii[1] == 0) {
123         /* one char name, 0..25 */
124         if (ascii[0] <  'a' || ascii[0] > 'z')  return -1;  /* wrongo */
125         return ascii[0] - 'a';
126     }
127     else {
128         /* two char name, 26 .. <whatever> */
129         if (ascii[0] <  'a' || ascii[0] > 'z')  return -1;  /* wrongo */
130         if (ascii[1] <  'a' || ascii[1] > 'z')  return -1;  /* just as bad */
131         return (ascii[0] - 'a') * 26 + (ascii[1] - 'a') + 26;
132     }
133 }
134
135 /* make ctime easier to use */
136 static char *DateOf(atime)
137 afs_int32 atime; {
138     static char tbuffer[30];
139     register char *tp;
140     tp=ctime((time_t *)&atime);
141     if (tp) {
142         strcpy(tbuffer, tp);
143         tbuffer[24] = 0;    /* get rid of new line */
144     }
145     else
146         strcpy(tbuffer, "BAD TIME");
147     return tbuffer;
148 }
149
150 /* global stuff from main for communicating with GetConn */
151 static struct rx_securityClass *sc[3];
152 static int scIndex;
153
154 /* use the syntax descr to get a connection, authenticated appropriately.
155  * aencrypt is set if we want to encrypt the data on the wire.
156  */
157 static struct rx_connection *GetConn(as, aencrypt)
158 int aencrypt;
159 struct cmd_syndesc *as; {
160     struct hostent *th;
161     char *hostname;
162     register afs_int32 code;
163     register struct rx_connection *tconn;
164     afs_int32 addr;
165     register struct afsconf_dir *tdir;
166     int encryptLevel;
167     struct ktc_principal sname;
168     struct ktc_token ttoken;
169     int localauth;
170     const char *confdir;
171
172     hostname = as->parms[0].items->data;
173     th = hostutil_GetHostByName(hostname);
174     if (!th) {
175         printf("bos: can't find address for host '%s'\n", hostname);
176         exit(1);
177     }
178     bcopy(th->h_addr, &addr, sizeof(afs_int32));
179
180     /* get tokens for making authenticated connections */
181     localauth = (as->parms[ADDPARMOFFSET + 2].items != 0);
182     confdir = (localauth ? AFSDIR_SERVER_ETC_DIRPATH : AFSDIR_CLIENT_ETC_DIRPATH);
183     tdir = afsconf_Open (confdir);
184     if (tdir) {
185         struct afsconf_cell info;
186         char *tname;
187
188         if (as->parms[ADDPARMOFFSET].items) 
189             tname = as->parms[ADDPARMOFFSET].items->data;
190         else tname = (char *) 0;
191         /* next call expands cell name abbrevs for us and handles looking up
192          * local cell */
193         code = afsconf_GetCellInfo(tdir, tname, (char *) 0, &info);
194         if (code) {
195             com_err ("bos", code, "(can't find cell '%s' in cell database)",
196                    (tname? tname : "<default>"));
197             exit(1);
198         }
199         else strcpy(sname.cell, info.name);
200     }
201     else {
202         printf("bos: can't open cell database (%s)\n", confdir);
203         exit(1);
204     }
205     sname.instance[0] = 0;
206     strcpy(sname.name, "afs");
207     sc[0] = (struct rx_securityClass *) rxnull_NewClientSecurityObject();
208     sc[1] = 0;
209     sc[2] = 0;
210     scIndex = 0;
211
212     if (!as->parms[ADDPARMOFFSET + 1].items) { /* not -noauth */
213        if (as->parms[ADDPARMOFFSET + 2].items) { /* -localauth */
214             code = afsconf_GetLatestKey (tdir, 0,0);
215             if (code) com_err ("bos", code, "(getting key from local KeyFile)");
216             else {
217                 if (aencrypt)
218                     code = afsconf_ClientAuthSecure (tdir, &sc[2], &scIndex);
219                 else
220                     code = afsconf_ClientAuth (tdir, &sc[2], &scIndex);
221                 if (code) com_err ("bos", code, "(calling ClientAuth)");
222                 else if (scIndex != 2)  /* this shouldn't happen */
223                     sc[scIndex] = sc[2];
224             }
225         } else { /* not -localauth, check for tickets */
226             code = ktc_GetToken(&sname, &ttoken, sizeof(ttoken), (char *)0);
227             if (code == 0) {
228                 /* have tickets, will travel */
229                 if (ttoken.kvno >= 0 && ttoken.kvno <= 255) ;
230                 else {
231                     fprintf (stderr,
232                              "bos: funny kvno (%d) in ticket, proceeding\n",
233                              ttoken.kvno);
234                 }
235                 /* kerberos tix */
236                 if (aencrypt) encryptLevel = rxkad_crypt;
237                 else encryptLevel = rxkad_clear;
238                 sc[2] = (struct rx_securityClass *)
239                     rxkad_NewClientSecurityObject
240                         (encryptLevel, &ttoken.sessionKey,
241                          ttoken.kvno, ttoken.ticketLen, ttoken.ticket);
242                 scIndex = 2;
243             } else com_err ("bos", code, "(getting tickets)");
244         }
245         if ((scIndex == 0) || (sc[scIndex] == 0)) {
246             fprintf (stderr, "bos: running unauthenticated\n");
247             scIndex = 0;
248         }
249     }
250     tconn = rx_NewConnection (addr, htons(AFSCONF_NANNYPORT), 1,
251                               sc[scIndex], scIndex);
252     if (!tconn) {
253         fprintf (stderr, "bos: could not create rx connection\n");
254         exit(1);
255     }
256     rxs_Release (sc[scIndex]);
257
258     return tconn;
259 }
260
261 static SetAuth(as)
262 struct cmd_syndesc *as; {
263     register afs_int32 code;
264     register struct rx_connection *tconn;
265     afs_int32 flag;
266     register char *tp;
267     
268     tconn = GetConn(as, 0);
269     tp = as->parms[1].items->data;
270     if (strcmp(tp, "on")==0) flag = 0;  /* auth req.: noauthflag is false */
271     else if (strcmp(tp, "off") == 0) flag = 1;
272     else {
273         printf("bos: illegal authentication specifier '%s', must be 'off' or 'on'.\n", tp);
274         return 1;
275     }
276     code = BOZO_SetNoAuthFlag(tconn, flag);
277     if (code) com_err ("bos", code, "(failed to set authentication flag)");
278     return 0;
279 }
280
281 /* take a name (e.g. foo/bar, and a dir e.g. /usr/afs/bin, and construct
282  * /usr/afs/bin/bar */
283 static ComputeDestDir(aname, adir, aresult, alen)
284 char *aname, *adir, *aresult;
285 afs_int32 alen; {
286     register char *tp;
287
288     strcpy(aresult, adir);
289     tp = rindex(aname, '/');
290     if (!tp) {
291         /* no '/' in name */
292         strcat(aresult, "/");
293         strcat(aresult, aname);
294     }
295     else {
296         /* tp points at the / character */
297         strcat(aresult, tp);
298     }
299     return 0;
300 }
301
302 /* copy data from fd afd to rx call acall */
303 static CopyBytes(afd, acall)
304 int afd;
305 register struct rx_call *acall; {
306     register afs_int32 code;
307     register afs_int32 len;
308     char tbuffer[256];
309
310     while(1) {
311         len = read(afd, tbuffer, sizeof(tbuffer));
312         if (len < 0) return errno;
313         if (len == 0) return 0;    /* all done */
314         code = rx_Write(acall, tbuffer, len);
315         if (code != len) return -1;
316     }
317 }
318
319 static Prune(as)
320 register struct cmd_syndesc *as; {
321     register afs_int32 code;
322     register struct rx_connection *tconn;
323     register afs_int32 flags;
324     
325     tconn = GetConn(as, 0);
326     flags = 0;
327     if (as->parms[1].items) flags |= BOZO_PRUNEBAK;
328     if (as->parms[2].items) flags |= BOZO_PRUNEOLD;
329     if (as->parms[3].items) flags |= BOZO_PRUNECORE;
330     if (as->parms[4].items) flags |= 0xff;
331     code = BOZO_Prune(tconn, flags);
332     if (code) com_err ("bos", code, "(failed to prune server files)");
333     return code;
334 }
335
336 static Exec(as)
337 register struct cmd_syndesc *as; {
338     register struct rx_connection *tconn;
339     register afs_int32 code;
340
341     tconn = GetConn(as, 0);
342     code = BOZO_Exec(tconn, as->parms[1].items->data);
343     if (code) printf("bos: failed to execute command (%s)\n",
344                      em(code));
345     return code;
346 }
347
348 static GetDate(as)
349 register struct cmd_syndesc *as; {
350     register afs_int32 code;
351     char tbuffer[256];
352     char destDir[256];
353     afs_int32 time, bakTime, oldTime;
354     register struct rx_connection *tconn;
355     register struct cmd_item *ti;
356
357     tconn = GetConn(as, 0);
358     if (!as->parms[1].items) {
359         printf("bos: no files to check\n");
360         return 1;
361     }
362
363     /* compute dest dir or file; default MUST be canonical form of dir path */
364     if (as->parms[2].items) strcpy(destDir, as->parms[2].items->data);
365     else strcpy(destDir, AFSDIR_CANONICAL_SERVER_BIN_DIRPATH);
366
367     for(ti=as->parms[1].items; ti; ti=ti->next) {
368         /* check date for each file */
369         ComputeDestDir(ti->data, destDir, tbuffer, sizeof(tbuffer));
370         code = BOZO_GetDates(tconn, tbuffer, &time, &bakTime, &oldTime);
371         if (code) {
372             printf("bos: failed to check date on %s (%s)\n", ti->data,
373                    em(code));
374             return 1;
375         }
376         else {
377             printf("File %s ", tbuffer);
378             if (time == 0) printf("does not exist, ");
379             else printf("dated %s, ", DateOf(time));
380             if (bakTime == 0) printf("no .BAK file, ");
381             else printf(".BAK file dated %s, ", DateOf(bakTime));
382             if (oldTime == 0) printf("no .OLD file.");
383             else printf(".OLD file dated %s.", DateOf(oldTime));
384             printf("\n");
385         }
386     }
387 }
388
389 static UnInstall(as)
390 register struct cmd_syndesc *as; {
391     register afs_int32 code;
392     char tbuffer[256];
393     char destDir[256];
394     register struct cmd_item *ti;
395     register struct rx_connection *tconn;
396
397     tconn = GetConn(as, 0);
398     if (!as->parms[1].items) {
399         printf("bos: no files to uninstall\n");
400         return 1;
401     }
402
403     /* compute dest dir or file; default MUST be canonical form of dir path */
404     if (as->parms[2].items) strcpy(destDir, as->parms[2].items->data);
405     else strcpy(destDir, AFSDIR_CANONICAL_SERVER_BIN_DIRPATH);
406
407     for(ti=as->parms[1].items; ti; ti=ti->next) {
408         /* uninstall each file */
409         ComputeDestDir(ti->data, destDir, tbuffer, sizeof(tbuffer));
410         code = BOZO_UnInstall(tconn, tbuffer);
411         if (code) {
412             printf("bos: failed to uninstall %s (%s)\n", ti->data,
413                    em(code));
414             return 1;
415         }
416         else printf("bos: uninstalled file %s\n", ti->data);
417     }
418     return 0;
419 }
420
421 static afs_int32 GetServerGoal(aconn, aname)
422 char *aname;
423 struct rx_connection *aconn; {
424     char buffer[500];
425     char *tp;
426     register afs_int32 code;
427     struct bozo_status istatus;
428
429     tp = buffer;
430     code = BOZO_GetInstanceInfo(aconn, aname, &tp, &istatus);
431     if (code) {
432         printf("bos: failed to get instance info for '%s' (%s)\n",
433                aname, em(code));
434         /* if we can't get the answer, assume its running */
435         return BSTAT_NORMAL; 
436     }
437     if (istatus.goal == 0)
438         return BSTAT_SHUTDOWN;
439     else
440         return BSTAT_NORMAL;
441 }
442
443 static Install(as)
444 struct cmd_syndesc *as; {
445     struct rx_connection *tconn;
446     register afs_int32 code;
447     register struct cmd_item *ti;
448     struct stat tstat;
449     char tbuffer[256];
450     int fd;
451     struct rx_call *tcall;
452     char destDir[256];
453
454     tconn = GetConn(as, 0);
455     if (!as->parms[1].items) {
456         printf("bos: no files to install\n");
457         return 1;
458     }
459
460     /* compute dest dir or file; default MUST be canonical form of dir path */
461     if (as->parms[2].items) strcpy(destDir, as->parms[2].items->data);
462     else strcpy(destDir, AFSDIR_CANONICAL_SERVER_BIN_DIRPATH);
463
464     for(ti=as->parms[1].items; ti; ti=ti->next) {
465         /* install each file */
466         fd = open(ti->data, O_RDONLY);
467         if (fd < 0) {
468             /* better to quit on error than continue for install command */
469             printf("bos: can't find file '%s', quitting\n", ti->data);
470             return 1;
471         }
472         code = fstat(fd, &tstat);
473         if (code) {
474             printf("bos: failed to stat file %s, errno is %d\n", ti->data,
475                    errno);
476             return 1;
477         }
478         /* compute destination dir */
479         ComputeDestDir(ti->data, destDir, tbuffer, sizeof(tbuffer));
480         tcall = rx_NewCall(tconn);
481         code = StartBOZO_Install(tcall, tbuffer, tstat.st_size, (afs_int32)tstat.st_mode,
482                                  tstat.st_mtime);
483         if (code == 0) {
484             code = CopyBytes(fd, tcall);
485         }
486         code = rx_EndCall(tcall, code);
487         if (code) {
488             printf("bos: failed to install %s (%s)\n", ti->data, em(code));
489             return 1;
490         }
491         else printf("bos: installed file %s\n", ti->data);
492     }
493     return 0;
494 }
495
496 static Shutdown(as)
497 struct cmd_syndesc *as; {
498     register struct rx_connection *tconn;
499     register afs_int32 code;
500     register struct cmd_item *ti;
501     
502     tconn = GetConn(as, 0);
503     if (as->parms[1].items == 0) {
504         code = BOZO_ShutdownAll(tconn);
505         if (code) printf("bos: failed to shutdown servers (%s)\n", em(code));
506     }
507     else {
508         for(ti = as->parms[1].items; ti; ti=ti->next) {
509             code = BOZO_SetTStatus(tconn, ti->data, BSTAT_SHUTDOWN);
510             if (code)
511                 printf("bos: failed to shutdown instance %s (%s)\n",
512                        ti->data, em(code));
513         }
514     }
515     if (as->parms[8].items) {
516         code = BOZO_WaitAll(tconn);
517         if (code)
518             printf("bos: can't wait for processes to shutdown (%s)\n",
519                    em(code));
520     }
521     return 0;
522 }
523
524 static BlockScannerCmd(as, arock)
525 struct cmd_syndesc *as;
526 char *arock; {
527     register afs_int32 code;
528     struct rx_connection *tconn;
529     char BlockCommand[] = "/usr/afs/bin/scanner -block";
530
531     tconn = GetConn(as, 0);
532     code = BOZO_Exec(tconn, BlockCommand);
533     if (code)
534         printf("bos: failed to block scanner from making migration requests (%s)\n",
535                em(code));
536     return 0;
537 }
538
539 static UnBlockScannerCmd(as, arock)
540 struct cmd_syndesc *as;
541 char *arock; {
542     register afs_int32 code;
543     struct rx_connection *tconn;
544     char UnBlockCommand[] = "/usr/afs/bin/scanner -unblock";
545
546     tconn = GetConn(as, 0);
547     code = BOZO_Exec(tconn, UnBlockCommand);
548     if (code)
549         printf("bos: failed to allow scanner daemon to make migration requests again (%s)\n",
550                em(code));
551     return 0;
552 }                      
553
554 static GetRestartCmd(as, arock)
555 struct cmd_syndesc *as;
556 char *arock; {
557     register afs_int32 code;
558     struct ktime generalTime, newBinaryTime;
559     char messageBuffer[256];
560     struct rx_connection *tconn;
561     char *hostp;
562
563     hostp = as->parms[0].items->data;   /* host name for messages */
564     tconn = GetConn(as, 0);
565
566     code = BOZO_GetRestartTime(tconn, 1, &generalTime);
567     if (code) {
568         printf("bos: failed to retrieve restart information (%s)\n", em(code));
569         return code;
570     }
571     code = BOZO_GetRestartTime(tconn, 2, &newBinaryTime);
572     if (code) {
573         printf("bos: failed to retrieve restart information (%s)\n", em(code));
574         return code;
575     }
576
577     code = ktime_DisplayString(&generalTime, messageBuffer);
578     if (code) {
579         printf("bos: failed to decode restart time (%s)\n", em(code));
580         return code;
581     }
582     printf("Server %s restarts %s\n", hostp, messageBuffer);
583
584     code = ktime_DisplayString(&newBinaryTime, messageBuffer);
585     if (code) {
586         printf("bos: failed to decode restart time (%s)\n", em(code));
587         return code;
588     }
589     printf("Server %s restarts for new binaries %s\n", hostp, messageBuffer);
590
591     /* all done now */
592     return 0;
593 }
594
595 static SetRestartCmd(as, arock)
596 struct cmd_syndesc *as;
597 char *arock; {
598     afs_int32 count;
599     register afs_int32 code;
600     struct ktime restartTime;
601     afs_int32 type;
602     struct rx_connection *tconn;
603
604     count = 0;
605     tconn = GetConn(as, 0);
606     if (as->parms[2].items) {count++; type = 1;}
607     if (as->parms[3].items) {count++; type = 2;}
608     if (count > 1) {
609         printf("bos: can't specify more than one restart time at a time\n");
610         return -1;
611     }
612     if (count == 0) type = 1;   /* by default set general restart time */
613
614     if (code = ktime_ParsePeriodic(as->parms[1].items->data, &restartTime)) {
615         printf("bos: failed to parse '%s' as periodic restart time(%s)\n",
616                as->parms[1].items->data, em(code));
617         return code;
618     }
619
620     code = BOZO_SetRestartTime(tconn, type, &restartTime);
621     if (code) {
622         printf("bos: failed to set restart time at server (%s)\n", em(code));
623         return code;
624     }
625     return 0;
626 }
627
628 static Startup(as)
629 struct cmd_syndesc *as; {
630     register struct rx_connection *tconn;
631     register afs_int32 code;
632     register struct cmd_item *ti;
633     
634     tconn = GetConn(as, 0);
635     if (as->parms[1].items == 0) {
636         code = BOZO_StartupAll(tconn);
637         if (code)
638             printf("bos: failed to startup servers (%s)\n", em(code));
639     }
640     else {
641         for(ti = as->parms[1].items; ti; ti=ti->next) {
642             code = BOZO_SetTStatus(tconn, ti->data, BSTAT_NORMAL);
643             if (code)
644                 printf("bos: failed to start instance %s (%s)\n",
645                        ti->data, em(code));
646         }
647     }
648     return 0;
649 }
650
651 static Restart(as)
652 struct cmd_syndesc *as; {
653     register struct rx_connection *tconn;
654     register afs_int32 code;
655     register struct cmd_item *ti;
656     
657     tconn = GetConn(as, 0);
658     if (as->parms[2].items) {
659         /* this is really a rebozo command */
660         if (as->parms[1].items) {
661             /* specified specific things to restart, can't do this at the same
662              * time */
663             printf("bos: can't specify both '-bos' and specific servers to restart.\n");
664             return 1;
665         }
666         /* otherwise do a rebozo */
667         code = BOZO_ReBozo(tconn);
668         if (code)
669             printf("bos: failed to restart bosserver (%s)\n", em(code));
670         return code;
671     }
672     if (as->parms[1].items == 0) {
673         if (as->parms[3].items) {               /* '-all' */
674             code = BOZO_RestartAll(tconn);
675             if (code) printf("bos: failed to restart servers (%s)\n", em(code));
676         } else
677             printf("bos: To restart all processes please specify '-all'\n");
678     }
679     else {
680         if (as->parms[3].items) {
681             printf("bos: Can't use '-all' along with individual instances\n");
682         } else {
683             for(ti = as->parms[1].items; ti; ti=ti->next) {
684                 code = BOZO_Restart(tconn, ti->data);
685                 if (code)
686                     printf("bos: failed to restart instance %s (%s)\n", ti->data,
687                            em(code));
688             }
689         }
690     }
691     return 0;
692 }
693
694 static SetCellName(as)
695 struct cmd_syndesc *as; {
696     register struct rx_connection *tconn;
697     register afs_int32 code;
698     
699     tconn = GetConn(as, 0);
700     code = BOZO_SetCellName(tconn, as->parms[1].items->data);
701     if (code) printf("bos: failed to set cell (%s)\n", em(code));
702     return 0;
703 }
704
705 static AddHost(as)
706 register struct cmd_syndesc *as; {
707     register struct rx_connection *tconn;
708     register afs_int32 code;
709     register struct cmd_item *ti;
710     char name[MAXHOSTCHARS];
711     
712     tconn = GetConn(as, 0);
713     for(ti = as->parms[1].items; ti; ti=ti->next) {
714         if (as->parms[2].items) {
715            if (strlen(ti->data) > MAXHOSTCHARS - 3) {
716                fprintf(stderr, "bos: host name too long\n");
717                return E2BIG;
718            }
719             name[0] = '[';
720             strcpy(&name[1],ti->data);
721             strcat((char *)&name, "]");
722             code = BOZO_AddCellHost(tconn, name);
723         } else 
724            code = BOZO_AddCellHost(tconn, ti->data);
725         if (code)
726             printf("bos: failed to add host %s (%s)\n", ti->data, em(code));
727     }
728     return 0;
729 }
730
731 static RemoveHost(as)
732 register struct cmd_syndesc *as; {
733     register struct rx_connection *tconn;
734     register afs_int32 code;
735     register struct cmd_item *ti;
736     
737     tconn = GetConn(as, 0);
738     for(ti=as->parms[1].items; ti; ti=ti->next) {
739         code = BOZO_DeleteCellHost(tconn, ti->data);
740         if (code)
741             printf("bos: failed to delete host %s (%s)\n", ti->data, em(code));
742     }
743     return 0;
744 }
745
746 static ListHosts(as)
747 register struct cmd_syndesc *as; {
748     register struct rx_connection *tconn;
749     register afs_int32 code;
750     char tbuffer[256];
751     char *tp;
752     register afs_int32 i;
753
754     tp = tbuffer;
755     tconn = GetConn(as, 0);
756     code = BOZO_GetCellName(tconn, &tp);
757     if (code) {
758         printf("bos: failed to get cell name (%s)\n", em(code));
759         exit(1);
760     }
761     printf("Cell name is %s\n", tbuffer);
762     for(i=0;;i++) {
763         code = BOZO_GetCellHost(tconn, i, &tp);
764         if (code == BZDOM) break;
765         if (code != 0) {
766             printf("bos: failed to get cell host %d (%s)\n", i, em(code));
767             exit(1);
768         }
769         printf("    Host %d is %s\n", i+1, tbuffer);
770     }
771     return 0;
772 }
773
774 static AddKey(as)
775 register struct cmd_syndesc *as; {
776     register struct rx_connection *tconn;
777     register afs_int32 code;
778     struct ktc_encryptionKey tkey;
779     afs_int32 temp;
780     char *tcell;
781     char cellBuffer[256];
782     char buf[BUFSIZ], ver[BUFSIZ];
783     
784     tconn = GetConn(as, 1);
785     bzero(&tkey, sizeof(struct ktc_encryptionKey));
786
787         if(as->parms[1].items)
788                 strcpy(buf,as->parms[1].items->data);
789         else
790         {
791                 /* prompt for key */
792                 code=des_read_pw_string(buf,sizeof(buf),"input key: ",0);
793                 if(code || strlen(buf)==0)
794                 {
795                         fprintf(stderr,"Bad key: \n");
796                         exit(1);
797                 }
798                 code=des_read_pw_string(ver,sizeof(ver),"Retype input key: ",0);
799                 if(code || strlen(ver)==0)
800                 {
801                         fprintf(stderr,"Bad key: \n");
802                         exit(1);
803                 }
804                 if (strcmp (ver, buf) != 0) {
805                     fprintf (stderr, "\nInput key mismatch\n");
806                     exit(1);
807                 }
808
809         }
810
811     temp = atoi(as->parms[2].items->data);
812     if (temp == 999) {
813         /* bcrypt key */
814 /*
815         strcpy((char *)&tkey, as->parms[1].items->data);
816 */
817         strcpy((char *)&tkey, buf);
818     }
819     else {    /* kerberos key */
820         if (as->parms[ADDPARMOFFSET].items) {
821             strcpy(cellBuffer, as->parms[ADDPARMOFFSET].items->data);
822
823             /* string to key needs upper-case cell names */
824
825             /* I don't believe this is true.  The string to key function
826              * actually expands the cell name, then LOWER-CASES it.  Perhaps it
827              * didn't use to??? */
828             ucstring(cellBuffer, cellBuffer, strlen(cellBuffer));
829             tcell = cellBuffer;
830         }
831         else tcell = (char *) 0;    /* no cell specified, use current */
832 /*
833         ka_StringToKey(as->parms[1].items->data, tcell, &tkey);
834 */
835         ka_StringToKey(buf,tcell,&tkey);
836     }
837     tconn = GetConn(as, 1);
838     code = BOZO_AddKey(tconn, temp, &tkey);
839     if (code) {
840         printf("bos: failed to set key %d (%s)\n", temp, em(code));
841         exit(1);
842     }
843     return 0;
844 }
845
846 static RemoveKey(as)
847 register struct cmd_syndesc *as; {
848     register struct rx_connection *tconn;
849     register afs_int32 code;
850     afs_int32 temp;
851     register struct cmd_item *ti;
852     
853     tconn = GetConn(as, 0);
854     for(ti=as->parms[1].items; ti; ti=ti->next) {
855         temp = atoi(ti->data);
856         code = BOZO_DeleteKey(tconn, temp);
857         if (code) {
858             printf("bos: failed to delete key %d (%s)\n", temp, em(code));
859             exit(1);
860         }
861     }
862     return 0;
863 }
864
865 static ListKeys(as)
866   IN register struct cmd_syndesc *as;
867 {
868     register struct rx_connection *tconn;
869     register afs_int32 code;
870     struct ktc_encryptionKey tkey;
871     afs_int32 kvno;
872     struct bozo_keyInfo keyInfo;
873     int everWorked;
874     register afs_int32 i;
875     
876     tconn = GetConn(as, 1);
877     everWorked = 0;
878     for(i=0;;i++) {
879         code = BOZO_ListKeys(tconn, i, &kvno, &tkey, &keyInfo);
880         if (code) break;
881         everWorked = 1;
882         /* first check if key is returned */
883         if ((!ka_KeyIsZero (&tkey, sizeof(tkey))) && (as->parms[1].items)) {
884             printf ("key %d is '", kvno);
885             ka_PrintBytes (&tkey, sizeof(tkey));
886             printf ("'\n");
887         } else {
888             if (keyInfo.keyCheckSum == 0) /* shouldn't happen */
889                 printf ("key version is %d\n", kvno);
890             else
891                 printf ("key %d has cksum %u\n", kvno, keyInfo.keyCheckSum);
892         }
893     }
894     if (everWorked) {
895         printf("Keys last changed on %s.\n", DateOf(keyInfo.mod_sec));
896     }
897     if (code != BZDOM)
898         printf("bos: %s error encountered while listing keys\n", em(code));
899     else
900         printf("All done.\n");
901     return 0;
902 }
903
904 static AddSUser(as)
905 register struct cmd_syndesc *as; {
906     register struct rx_connection *tconn;
907     register afs_int32 code;
908     int failed;
909     register struct cmd_item *ti;
910
911     failed = 0;
912     tconn = GetConn(as, 0);
913     for(ti=as->parms[1].items; ti; ti=ti->next) {
914         code = BOZO_AddSUser(tconn, ti->data);
915         if (code) {
916             printf("bos: failed to add user '%s' (%s)\n", ti->data, em(code));
917             failed = 1;
918         }
919     }
920     return failed;
921 }
922
923 static RemoveSUser(as)
924 register struct cmd_syndesc *as; {
925     register struct rx_connection *tconn;
926     register struct cmd_item *ti;
927     register afs_int32 code;
928     int failed;
929
930     failed = 0;
931     tconn = GetConn(as, 0);
932     for(ti=as->parms[1].items; ti; ti=ti->next) {
933         code = BOZO_DeleteSUser(tconn, ti->data);
934         if (code) {
935             printf("bos: failed to delete user '%s', ", ti->data);
936             if (code == ENOENT)
937                 printf("(no such user)\n");
938             else
939                 printf("(%s)\n", em(code));
940             failed = 1;
941         }
942     }
943     return failed;
944 }
945
946 #define NPERLINE    10      /* dudes to print per line */
947 static ListSUsers(as)
948 register struct cmd_syndesc *as; {
949     register struct rx_connection *tconn;
950     register int i;
951     register afs_int32 code;
952     char tbuffer[256];
953     char *tp;
954     int lastNL, printGreeting;
955     
956     tconn = GetConn(as, 0);
957     lastNL = 0;
958     printGreeting = 1;
959     for(i=0;;i++) {
960         tp = tbuffer;
961         code = BOZO_ListSUsers(tconn, i, &tp);
962         if (code) break;
963         if (printGreeting) {
964             printGreeting = 0;  /* delay until after first call succeeds */
965             printf("SUsers are: ");
966         }
967         printf("%s ", tbuffer);
968         if ((i % NPERLINE) == NPERLINE-1) {
969             printf("\n");
970             lastNL = 1;
971         }
972         else lastNL = 0;
973     }
974     if (code != 1) {
975         /* a real error code, instead of scanned past end */
976         printf("bos: failed to retrieve super-user list (%s)\n", em(code));
977         return code;
978     }
979     if (lastNL == 0) printf("\n");
980     return 0;
981 }
982
983 static StatServer(as)
984 register struct cmd_syndesc *as; {
985     register struct rx_connection *tconn;
986     register afs_int32 code;
987     register int i;
988     char ibuffer[BOZO_BSSIZE];
989     char *tp;
990     int int32p;
991     
992     /* int32p==1 is obsolete, smaller, printout */
993     int32p = (as->parms[2].items != 0? 2 : 0);
994
995     /* no parms does something pretty different */
996     if (as->parms[1].items) return IStatServer(as, int32p);
997
998     tconn = GetConn(as, 0);
999     for(i=0;;i++) {
1000         /* for each instance */
1001         tp = ibuffer;
1002         code = BOZO_EnumerateInstance(tconn, i, &tp);
1003         if (code == BZDOM) break;
1004         if (code) {
1005             printf("bos: failed to contact host's bosserver (%s).\n",
1006                    em(code));
1007             break;
1008         }
1009         DoStat(ibuffer, tconn, int32p, (i==0)); /* print status line */
1010     }
1011     return 0;
1012 }
1013
1014 static CreateServer(as)
1015 register struct cmd_syndesc *as; {
1016     register struct rx_connection *tconn;
1017     register afs_int32 code;
1018     char *parms[6];
1019     register struct cmd_item *ti;
1020     register int i;
1021     char *type, *name, *notifier=NONOTIFIER;
1022
1023     tconn = GetConn(as, 0);
1024     for(i=0;i<6;i++) parms[i] = "";
1025     for(i=0,ti=as->parms[3].items; (ti && i<6); ti=ti->next,i++) {
1026         parms[i] = ti->data;
1027     }
1028     name = as->parms[1].items->data;
1029     type = as->parms[2].items->data;
1030     if (ti = as->parms[4].items) {
1031         notifier = ti->data;
1032     }
1033     code = BOZO_CreateBnode(tconn, type, name, parms[0], parms[1], parms[2],
1034                             parms[3], parms[4], notifier);
1035     if (code) {
1036         printf("bos: failed to create new server instance %s of type '%s' (%s)\n", 
1037                name, type, em(code));
1038     }
1039     return code;
1040 }
1041
1042 static DeleteServer(as)
1043 register struct cmd_syndesc *as; {
1044     register struct rx_connection *tconn;
1045     register afs_int32 code;
1046     register struct cmd_item *ti;
1047
1048     code = 0;
1049     tconn = GetConn(as, 0);
1050     for(ti=as->parms[1].items; ti; ti=ti->next) {
1051         code = BOZO_DeleteBnode(tconn, ti->data);
1052         if (code) {
1053             if (code == BZBUSY)
1054                 printf("bos: can't delete running instance '%s'\n", ti->data);
1055             else
1056                 printf("bos: failed to delete instance '%s' (%s)\n",
1057                        ti->data, em(code));
1058         }
1059     }
1060     return code;
1061 }
1062
1063 static StartServer(as)
1064 register struct cmd_syndesc *as; {
1065     register struct rx_connection *tconn;
1066     register afs_int32 code;
1067     register struct cmd_item *ti;
1068
1069     code = 0;
1070     tconn = GetConn(as, 0);
1071     for(ti=as->parms[1].items; ti; ti=ti->next) {
1072         code = BOZO_SetStatus(tconn, ti->data, BSTAT_NORMAL);
1073         if (code)
1074             printf("bos: failed to start instance '%s' (%s)\n",
1075                    ti->data, em(code));
1076     }
1077     return code;
1078 }
1079
1080 static StopServer(as)
1081 register struct cmd_syndesc *as; {
1082     register struct rx_connection *tconn;
1083     register afs_int32 code;
1084     register struct cmd_item *ti;
1085
1086     code = 0;
1087     tconn = GetConn(as, 0);
1088     for(ti=as->parms[1].items; ti; ti=ti->next) {
1089         code = BOZO_SetStatus(tconn, ti->data, BSTAT_SHUTDOWN);
1090         if (code)
1091             printf("bos: failed to change stop instance '%s' (%s)\n",
1092                    ti->data, em(code));
1093     }
1094     if (as->parms[8].items) {
1095         code = BOZO_WaitAll(tconn);
1096         if (code)
1097             printf("bos: can't wait for processes to shutdown (%s)\n",
1098                    em(code));
1099     }
1100     return code;
1101 }
1102
1103 #define PARMBUFFERSSIZE 32
1104
1105 static DoSalvage(aconn, aparm1, aparm2, aoutName, showlog,parallel,atmpDir,orphans)
1106 struct rx_connection *aconn;
1107 char *aoutName;
1108 char *aparm1;
1109 char *aparm2; 
1110 afs_int32 showlog;
1111 char *parallel;
1112 char *atmpDir;
1113 char *orphans;
1114 {
1115     register afs_int32 code;
1116     char *parms[6];
1117     char buffer;
1118     char tbuffer[BOZO_BSSIZE];
1119     struct bozo_status istatus;
1120     struct rx_call *tcall;
1121     char *tp;
1122     FILE *outFile;
1123     int closeIt;
1124     char partName[20];  /* canonical name for partition */
1125     char pbuffer[PARMBUFFERSSIZE];
1126     afs_int32 partNumber;
1127     char *notifier = NONOTIFIER;
1128
1129     /* if a partition was specified, canonicalize the name, since
1130        the salvager has a stupid partition ID parser */
1131     if (aparm1) {
1132         partNumber = volutil_GetPartitionID(aparm1);
1133         if (partNumber < 0) {
1134             printf("bos: could not parse partition ID '%s'\n", aparm1);
1135             return EINVAL;
1136         }
1137         tp = volutil_PartitionName(partNumber);
1138         if (!tp) {
1139             printf("bos: internal error parsing partition ID '%s'\n", aparm1);
1140             return EINVAL;
1141         }
1142         strcpy(partName, tp);
1143     }
1144     else partName[0] = 0;
1145
1146     /* open the file name */
1147     if (aoutName) {
1148         outFile = fopen(aoutName, "w");
1149         if (!outFile) {
1150             printf("bos: can't open specified SalvageLog file '%s'\n",
1151                    aoutName);
1152             return ENOENT;
1153         }
1154         closeIt = 1;    /* close this file later */
1155     }
1156     else {
1157         outFile = stdout;
1158         closeIt = 0;    /* don't close this file later */
1159     }
1160
1161     for(code=2;code<6;code++) parms[code] = "";
1162     if (!aparm2) aparm2 = "";
1163     /* MUST pass canonical (wire-format) salvager path to bosserver */
1164     strncpy(tbuffer, AFSDIR_CANONICAL_SERVER_SALVAGER_FILEPATH, BOZO_BSSIZE);
1165     if (*aparm2 != 0) {
1166         if ( (strlen(tbuffer) + 1 + strlen(partName) + 1 + strlen(aparm2) + 1) > BOZO_BSSIZE ) {
1167            printf("bos: command line too big\n");
1168            return(E2BIG);
1169         }
1170         strcat(tbuffer, " ");
1171         strcat(tbuffer, partName);
1172         strcat(tbuffer, " ");
1173         strcat(tbuffer, aparm2);
1174     } else {
1175         if ( (strlen(tbuffer) + 4 + strlen(partName) + 1) > BOZO_BSSIZE ) {
1176            printf("bos: command line too big\n");
1177            return(E2BIG);
1178         }
1179         strcat (tbuffer, " -f ");
1180         strcat (tbuffer, partName);
1181     }
1182
1183     /* add the parallel option if given */
1184     if (parallel != (char *)0) {
1185         if ( (strlen(tbuffer) + 11 + strlen(parallel) + 1) > BOZO_BSSIZE ) {
1186            printf("bos: command line too big\n");
1187            return(E2BIG);
1188         }
1189         strcat(tbuffer, " -parallel ");
1190         strcat(tbuffer, parallel);
1191     }
1192
1193     /* add the tmpdir option if given */
1194     if (atmpDir != (char *)0) {
1195         if ( (strlen(tbuffer) + 9 + strlen(atmpDir) + 1) > BOZO_BSSIZE ) {
1196            printf("bos: command line too big\n");
1197            return(E2BIG);
1198         }
1199         strcat(tbuffer, " -tmpdir ");
1200         strcat(tbuffer, atmpDir);
1201     }
1202
1203     /* add the orphans option if given */
1204     if (orphans != (char *)0) {
1205         if ( (strlen(tbuffer) + 10 + strlen(orphans) + 1) > BOZO_BSSIZE ) {
1206            printf("bos: command line too big\n");
1207            return(E2BIG);
1208         }
1209         strcat(tbuffer, " -orphans ");
1210         strcat(tbuffer, orphans);
1211     }
1212
1213     if (mrafsParm.Optdebug)
1214         strcat(tbuffer," -debug");
1215     if (mrafsParm.Optnowrite)
1216         strcat(tbuffer," -nowrite");
1217     if (mrafsParm.Optforce)
1218         strcat(tbuffer," -force");
1219     if (mrafsParm.Optoktozap)
1220         strcat(tbuffer," -oktozap");
1221     if (mrafsParm.Optrootfiles)
1222         strcat(tbuffer," -rootfiles");
1223     if (mrafsParm.Optsalvagedirs)
1224         strcat(tbuffer," -salvagedirs");
1225     if (mrafsParm.Optblockreads)
1226         strcat(tbuffer," -blockreads");
1227     if (mrafsParm.OptListResidencies)
1228         strcat(tbuffer," -ListResidencies");
1229     if (mrafsParm.OptSalvageRemote)
1230         strcat(tbuffer," -SalvageRemote");
1231     if (mrafsParm.OptSalvageArchival)
1232         strcat(tbuffer," -SalvageArchival");
1233     if (mrafsParm.OptIgnoreCheck)
1234         strcat(tbuffer," -IgnoreCheck");
1235     if (mrafsParm.OptForceOnLine)
1236         strcat(tbuffer," -ForceOnLine");
1237     if (mrafsParm.OptUseRootDirACL)
1238         strcat(tbuffer," -UseRootDirACL");
1239     if (mrafsParm.OptTraceBadLinkCounts)
1240         strcat(tbuffer," -TraceBadLinkCounts");
1241     if (mrafsParm.OptDontAskFS)
1242         strcat(tbuffer," -DontAskFS");
1243     if (mrafsParm.OptLogLevel) {
1244         sprintf(pbuffer, " -LogLevel %ld", mrafsParm.OptLogLevel);
1245         strcat(tbuffer, pbuffer);
1246     }
1247     if (mrafsParm.OptRxDebug)
1248         strcat(tbuffer," -rxdebug");
1249     if (mrafsParm.OptResidencies) {
1250         sprintf(pbuffer, " -Residencies %lu", mrafsParm.OptResidencies);
1251         strcat(tbuffer, pbuffer);
1252     } 
1253
1254     parms[0] = tbuffer;
1255     parms[1] = "now";       /* when to do it */
1256     code = BOZO_CreateBnode(aconn, "cron", "salvage-tmp", parms[0], parms[1],
1257                             parms[2], parms[3], parms[4], notifier);
1258     if (code) goto done;
1259     /* now wait for bnode to disappear */
1260     while (1) {
1261         IOMGR_Sleep(5);
1262         tp = tbuffer;
1263         code = BOZO_GetInstanceInfo(aconn, "salvage-tmp", &tp, &istatus);
1264         if (code) break;
1265         printf("bos: waiting for salvage to complete.\n");
1266     }
1267     if (code != BZNOENT) {
1268         printf("bos: salvage failed (%s)\n", em(code));
1269         goto done;
1270     }
1271     code = 0;
1272
1273     /* now print the log file to the output file */
1274     printf("bos: salvage completed\n");
1275     if (aoutName || showlog) {
1276         fprintf(outFile, "SalvageLog:\n");
1277         tcall = rx_NewCall(aconn);
1278         /* MUST pass canonical (wire-format) salvager log path to bosserver */
1279         code = StartBOZO_GetLog(tcall, AFSDIR_CANONICAL_SERVER_SLVGLOG_FILEPATH);
1280         if (code) {
1281             rx_EndCall(tcall, code);
1282             goto done;
1283         }
1284         /* copy data */
1285         while(1) {
1286             code = rx_Read(tcall, &buffer, 1);
1287             if (code != 1) break;
1288             putc(buffer, outFile);
1289             if (buffer == 0) break;     /* the end delimeter */
1290         }
1291         code = rx_EndCall(tcall, 0);
1292         /* fall through into cleanup code */
1293     }
1294
1295   done:
1296     if (closeIt && outFile) fclose(outFile);
1297     return code;
1298 }
1299
1300 static GetLogCmd(as)
1301 register struct cmd_syndesc *as; {
1302     struct rx_connection *tconn;
1303     register struct rx_call *tcall;
1304     register afs_int32 code;
1305     char buffer;
1306     int error;
1307
1308     printf("Fetching log file '%s'...\n", as->parms[1].items->data);
1309     tconn = GetConn(as, 0);
1310     tcall = rx_NewCall(tconn);
1311     code = StartBOZO_GetLog(tcall, as->parms[1].items->data);
1312     if (code) {
1313         rx_EndCall(tcall, code);
1314         goto done;
1315     }
1316     /* copy data */
1317     error = 0;
1318     while(1) {
1319         code = rx_Read(tcall, &buffer, 1);
1320         if (code != 1) {
1321             error = EIO;
1322             break;
1323         }
1324         if (buffer == 0) break; /* the end delimeter */
1325         putchar(buffer);
1326     }
1327     code = rx_EndCall(tcall, error);
1328     /* fall through into cleanup code */
1329
1330   done:
1331     if (code)
1332         com_err("bos", code, "(while reading log)");
1333     return code;
1334 }
1335
1336 static SalvageCmd(as)
1337 struct cmd_syndesc *as; {
1338     register struct rx_connection *tconn;
1339     register afs_int32 code, rc, i;
1340     char *outName;
1341     char tname[BOZO_BSSIZE];
1342     afs_int32 newID;
1343     extern struct ubik_client *cstruct;
1344     afs_int32 curGoal, showlog = 0, mrafs = 0;
1345     char *parallel;
1346     char *tmpDir;
1347     char *orphans;
1348     char *tp;
1349
1350     bzero(&mrafsParm, sizeof(mrafsParm));
1351     
1352     /* parm 0 is machine name, 1 is partition, 2 is volume, 3 is -all flag */
1353     tconn = GetConn(as, 0);
1354
1355     /* Find out whether fileserver is running MR-AFS (has a scanner instance) */
1356     /* XXX this should really be done some other way, potentially by RPC */
1357     tp = &tname;
1358     if (code = BOZO_GetInstanceParm(tconn, "fs", 3, &tp) == 0)
1359        mrafs = 1;
1360
1361     /* we can do a volume, a partition or the whole thing, but not mixtures
1362      * thereof */
1363     if (!as->parms[1].items && as->parms[2].items) {
1364         printf("bos: must specify partition to salvage individual volume.\n");
1365         return -1;
1366     }
1367     if (as->parms[5].items && as->parms[3].items) {
1368         printf("bos: can not specify both -file and -showlog.\n");
1369         return -1;
1370     }
1371     if (as->parms[4].items && (as->parms[1].items || as->parms[2].items)) {
1372         printf("bos: can not specify -all with other flags.\n");
1373         return -1;
1374     }
1375
1376     /* get the output file name, if any */
1377     if (as->parms[3].items)
1378         outName = as->parms[3].items->data;
1379     else
1380         outName = (char *) 0;
1381
1382     if (as->parms[5].items)
1383         showlog = 1;
1384
1385     /* parallel option */
1386     parallel = (char *) 0;
1387     if (as->parms[6].items)
1388         parallel = as->parms[6].items->data;
1389
1390     /* get the tmpdir filename if any */
1391     tmpDir = (char *)0;
1392     if (as->parms[7].items)
1393         tmpDir = as->parms[7].items->data;
1394
1395     /* -orphans option */
1396     orphans = (char *)0;
1397     if (as->parms[8].items) {
1398         if (mrafs) {
1399             printf("Can't specify -orphans for MR-AFS fileserver\n");
1400             return EINVAL;
1401         }
1402         orphans = as->parms[8].items->data;
1403     }
1404     
1405     if (mrafs) {
1406         if (as->parms[MRAFS_OFFSET].items)
1407             mrafsParm.Optdebug = 1;
1408         if (as->parms[MRAFS_OFFSET + 1].items)
1409             mrafsParm.Optnowrite = 1;
1410         if (as->parms[MRAFS_OFFSET + 2].items)
1411             mrafsParm.Optforce = 1;
1412         if (as->parms[MRAFS_OFFSET + 3].items)
1413             mrafsParm.Optoktozap = 1;
1414         if (as->parms[MRAFS_OFFSET + 4].items)
1415             mrafsParm.Optrootfiles = 1;
1416         if (as->parms[MRAFS_OFFSET + 5].items)
1417             mrafsParm.Optsalvagedirs = 1;
1418         if (as->parms[MRAFS_OFFSET + 6].items)
1419             mrafsParm.Optblockreads = 1;
1420         if (as->parms[MRAFS_OFFSET + 7].items)
1421             mrafsParm.OptListResidencies = 1;
1422         if (as->parms[MRAFS_OFFSET + 8].items)
1423             mrafsParm.OptSalvageRemote = 1;
1424         if (as->parms[MRAFS_OFFSET + 9].items)
1425             mrafsParm.OptSalvageArchival = 1;
1426         if (as->parms[MRAFS_OFFSET + 10].items)
1427             mrafsParm.OptIgnoreCheck = 1;
1428         if (as->parms[MRAFS_OFFSET + 11].items)
1429             mrafsParm.OptForceOnLine = 1;
1430         if (as->parms[MRAFS_OFFSET + 12].items)
1431             mrafsParm.OptUseRootDirACL = 1;
1432         if (as->parms[MRAFS_OFFSET + 13].items)
1433             mrafsParm.OptTraceBadLinkCounts = 1;
1434         if (as->parms[MRAFS_OFFSET + 14].items)
1435             mrafsParm.OptDontAskFS = 1;
1436         if (as->parms[MRAFS_OFFSET + 15].items)
1437             mrafsParm.OptLogLevel = atoi(as->parms[MRAFS_OFFSET + 15].items->data);
1438         if (as->parms[MRAFS_OFFSET + 16].items)
1439             mrafsParm.OptRxDebug = 1;
1440         if (as->parms[MRAFS_OFFSET + 17].items) {                             
1441            if (as->parms[MRAFS_OFFSET + 8].items || 
1442                as->parms[MRAFS_OFFSET + 9].items) {
1443                 printf("Can't specify -Residencies with -SalvageRemote or -SalvageArchival\n");
1444                 return EINVAL;
1445             }
1446             code = GetUInt32(as->parms[MRAFS_OFFSET + 17].items->data, 
1447                                        &mrafsParm.OptResidencies);
1448             if (code) {
1449                 printf("bos: '%s' is not a valid residency mask.\n",
1450                        as->parms[MRAFS_OFFSET + 13].items->data);
1451                 return code;
1452             }
1453         }
1454     } else {
1455        int stop = 0;
1456
1457        for (i = 9; i < ADDPARMOFFSET; i++) {
1458            if (as->parms[i].items) {
1459                printf(" %s only possible for MR-AFS fileserver.\n",
1460                        as->parms[i].name);
1461                stop = 1;
1462            }
1463        }
1464        if (stop) exit(1);
1465     }
1466
1467     if (as->parms[4].items) {
1468         /* salvage whole enchilada */
1469         curGoal = GetServerGoal(tconn, "fs");
1470         if (curGoal == BSTAT_NORMAL) {
1471             printf("bos: shutting down fs.\n");
1472             code = BOZO_SetTStatus(tconn, "fs", BSTAT_SHUTDOWN);
1473             if (code) {
1474                 printf("bos: failed to stop 'fs' (%s)\n", em(code));
1475                 return code;
1476             }
1477             code = BOZO_WaitAll(tconn); /* wait for shutdown to complete */
1478             if (code)
1479                 printf("bos: failed to wait for file server shutdown, continuing.\n");
1480         }
1481         /* now do the salvage operation */
1482         printf("Starting salvage.\n");
1483         rc = DoSalvage(tconn, (char *) 0, (char *) 0, outName, showlog,parallel,tmpDir,orphans);
1484         if (rc) printf("bos: failed to start 'salvager' (%s)\n", em(rc));
1485         if (curGoal == BSTAT_NORMAL) {
1486             printf("bos: restarting fs.\n");
1487             code = BOZO_SetTStatus(tconn, "fs", BSTAT_NORMAL);
1488             if (code) {
1489                 printf("bos: failed to restart 'fs' (%s)\n", em(code));
1490                 return code;
1491             }
1492         }
1493         if (rc) return rc;
1494     }
1495     else if (!as->parms[2].items) {
1496         if (!as->parms[1].items) {
1497             printf("bos: must specify -all switch to salvage all partitions.\n");
1498             return -1;
1499         }
1500         if (volutil_GetPartitionID(as->parms[1].items->data) < 0) {
1501             /* can't parse volume ID, so complain before shutting down
1502              * file server.
1503              */
1504             printf("bos: can't interpret %s as partition ID.\n",
1505                    as->parms[1].items->data);
1506             return -1;
1507         }
1508         curGoal = GetServerGoal(tconn, "fs");
1509         /* salvage a whole partition (specified by parms[1]) */
1510         if (curGoal == BSTAT_NORMAL) {
1511             printf("bos: shutting down fs.\n");
1512             code = BOZO_SetTStatus(tconn, "fs", BSTAT_SHUTDOWN);
1513             if (code) {
1514                 printf("bos: can't stop 'fs' (%s)\n", em(code));
1515                 return code;
1516             }
1517             code = BOZO_WaitAll(tconn); /* wait for shutdown to complete */
1518             if (code)
1519                 printf("bos: failed to wait for file server shutdown, continuing.\n");
1520         }
1521         /* now do the salvage operation */
1522         printf("Starting salvage.\n");
1523         rc = DoSalvage(tconn, as->parms[1].items->data, (char *) 0,
1524                        outName, showlog,parallel,tmpDir,orphans);
1525         if (rc) printf("bos: failed to start 'salvager' (%s)\n", em(rc));
1526         if (curGoal == BSTAT_NORMAL) {
1527             printf("bos: restarting fs.\n");
1528             code = BOZO_SetTStatus(tconn, "fs", BSTAT_NORMAL);
1529             if (code) {
1530                 printf("bos: failed to restart 'fs' (%s)\n", em(code));
1531                 return code;
1532             }
1533         }
1534         if (rc) return rc;
1535     }
1536     else {
1537         /* salvage individual volume (don't shutdown fs first), just use
1538          * single-shot cron bnode.  Must leave server running when using this
1539          * option, since salvager will ask file server for the volume */
1540         char *tmpname;
1541         afs_int32 err;
1542         const char *confdir;
1543         int localauth;
1544
1545         if (as->parms[ADDPARMOFFSET].items) 
1546             tmpname = as->parms[ADDPARMOFFSET].items->data;
1547         else tmpname = (char *) 0;
1548
1549         localauth = (as->parms[ADDPARMOFFSET + 2].items != 0);
1550         confdir = (localauth ? AFSDIR_SERVER_ETC_DIRPATH : AFSDIR_CLIENT_ETC_DIRPATH);
1551         code = vsu_ClientInit(/* noauth */ 1, confdir, tmpname,
1552                               /* server auth */ 0, &cstruct, (int (*)()) 0);
1553         if (code == 0) {
1554             newID = vsu_GetVolumeID(as->parms[2].items->data, cstruct, &err);
1555             if (newID == 0) {
1556                 printf("bos: can't interpret %s as volume name or ID\n", as->parms[2].items->data);
1557                 return -1;
1558             }
1559             sprintf(tname, "%u", newID);
1560         }
1561         else {
1562             printf("bos: can't initialize volume system client (code %d), trying anyway.\n",
1563                    as->parms[2].items->data, code);
1564             strncpy(tname, as->parms[2].items->data, sizeof(tname));
1565         }
1566         if (volutil_GetPartitionID(as->parms[1].items->data) < 0) {
1567             /* can't parse volume ID, so complain before shutting down
1568              * file server.
1569              */
1570             printf("bos: can't interpret %s as partition ID.\n",
1571                    as->parms[1].items->data);
1572             return -1;
1573         }
1574         printf("Starting salvage.\n");
1575         rc = DoSalvage(tconn, as->parms[1].items->data, tname, outName,
1576                        showlog,parallel,tmpDir,orphans);
1577         if (rc) {
1578            printf("bos: failed to start 'salvager' (%s)\n", em(rc));
1579            return rc;
1580         }
1581     }
1582     return 0;
1583 }
1584
1585 static IStatServer(as, int32p)
1586 int int32p;
1587 register struct cmd_syndesc *as; {
1588     register struct rx_connection *tconn;
1589     register struct cmd_item *ti;
1590     int firstTime = 1;
1591
1592     tconn = GetConn(as, 0);
1593     for (ti=as->parms[1].items; ti; ti=ti->next) {
1594         DoStat(ti->data, tconn, int32p, firstTime);
1595         firstTime = 0;
1596     }
1597     return 0;
1598 }
1599
1600 static DoStat (aname, aconn, aint32p, firstTime)
1601   IN char *aname;
1602   IN register struct rx_connection *aconn;
1603   IN int aint32p;
1604   IN int firstTime;                     /* true iff first instance in cmd */
1605 {
1606     afs_int32 temp;
1607     char buffer[500];
1608     register afs_int32 code;
1609     register afs_int32 i;
1610     struct bozo_status istatus;
1611     char *tp;
1612     char *is1, *is2, *is3, *is4;        /* instance strings */
1613
1614     tp = buffer;
1615     code = BOZO_GetInstanceInfo(aconn, aname, &tp, &istatus);
1616     if (code) {
1617         printf("bos: failed to get instance info for '%s' (%s)\n",
1618                aname, em(code));
1619         return -1;
1620     }
1621     if (firstTime && aint32p && (istatus.flags & BOZO_BADDIRACCESS))
1622         printf ("Bosserver reports inappropriate access on server directories\n");
1623     printf("Instance %s, ", aname);
1624     if (aint32p) printf("(type is %s) ", buffer);
1625     if (istatus.fileGoal == istatus.goal) {
1626         if (!istatus.goal) printf("disabled, ");
1627     }
1628     else {
1629         if (istatus.fileGoal) printf("temporarily disabled, ");
1630         else printf("temporarily enabled, ");
1631     }
1632
1633     if (istatus.flags & BOZO_ERRORSTOP)
1634         printf("stopped for too many errors, ");
1635     if (istatus.flags & BOZO_HASCORE)
1636         printf("has core file, ");
1637
1638     tp = buffer;
1639     code = BOZO_GetStatus(aconn, aname, &temp, &tp);
1640     if (code)
1641         printf("bos: failed to get status for instance '%s' (%s)\n",
1642                aname, em(code));
1643     else {
1644         printf("currently ", aname);
1645         if (temp == BSTAT_NORMAL) printf("running normally.\n");
1646         else if (temp == BSTAT_SHUTDOWN) printf("shutdown.\n");
1647         else if (temp == BSTAT_STARTINGUP) printf("starting up.\n");
1648         else if (temp == BSTAT_SHUTTINGDOWN) printf("shutting down.\n");
1649         if (buffer[0] != 0) {
1650             printf("    Auxiliary status is: %s.\n", buffer);
1651         }
1652     }
1653
1654     /* are we done yet? */
1655     if (!aint32p) return 0;
1656
1657     if (istatus.procStartTime)
1658         printf("    Process last started at %s (%d proc starts)\n",
1659                DateOf(istatus.procStartTime), istatus.procStarts);
1660     if (istatus.lastAnyExit) {
1661         printf("    Last exit at %s\n", DateOf(istatus.lastAnyExit));
1662     }
1663     if (istatus.lastErrorExit) {
1664         is1 = is2 = is3 = is4 = (char *) 0;
1665         printf("    Last error exit at %s, ", DateOf(istatus.lastErrorExit));
1666         code = BOZO_GetInstanceStrings(aconn, aname, &is1, &is2, &is3, &is4);
1667         /* don't complain about failing call, since could simply mean
1668          * interface mismatch.
1669          */
1670         if (code == 0) {
1671             if (*is1 != 0) {
1672                 /* non-null instance string */
1673                 printf("by %s, ", is1);
1674             }
1675             free(is1);
1676             free(is2);
1677             free(is3);
1678             free(is4);
1679         }
1680         if (istatus.errorSignal) {
1681             if (istatus.errorSignal == SIGTERM)
1682                 printf("due to shutdown request\n");
1683             else
1684                 printf("due to signal %d\n", istatus.errorSignal);
1685         }
1686         else
1687             printf("by exiting with code %d\n", istatus.errorCode);
1688     }
1689     
1690     if (aint32p > 1) {
1691         /* try to display all the parms */
1692         for(i=0;;i++) {
1693             tp = buffer;
1694             code = BOZO_GetInstanceParm(aconn, aname, i, &tp);
1695             if (code) break;
1696             printf("    Command %d is '%s'\n", i+1, buffer);
1697         }
1698         tp = buffer;
1699         code = BOZO_GetInstanceParm(aconn, aname, 999, &tp);
1700         if (!code) {
1701             /* Any type of failure is treated as not having a notifier program */
1702             printf("    Notifier  is '%s'\n", buffer);
1703         }
1704         printf("\n");
1705     }
1706     return 0;
1707 }
1708
1709 #ifdef BOS_RESTRICTED_MODE
1710 static GetRestrict(as)
1711 struct cmd_syndesc *as; {
1712     register struct rx_connection *tconn;
1713     afs_int32 code, val;
1714     
1715     tconn = GetConn(as, 0);
1716     code = BOZO_GetRestrictedMode(tconn, &val);
1717     if (code) printf("bos: failed to get restricted mode (%s)\n", em(code));
1718     else printf("Restricted mode is %s\n", val ? "on" : "off");
1719     
1720     return 0;
1721 }
1722
1723 static SetRestrict(as)
1724 struct cmd_syndesc *as; {
1725     register struct rx_connection *tconn;
1726     afs_int32 code, val;
1727     
1728     tconn = GetConn(as, 0);
1729     util_GetInt32(as->parms[1].items->data, &val);
1730     code = BOZO_SetRestrictedMode(tconn, val);
1731     if (code) printf("bos: failed to set restricted mode (%s)\n", em(code));
1732     return 0;
1733 }
1734 #endif
1735
1736 static void add_std_args (ts)
1737   register struct cmd_syndesc *ts;
1738 {
1739     cmd_Seek(ts, ADDPARMOFFSET);
1740     /* + 0 */ cmd_AddParm(ts, "-cell", CMD_SINGLE, CMD_OPTIONAL, "cell name");
1741     /* + 1 */ cmd_AddParm(ts, "-noauth", CMD_FLAG, CMD_OPTIONAL,
1742                          "don't authenticate");
1743     /* + 2 */ cmd_AddParm (ts, "-localauth", CMD_FLAG, CMD_OPTIONAL,
1744                            "create tickets from KeyFile");
1745 }
1746   
1747 #include "AFS_component_version_number.c"
1748
1749 main(argc, argv)
1750   int argc;
1751   char **argv;
1752 {
1753     register afs_int32 code;
1754     register struct cmd_syndesc *ts;
1755     extern int afsconf_SawCell;
1756
1757 #ifdef  AFS_AIX32_ENV
1758     /*
1759      * The following signal action for AIX is necessary so that in case of a 
1760      * crash (i.e. core is generated) we can include the user's data section 
1761      * in the core dump. Unfortunately, by default, only a partial core is
1762      * generated which, in many cases, isn't too useful.
1763      */
1764     struct sigaction nsa;
1765     
1766     sigemptyset(&nsa.sa_mask);
1767     nsa.sa_handler = SIG_DFL;
1768     nsa.sa_flags = SA_FULLDUMP;
1769     sigaction(SIGSEGV, &nsa, NULL);
1770     sigaction(SIGABRT, &nsa, NULL);
1771 #endif
1772
1773     /* start up rx */
1774     code = rx_Init(0);
1775     if (code) {
1776         printf("bos: could not initialize rx (%s)\n", em(code));
1777         exit(1);
1778     }
1779
1780     /* To resolve a AFSCELL environment "Note: ..." problem: Because bos calls ka_Init (why?) before any
1781      * checkup on the existance of a "-cell" option on the particular bos command we don't print the
1782      * message if a cell is passed in. Luckily the rest of the programs don't call these adhoc routines
1783      * and things work fine. Note that if the "-cell" isn't passed then we're still ok since later on
1784      * the proper routine (afsconf_GetCellInfo) is going to be called to do the right thing.
1785      */
1786     afsconf_SawCell = 1;        /* Means don't print warning if AFSCELL is set */
1787     ka_Init(0);
1788     afsconf_SawCell = 0;        /* Reset it */
1789     /* don't check error code, since fails sometimes when we're setting up a
1790      * system */
1791     initialize_cmd_error_table();
1792     initialize_bz_error_table();
1793
1794     ts = cmd_CreateSyntax("start", StartServer, 0, "start running a server");
1795     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1796     cmd_AddParm(ts, "-instance", CMD_LIST, 0, "server process name");
1797     add_std_args (ts);
1798
1799     ts = cmd_CreateSyntax("stop", StopServer, 0, "halt a server instance");
1800     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1801     cmd_AddParm(ts, "-instance", CMD_LIST, 0, "server process name");
1802     cmd_Seek(ts, 8);
1803     cmd_AddParm(ts, "-wait", CMD_FLAG, CMD_OPTIONAL,
1804                 "wait for process to stop");
1805     add_std_args (ts);
1806     
1807     ts = cmd_CreateSyntax("status", StatServer, 0,
1808                           "show server instance status");
1809     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1810     cmd_AddParm(ts, "-instance", CMD_LIST, CMD_OPTIONAL,
1811                 "server process name");
1812     cmd_AddParm(ts, "-long", CMD_FLAG, CMD_OPTIONAL, "long status");
1813     add_std_args (ts);
1814
1815     ts = cmd_CreateSyntax("shutdown", Shutdown, 0, "shutdown all processes");
1816     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1817     cmd_AddParm(ts, "-instance", CMD_LIST, CMD_OPTIONAL, "instances");
1818     cmd_Seek(ts, 8);
1819     cmd_AddParm(ts, "-wait", CMD_FLAG, CMD_OPTIONAL,
1820                 "wait for process to stop");
1821     add_std_args (ts);
1822
1823     ts = cmd_CreateSyntax("startup", Startup, 0, "start all processes");
1824     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1825     cmd_AddParm(ts, "-instance", CMD_LIST, CMD_OPTIONAL, "instances");
1826     add_std_args (ts);
1827
1828     ts = cmd_CreateSyntax("restart", Restart, 0, "restart all processes");
1829     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1830     cmd_AddParm(ts, "-instance", CMD_LIST, CMD_OPTIONAL, "instances");
1831     cmd_AddParm(ts, "-bosserver", CMD_FLAG, CMD_OPTIONAL, "restart bosserver");
1832     cmd_AddParm(ts, "-all", CMD_FLAG, CMD_OPTIONAL, "restart all processes");
1833     add_std_args (ts);
1834
1835 #ifndef OPBOS
1836
1837     ts = cmd_CreateSyntax("create", CreateServer, 0,
1838                           "create a new server instance");
1839     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1840     cmd_AddParm(ts, "-instance", CMD_SINGLE, 0, "server process name");
1841     cmd_AddParm(ts, "-type", CMD_SINGLE, 0, "server type");
1842     cmd_AddParm(ts, "-cmd", CMD_LIST, 0, "command lines");
1843     cmd_AddParm(ts, "-notifier", CMD_SINGLE, CMD_OPTIONAL, "Notifier program");
1844     add_std_args (ts);
1845
1846     ts = cmd_CreateSyntax("delete", DeleteServer, 0,
1847                           "delete a server instance");
1848     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1849     cmd_AddParm(ts, "-instance", CMD_LIST, 0, "server process name");
1850     add_std_args (ts);
1851     
1852     ts = cmd_CreateSyntax("adduser", AddSUser, 0,
1853                           "add users to super-user list");
1854     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1855     cmd_AddParm(ts, "-user", CMD_LIST, 0, "user names");
1856     add_std_args (ts);
1857
1858     ts = cmd_CreateSyntax("removeuser", RemoveSUser, 0,
1859                           "remove users from super-user list");
1860     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1861     cmd_AddParm(ts, "-user", CMD_LIST, 0, "user names");
1862     add_std_args (ts);
1863
1864     ts = cmd_CreateSyntax("listusers", ListSUsers, 0, "list super-users");
1865     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1866     add_std_args (ts);
1867
1868     ts = cmd_CreateSyntax("addkey", AddKey, 0,
1869                            "add keys to key dbase (kvno 999 is bcrypt)");
1870     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1871     cmd_AddParm(ts, "-key", CMD_SINGLE, CMD_OPTIONAL, "key");
1872     cmd_AddParm(ts, "-kvno", CMD_SINGLE, 0, "key version number");
1873     add_std_args (ts);
1874
1875     ts = cmd_CreateSyntax("removekey", RemoveKey, 0,
1876                           "remove keys from key dbase");
1877     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1878     cmd_AddParm(ts, "-kvno", CMD_LIST, 0, "key version number");
1879     add_std_args (ts);
1880
1881     ts = cmd_CreateSyntax("listkeys", ListKeys, 0, "list keys");
1882     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1883     cmd_AddParm(ts, "-showkey", CMD_FLAG, CMD_OPTIONAL, "show the actual key rather than the checksum");
1884     add_std_args (ts);
1885
1886     ts = cmd_CreateSyntax("listhosts", ListHosts, 0, "get cell host list");
1887     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1888     add_std_args (ts);
1889     cmd_CreateAlias(ts, "getcell");
1890
1891     ts = cmd_CreateSyntax("setcellname", SetCellName, 0, "set cell name");
1892     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1893     cmd_AddParm(ts, "-name", CMD_SINGLE, 0, "cell name");
1894     add_std_args (ts);
1895
1896     ts = cmd_CreateSyntax("addhost", AddHost, 0, "add host to cell dbase");
1897     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1898     cmd_AddParm(ts, "-host", CMD_LIST, 0, "host name");
1899     cmd_AddParm(ts, "-clone", CMD_FLAG, CMD_OPTIONAL, "vote doesn't count");
1900     add_std_args (ts);
1901
1902     ts = cmd_CreateSyntax("removehost", RemoveHost, 0,
1903                           "remove host from cell dbase");
1904     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1905     cmd_AddParm(ts, "-host", CMD_LIST, 0, "host name");
1906     add_std_args (ts);
1907
1908     ts = cmd_CreateSyntax("setauth", SetAuth, 0,
1909                           "set authentication required flag");
1910     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1911     cmd_AddParm(ts, "-authrequired", CMD_SINGLE,
1912                 0, "on or off: authentication required for admin requests");
1913     add_std_args (ts);
1914     
1915     ts = cmd_CreateSyntax("install", Install, 0, "install program");
1916     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1917     cmd_AddParm(ts, "-file", CMD_LIST, 0, "files to install");
1918     cmd_AddParm(ts, "-dir", CMD_SINGLE, CMD_OPTIONAL, "destination dir");
1919     add_std_args (ts);
1920
1921     ts = cmd_CreateSyntax("uninstall", UnInstall, 0, "uninstall program");
1922     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1923     cmd_AddParm(ts, "-file", CMD_LIST, 0, "files to uninstall");
1924     cmd_AddParm(ts, "-dir", CMD_SINGLE, CMD_OPTIONAL, "destination dir");
1925     add_std_args (ts);
1926
1927     ts = cmd_CreateSyntax("getlog", GetLogCmd, 0, "examine log file");
1928     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1929     cmd_AddParm(ts, "-file", CMD_SINGLE, 0, "log file to examine");
1930     add_std_args (ts);
1931
1932     ts = cmd_CreateSyntax("getdate", GetDate, 0, "get dates for programs");
1933     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1934     cmd_AddParm(ts, "-file", CMD_LIST, 0, "files to check");
1935     cmd_AddParm(ts, "-dir", CMD_SINGLE, CMD_OPTIONAL, "destination dir");
1936     add_std_args (ts);
1937
1938     ts = cmd_CreateSyntax("exec", Exec, 0, "execute shell command on server");
1939     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1940     cmd_AddParm(ts, "-cmd", CMD_SINGLE, 0, "command to execute");
1941     add_std_args (ts);
1942
1943     ts = cmd_CreateSyntax("prune", Prune, 0, "prune server files");
1944     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1945     cmd_AddParm(ts, "-bak", CMD_FLAG, CMD_OPTIONAL, "delete .BAK files");
1946     cmd_AddParm(ts, "-old", CMD_FLAG, CMD_OPTIONAL, "delete .OLD files");
1947     cmd_AddParm(ts, "-core", CMD_FLAG, CMD_OPTIONAL, "delete core files");
1948     cmd_AddParm(ts, "-all", CMD_FLAG, CMD_OPTIONAL, "delete all junk files");
1949     add_std_args (ts);
1950
1951     ts = cmd_CreateSyntax("setrestart", SetRestartCmd, 0, "set restart times");
1952     cmd_AddParm(ts, "-server", CMD_SINGLE, CMD_REQUIRED, "machine name");
1953     cmd_AddParm(ts, "-time", CMD_SINGLE,
1954                 CMD_REQUIRED, "time to restart server");
1955     cmd_AddParm(ts, "-general", CMD_FLAG,
1956                 CMD_OPTIONAL, "set general restart time");
1957     cmd_AddParm(ts, "-newbinary", CMD_FLAG,
1958                 CMD_OPTIONAL, "set new binary restart time");
1959     add_std_args (ts);
1960
1961     ts = cmd_CreateSyntax("getrestart", GetRestartCmd, 0, "get restart times");
1962     cmd_AddParm(ts, "-server", CMD_SINGLE, CMD_REQUIRED, "machine name");
1963     add_std_args (ts);
1964
1965     ts = cmd_CreateSyntax("salvage", SalvageCmd, 0,
1966                           "salvage partition or volumes");
1967     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
1968     cmd_AddParm(ts, "-partition", CMD_SINGLE,
1969                 CMD_OPTIONAL, "salvage partition");
1970     cmd_AddParm(ts, "-volume", CMD_SINGLE,
1971                 CMD_OPTIONAL, "salvage volume number or volume name");
1972     cmd_AddParm(ts, "-file", CMD_SINGLE,
1973                 CMD_OPTIONAL, "salvage log output file");
1974     cmd_AddParm(ts, "-all", CMD_FLAG, CMD_OPTIONAL, "salvage whole server");
1975     cmd_AddParm(ts, "-showlog", CMD_FLAG, CMD_OPTIONAL, "display salvage log");
1976     cmd_AddParm(ts, "-parallel",CMD_SINGLE, CMD_OPTIONAL, 
1977                 "# of max parallel partition salvaging");
1978     cmd_AddParm(ts, "-tmpdir",CMD_SINGLE, CMD_OPTIONAL, 
1979                 "directory to place tmp files");
1980     cmd_AddParm(ts, "-orphans", CMD_SINGLE, CMD_OPTIONAL, 
1981                 "ignore | remove | attach");
1982     cmd_AddParm(ts, "-debug", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Run in Debugging mode");
1983     cmd_AddParm(ts, "-nowrite", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Run readonly/test mode");
1984     cmd_AddParm(ts, "-force", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Force full salvaging");
1985     cmd_AddParm(ts, "-oktozap", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Give permission to destroy bogus file residencies/volumes - debugging flag");
1986     cmd_AddParm(ts, "-rootfiles", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Show files owned by root - debugging flag");
1987     cmd_AddParm(ts, "-salvagedirs", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Force rebuild/salvage of all directories");
1988     cmd_AddParm(ts, "-blockreads", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Read smaller blocks to handle IO/bad blocks");
1989     cmd_AddParm(ts, "-ListResidencies", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Just list affected file residencies - debugging flag");
1990     cmd_AddParm(ts, "-SalvageRemote", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Salvage storage systems that are not directly attached");
1991     cmd_AddParm(ts, "-SalvageArchival", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Salvage HSM storage systems");
1992     cmd_AddParm(ts, "-IgnoreCheck", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Don't perform VLDB safety check when deleting unreferenced files.  Only a good idea in single server cell.");
1993     cmd_AddParm(ts, "-ForceOnLine", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Force the volume to come online, even if it hasn't salvaged cleanly.");
1994     cmd_AddParm(ts, "-UseRootDirACL", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Use the root directory ACL for lost+found directory if it is created.");
1995     cmd_AddParm(ts, "-TraceBadLinkCounts", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Print out lines about volume reference count changes.");
1996     cmd_AddParm(ts, "-DontAskFS", CMD_FLAG,CMD_OPTIONAL, "(MR-AFS) Don't ask fileserver to take volume offline.  THIS IS VERY DANGEROUS.");
1997     cmd_AddParm(ts, "-LogLevel", CMD_SINGLE, CMD_OPTIONAL, "(MR-AFS) log level");
1998     cmd_AddParm(ts, "-rxdebug", CMD_FLAG, CMD_OPTIONAL, "(MR-AFS) Write out rx debug information.");
1999     cmd_AddParm(ts, "-Residencies", CMD_SINGLE, CMD_OPTIONAL, "(MR-AFS) Numeric mask of residencies to be included in the salvage.  Do not use with -SalvageRemote or -SalvageArchival");
2000     add_std_args (ts);
2001
2002     ts = cmd_CreateSyntax("blockscanner", BlockScannerCmd, 0,
2003                           "block scanner daemon from making migration requests");
2004     cmd_AddParm(ts, "-server", CMD_SINGLE, CMD_REQUIRED, "machine name");
2005     add_std_args (ts);
2006
2007     ts = cmd_CreateSyntax("unblockscanner", UnBlockScannerCmd, 0,
2008                           "allow scanner daemon to make migration requests again");
2009     cmd_AddParm(ts, "-server", CMD_SINGLE, CMD_REQUIRED, "machine name");
2010     add_std_args (ts); 
2011
2012 #ifdef BOS_RESTRICTED_MODE
2013     ts = cmd_CreateSyntax("getrestricted", GetRestrict, 0, "get restrict mode");
2014     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
2015     add_std_args (ts);
2016
2017     ts = cmd_CreateSyntax("setrestricted", SetRestrict, 0, "set restrict mode");
2018     cmd_AddParm(ts, "-server", CMD_SINGLE, 0, "machine name");
2019     cmd_AddParm(ts, "-mode", CMD_SINGLE, 0, "mode to set");
2020     add_std_args (ts);
2021 #endif
2022 #endif
2023
2024     code = cmd_Dispatch(argc, argv);
2025     rx_Finalize();
2026     exit(code);
2027 }