]> git.ozlabs.org Git - ppp.git/blobdiff - pppd/sys-linux.c
we don't have sa_len in sockaddr
[ppp.git] / pppd / sys-linux.c
index 4d6c171bfdb30f3cf361f21e4e60843159043081..946a2f93033eb5e377208ba9e046bb8c0c36f3b7 100644 (file)
  * TODO:
  */
 
+#include <sys/ioctl.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <sys/time.h>
+#include <sys/errno.h>
+
 #include <stdio.h>
+#include <stdlib.h>
 #include <syslog.h>
 #include <string.h>
 #include <time.h>
 #include <memory.h>
 #include <utmp.h>
-#include <sys/ioctl.h>
-#include <sys/types.h>
-#include <sys/socket.h>
-#include <sys/time.h>
-#include <sys/errno.h>
 #include <mntent.h>
+#include <signal.h>
+#include <fcntl.h>
 
 #include <net/if.h>
+#include <net/ppp_defs.h>
 #include <net/if_arp.h>
-#include <linux/ppp.h>
-#include <linux/route.h>
+#include <linux/if_ppp.h>
+#include <net/if_route.h>
 #include <linux/if_ether.h>
 #include <netinet/in.h>
-#include <signal.h>
 
 #include "pppd.h"
-#include "ppp.h"
 #include "fsm.h"
 #include "ipcp.h"
 
@@ -54,10 +57,14 @@ static int prev_kdebugflag = 0;
 static int restore_term;               /* 1 => we've munged the terminal */
 static struct termios inittermios;     /* Initial TTY termios */
 
+int sockfd;                    /* socket for doing interface ioctls */
+
 static int driver_version = 0;
 static int driver_modification = 0;
 static int driver_patch = 0;
 
+static char *lock_file;
+
 #define MAX_IFS                32
 
 /*
@@ -72,20 +79,25 @@ static int driver_patch = 0;
 /*
  * sys_init - System-dependent initialization.
  */
-void
-sys_init()
+
+void sys_init(void)
 {
     openlog("pppd", LOG_PID | LOG_NDELAY, LOG_PPP);
     setlogmask(LOG_UPTO(LOG_INFO));
     if (debug)
        setlogmask(LOG_UPTO(LOG_DEBUG));
+
+    /* Get an internet socket for doing socket ioctl's on. */
+    if ((sockfd = socket(AF_INET, SOCK_DGRAM, 0)) < 0) {
+       syslog(LOG_ERR, "Couldn't create IP socket: %m");
+       die(1);
+    }
 }
 
 /*
  * note_debug_level - note a change in the debug level.
  */
-void
-note_debug_level()
+void note_debug_level (void)
 {
     if (debug) {
        syslog(LOG_INFO, "Debug turned ON, Level %d", debug);
@@ -196,15 +208,6 @@ void disestablish_ppp(void)
     }
 }
 
-#if B9600 == 9600
-/*
- * XXX assume speed_t values numerically equal bits per second
- * (so we can ask for any speed).
- */
-#define translate_speed(bps)   (bps)
-#define baud_rate_of(speed)    (speed)
-
-#else
 /*
  * List of valid speeds.
  */
@@ -283,9 +286,7 @@ struct speed {
 /*
  * Translate from bits/second to a speed_t.
  */
-int
-translate_speed(bps)
-    int bps;
+int translate_speed (int bps)
 {
     struct speed *speedp;
 
@@ -301,9 +302,7 @@ translate_speed(bps)
 /*
  * Translate from a speed_t to bits/second.
  */
-int
-baud_rate_of(speed)
-    int speed;
+int baud_rate_of (int speed)
 {
     struct speed *speedp;
 
@@ -314,15 +313,13 @@ baud_rate_of(speed)
            return speedp->speed_int;
     return 0;
 }
-#endif
 
 /*
  * set_up_tty: Set up the serial port on `fd' for 8 bits, no parity,
  * at the requested speed, etc.  If `local' is true, set CLOCAL
  * regardless of whether the modem option was specified.
  */
-set_up_tty(fd, local)
-    int fd, local;
+void set_up_tty (int fd, int local)
 {
     int speed, x;
     struct termios tios;
@@ -335,26 +332,26 @@ set_up_tty(fd, local)
     if (!restore_term)
        inittermios = tios;
 
-#ifdef CRTSCTS
-    tios.c_cflag &= ~(CSIZE | CSTOPB | PARENB | CLOCAL | CRTSCTS);
+    tios.c_cflag &= ~(CSIZE | CSTOPB | PARENB | CLOCAL);
     if (crtscts == 1)
        tios.c_cflag |= CRTSCTS;
-#else
-    tios.c_cflag &= ~(CSIZE | CSTOPB | PARENB | CLOCAL);
-#endif /* CRTSCTS */
+    else if (crtscts < 0)
+       tios.c_cflag &= ~CRTSCTS;
 
     tios.c_cflag |= CS8 | CREAD | HUPCL;
+
     if (local || !modem)
        tios.c_cflag |= CLOCAL;
-    tios.c_iflag = IGNBRK | IGNPAR;
-    tios.c_oflag = 0;
-    tios.c_lflag = 0;
-    tios.c_cc[VMIN] = 1;
-    tios.c_cc[VTIME] = 0;
+
+    tios.c_iflag      = IGNBRK | IGNPAR;
+    tios.c_oflag      = 0;
+    tios.c_lflag      = 0;
+    tios.c_cc[VMIN]   = 1;
+    tios.c_cc[VTIME]  = 0;
 
     if (crtscts == 2) {
-       tios.c_iflag |= IXOFF;
-       tios.c_cc[VSTOP] = 0x13;        /* DC3 = XOFF = ^S */
+       tios.c_iflag     |= IXOFF;
+       tios.c_cc[VSTOP]  = 0x13;       /* DC3 = XOFF = ^S */
        tios.c_cc[VSTART] = 0x11;       /* DC1 = XON  = ^Q */
     }
 
@@ -388,8 +385,7 @@ set_up_tty(fd, local)
  * setdtr - control the DTR line on the serial port.
  * This is called from die(), so it shouldn't call die().
  */
-setdtr(fd, on)
-int fd, on;
+void setdtr (int fd, int on)
 {
     int modembits = TIOCM_DTR;
 
@@ -399,8 +395,8 @@ int fd, on;
 /*
  * restore_tty - restore the terminal to the saved settings.
  */
-void
-restore_tty()
+
+void restore_tty (void)
 {
     if (restore_term) {
        if (tcsetattr(fd, TCSAFLUSH, &inittermios) < 0)
@@ -433,8 +429,7 @@ void output (int unit, unsigned char *p, int len)
  * for the length of time specified by *timo (indefinite
  * if timo is NULL).
  */
-wait_input(timo)
-    struct timeval *timo;
+void wait_input (struct timeval *timo)
 {
     fd_set ready;
     int n;
@@ -448,7 +443,6 @@ wait_input(timo)
     }
 }
 
-
 /*
  * read_packet - get a PPP packet from the serial device.
  */
@@ -457,12 +451,9 @@ int read_packet (unsigned char *buf)
 {
     int len;
   
-    len = read(fd, buf, MTU + DLLHEADERLEN);
+    len = read(fd, buf, PPP_MTU + PPP_HDRLEN);
     if (len < 0) {
        if (errno == EWOULDBLOCK) {
-#if 0
-           MAINDEBUG((LOG_DEBUG, "read(fd): EWOULDBLOCK"));
-#endif
            return -1;
        }
        syslog(LOG_ERR, "read(fd): %m");
@@ -475,7 +466,7 @@ int read_packet (unsigned char *buf)
  * ppp_send_config - configure the transmit characteristics of
  * the ppp interface.
  */
-void ppp_send_config (int unit,int mtu,uint32 asyncmap,int pcomp,int accomp)
+void ppp_send_config (int unit,int mtu,u_int32_t asyncmap,int pcomp,int accomp)
 {
     u_int x;
     struct ifreq ifr;
@@ -483,7 +474,7 @@ void ppp_send_config (int unit,int mtu,uint32 asyncmap,int pcomp,int accomp)
     MAINDEBUG ((LOG_DEBUG, "send_config: mtu = %d\n", mtu));
     strncpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
     ifr.ifr_mtu = mtu;
-    if (ioctl(s, SIOCSIFMTU, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCSIFMTU, (caddr_t) &ifr) < 0) {
        syslog(LOG_ERR, "ioctl(SIOCSIFMTU): %m");
        quit();
     }
@@ -512,10 +503,7 @@ void ppp_send_config (int unit,int mtu,uint32 asyncmap,int pcomp,int accomp)
 /*
  * ppp_set_xaccm - set the extended transmit ACCM for the interface.
  */
-void
-ppp_set_xaccm(unit, accm)
-    int unit;
-    ext_accm accm;
+void ppp_set_xaccm (int unit, ext_accm accm)
 {
     MAINDEBUG ((LOG_DEBUG, "set_xaccm: %08lx %08lx %08lx %08lx\n",
                accm[0], accm[1], accm[2], accm[3]));
@@ -527,7 +515,7 @@ ppp_set_xaccm(unit, accm)
  * ppp_recv_config - configure the receive-side characteristics of
  * the ppp interface.
  */
-void ppp_recv_config (int unit,int mru,uint32 asyncmap,int pcomp,int accomp)
+void ppp_recv_config (int unit,int mru,u_int32_t asyncmap,int pcomp,int accomp)
 {
     u_int x;
 
@@ -536,8 +524,8 @@ void ppp_recv_config (int unit,int mru,uint32 asyncmap,int pcomp,int accomp)
        syslog(LOG_ERR, "ioctl(PPPIOCSMRU): %m");
 
     MAINDEBUG ((LOG_DEBUG, "recv_config: asyncmap = %lx\n", asyncmap));
-    if (ioctl(fd, PPPIOCRASYNCMAP, (caddr_t) &asyncmap) < 0) {
-        syslog(LOG_ERR, "ioctl(PPPIOCRASYNCMAP): %m");
+    if (ioctl(fd, PPPIOCSRASYNCMAP, (caddr_t) &asyncmap) < 0) {
+        syslog(LOG_ERR, "ioctl(PPPIOCSRASYNCMAP): %m");
        quit();
     }
   
@@ -558,120 +546,149 @@ void ppp_recv_config (int unit,int mru,uint32 asyncmap,int pcomp,int accomp)
  * ccp_test - ask kernel whether a given compression method
  * is acceptable for use.
  */
-int
-ccp_test(unit, opt_ptr, opt_len, for_transmit)
-    int unit, opt_len, for_transmit;
-    u_char *opt_ptr;
-{
-    struct ppp_comp_data data;
+int ccp_test (int unit, u_char *opt_ptr, int opt_len, int for_transmit)
+  {
+    struct ppp_option_data data;
 
-    data.ptr = opt_ptr;
-    data.length = opt_len;
+    data.ptr      = opt_ptr;
+    data.length   = opt_len;
     data.transmit = for_transmit;
+
     return ioctl(fd, PPPIOCSCOMPRESS, (caddr_t) &data) >= 0;
-}
+  }
 
 /*
  * ccp_flags_set - inform kernel about the current state of CCP.
  */
-void
-ccp_flags_set(unit, isopen, isup)
-    int unit, isopen, isup;
-{
+
+void ccp_flags_set (int unit, int isopen, int isup)
+  {
     int x;
 
-    if (ioctl(fd, PPPIOCGFLAGS, (caddr_t) &x) < 0) {
+    if (ioctl(fd, PPPIOCGFLAGS, (caddr_t) &x) < 0)
+      {
        syslog(LOG_ERR, "ioctl (PPPIOCGFLAGS): %m");
-       return;
-    }
-    x = isopen? x | SC_CCP_OPEN: x &~ SC_CCP_OPEN;
-    x = isup? x | SC_CCP_UP: x &~ SC_CCP_UP;
-    if (ioctl(fd, PPPIOCSFLAGS, (caddr_t) &x) < 0)
-       syslog(LOG_ERR, "ioctl(PPPIOCSFLAGS): %m");
-}
+      }
+    else
+      {
+       x = isopen? x | SC_CCP_OPEN : x &~ SC_CCP_OPEN;
+       x = isup?   x | SC_CCP_UP   : x &~ SC_CCP_UP;
+
+       if (ioctl(fd, PPPIOCSFLAGS, (caddr_t) &x) < 0)
+         {
+           syslog(LOG_ERR, "ioctl(PPPIOCSFLAGS): %m");
+         }
+      }
+  }
+
+/*
+ * ccp_fatal_error - returns 1 if decompression was disabled as a
+ * result of an error detected after decompression of a packet,
+ * 0 otherwise.  This is necessary because of patent nonsense.
+ */
+
+int ccp_fatal_error (int unit)
+  {
+    int x;
+
+    if (ioctl(fd, PPPIOCGFLAGS, (caddr_t) &x) < 0)
+      {
+       syslog(LOG_ERR, "ioctl(PPPIOCGFLAGS): %m");
+       return 0;
+      }
+    return x & SC_DC_FERROR;
+  }
 
 /*
  * sifvjcomp - config tcp header compression
  */
 
 int sifvjcomp (int u, int vjcomp, int cidcomp, int maxcid)
-{
+  {
     u_int x;
 
-    if (ioctl(fd, PPPIOCGFLAGS, (caddr_t) &x) < 0) {
+    if (ioctl(fd, PPPIOCGFLAGS, (caddr_t) &x) < 0)
+      {
        syslog(LOG_ERR, "ioctl (PPPIOCGFLAGS): %m");
        return 0;
-    }
+      }
 
     x = vjcomp  ? x | SC_COMP_TCP     : x &~ SC_COMP_TCP;
     x = cidcomp ? x & ~SC_NO_TCP_CCID : x | SC_NO_TCP_CCID;
 
-    if(ioctl(fd, PPPIOCSFLAGS, (caddr_t) &x) < 0) {
+    if (ioctl(fd, PPPIOCSFLAGS, (caddr_t) &x) < 0)
+      {
        syslog(LOG_ERR, "ioctl(PPPIOCSFLAGS): %m");
        return 0;
-    }
+      }
 
-    if (vjcomp) {
-        if (ioctl (fd, PPPIOCSMAXCID, (caddr_t) &maxcid) < 0) {
+    if (vjcomp)
+      {
+        if (ioctl (fd, PPPIOCSMAXCID, (caddr_t) &maxcid) < 0)
+         {
            syslog (LOG_ERR, "ioctl(PPPIOCSFLAGS): %m");
            return 0;
-        }
-    }
+         }
+      }
 
     return 1;
-}
+  }
 
 /*
  * sifup - Config the interface up and enable IP packets to pass.
  */
 
 int sifup (int u)
-{
+  {
     struct ifreq ifr;
 
     strncpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
-    if (ioctl(s, SIOCGIFFLAGS, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCGIFFLAGS, (caddr_t) &ifr) < 0)
+      {
        syslog(LOG_ERR, "ioctl (SIOCGIFFLAGS): %m");
        return 0;
-    }
+      }
 
     ifr.ifr_flags |= (IFF_UP | IFF_POINTOPOINT);
-    if (ioctl(s, SIOCSIFFLAGS, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCSIFFLAGS, (caddr_t) &ifr) < 0)
+      {
        syslog(LOG_ERR, "ioctl(SIOCSIFFLAGS): %m");
        return 0;
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * sifdown - Config the interface down and disable IP.
  */
 
 int sifdown (int u)
-{
+  {
     struct ifreq ifr;
 
     strncpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
-    if (ioctl(s, SIOCGIFFLAGS, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCGIFFLAGS, (caddr_t) &ifr) < 0)
+      {
        syslog(LOG_ERR, "ioctl (SIOCGIFFLAGS): %m");
        return 0;
-    }
+      }
 
     ifr.ifr_flags &= ~IFF_UP;
     ifr.ifr_flags |= IFF_POINTOPOINT;
-    if (ioctl(s, SIOCSIFFLAGS, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCSIFFLAGS, (caddr_t) &ifr) < 0)
+      {
        syslog(LOG_ERR, "ioctl(SIOCSIFFLAGS): %m");
        return 0;
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * sifaddr - Config the interface IP addresses and netmask.
  */
 
 int sifaddr (int unit, int our_adr, int his_adr, int net_mask)
-{
+  {
     struct ifreq   ifr; 
     struct rtentry rt;
     
@@ -684,31 +701,39 @@ int sifaddr (int unit, int our_adr, int his_adr, int net_mask)
  *  Set our IP address
  */
     ((struct sockaddr_in *) &ifr.ifr_addr)->sin_addr.s_addr = our_adr;
-    if (ioctl(s, SIOCSIFADDR, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCSIFADDR, (caddr_t) &ifr) < 0)
+      {
        if (errno != EEXIST)
+         {
            syslog (LOG_ERR, "ioctl(SIOCAIFADDR): %m");
+         }
         else
+         {
            syslog (LOG_WARNING, "ioctl(SIOCAIFADDR): Address already exists");
+         }
         return (0);
-    } 
+      
 /*
  *  Set the gateway address
  */
     ((struct sockaddr_in *) &ifr.ifr_dstaddr)->sin_addr.s_addr = his_adr;
-    if (ioctl(s, SIOCSIFDSTADDR, (caddr_t) &ifr) < 0) {
+    if (ioctl(sockfd, SIOCSIFDSTADDR, (caddr_t) &ifr) < 0)
+      {
        syslog (LOG_ERR, "ioctl(SIOCSIFDSTADDR): %m"); 
        return (0);
-    } 
+      
 /*
  *  Set the netmask
  */
-    if (net_mask != 0) {
+    if (net_mask != 0)
+      {
        ((struct sockaddr_in *) &ifr.ifr_netmask)->sin_addr.s_addr = net_mask;
-       if (ioctl(s, SIOCSIFNETMASK, (caddr_t) &ifr) < 0) {
+       if (ioctl(sockfd, SIOCSIFNETMASK, (caddr_t) &ifr) < 0)
+         {
            syslog (LOG_ERR, "ioctl(SIOCSIFNETMASK): %m"); 
            return (0);
-        } 
-    }
+         
+      }
 /*
  *  Add the device route
  */
@@ -722,12 +747,13 @@ int sifaddr (int unit, int our_adr, int his_adr, int net_mask)
     ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr     = his_adr;
     rt.rt_flags = RTF_UP | RTF_HOST;
 
-    if (ioctl(s, SIOCADDRT, &rt) < 0) {
+    if (ioctl(sockfd, SIOCADDRT, &rt) < 0)
+      {
         syslog (LOG_ERR, "ioctl(SIOCADDRT) device route: %m");
         return (0);
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * cifaddr - Clear the interface IP addresses, and delete routes
@@ -735,7 +761,7 @@ int sifaddr (int unit, int our_adr, int his_adr, int net_mask)
  */
 
 int cifaddr (int unit, int our_adr, int his_adr)
-{
+  {
     struct rtentry rt;
 /*
  *  Delete the route through the device
@@ -750,12 +776,13 @@ int cifaddr (int unit, int our_adr, int his_adr)
     ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr     = his_adr;
     rt.rt_flags = RTF_UP | RTF_HOST;
 
-    if (ioctl(s, SIOCDELRT, &rt) < 0) {
+    if (ioctl(sockfd, SIOCDELRT, &rt) < 0)
+      {
         syslog (LOG_ERR, "ioctl(SIOCDELRT) device route: %m");
         return (0);
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * path_to_route - determine the path to the proc file system data
@@ -775,17 +802,22 @@ static int defaultroute_exists (void);
  */
 
 static char *path_to_route (void)
-{
+  {
     struct mntent *mntent;
     FILE *fp;
 
     fp = fopen (MOUNTED, "r");
-    if (fp != 0) {
-        while ((mntent = getmntent (fp)) != 0) {
+    if (fp != 0)
+      {
+        while ((mntent = getmntent (fp)) != 0)
+         {
            if (strcmp (mntent->mnt_type, MNTTYPE_IGNORE) == 0)
+             {
                continue;
+             }
 
-           if (strcmp (mntent->mnt_type, "proc") == 0) {
+           if (strcmp (mntent->mnt_type, "proc") == 0)
+             {
                strncpy (route_buffer, mntent->mnt_dir,
                         sizeof (route_buffer)-10);
                route_buffer [sizeof (route_buffer)-10] = '\0';
@@ -793,66 +825,75 @@ static char *path_to_route (void)
 
                fclose (fp);
                return (route_buffer);
-           }
-       }
+             }
+         }
        fclose (fp);
-    }
+      }
     syslog (LOG_ERR, "proc file system not mounted");
     return 0;
-}
+  }
 
 /*
  * open_route_table - open the interface to the route table
  */
 
 static int open_route_table (void)
-{
+  {
     char *path;
 
     if (route_fd != (FILE *) 0)
+      {
         close_route_table();
+      }
 
     path = path_to_route();
     if (path == NULL)
+      {
         return 0;
+      }
 
     route_fd = fopen (path, "r");
-    if (route_fd == (FILE *) 0) {
+    if (route_fd == (FILE *) 0)
+      {
         syslog (LOG_ERR, "can not open %s: %m", path);
         return 0;
-    }
+      }
 
     /* read and discard the header line. */
-    if (fgets (route_buffer, sizeof (route_buffer), route_fd) == (char *) 0) {
+    if (fgets (route_buffer, sizeof (route_buffer), route_fd) == (char *) 0)
+      {
         close_route_table();
        return 0;
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * close_route_table - close the interface to the route table
  */
 
 static void close_route_table (void)
-{
-    if (route_fd != (FILE *) 0) {
+  {
+    if (route_fd != (FILE *) 0)
+      {
         fclose (route_fd);
         route_fd = (FILE *) 0;
-    }
-}
+      }
+  }
 
 /*
  * read_route_table - read the next entry from the route table
  */
 
 static int read_route_table (struct rtentry *rt)
-{
+  {
     static char delims[] = " \t\n";
     char *dev_ptr, *ptr, *dst_ptr, *gw_ptr, *flag_ptr;
 
     if (fgets (route_buffer, sizeof (route_buffer), route_fd) == (char *) 0)
+      {
         return 0;
+      }
 
     memset (rt, '\0', sizeof (struct rtentry));
 
@@ -860,12 +901,6 @@ static int read_route_table (struct rtentry *rt)
     dst_ptr  = strtok (NULL,         delims); /* destination address */
     gw_ptr   = strtok (NULL,         delims); /* gateway */
     flag_ptr = strtok (NULL,         delims); /* flags */
-#if 0
-    ptr      = strtok (NULL,         delims); /* reference count */
-    ptr      = strtok (NULL,         delims); /* useage count */
-    ptr      = strtok (NULL,         delims); /* metric */
-    ptr      = strtok (NULL,         delims); /* mask */
-#endif
 
     ((struct sockaddr_in *) &rt->rt_dst)->sin_addr.s_addr =
       strtoul (dst_ptr, NULL, 16);
@@ -877,25 +912,31 @@ static int read_route_table (struct rtentry *rt)
     rt->rt_dev   = dev_ptr;
 
     return 1;
-}
+  }
 
 /*
  * defaultroute_exists - determine if there is a default route
  */
 
 static int defaultroute_exists (void)
-{
+  {
     struct rtentry rt;
     int    result = 0;
 
     if (!open_route_table())
+      {
         return 0;
+      }
 
-    while (read_route_table(&rt) != 0) {
+    while (read_route_table(&rt) != 0)
+      {
         if (rt.rt_flags & RTF_UP == 0)
+         {
            continue;
+         }
 
-        if (((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr == 0L) {
+        if (((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr == 0L)
+         {
            syslog (LOG_ERR,
                    "ppp not replacing existing default route to %s[%s]",
                    rt.rt_dev,
@@ -903,22 +944,24 @@ static int defaultroute_exists (void)
                               sin_addr.s_addr));
            result = 1;
            break;
-       }
-    }
+         }
+      }
     close_route_table();
     return result;
-}
+  }
 
 /*
  * sifdefaultroute - assign a default route through the address given.
  */
 
 int sifdefaultroute (int unit, int gateway)
-{
+  {
     struct rtentry rt;
 
     if (defaultroute_exists())
+      {
         return 0;
+      }
 
     memset (&rt, '\0', sizeof (rt));
     SET_SA_FAMILY (rt.rt_dst,     AF_INET);
@@ -926,19 +969,20 @@ int sifdefaultroute (int unit, int gateway)
     ((struct sockaddr_in *) &rt.rt_gateway)->sin_addr.s_addr = gateway;
     
     rt.rt_flags = RTF_UP | RTF_GATEWAY;
-    if (ioctl(s, SIOCADDRT, &rt) < 0) {
+    if (ioctl(sockfd, SIOCADDRT, &rt) < 0)
+      {
        syslog (LOG_ERR, "default route ioctl(SIOCADDRT): %m");
        return 0;
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * cifdefaultroute - delete a default route through the address given.
  */
 
 int cifdefaultroute (int unit, int gateway)
-{
+  {
     struct rtentry rt;
   
     SET_SA_FAMILY (rt.rt_dst,     AF_INET);
@@ -946,19 +990,20 @@ int cifdefaultroute (int unit, int gateway)
     ((struct sockaddr_in *) &rt.rt_gateway)->sin_addr.s_addr = gateway;
     
     rt.rt_flags = RTF_UP | RTF_GATEWAY;
-    if (ioctl(s, SIOCDELRT, &rt) < 0) {
+    if (ioctl(sockfd, SIOCDELRT, &rt) < 0)
+      {
        syslog (LOG_ERR, "default route ioctl(SIOCDELRT): %m");
        return 0;
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * sifproxyarp - Make a proxy ARP entry for the peer.
  */
 
-int sifproxyarp (int unit, uint32 his_adr)
-{
+int sifproxyarp (int unit, u_int32_t his_adr)
+  {
     struct arpreq arpreq;
 
     memset (&arpreq, '\0', sizeof(arpreq));
@@ -966,51 +1011,54 @@ int sifproxyarp (int unit, uint32 his_adr)
  * Get the hardware address of an interface on the same subnet
  * as our local address.
  */
-    if (!get_ether_addr(his_adr, &arpreq.arp_ha)) {
+    if (!get_ether_addr(his_adr, &arpreq.arp_ha))
+      {
        syslog(LOG_ERR, "Cannot determine ethernet address for proxy ARP");
        return 0;
-    }
+      }
     
     SET_SA_FAMILY(arpreq.arp_pa, AF_INET);
     ((struct sockaddr_in *) &arpreq.arp_pa)->sin_addr.s_addr = his_adr;
     arpreq.arp_flags = ATF_PERM | ATF_PUBL;
     
-    if (ioctl(s, SIOCSARP, (caddr_t)&arpreq) < 0) {
+    if (ioctl(sockfd, SIOCSARP, (caddr_t)&arpreq) < 0)
+      {
        syslog(LOG_ERR, "ioctl(SIOCSARP): %m");
        return 0;
-    }
+      }
     return 1;
-}
+  }
 
 /*
  * cifproxyarp - Delete the proxy ARP entry for the peer.
  */
 
-int cifproxyarp (int unit, uint32 his_adr)
-{
+int cifproxyarp (int unit, u_int32_t his_adr)
+  {
     struct arpreq arpreq;
   
     memset (&arpreq, '\0', sizeof(arpreq));
     SET_SA_FAMILY(arpreq.arp_pa, AF_INET);
     
     ((struct sockaddr_in *) &arpreq.arp_pa)->sin_addr.s_addr = his_adr;
-    if (ioctl(s, SIOCDARP, (caddr_t)&arpreq) < 0) {
+    if (ioctl(sockfd, SIOCDARP, (caddr_t)&arpreq) < 0)
+      {
        syslog(LOG_WARNING, "ioctl(SIOCDARP): %m");
        return 0;
-    }
+      }
     return 1;
-}
+  }
      
 /*
  * get_ether_addr - get the hardware address of an interface on the
  * the same subnet as ipaddr.
  */
 
-int get_ether_addr (uint32 ipaddr, struct sockaddr *hwaddr)
-{
+int get_ether_addr (u_int32_t ipaddr, struct sockaddr *hwaddr)
+  {
     struct ifreq *ifr, *ifend, *ifp;
     int i;
-    uint32 ina, mask;
+    u_int32_t ina, mask;
     struct sockaddr_dl *dla;
     struct ifreq ifreq;
     struct ifconf ifc;
@@ -1018,10 +1066,11 @@ int get_ether_addr (uint32 ipaddr, struct sockaddr *hwaddr)
     
     ifc.ifc_len = sizeof(ifs);
     ifc.ifc_req = ifs;
-    if (ioctl(s, SIOCGIFCONF, &ifc) < 0) {
+    if (ioctl(sockfd, SIOCGIFCONF, &ifc) < 0)
+      {
        syslog(LOG_ERR, "ioctl(SIOCGIFCONF): %m");
        return 0;
-    }
+      }
     MAINDEBUG ((LOG_DEBUG, "proxy arp: scanning %d interfaces for IP %s",
                ifc.ifc_len / sizeof(struct ifreq), ip_ntoa(ipaddr)));
 /*
@@ -1029,8 +1078,10 @@ int get_ether_addr (uint32 ipaddr, struct sockaddr *hwaddr)
  * address on the same subnet as `ipaddr'.
  */
     ifend = ifs + (ifc.ifc_len / sizeof(struct ifreq));
-    for (ifr = ifc.ifc_req; ifr < ifend; ifr++) {
-       if (ifr->ifr_addr.sa_family == AF_INET) {
+    for (ifr = ifc.ifc_req; ifr < ifend; ifr++)
+      {
+       if (ifr->ifr_addr.sa_family == AF_INET)
+         {
            ina = ((struct sockaddr_in *) &ifr->ifr_addr)->sin_addr.s_addr;
            strncpy(ifreq.ifr_name, ifr->ifr_name, sizeof(ifreq.ifr_name));
             MAINDEBUG ((LOG_DEBUG, "proxy arp: examining interface %s",
@@ -1039,44 +1090,51 @@ int get_ether_addr (uint32 ipaddr, struct sockaddr *hwaddr)
  * Check that the interface is up, and not point-to-point
  * or loopback.
  */
-           if (ioctl(s, SIOCGIFFLAGS, &ifreq) < 0)
+           if (ioctl(sockfd, SIOCGIFFLAGS, &ifreq) < 0)
+             {
                continue;
+             }
            if ((ifreq.ifr_flags &
                 (IFF_UP|IFF_BROADCAST|IFF_POINTOPOINT|IFF_LOOPBACK|IFF_NOARP))
                != (IFF_UP|IFF_BROADCAST))
+             {
                continue;
+             }
 /*
  * Get its netmask and check that it's on the right subnet.
  */
-           if (ioctl(s, SIOCGIFNETMASK, &ifreq) < 0)
+           if (ioctl(sockfd, SIOCGIFNETMASK, &ifreq) < 0)
+             {
                continue;
+             }
            mask = ((struct sockaddr_in *) &ifreq.ifr_addr)->sin_addr.s_addr;
            MAINDEBUG ((LOG_DEBUG, "proxy arp: interface addr %s mask %lx",
                        ip_ntoa(ina), ntohl(mask)));
            if (((ipaddr ^ ina) & mask) != 0)
+             {
                continue;
+             }
            break;
-       }
-    }
+         }
+      }
     
     if (ifr >= ifend)
+      {
         return 0;
+      }
 
     syslog(LOG_INFO, "found interface %s for proxy arp", ifreq.ifr_name);
 /*
  * Now get the hardware address.
  */
-    if (ioctl (s, SIOCGIFHWADDR, &ifreq) < 0) {
+    if (ioctl (sockfd, SIOCGIFHWADDR, &ifreq) < 0)
+      {
         syslog(LOG_ERR, "SIOCGIFHWADDR(%s): %m", ifreq.ifr_name);
         return 0;
-    }
+      }
 
     hwaddr->sa_family = ARPHRD_ETHER;
-#ifndef old_ifr_hwaddr
-    memcpy (&hwaddr->sa_data, &ifreq.ifr_hwaddr, ETH_ALEN);
-#else
     memcpy (&hwaddr->sa_data, &ifreq.ifr_hwaddr.sa_data, ETH_ALEN);
-#endif
 
     MAINDEBUG ((LOG_DEBUG,
                "proxy arp: found hwaddr %02x:%02x:%02x:%02x:%02x:%02x",
@@ -1087,6 +1145,72 @@ int get_ether_addr (uint32 ipaddr, struct sockaddr *hwaddr)
                (int) ((unsigned char *) &hwaddr->sa_data)[4],
                (int) ((unsigned char *) &hwaddr->sa_data)[5]));
     return 1;
+  }
+
+/*
+ * Return user specified netmask, modified by any mask we might determine
+ * for address `addr' (in network byte order).
+ * Here we scan through the system's list of interfaces, looking for
+ * any non-point-to-point interfaces which might appear to be on the same
+ * network as `addr'.  If we find any, we OR in their netmask to the
+ * user-specified netmask.
+ */
+u_int32_t
+GetMask(addr)
+    u_int32_t addr;
+{
+    u_int32_t mask, nmask, ina;
+    struct ifreq *ifr, *ifend, ifreq;
+    struct ifconf ifc;
+    struct ifreq ifs[MAX_IFS];
+
+    addr = ntohl(addr);
+    if (IN_CLASSA(addr))       /* determine network mask for address class */
+       nmask = IN_CLASSA_NET;
+    else if (IN_CLASSB(addr))
+       nmask = IN_CLASSB_NET;
+    else
+       nmask = IN_CLASSC_NET;
+    /* class D nets are disallowed by bad_ip_adrs */
+    mask = netmask | htonl(nmask);
+
+    /*
+     * Scan through the system's network interfaces.
+     */
+    ifc.ifc_len = sizeof(ifs);
+    ifc.ifc_req = ifs;
+    if (ioctl(sockfd, SIOCGIFCONF, &ifc) < 0) {
+       syslog(LOG_WARNING, "ioctl(SIOCGIFCONF): %m");
+       return mask;
+    }
+    ifend = (struct ifreq *) (ifc.ifc_buf + ifc.ifc_len);
+    for (ifr = ifc.ifc_req; ifr < ifend; ifr++) {
+       /*
+        * Check the interface's internet address.
+        */
+       if (ifr->ifr_addr.sa_family != AF_INET)
+           continue;
+       ina = ((struct sockaddr_in *) &ifr->ifr_addr)->sin_addr.s_addr;
+       if ((ntohl(ina) & nmask) != (addr & nmask))
+           continue;
+       /*
+        * Check that the interface is up, and not point-to-point or loopback.
+        */
+       strncpy(ifreq.ifr_name, ifr->ifr_name, sizeof(ifreq.ifr_name));
+       if (ioctl(sockfd, SIOCGIFFLAGS, &ifreq) < 0)
+           continue;
+       if ((ifreq.ifr_flags & (IFF_UP|IFF_POINTOPOINT|IFF_LOOPBACK))
+           != IFF_UP)
+           continue;
+       /*
+        * Get its netmask and OR it into our mask.
+        */
+       if (ioctl(sockfd, SIOCGIFNETMASK, &ifreq) < 0)
+           continue;
+       mask |= ((struct sockaddr_in *)&ifreq.ifr_addr)->sin_addr.s_addr;
+    }
+
+    return mask;
 }
 
 /*
@@ -1095,35 +1219,38 @@ int get_ether_addr (uint32 ipaddr, struct sockaddr *hwaddr)
 
 static void decode_version (char *buf, int *version,
                            int *modification, int *patch)
-{
+  {
 
-  *version      = (int) strtoul (buf, &buf, 10);
-  *modification = 0;
-  *patch        = 0;
-
-  if (*buf == '.') {
-      ++buf;
-      *modification = (int) strtoul (buf, &buf, 10);
-      if (*buf == '.') {
-         ++buf;
-         *patch = (int) strtoul (buf, &buf, 10);
+    *version      = (int) strtoul (buf, &buf, 10);
+    *modification = 0;
+    *patch        = 0;
+    
+    if (*buf == '.')
+      {
+       ++buf;
+       *modification = (int) strtoul (buf, &buf, 10);
+       if (*buf == '.')
+         {
+           ++buf;
+           *patch = (int) strtoul (buf, &buf, 10);
+         }
+      }
+    
+    if (*buf != '\0')
+      {
+       *version      =
+       *modification =
+       *patch        = 0;
       }
   }
 
-  if (*buf != '\0') {
-      *version      =
-      *modification =
-      *patch        = 0;
-  }
-}
-
 /*
  * ppp_available - check whether the system has any ppp interfaces
  * (in fact we check whether we can do an ioctl on ppp0).
  */
 
 int ppp_available(void)
-{
+  {
     int s, ok;
     struct ifreq ifr;
     int my_version,     my_modification,     my_patch;
@@ -1132,7 +1259,9 @@ int ppp_available(void)
  */    
     s = socket(AF_INET, SOCK_DGRAM, 0);
     if (s < 0)
+      {
        return 0;
+      }
     
     strncpy (ifr.ifr_name, "ppp0", sizeof (ifr.ifr_name));
     ok = ioctl(s, SIOCGIFFLAGS, (caddr_t) &ifr) >= 0;
@@ -1140,35 +1269,42 @@ int ppp_available(void)
  * Ensure that the hardware address is for PPP and not something else
  */
     if (ok != 0)
+      {
         ok = ioctl (s, SIOCGIFHWADDR, (caddr_t) &ifr) >= 0;
+      }
 
     if (ok != 0 && ifr.ifr_hwaddr.sa_family != ARPHRD_PPP)
+      {
         ok = 0;
+      }
 /*
  *  This is the PPP device. Validate the version of the driver at this
  *  point to ensure that this program will work with the driver.
  */
-    if (ok != 0) {
+    if (ok != 0)
+      {
         char   abBuffer [1024];
        int    size;
 
        ifr.ifr_data = abBuffer;
-       size = ioctl (s, SIOCDEVPRIVATE, (caddr_t) &ifr);
+       size = ioctl (s, SIOCGPPPVER, (caddr_t) &ifr);
        ok   = size >= 0;
 
-       if (ok != 0) {
+       if (ok != 0)
+         {
            decode_version (abBuffer,
                            &driver_version,
                            &driver_modification,
                            &driver_patch);
-       }
-    }
-
-    if (ok == 0) {
+         }
+      }
+    
+    if (ok == 0)
+      {
         driver_version      =
         driver_modification =
         driver_patch        = 0;
-    }
+      }
 /*
  * Validate the version of the driver against the version that we used.
  */
@@ -1179,27 +1315,42 @@ int ppp_available(void)
 
     /* The version numbers must match */
     if (driver_version != my_version)
+      {
         ok = 0;
+      }
       
     /* The modification levels must be legal */
     if (driver_modification < my_modification)
+      {
         ok = 0;
+      }
 
-    if (ok == 0) {
+    if (ok == 0)
+      {
        fprintf(stderr, "Sorry - PPP driver version %d.%d.%d is out of date\n",
                driver_version, driver_modification, driver_patch);
-    }
-
+      }
+    
     close(s);
     return ok;
-}
+  }
 
-int
-logwtmp(line, name, host)
-       char *line, *name, *host;
-{
+int logwtmp (char *line, char *name, char *host)
+  {
     struct utmp ut;
-
+    int    mode;
+/*
+ * Control the 'mesg' function based upon the state of the logon
+ * operation.
+ */
+    mode = (*name != '\0') ? 0600 : 0622;
+    if (chmod (devnam, mode) < 0)
+      {
+       syslog (LOG_ERR, "chmod(\"%s\", 0%o): %m", devnam, mode);
+      }
+/*
+ * Update the signon database for users.
+ */
     memset (&ut, 0, sizeof (ut));
     (void)strncpy(ut.ut_line, line, sizeof(ut.ut_line));
     (void)strncpy(ut.ut_name, name, sizeof(ut.ut_name));
@@ -1208,4 +1359,83 @@ logwtmp(line, name, host)
        
     pututline (&ut);           /* Write the line to the proper place */
     endutent();                        /* Indicate operation is complete */
+  }
+
+/*
+ * Code for locking/unlocking the serial device.
+ * This code is derived from chat.c.
+ */
+
+#define LOCK_PREFIX    "/var/lock/LCK.."
+
+/*
+ * lock - create a lock file for the named device
+ */
+int
+lock(dev)
+    char *dev;
+{
+    char hdb_lock_buffer[12];
+    int fd, pid, n;
+    char *p;
+
+    if ((p = strrchr(dev, '/')) != NULL)
+       dev = p + 1;
+    lock_file = malloc(strlen(LOCK_PREFIX) + strlen(dev) + 1);
+    if (lock_file == NULL)
+       novm("lock file name");
+    strcat(strcpy(lock_file, LOCK_PREFIX), dev);
+
+    while ((fd = open(lock_file, O_EXCL | O_CREAT | O_RDWR, 0644)) < 0) {
+       if (errno == EEXIST
+           && (fd = open(lock_file, O_RDONLY, 0)) >= 0) {
+           /* Read the lock file to find out who has the device locked */
+           n = read(fd, hdb_lock_buffer, 11);
+           if (n > 0) {
+               hdb_lock_buffer[n] = 0;
+               sscanf (hdb_lock_buffer, " %d", &pid);
+           }
+           if (n <= 0) {
+               syslog(LOG_ERR, "Can't read pid from lock file %s", lock_file);
+               close(fd);
+           } else {
+               if (kill(pid, 0) == -1 && errno == ESRCH) {
+                   /* pid no longer exists - remove the lock file */
+                   if (unlink(lock_file) == 0) {
+                       close(fd);
+                       syslog(LOG_NOTICE, "Removed stale lock on %s (pid %d)",
+                              dev, pid);
+                       continue;
+                   } else
+                       syslog(LOG_WARNING, "Couldn't remove stale lock on %s",
+                              dev);
+               } else
+                   syslog(LOG_NOTICE, "Device %s is locked by pid %d",
+                          dev, pid);
+           }
+           close(fd);
+       } else
+           syslog(LOG_ERR, "Can't create lock file %s: %m", lock_file);
+       free(lock_file);
+       lock_file = NULL;
+       return -1;
+    }
+
+    sprintf(hdb_lock_buffer, "%010d\n", getpid());
+    write(fd, hdb_lock_buffer, 11);
+
+    close(fd);
+    return 0;
+}
+
+/*
+ * unlock - remove our lockfile
+ */
+unlock()
+{
+    if (lock_file) {
+       unlink(lock_file);
+       free(lock_file);
+       lock_file = NULL;
+    }
 }