BSD 4_3_Net_2 release
[unix-history] / usr / src / usr.bin / rdist / main.c
index e4bdf15..0422e17 100644 (file)
@@ -1,54 +1,84 @@
+/*
+ * Copyright (c) 1983 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
 #ifndef lint
 #ifndef lint
-static char *sccsid = "@(#)main.c      4.3 (Berkeley) 83/10/10";
-#endif
+char copyright[] =
+"@(#) Copyright (c) 1983 Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)main.c     5.6 (Berkeley) 8/27/90";
+#endif /* not lint */
 
 #include "defs.h"
 
 
 #include "defs.h"
 
+#define NHOSTS 100
+
 /*
  * Remote distribution program.
  */
 
 /*
  * Remote distribution program.
  */
 
-char   *distfile = "distfile";
-char   tmpfile[] = "/tmp/rdistAXXXXXX";
-char   *tmpname = &tmpfile[5];
-char   *tmpinc = &tmpfile[10];
+char   *distfile = NULL;
+#define _RDIST_TMP     "/rdistXXXXXX"
+char   tempfile[sizeof _PATH_TMP + sizeof _RDIST_TMP + 1];
+char   *tempname;
 
 int    debug;          /* debugging flag */
 int    nflag;          /* NOP flag, just print commands without executing */
 int    qflag;          /* Quiet. Don't print messages */
 
 int    debug;          /* debugging flag */
 int    nflag;          /* NOP flag, just print commands without executing */
 int    qflag;          /* Quiet. Don't print messages */
-int    vflag;          /* verify only */
-int    yflag;          /* update iff remote younger than master */
+int    options;        /* global options */
 int    iamremote;      /* act as remote server for transfering files */
 
 int    iamremote;      /* act as remote server for transfering files */
 
-int    filec;          /* number of files to update */
-char   **filev;        /* list of files/directories to update */
 FILE   *fin = NULL;    /* input file pointer */
 FILE   *fin = NULL;    /* input file pointer */
-int    rem = 0;        /* file descriptor to remote source/sink process */
+int    rem = -1;       /* file descriptor to remote source/sink process */
 char   host[32];       /* host name */
 char   host[32];       /* host name */
-int    errs;           /* number of errors while sending/receiving */
+int    nerrs;          /* number of errors while sending/receiving */
 char   user[10];       /* user's name */
 char   homedir[128];   /* user's home directory */
 int    userid;         /* user's user ID */
 int    groupid;        /* user's group ID */
 char   user[10];       /* user's name */
 char   homedir[128];   /* user's home directory */
 int    userid;         /* user's user ID */
 int    groupid;        /* user's group ID */
-int    iamupdate;
 
 
-int    cleanup();
-int    lostconn();
+struct passwd *pw;     /* pointer to static area used by getpwent */
+struct group *gr;      /* pointer to static area used by getgrent */
 
 main(argc, argv)
        int argc;
        char *argv[];
 {
        register char *arg;
 
 main(argc, argv)
        int argc;
        char *argv[];
 {
        register char *arg;
-       register struct passwd *pw;
-
-       arg = rindex(argv[0], '/');
-       if (arg == NULL)
-               arg = argv[0];
-       else
-               arg++;
-       if (!strcmp(arg, "update"))
-               iamupdate++;
+       int cmdargs = 0;
+       char *dhosts[NHOSTS], **hp = dhosts;
 
        pw = getpwuid(userid = getuid());
        if (pw == NULL) {
 
        pw = getpwuid(userid = getuid());
        if (pw == NULL) {
@@ -59,6 +89,12 @@ main(argc, argv)
        strcpy(homedir, pw->pw_dir);
        groupid = pw->pw_gid;
        gethostname(host, sizeof(host));
        strcpy(homedir, pw->pw_dir);
        groupid = pw->pw_gid;
        gethostname(host, sizeof(host));
+       strcpy(tempfile, _PATH_TMP);
+       strcat(tempfile, _RDIST_TMP);
+       if ((tempname = rindex(tempfile, '/')) != 0)
+               tempname++;
+       else
+               tempname = tempfile;
 
        while (--argc > 0) {
                if ((arg = *++argv)[0] != '-')
 
        while (--argc > 0) {
                if ((arg = *++argv)[0] != '-')
@@ -75,6 +111,16 @@ main(argc, argv)
                                        fin = stdin;
                                break;
 
                                        fin = stdin;
                                break;
 
+                       case 'm':
+                               if (--argc <= 0)
+                                       usage();
+                               if (hp >= &dhosts[NHOSTS-2]) {
+                                       fprintf(stderr, "rdist: too many destination hosts\n");
+                                       exit(1);
+                               }
+                               *hp++ = *++argv;
+                               break;
+
                        case 'd':
                                if (--argc <= 0)
                                        usage();
                        case 'd':
                                if (--argc <= 0)
                                        usage();
@@ -85,7 +131,15 @@ main(argc, argv)
                                debug++;
                                break;
 
                                debug++;
                                break;
 
+                       case 'c':
+                               cmdargs++;
+                               break;
+
                        case 'n':
                        case 'n':
+                               if (options & VERIFY) {
+                                       printf("rdist: -n overrides -v\n");
+                                       options &= ~VERIFY;
+                               }
                                nflag++;
                                break;
 
                                nflag++;
                                break;
 
@@ -93,136 +147,146 @@ main(argc, argv)
                                qflag++;
                                break;
 
                                qflag++;
                                break;
 
+                       case 'b':
+                               options |= COMPARE;
+                               break;
+
+                       case 'R':
+                               options |= REMOVE;
+                               break;
+
                        case 'v':
                        case 'v':
-                               vflag++;
+                               if (nflag) {
+                                       printf("rdist: -n overrides -v\n");
+                                       break;
+                               }
+                               options |= VERIFY;
+                               break;
+
+                       case 'w':
+                               options |= WHOLE;
                                break;
 
                        case 'y':
                                break;
 
                        case 'y':
-                               yflag++;
+                               options |= YOUNGER;
+                               break;
+
+                       case 'h':
+                               options |= FOLLOW;
+                               break;
+
+                       case 'i':
+                               options |= IGNLNKS;
                                break;
 
                        default:
                                usage();
                        }
        }
                                break;
 
                        default:
                                usage();
                        }
        }
+       *hp = NULL;
+
+       setreuid(0, userid);
+       mktemp(tempfile);
 
 
-       mktemp(tmpfile);
-       signal(SIGPIPE, lostconn);
        if (iamremote) {
                server();
        if (iamremote) {
                server();
-               exit(errs);
+               exit(nerrs != 0);
        }
 
        }
 
-       signal(SIGHUP, cleanup);
-       signal(SIGINT, cleanup);
-       signal(SIGQUIT, cleanup);
-       signal(SIGTERM, cleanup);
-
-       if (iamupdate)
-               doupdate(argc, argv);
+       if (cmdargs)
+               docmdargs(argc, argv);
        else {
        else {
-               filec = argc;
-               filev = argv;
-               if (fin == NULL && (fin = fopen(distfile, "r")) == NULL) {
-                       perror(distfile);
-                       exit(1);
+               if (fin == NULL) {
+                       if(distfile == NULL) {
+                               if((fin = fopen("distfile","r")) == NULL)
+                                       fin = fopen("Distfile", "r");
+                       } else
+                               fin = fopen(distfile, "r");
+                       if(fin == NULL) {
+                               perror(distfile ? distfile : "distfile");
+                               exit(1);
+                       }
                }
                yyparse();
                }
                yyparse();
+               if (nerrs == 0)
+                       docmds(dhosts, argc, argv);
        }
 
        }
 
-       exit(errs);
+       exit(nerrs != 0);
 }
 
 usage()
 {
 }
 
 usage()
 {
-       printf("Usage: rdist [-f distfile] [-d var=value] [-nqyD] [file ...]\n");
+       printf("Usage: rdist [-nqbhirvwyD] [-f distfile] [-d var=value] [-m host] [file ...]\n");
+       printf("or: rdist [-nqbhirvwyD] -c source [...] machine[:dest]\n");
        exit(1);
 }
 
 /*
  * rcp like interface for distributing files.
  */
        exit(1);
 }
 
 /*
  * rcp like interface for distributing files.
  */
-doupdate(nargs, args)
+docmdargs(nargs, args)
        int nargs;
        char *args[];
 {
        int nargs;
        char *args[];
 {
-       struct block *bp, *files, *hosts, *cmds, *prev;
+       register struct namelist *nl, *prev;
+       register char *cp;
+       struct namelist *files, *hosts;
+       struct subcmd *cmds;
+       char *dest;
+       static struct namelist tnl = { NULL, NULL };
        int i;
        int i;
-       char *pos, dest[BUFSIZ];
 
        if (nargs < 2)
 
        if (nargs < 2)
-               upusage();
+               usage();
 
        prev = NULL;
 
        prev = NULL;
-       bp = files = ALLOC(block);
-       for (i = 0; i < nargs - 1; bp = ALLOC(block), i++) {
-               bp->b_type = NAME;
-               bp->b_name = args[i];
-               if (prev != NULL)
-                       prev->b_next = bp;
-               bp->b_next = bp->b_args = NULL;
-               prev = bp;
+       for (i = 0; i < nargs - 1; i++) {
+               nl = makenl(args[i]);
+               if (prev == NULL)
+                       files = prev = nl;
+               else {
+                       prev->n_next = nl;
+                       prev = nl;
+               }
        }
 
        }
 
-       hosts = ALLOC(block);
-       hosts->b_type = NAME;
-       hosts->b_name = args[i];
-       hosts->b_name = args[i];
-       hosts->b_next = hosts->b_args = NULL;
-       if ((pos = index(hosts->b_name, ':')) != NULL) {
-               *pos++ = '\0';
-               strcpy(dest, pos);
-       } else
-               dest[0] = '\0';
-
-       hosts = expand(hosts, 0);
+       cp = args[i];
+       if ((dest = index(cp, ':')) != NULL)
+               *dest++ = '\0';
+       tnl.n_name = cp;
+       hosts = expand(&tnl, E_ALL);
+       if (nerrs)
+               exit(1);
 
 
-       if (dest[0] == '\0')
+       if (dest == NULL || *dest == '\0')
                cmds = NULL;
        else {
                cmds = NULL;
        else {
-               cmds = ALLOC(block);
-               if (vflag)
-                       cmds->b_type = VERIFY;
-               else
-                       cmds->b_type = INSTALL;
-               cmds->b_name = dest;
-               cmds->b_next = cmds->b_args = NULL;
+               cmds = makesubcmd(INSTALL);
+               cmds->sc_options = options;
+               cmds->sc_name = dest;
        }
 
        if (debug) {
        }
 
        if (debug) {
-               printf("doupdate()\nfiles = ");
+               printf("docmdargs()\nfiles = ");
                prnames(files);
                printf("hosts = ");
                prnames(hosts);
        }
                prnames(files);
                printf("hosts = ");
                prnames(hosts);
        }
-       dohcmds(files, hosts, cmds);
-}
-
-upusage()
-{
-       printf("Usage: update [-nqyD] source [...] machine[:dest]\n");
-       exit(1);
-}
-
-/*
- * Remove temporary files and do any cleanup operations before exiting.
- */
-cleanup()
-{
-       (void) unlink(tmpfile);
-       exit(1);
+       insert(NULL, files, hosts, cmds);
+       docmds(NULL, 0, NULL);
 }
 
 /*
  * Print a list of NAME blocks (mostly for debugging).
  */
 }
 
 /*
  * Print a list of NAME blocks (mostly for debugging).
  */
-prnames(bp)
-       register struct block *bp;
+prnames(nl)
+       register struct namelist *nl;
 {
        printf("( ");
 {
        printf("( ");
-       while (bp != NULL) {
-               printf("%s ", bp->b_name);
-               bp = bp->b_next;
+       while (nl != NULL) {
+               printf("%s ", nl->n_name);
+               nl = nl->n_next;
        }
        printf(")\n");
 }
        }
        printf(")\n");
 }