old DLPI doesn't have dl_sap_length
[ppp.git] / pppd / main.c
index 1c72a8c5dcb30cfbb8657106e309b9b2f048bfcf..d278b071d95b3bbc40f13423de2e6db26db8a6bd 100644 (file)
@@ -18,7 +18,7 @@
  */
 
 #ifndef lint
-static char rcsid[] = "$Id: main.c,v 1.22 1995/05/01 01:44:30 paulus Exp $";
+static char rcsid[] = "$Id: main.c,v 1.28 1995/10/27 03:41:01 paulus Exp $";
 #endif
 
 #include <stdio.h>
@@ -77,37 +77,32 @@ int phase;                  /* where the link is at */
 int kill_link;
 int open_ccp_flag;
 
-static int initfdflags = -1;   /* Initial file descriptor flags */
-
 u_char outpacket_buf[PPP_MRU+PPP_HDRLEN]; /* buffer for outgoing packet */
 static u_char inpacket_buf[PPP_MRU+PPP_HDRLEN]; /* buffer for incoming packet */
 
 int hungup;                    /* terminal has been hung up */
 static int n_children;         /* # child processes still running */
 
-int baud_rate;
+int baud_rate;                 /* Actual bits/second for serial device */
+
+char *no_ppp_msg = "Sorry - this system lacks PPP kernel support\n";
+
+/* Prototypes for procedures local to this file. */
 
-/* prototypes */
+static void cleanup __P((void));
+static void close_fd __P((void));
+static void get_input __P((void));
+static void calltimeout __P((void));
+static struct timeval *timeleft __P((struct timeval *));
 static void hup __P((int));
 static void term __P((int));
 static void chld __P((int));
 static void toggle_debug __P((int));
 static void open_ccp __P((int));
-
-static void get_input __P((void));
-void establish_ppp __P((void));
-void calltimeout __P((void));
-struct timeval *timeleft __P((struct timeval *));
-void reap_kids __P((void));
-void cleanup __P((int, caddr_t));
-void close_fd __P((void));
-void die __P((int));
-void novm __P((char *));
-
-void log_packet __P((u_char *, int, char *));
-void format_packet __P((u_char *, int,
-                          void (*) (void *, char *, ...), void *));
-void pr_log __P((void *, char *, ...));
+static void bad_signal __P((int));
+static int device_script __P((char *, int, int));
+static void reap_kids __P((void));
+static void pr_log __P((void *, char *, ...));
 
 extern char    *ttyname __P((int));
 extern char    *getlogin __P((void));
@@ -148,7 +143,7 @@ main(argc, argv)
     int argc;
     char *argv[];
 {
-    int i, nonblock;
+    int i, nonblock, fdflags;
     struct sigaction sa;
     struct cmd *cmdp;
     FILE *pidfile;
@@ -171,7 +166,7 @@ main(argc, argv)
     uid = getuid();
 
     if (!ppp_available()) {
-       fprintf(stderr, "Sorry - PPP is not available on this system\n");
+       fprintf(stderr, no_ppp_msg);
        exit(1);
     }
 
@@ -252,8 +247,47 @@ main(argc, argv)
     SIGNAL(SIGTERM, term);             /* Terminate */
     SIGNAL(SIGCHLD, chld);
 
-    signal(SIGUSR1, toggle_debug);     /* Toggle debug flag */
-    signal(SIGUSR2, open_ccp);         /* Reopen CCP */
+    SIGNAL(SIGUSR1, toggle_debug);     /* Toggle debug flag */
+    SIGNAL(SIGUSR2, open_ccp);         /* Reopen CCP */
+
+    /*
+     * Install a handler for other signals which would otherwise
+     * cause pppd to exit without cleaning up.
+     */
+    SIGNAL(SIGABRT, bad_signal);
+    SIGNAL(SIGALRM, bad_signal);
+    SIGNAL(SIGFPE, bad_signal);
+    SIGNAL(SIGILL, bad_signal);
+    SIGNAL(SIGPIPE, bad_signal);
+    SIGNAL(SIGQUIT, bad_signal);
+    SIGNAL(SIGSEGV, bad_signal);
+#ifdef SIGBUS
+    SIGNAL(SIGBUS, bad_signal);
+#endif
+#ifdef SIGEMT
+    SIGNAL(SIGEMT, bad_signal);
+#endif
+#ifdef SIGPOLL
+    SIGNAL(SIGPOLL, bad_signal);
+#endif
+#ifdef SIGPROF
+    SIGNAL(SIGPROF, bad_signal);
+#endif
+#ifdef SIGSYS
+    SIGNAL(SIGSYS, bad_signal);
+#endif
+#ifdef SIGTRAP
+    SIGNAL(SIGTRAP, bad_signal);
+#endif
+#ifdef SIGVTALRM
+    SIGNAL(SIGVTALRM, bad_signal);
+#endif
+#ifdef SIGXCPU
+    SIGNAL(SIGXCPU, bad_signal);
+#endif
+#ifdef SIGXFSZ
+    SIGNAL(SIGXFSZ, bad_signal);
+#endif
 
     /*
      * Lock the device if we've been asked to.
@@ -275,13 +309,11 @@ main(argc, argv)
            syslog(LOG_ERR, "Failed to open %s: %m", devnam);
            die(1);
        }
-       if ((initfdflags = fcntl(fd, F_GETFL)) == -1) {
-           syslog(LOG_ERR, "Couldn't get device fd flags: %m");
-           die(1);
-       }
        if (nonblock) {
-           initfdflags &= ~O_NONBLOCK;
-           fcntl(fd, F_SETFL, initfdflags);
+           if ((fdflags = fcntl(fd, F_GETFL)) == -1
+               || fcntl(fd, F_SETFL, fdflags & ~O_NONBLOCK) < 0)
+               syslog(LOG_WARNING,
+                      "Couldn't reset non-blocking mode on device: %m");
        }
        hungup = 0;
        kill_link = 0;
@@ -306,10 +338,10 @@ main(argc, argv)
                die(1);
            }
 
-           syslog(LOG_INFO, "Connected...");
+           syslog(LOG_INFO, "Serial connection established.");
            sleep(1);           /* give it time to set up its terminal */
        }
-  
+
        /* set line speed, flow control, etc.; clear CLOCAL if modem option */
        set_up_tty(fd, 0);
 
@@ -329,14 +361,6 @@ main(argc, argv)
            pidfilename[0] = 0;
        }
 
-       /*
-        * Set device for non-blocking reads.
-        */
-       if (fcntl(fd, F_SETFL, initfdflags | O_NONBLOCK) == -1) {
-           syslog(LOG_ERR, "Couldn't set device to non-blocking mode: %m");
-           die(1);
-       }
-  
        /*
         * Block all signals, start opening the connection, and wait for
         * incoming events (reply, timeout, etc.).
@@ -347,6 +371,7 @@ main(argc, argv)
        for (phase = PHASE_ESTABLISH; phase != PHASE_DEAD; ) {
            wait_input(timeleft(&timo));
            calltimeout();
+           get_input();
            if (kill_link) {
                lcp_close(0);
                kill_link = 0;
@@ -358,25 +383,21 @@ main(argc, argv)
                }
                open_ccp_flag = 0;
            }
-           get_input();
            reap_kids();        /* Don't leave dead kids lying around */
        }
 
        /*
         * Run disconnector script, if requested.
-        * First we need to reset non-blocking mode.
+        * XXX we may not be able to do this if the line has hung up!
         */
-       if (initfdflags != -1 && fcntl(fd, F_SETFL, initfdflags) >= 0)
-           initfdflags = -1;
        disestablish_ppp();
        if (disconnector) {
            set_up_tty(fd, 1);
            if (device_script(disconnector, fd, fd) < 0) {
                syslog(LOG_WARNING, "disconnect script failed");
-               die(1);
+           } else {
+               syslog(LOG_INFO, "Serial link disconnected.");
            }
-
-           syslog(LOG_INFO, "Disconnected...");
        }
 
        close_fd();
@@ -386,10 +407,7 @@ main(argc, argv)
 
     } while (persist);
 
-    if (lockflag && !default_device)
-       unlock();
-
-    exit(0);
+    die(0);
 }
 
 
@@ -410,10 +428,10 @@ get_input()
        return;
 
     if (len == 0) {
-       MAINDEBUG((LOG_DEBUG, "End of file on fd!"));
+       syslog(LOG_NOTICE, "Modem hangup");
        hungup = 1;
        lcp_lowerdown(0);       /* serial link is no longer available */
-       phase = PHASE_DEAD;
+       link_terminated(0);
        return;
     }
 
@@ -441,21 +459,21 @@ get_input()
     /*
      * Upcall the proper protocol input routine.
      */
-    for (i = 0; i < sizeof (prottbl) / sizeof (struct protent); i++)
+    for (i = 0; i < sizeof (prottbl) / sizeof (struct protent); i++) {
        if (prottbl[i].protocol == protocol) {
            (*prottbl[i].input)(0, p, len);
-           break;
-       } else if (protocol == (prottbl[i].protocol & ~0x8000)
-                  && prottbl[i].datainput != NULL) {
+           return;
+       }
+        if (protocol == (prottbl[i].protocol & ~0x8000)
+           && prottbl[i].datainput != NULL) {
            (*prottbl[i].datainput)(0, p, len);
-           break;
+           return;
        }
-
-    if (i == sizeof (prottbl) / sizeof (struct protent)) {
-       if (debug)
-           syslog(LOG_WARNING, "Unknown protocol (0x%x) received", protocol);
-       lcp_sprotrej(0, p - PPP_HDRLEN, len + PPP_HDRLEN);
     }
+
+    if (debug)
+       syslog(LOG_WARNING, "Unknown protocol (0x%x) received", protocol);
+    lcp_sprotrej(0, p - PPP_HDRLEN, len + PPP_HDRLEN);
 }
 
 
@@ -478,19 +496,18 @@ demuxprotrej(unit, protocol)
            return;
        }
 
-    syslog(LOG_WARNING,
-          "demuxprotrej: Unrecognized Protocol-Reject for protocol 0x%x",
+    syslog(LOG_WARNING, "Unrecognized Protocol-Reject for protocol 0x%x",
           protocol);
 }
 
 
 /*
- * quit - Clean up state and exit.
+ * quit - Clean up state and exit (with an error indication).
  */
 void 
 quit()
 {
-    die(0);
+    die(1);
 }
 
 /*
@@ -500,7 +517,7 @@ void
 die(status)
     int status;
 {
-    cleanup(0, NULL);
+    cleanup();
     syslog(LOG_INFO, "Exit.");
     exit(status);
 }
@@ -509,11 +526,11 @@ die(status)
  * cleanup - restore anything which needs to be restored before we exit
  */
 /* ARGSUSED */
-void
-cleanup(status, arg)
-    int status;
-    caddr_t arg;
+static void
+cleanup()
 {
+    sys_cleanup();
+
     if (fd >= 0)
        close_fd();
 
@@ -528,19 +545,15 @@ cleanup(status, arg)
 /*
  * close_fd - restore the terminal device and close it.
  */
-void
+static void
 close_fd()
 {
+    disestablish_ppp();
+
     /* drop dtr to hang up */
     if (modem)
        setdtr(fd, FALSE);
 
-    if (initfdflags != -1 && fcntl(fd, F_SETFL, initfdflags) < 0)
-       syslog(LOG_WARNING, "Couldn't restore device fd flags: %m");
-    initfdflags = -1;
-
-    disestablish_ppp();
-
     restore_tty();
 
     close(fd);
@@ -630,7 +643,7 @@ untimeout(func, arg)
 /*
  * calltimeout - Call any timeout routines which are now due.
  */
-void
+static void
 calltimeout()
 {
     struct callout *p;
@@ -658,7 +671,7 @@ calltimeout()
 /*
  * timeleft - return the length of time until the next timeout is due.
  */
-struct timeval *
+static struct timeval *
 timeleft(tvp)
     struct timeval *tvp;
 {
@@ -752,17 +765,30 @@ open_ccp(sig)
 }
 
 
+/*
+ * bad_signal - We've caught a fatal signal.  Clean up state and exit.
+ */
+static void
+bad_signal(sig)
+    int sig;
+{
+    syslog(LOG_ERR, "Fatal signal %d", sig);
+    die(1);
+}
+
+
 /*
  * device_script - run a program to connect or disconnect the
  * serial device.
  */
-int
+static int
 device_script(program, in, out)
     char *program;
     int in, out;
 {
     int pid;
     int status;
+    int errfd;
 
     pid = fork();
 
@@ -772,10 +798,13 @@ device_script(program, in, out)
     }
 
     if (pid == 0) {
-       setuid(getuid());
-       setgid(getgid());
        dup2(in, 0);
        dup2(out, 1);
+       errfd = open(_PATH_CONNERRS, O_WRONLY | O_APPEND | O_CREAT, 0644);
+       if (errfd >= 0)
+           dup2(errfd, 2);
+       setuid(getuid());
+       setgid(getgid());
        execl("/bin/sh", "sh", "-c", program, (char *)0);
        syslog(LOG_ERR, "could not exec /bin/sh: %m");
        _exit(99);
@@ -866,7 +895,7 @@ run_program(prog, args, must_exist)
  * reap_kids - get status from any dead child processes,
  * and log a message for abnormal terminations.
  */
-void
+static void
 reap_kids()
 {
     int pid, status;
@@ -950,7 +979,7 @@ format_packet(p, len, printer, arg)
 #ifdef __STDC__
 #include <stdarg.h>
 
-void
+static void
 pr_log(void *arg, char *fmt, ...)
 {
     int n;
@@ -973,7 +1002,7 @@ pr_log(void *arg, char *fmt, ...)
 #else /* __STDC__ */
 #include <varargs.h>
 
-void
+static void
 pr_log(arg, fmt, va_alist)
 void *arg;
 char *fmt;