projects / unix-history / blobdiff
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Heavily revised version of slattach from combined work of many people,
[unix-history] / sbin / slattach / slattach.c
diff --git a/sbin/slattach/slattach.c b/sbin/slattach/slattach.c
index cd3e43c..7bd76bd 100644 (file)
--- a/sbin/slattach/slattach.c
+++ b/sbin/slattach/slattach.c
@@ -35,20 +35,41 @@
  */
 
 /*
  */
 
 /*
-** Hacks to support "-a|c|n" flags on the command line which enalbe VJ
-** header compresion and disable ICMP.  I use getopt to deal witht that
-** stuff because I'm a lazy sob, I can't spell, and that's OK.
-**
-** If this is good all rights go to B & L Jolitz, otherwise send your
-** comments to Reagan (/dev/null).
-**
-** nerd@percival.rain.com (Michael Galassi) 92.09.03
-**
-** Hacked to change from sgtty to POSIX termio style serial line control
-** and added flag to enable cts/rts style flow control.
-**
-** blymn@awadi.com.au (Brett Lymn) 93.04.04
-*/
+ * Hacks to support "-a|c|n" flags on the command line which enable VJ
+ * header compresion and disable ICMP.
+ * If this is good all rights go to B & L Jolitz, otherwise send your
+ * comments to Reagan (/dev/null).
+ *
+ * nerd@percival.rain.com (Michael Galassi) 92.09.03
+ *
+ * Hacked to change from sgtty to POSIX termio style serial line control
+ * and added flag to enable cts/rts style flow control.
+ *
+ * blymn@awadi.com.au (Brett Lymn) 93.04.04
+ *
+ * Put slattach in it's own process group so it can't be killed
+ * accidentally. Close the connection on SIGHUP and SIGINT. Write a
+ * syslog entry upon opening and closing the connection.  Rich Murphey
+ * and Brad Huntting.
+ *
+ * Add '-r command' option: runs 'command' upon recieving SIGHUP
+ * resulting from loss of carrier.  Log any errors after forking.
+ * Rich 8/13/93
+ *
+ * This version of slattach includes many changes by David Greenman, Brian
+ * Smith, Chris Bradley, and me (Michael Galassi).  None of them are
+ * represented as functional anywhere outside of RAINet though they do work
+ * for us.  Documentation is limited to the usage message for now.  If you
+ * make improovments please pass them back.
+ *
+ * Added '-u UCMD' which runs 'UCMD <old> <new>' whenever the slip
+ * unit number changes where <old> and <new> are the old and new unit
+ * numbers, respectively.  Also added the '-z' option which forces
+ * invocation of the redial command (-r CMD) upon startup regardless
+ * of whether the com driver claims (sometimes mistakenly) that
+ * carrier is present. Also added '-e ECMD' which runs ECMD before
+ * exiting.
+ */
 
 #ifndef lint
 char copyright[] =
 
 #ifndef lint
 char copyright[] =
@@ -58,7 +79,7 @@ char copyright[] =
 
 #ifndef lint
 static char sccsid[] = "@(#)slattach.c 4.6 (Berkeley) 6/1/90";
 
 #ifndef lint
 static char sccsid[] = "@(#)slattach.c 4.6 (Berkeley) 6/1/90";
-static char rcsid[] = "$Header: /a/cvs/386BSD/src/sbin/slattach/slattach.c,v 1.2 1993/07/06 16:46:02 jkh Exp $";
+static char rcsid[] = "$Header: /etc/home/slattach2/RCS/slattach.c,v 1.4 1993/08/27 22:10:25 root Exp root $";
 #endif /* not lint */
 
 #include <sys/param.h>
 #endif /* not lint */
 
 #include <sys/param.h>
@@ -70,35 +91,65 @@ static char rcsid[] = "$Header: /a/cvs/386BSD/src/sbin/slattach/slattach.c,v 1.2
 #include <net/if_slvar.h>
 #include <netdb.h>
 #include <fcntl.h>
 #include <net/if_slvar.h>
 #include <netdb.h>
 #include <fcntl.h>
+#include <stdlib.h>
 #include <stdio.h>
 #include <stdio.h>
+#include <unistd.h>
 #include <paths.h>
 #include <paths.h>
+#include <syslog.h>
+#include <signal.h>
+#include <strings.h>
+#define MSR_DCD 0x80
+
+extern int errno;
+extern char *sys_errlist[];
 
 #define DEFAULT_BAUD   9600
 
 
 #define DEFAULT_BAUD   9600
 
+void   sighup_handler();       /* SIGHUP handler */
+void   sigint_handler();       /* SIGINT handler */
+void   exit_handler(int ret);  /* run exit_cmd iff specified upon exit. */
+void   setup_line();           /* configure slip line */
+void   attach_line();          /* switch to slip line discipline */
+
+int    fd = -1;
+char   *dev = (char *)0;
+int    slipdisc = SLIPDISC;
+int    ttydisc = TTYDISC;
+int    flow_control = 0;       /* non-zero to enable hardware flow control. */
+int    redial_on_startup = 0;  /* iff non-zero execute redial_cmd on startup */
+int    speed = DEFAULT_BAUD;
+int    slflags = 0;            /* compression flags */
+int    unit = -1;              /* slip device unit number */
+FILE   *console;
+
+char   devname[32];
+char   hostname[MAXHOSTNAMELEN];
+char   *redial_cmd = 0;        /* command to exec upon shutdown. */
+char   *config_cmd = 0;        /* command to exec if slip unit changes. */
+char   *exit_cmd = 0;          /* command to exec before exiting. */
+char   string[100];
+
 static char usage_str[] = "\
 static char usage_str[] = "\
-usage: %s [-a ][-c ][-n ][-s <speed> ]<device>\n\
-       -a -- autoenable VJ compression\n\
-       -c -- enable VJ compression\n\
-       -n -- throw out ICMP packets\n\
-       -h -- turn on cts/rts style flow control\n\
-       -s -- baud rate (default 9600)\n";
+usage: %s [-a ][-c ][-d ][-e <command> ][-n ][-s <speed> ]<device>\n\
+       -a      -- autoenable VJ compression\n\
+       -c      -- enable VJ compression\n\
+       -e ECMD -- execute ECMD before exiting\n\
+       -h      -- turn on cts/rts style flow control\n\
+       -n      -- throw out ICMP packets\n\
+       -r RCMD -- execute RCMD upon loss of carrier\n\
+       -s #    -- set baud rate (default 9600)\n\
+       -u UCMD -- execute 'UCMD <old> <new>' if slip unit number changes\n\
+       -z      -- execute RCMD upon startup irrespective of carrier\n";
 
 int main(int argc, char **argv)
 {
 
 int main(int argc, char **argv)
 {
-       struct termios tty;
        int option;
        int option;
-       int fd;
-       char devname[32];
-       char *dev = (char *)0;
-       int slipdisc = SLIPDISC;
-       int speed = DEFAULT_BAUD;
-       int slflags = 0;
-       int flow_control = 0;   /* extra flags to enable hardware flow cont. */
-
+       int comstate;
+       char name[32];
        extern char *optarg;
        extern int optind;
 
        extern char *optarg;
        extern int optind;
 
-       while ((option = getopt(argc, argv, "achns:")) != EOF) {
+       while ((option = getopt(argc, argv, "ace:hnr:s:u:z")) != EOF) {
                switch (option) {
                case 'a':
                        slflags |= SC_AUTOCOMP;
                switch (option) {
                case 'a':
                        slflags |= SC_AUTOCOMP;
@@ -108,19 +159,31 @@ int main(int argc, char **argv)
                        slflags |= SC_COMPRESS;
                        slflags &= ~SC_AUTOCOMP;
                        break;
                        slflags |= SC_COMPRESS;
                        slflags &= ~SC_AUTOCOMP;
                        break;
+               case 'e':
+                       exit_cmd = (char*) strdup (optarg);
+                       break;
                case 'h':
                        flow_control |= CRTSCTS;
                        break;
                case 'n':
                        slflags |= SC_NOICMP;
                        break;
                case 'h':
                        flow_control |= CRTSCTS;
                        break;
                case 'n':
                        slflags |= SC_NOICMP;
                        break;
+               case 'r':
+                       redial_cmd = (char*) strdup (optarg);
+                       break;
                case 's':
                        speed = atoi(optarg);
                        break;
                case 's':
                        speed = atoi(optarg);
                        break;
+               case 'u':
+                       config_cmd = (char*) strdup (optarg);
+                       break;
+               case 'z':
+                       redial_on_startup = 1;
+                       break;
                case '?':
                default:
                        fprintf(stderr, usage_str, argv[0]);
                case '?':
                default:
                        fprintf(stderr, usage_str, argv[0]);
-                       exit(1);
+                       exit_handler(1);
                }
        }
 
                }
        }
 
@@ -130,14 +193,8 @@ int main(int argc, char **argv)
 
        if (dev == (char *)0) {
                fprintf(stderr, usage_str, argv[0]);
 
        if (dev == (char *)0) {
                fprintf(stderr, usage_str, argv[0]);
-               exit(2);
+               exit_handler(2);
        }
        }
-
-       if ((speed = findspeed(speed)) == 0) {
-               fprintf(stderr, "unknown speed");
-               exit(1);
-       }
-
        if (strncmp(_PATH_DEV, dev, sizeof(_PATH_DEV) - 1)) {
                strcpy(devname, _PATH_DEV);
                strcat(devname, "/");
        if (strncmp(_PATH_DEV, dev, sizeof(_PATH_DEV) - 1)) {
                strcpy(devname, _PATH_DEV);
                strcat(devname, "/");
@@ -145,118 +202,152 @@ int main(int argc, char **argv)
                dev = devname;
        }
 
                dev = devname;
        }
 
-       if ((fd = open(dev, O_RDWR | O_NDELAY)) < 0) {
-               perror(dev);
-               exit(1);
+       daemon(0,0);            /* fork, setsid, chdir /, and close std*. */
+
+       /* Note: daemon() closes stderr, so log errors from here on. */
+       (void)sprintf(name,"slattach[%d]", getpid());
+       openlog(name,LOG_CONS,LOG_DAEMON);
+
+       if ((fd = open(dev, O_RDWR | O_NONBLOCK)) < 0) {
+                syslog(LOG_ERR, "open(%s): %m", dev);
+               exit_handler(1);
        }
        }
+       /* acquire the serial line as a controling terminal. */
+       if (ioctl(fd, TIOCSCTTY, 0) < 0)
+               syslog(LOG_NOTICE,"ioctl(TIOCSCTTY) failed: %s\n",
+                      strerror(errno));
+       /* Make us the foreground process group associated with the
+          slip line which is our controlling terminal. */
+       if (tcsetpgrp(fd, getpid()) < 0)
+               syslog(LOG_NOTICE,"tcsetpgrp failed: %s\n",
+                      strerror(errno));
+       /* upon INT log a timestamp and exit.  */
+       if ((int)signal(SIGINT,sigint_handler) < 0)
+               syslog(LOG_NOTICE,"cannot install SIGINT handler: %s\n",
+                      strerror(errno));
+       /* upon HUP redial and reconnect.  */
+       if ((int)signal(SIGHUP,sighup_handler) < 0)
+               syslog(LOG_NOTICE,"cannot install SIGHUP handler: %s\n",
+                      strerror(errno));
 
 
-       tty.c_iflag = 0;
-       tty.c_oflag = 0;
-       tty.c_cflag = CREAD | CS8 | flow_control;
-       tty.c_lflag = 0;
-       tty.c_cc[VMIN] = 1; /* wait for one char */
-       tty.c_cc[VTIME] = 0; /* wait forever for a char */
-       if (ioctl(fd, TIOCSETA, &tty) < 0) {
-               perror("ioctl(TIOCSETA)");
-               close(fd);
-               exit(1);
+       setup_line();
+
+       if (redial_on_startup)
+               sighup_handler();
+       else
+               attach_line();
+
+       ioctl(fd, TIOCMGET, &comstate);
+       if (!(comstate & MSR_DCD)) { /* check for carrier */
+               kill (getpid(), SIGHUP); /* force a redial if no carrier */
        }
        }
+       for (;;)
+               sigsuspend(0L);
+}
+
+void setup_line()
+{
+       struct termios tty;
 
 
+       tty.c_lflag = tty.c_iflag = tty.c_oflag = 0;
+       tty.c_cflag = CREAD | CS8 | flow_control;
+       tty.c_ispeed = tty.c_ospeed = speed;
+       /* set the line speed and flow control */
+       if (tcsetattr(fd, TCSAFLUSH, &tty) < 0) {
+                syslog(LOG_ERR, "tcsetattr(TCSAFLUSH): %m");
+               exit_handler(1);
+       }
+       /* set data terminal ready */
        if (ioctl(fd, TIOCSDTR) < 0) {
                 perror("ioctl(TIOCSDTR)");
                 close(fd);
        if (ioctl(fd, TIOCSDTR) < 0) {
                 perror("ioctl(TIOCSDTR)");
                 close(fd);
-                exit(1);
+                exit_handler(1);
         }
         }
-
-       cfsetispeed(&tty, speed);
-       cfsetospeed(&tty, speed);
-       if (tcsetattr(fd, TCSADRAIN, &tty) < 0) {
-               perror("tcsetattr");
-               close(fd);
-               exit(1);
-       }
-
+       /* Switch to slip line discipline. */
        if (ioctl(fd, TIOCSETD, &slipdisc) < 0) {
        if (ioctl(fd, TIOCSETD, &slipdisc) < 0) {
-               perror("ioctl(TIOCSETD)");
-               close(fd);
-               exit(1);
+                syslog(LOG_ERR, "ioctl(TIOCSETD): %m");
+               exit_handler(1);
        }
        }
-
+       /* Assert any compression or no-icmp flags. */
        if (ioctl(fd, SLIOCSFLAGS, &slflags) < 0) {
        if (ioctl(fd, SLIOCSFLAGS, &slflags) < 0) {
-               perror("ioctl(SLIOCSFLAGS)");
-               close(fd);
-               exit(1);
+                syslog(LOG_ERR, "ioctl(SLIOCSFLAGS): %m");
+               exit_handler(1);
        }
        }
-
-       daemon(0, 1);
-
-       for (;;)
-               sigpause(0L);
 }
 
 }
 
-struct sg_spds {
-       int sp_val, sp_name;
-}       spds[] = {
-#ifdef B50
-       { 50, B50 },
-#endif
-#ifdef B75
-       { 75, B75 },
-#endif
-#ifdef B110
-       { 110, B110 },
-#endif
-#ifdef B150
-       { 150, B150 },
-#endif
-#ifdef B200
-       { 200, B200 },
-#endif
-#ifdef B300
-       { 300, B300 },
-#endif
-#ifdef B600
-       { 600, B600 },
-#endif
-#ifdef B1200
-       { 1200, B1200 },
-#endif
-#ifdef B1800
-       { 1800, B1800 },
-#endif
-#ifdef B2000
-       { 2000, B2000 },
-#endif
-#ifdef B2400
-       { 2400, B2400 },
-#endif
-#ifdef B3600
-       { 3600, B3600 },
-#endif
-#ifdef B4800
-       { 4800, B4800 },
-#endif
-#ifdef B7200
-       { 7200, B7200 },
-#endif
-#ifdef B9600
-       { 9600, B9600 },
-#endif
-#ifdef EXTA
-       { 19200, EXTA },
-#endif
-#ifdef EXTB
-       { 38400, EXTB },
-#endif
-       { 0, 0 }
-};
-
-int findspeed(int speed)
+/* switch to slip line discipline and configure the network. */
+void attach_line()
 {
 {
-       struct sg_spds *sp = spds;
+       int new_unit;
 
 
-       while ((sp->sp_val != 0) && (sp->sp_val != speed))
-               sp++;
+       /* find out what unit number we were assigned */
+        if (ioctl(fd, SLIOCGUNIT, (caddr_t)&new_unit) < 0) {
+                syslog(LOG_ERR, "ioctl(SLIOCGUNIT): %m");
+                exit_handler(1);
+        }
+       /* don't compare unit numbers if this is the first time to attach. */
+       if (unit < 0)
+               unit = new_unit;
+       /* iff the unit number changes either invoke config_cmd or punt. */
+       if (config_cmd) {
+               char *s;
+               if (new_unit != unit) {
+                       syslog(LOG_ERR, "slip unit changed from sl%d to sl%d, but no -u CMD was specified!");
+                       exit_handler(1);
+               }
+               s = (char*) malloc(strlen(config_cmd) + 32);
+               sprintf (s, "%s %d %d", config_cmd, unit, new_unit);
+               syslog(LOG_NOTICE,"configuring sl%d, invoking: %s",
+                      unit, s);
+               system(s);
+               free (s);
+               unit = new_unit;
+       }
+       syslog(LOG_NOTICE,"sl%d connected to %s at %d b/s\n",unit,dev,speed);
+}
 
 
-       return (sp->sp_name);
+/* Signal handler for SIGHUP when carrier is dropped. */
+void sighup_handler()
+{
+       /* reset discipline */
+       if (ioctl(fd, TIOCSETD, &ttydisc) < 0) {
+               syslog(LOG_ERR, "ioctl(TIOCSETD): %m");
+               exit_handler(1);
+       }
+       /* invoke a shell for redial_cmd or punt. */
+       if (redial_cmd) {
+               syslog(LOG_NOTICE,"sl%d caught SIGHUP on %s, running %s",
+                      unit,dev,redial_cmd);
+               system(redial_cmd);
+       } else {
+               syslog(LOG_NOTICE,"No redial phone number or command. aborting.\n",dev);
+               exit_handler(0);
+       }
+       setup_line();
+       attach_line();
 }
 }
+/* Signal handler for SIGINT.  We just log and exit. */
+void sigint_handler()
+{
+       syslog(LOG_NOTICE,"sl%d on %s caught SIGINT, exiting.\n",unit,dev);
+       exit_handler(0);
+}
+/* Run config_cmd if specified before exiting. */
+void exit_handler(int ret)
+{
+       /* invoke a shell for exit_cmd. */
+       if (exit_cmd) {
+               syslog(LOG_NOTICE,"exiting after running %s", exit_cmd);
+               system(exit_cmd);
+       }
+       exit(ret);
+}
+
+/* local variables: */
+/* c-indent-level: 8 */
+/* c-argdecl-indent: 0 */
+/* c-label-offset: -8 */
+/* c-continued-statement-offset: 8 */
+/* c-brace-offset: 0 */
+/* comment-column: 32 */
+/* end: */
Continuous source code history from original PDP-7 UNIX to FreeBSD 2, the first fully unencumbered FreeBSD release.