]> git.ozlabs.org Git - ppp.git/blobdiff - pppd/sys-linux.c
Patch from Frank Cusack to add support for MSCHAPv2.
[ppp.git] / pppd / sys-linux.c
index 94c31ddc441f25b8d45d9052c39297f86fa86fb8..76fda67b3f9e94f5f59145b0e4d6eaff966a6c28 100644 (file)
@@ -26,6 +26,7 @@
 #include <sys/file.h>
 #include <sys/stat.h>
 #include <sys/utsname.h>
+#include <sys/sysmacros.h>
 
 #include <stdio.h>
 #include <stdlib.h>
@@ -72,7 +73,6 @@
 #include "pppd.h"
 #include "fsm.h"
 #include "ipcp.h"
-#include "patchlevel.h"
 
 #ifdef IPX_CHANGE
 #include "ipxcp.h"
 #endif
 #endif /* IPX_CHANGE */
 
+#ifdef PPP_FILTER
+#include <net/bpf.h>
+#include <linux/filter.h>
+#endif /* PPP_FILTER */
+
 #ifdef LOCKLIB
 #include <sys/locks.h>
 #endif
 
-#ifndef RTF_DEFAULT  /* Normally in <linux/route.h> from <net/route.h> */
-#define RTF_DEFAULT  0
+#ifdef INET6
+#ifndef _LINUX_IN6_H
+/*
+ *    This is in linux/include/net/ipv6.h.
+ */
+
+struct in6_ifreq {
+    struct in6_addr ifr6_addr;
+    __u32 ifr6_prefixlen;
+    unsigned int ifr6_ifindex;
+};
 #endif
 
+#define IN6_LLADDR_FROM_EUI64(sin6, eui64) do {                        \
+       memset(&sin6.s6_addr, 0, sizeof(struct in6_addr));      \
+       sin6.s6_addr16[0] = htons(0xfe80);                      \
+       eui64_copy(eui64, sin6.s6_addr32[2]);                   \
+       } while (0)
+
+#endif /* INET6 */
+
 /* We can get an EIO error on an ioctl if the modem has hung up */
 #define ok_error(num) ((num)==EIO)
 
@@ -102,6 +124,11 @@ static int ppp_fd = -1;            /* fd which is set to PPP discipline */
 static int sock_fd = -1;       /* socket for doing interface ioctls */
 static int slave_fd = -1;
 static int master_fd = -1;
+#ifdef INET6
+static int sock6_fd = -1;
+#endif /* INET6 */
+int ppp_dev_fd = -1;   /* fd for /dev/ppp (new style driver) */
+static int chindex;            /* channel index (new style driver) */
 
 static fd_set in_fds;          /* set of fds that wait_input waits for */
 static int max_in_fd;          /* highest fd set in in_fds */
@@ -114,6 +141,8 @@ static int driver_is_old       = 0;
 static int restore_term        = 0;    /* 1 => we've munged the terminal */
 static struct termios inittermios;     /* Initial TTY termios */
 
+int new_style_driver = 0;
+
 static char loop_name[20];
 static unsigned char inbuf[512]; /* buffer for chars read from loopback */
 
@@ -121,6 +150,10 @@ static int if_is_up;       /* Interface has been marked up */
 static u_int32_t default_route_gateway;        /* Gateway for default route added */
 static u_int32_t proxy_arp_addr;       /* Addr for proxy arp entry added */
 static char proxy_arp_dev[16];         /* Device for proxy arp entry */
+static u_int32_t our_old_addr;         /* for detecting address changes */
+static int     dynaddr_set;            /* 1 if ip_dynaddr set */
+static int     looped;                 /* 1 if using loop */
+static int     link_mtu;               /* mtu for the link (not bundle) */
 
 static struct utsname utsname; /* for the kernel version */
 static int kernel_version;
@@ -132,12 +165,13 @@ static int kernel_version;
 #define FLAGS_MASK (IFF_UP          | IFF_BROADCAST | \
                    IFF_POINTOPOINT | IFF_LOOPBACK  | IFF_NOARP)
 
+#define SIN_ADDR(x)    (((struct sockaddr_in *) (&(x)))->sin_addr.s_addr)
+
 /* Prototypes for procedures local to this file. */
-static int get_flags (void);
-static void set_flags (int flags);
+static int get_flags (int fd);
+static void set_flags (int fd, int flags);
 static int translate_speed (int bps);
 static int baud_rate_of (int speed);
-static char *path_to_route (void);
 static void close_route_table (void);
 static int open_route_table (void);
 static int read_route_table (struct rtentry *rt);
@@ -147,6 +181,7 @@ static int get_ether_addr (u_int32_t ipaddr, struct sockaddr *hwaddr,
 static void decode_version (char *buf, int *version, int *mod, int *patch);
 static int set_kdebugflag(int level);
 static int ppp_registered(void);
+static int make_ppp_unit(void);
 
 extern u_char  inpacket_buf[]; /* borrowed from main.c */
 
@@ -165,14 +200,19 @@ extern u_char     inpacket_buf[]; /* borrowed from main.c */
 
 extern int hungup;
 
+/* new_fd is the fd of a tty */
 static void set_ppp_fd (int new_fd)
 {
        SYSDEBUG ((LOG_DEBUG, "setting ppp_fd to %d\n", new_fd));
        ppp_fd = new_fd;
+       if (!new_style_driver)
+               ppp_dev_fd = new_fd;
 }
 
 static int still_ppp(void)
 {
+       if (new_style_driver)
+               return !hungup && ppp_fd >= 0;
        if (!hungup || ppp_fd == slave_fd)
                return 1;
        if (slave_fd >= 0) {
@@ -187,15 +227,15 @@ static int still_ppp(void)
  * Functions to read and set the flags value in the device driver
  */
 
-static int get_flags (void)
-{    
+static int get_flags (int fd)
+{
     int flags;
 
-    if (ioctl(ppp_fd, PPPIOCGFLAGS, (caddr_t) &flags) < 0) {
+    if (ioctl(fd, PPPIOCGFLAGS, (caddr_t) &flags) < 0) {
        if ( ok_error (errno) )
            flags = 0;
        else
-           fatal("ioctl(PPPIOCGFLAGS): %m");
+           fatal("ioctl(PPPIOCGFLAGS): %m (line %d)", __LINE__);
     }
 
     SYSDEBUG ((LOG_DEBUG, "get flags = %x\n", flags));
@@ -204,13 +244,13 @@ static int get_flags (void)
 
 /********************************************************************/
 
-static void set_flags (int flags)
-{    
+static void set_flags (int fd, int flags)
+{
     SYSDEBUG ((LOG_DEBUG, "set flags = %x\n", flags));
 
-    if (ioctl(ppp_fd, PPPIOCSFLAGS, (caddr_t) &flags) < 0) {
+    if (ioctl(fd, PPPIOCSFLAGS, (caddr_t) &flags) < 0) {
        if (! ok_error (errno) )
-           fatal("ioctl(PPPIOCSFLAGS, %x): %m(%d)", flags, errno);
+           fatal("ioctl(PPPIOCSFLAGS, %x): %m (line %d)", flags, errno, __LINE__);
     }
 }
 
@@ -221,27 +261,31 @@ static void set_flags (int flags)
 
 void sys_init(void)
 {
-    int osmaj, osmin, ospatch;
+    int flags;
+
+    if (new_style_driver) {
+       ppp_dev_fd = open("/dev/ppp", O_RDWR);
+       if (ppp_dev_fd < 0)
+           fatal("Couldn't open /dev/ppp: %m");
+       flags = fcntl(ppp_dev_fd, F_GETFL);
+       if (flags == -1
+           || fcntl(ppp_dev_fd, F_SETFL, flags | O_NONBLOCK) == -1)
+           warn("Couldn't set /dev/ppp to nonblock: %m");
+    }
 
-    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 ioctls. */
     sock_fd = socket(AF_INET, SOCK_DGRAM, 0);
-    if (sock_fd < 0) {
-       if ( ! ok_error ( errno ))
-           fatal("Couldn't create IP socket: %m(%d)", errno);
-    }
+    if (sock_fd < 0)
+       fatal("Couldn't create IP socket: %m(%d)", errno);
+
+#ifdef INET6
+    sock6_fd = socket(AF_INET6, SOCK_DGRAM, 0);
+    if (sock6_fd < 0)
+       sock6_fd = -errno;      /* save errno for later */
+#endif
 
     FD_ZERO(&in_fds);
     max_in_fd = 0;
-
-    uname(&utsname);
-    osmaj = osmin = ospatch = 0;
-    sscanf(utsname.release, "%d.%d.%d", &osmaj, &osmin, &ospatch);
-    kernel_version = KVERSION(osmaj, osmin, ospatch);
 }
 
 /********************************************************************
@@ -256,8 +300,10 @@ void sys_cleanup(void)
 /*
  * Take down the device
  */
-    if (if_is_up)
+    if (if_is_up) {
+       if_is_up = 0;
        sifdown(0);
+    }
 /*
  * Delete any routes through the device.
  */
@@ -275,6 +321,8 @@ void sys_cleanup(void)
 void
 sys_close(void)
 {
+    if (new_style_driver)
+       close(ppp_dev_fd);
     if (sock_fd >= 0)
        close(sock_fd);
     if (slave_fd >= 0)
@@ -291,9 +339,11 @@ sys_close(void)
 
 static int set_kdebugflag (int requested_level)
 {
-    if (ioctl(ppp_fd, PPPIOCSDEBUG, &requested_level) < 0) {
+    if (new_style_driver && ifunit < 0)
+       return 1;
+    if (ioctl(ppp_dev_fd, PPPIOCSDEBUG, &requested_level) < 0) {
        if ( ! ok_error (errno) )
-           error("ioctl(PPPIOCSDEBUG): %m");
+           error("ioctl(PPPIOCSDEBUG): %m (line %d)", __LINE__);
        return (0);
     }
     SYSDEBUG ((LOG_INFO, "set kernel debugging level to %d",
@@ -303,83 +353,164 @@ static int set_kdebugflag (int requested_level)
 
 /********************************************************************
  *
- * establish_ppp - Turn the serial port into a ppp interface.
+ * tty_establish_ppp - Turn the serial port into a ppp interface.
  */
 
-int establish_ppp (int tty_fd)
+int tty_establish_ppp (int tty_fd)
 {
-    int x;
-/*
- * The current PPP device will be the tty file.
- */
-    set_ppp_fd (tty_fd);
+    int ret_fd;
+
 /*
  * Ensure that the tty device is in exclusive mode.
  */
     if (ioctl(tty_fd, TIOCEXCL, 0) < 0) {
        if ( ! ok_error ( errno ))
-           warn("ioctl(TIOCEXCL): %m");
+           warn("Couldn't make tty exclusive: %m");
     }
 /*
  * Demand mode - prime the old ppp device to relinquish the unit.
  */
-    if (demand && ioctl(slave_fd, PPPIOCXFERUNIT, 0) < 0)
-       fatal("ioctl(transfer ppp unit): %m(%d)", errno);
+    if (!new_style_driver && looped
+       && ioctl(slave_fd, PPPIOCXFERUNIT, 0) < 0) {
+       error("ioctl(transfer ppp unit): %m, line %d", __LINE__);
+       return -1;
+    }
 /*
  * Set the current tty to the PPP discpline
  */
-    if (ioctl(ppp_fd, TIOCSETD, &ppp_disc) < 0) {
-       if ( ! ok_error (errno) )
-           fatal("ioctl(TIOCSETD): %m(%d)", errno);
+
+#ifndef N_SYNC_PPP
+#define N_SYNC_PPP 14
+#endif
+    ppp_disc = (new_style_driver && sync_serial)? N_SYNC_PPP: N_PPP;
+    if (ioctl(tty_fd, TIOCSETD, &ppp_disc) < 0) {
+       if ( ! ok_error (errno) ) {
+           error("Couldn't set tty to PPP discipline: %m");
+           return -1;
+       }
     }
-/*
- * Find out which interface we were given.
- */
-    if (ioctl(ppp_fd, PPPIOCGUNIT, &x) < 0) {  
-       if ( ! ok_error (errno))
-           fatal("ioctl(PPPIOCGUNIT): %m(%d)", errno);
+
+    ret_fd = generic_establish_ppp(tty_fd);
+
+#define SC_RCVB        (SC_RCV_B7_0 | SC_RCV_B7_1 | SC_RCV_EVNP | SC_RCV_ODDP)
+#define SC_LOGB        (SC_DEBUG | SC_LOG_INPKT | SC_LOG_OUTPKT | SC_LOG_RAWIN \
+                | SC_LOG_FLUSH)
+
+    if (ret_fd >= 0) {
+       set_flags(ppp_fd, ((get_flags(ppp_fd) & ~(SC_RCVB | SC_LOGB))
+                          | ((kdebugflag * SC_DEBUG) & SC_LOGB)));
+    } else {
+       if (ioctl(tty_fd, TIOCSETD, &tty_disc) < 0 && !ok_error(errno))
+           warn("Couldn't reset tty to normal line discipline: %m");
     }
-/*
- * Check that we got the same unit again.
+
+    return ret_fd;
+}
+
+/********************************************************************
+ *
+ * generic_establish_ppp - Turn the fd into a ppp interface.
  */
-    if (demand) {
-       if (x != ifunit)
+int generic_establish_ppp (int fd)
+{
+    int x;
+
+    if (new_style_driver) {
+       /* Open another instance of /dev/ppp and connect the channel to it */
+       int flags;
+
+       if (ioctl(fd, PPPIOCGCHAN, &chindex) == -1) {
+           error("Couldn't get channel number: %m");
+           goto err;
+       }
+       dbglog("using channel %d", chindex);
+       fd = open("/dev/ppp", O_RDWR);
+       if (fd < 0) {
+           error("Couldn't reopen /dev/ppp: %m");
+           goto err;
+       }
+       if (ioctl(fd, PPPIOCATTCHAN, &chindex) < 0) {
+           error("Couldn't attach to channel %d: %m", chindex);
+           goto err_close;
+       }
+       flags = fcntl(fd, F_GETFL);
+       if (flags == -1 || fcntl(fd, F_SETFL, flags | O_NONBLOCK) == -1)
+           warn("Couldn't set /dev/ppp (channel) to nonblock: %m");
+       set_ppp_fd(fd);
+
+       if (!looped)
+           ifunit = -1;
+       if (!looped && !multilink) {
+           /*
+            * Create a new PPP unit.
+            */
+           if (make_ppp_unit() < 0)
+               goto err_close;
+       }
+
+       if (looped)
+           set_flags(ppp_dev_fd, get_flags(ppp_dev_fd) & ~SC_LOOP_TRAFFIC);
+
+       if (!multilink) {
+           add_fd(ppp_dev_fd);
+           if (ioctl(fd, PPPIOCCONNECT, &ifunit) < 0) {
+               error("Couldn't attach to PPP unit %d: %m", ifunit);
+               goto err_close;
+           }
+       }
+
+    } else {
+       /*
+        * Old-style driver: find out which interface we were given.
+        */
+       set_ppp_fd (fd);
+       if (ioctl(fd, PPPIOCGUNIT, &x) < 0) {
+           if (ok_error (errno))
+               goto err;
+           fatal("ioctl(PPPIOCGUNIT): %m (line %d)", __LINE__);
+       }
+       /* Check that we got the same unit again. */
+       if (looped && x != ifunit)
            fatal("transfer_ppp failed: wanted unit %d, got %d", ifunit, x);
+       ifunit = x;
+
+       /*
+        * Fetch the initial file flags and reset blocking mode on the file.
+        */
+       initfdflags = fcntl(fd, F_GETFL);
+       if (initfdflags == -1 ||
+           fcntl(fd, F_SETFL, initfdflags | O_NONBLOCK) == -1) {
+           if ( ! ok_error (errno))
+               warn("Couldn't set device to non-blocking mode: %m");
+       }
     }
 
-    ifunit = x;
-/*
- * Enable debug in the driver if requested.
- */
-    if (!demand)
-       set_kdebugflag (kdebugflag);
+    looped = 0;
 
-    set_flags (get_flags() & ~(SC_RCV_B7_0 | SC_RCV_B7_1 |
-                              SC_RCV_EVNP | SC_RCV_ODDP));
+    /*
+     * Enable debug in the driver if requested.
+     */
+    if (!looped)
+       set_kdebugflag (kdebugflag);
 
     SYSDEBUG ((LOG_NOTICE, "Using version %d.%d.%d of PPP driver",
            driver_version, driver_modification, driver_patch));
-/*
- * Fetch the initial file flags and reset blocking mode on the file.
- */
-    initfdflags = fcntl(ppp_fd, F_GETFL);
-
-    if (initfdflags == -1 ||
-       fcntl(ppp_fd, F_SETFL, initfdflags | O_NONBLOCK) == -1) {
-       if ( ! ok_error (errno))
-           warn("Couldn't set device to non-blocking mode: %m");
-    }
 
     return ppp_fd;
+
+ err_close:
+    close(fd);
+ err:
+    return -1;
 }
 
 /********************************************************************
  *
- * disestablish_ppp - Restore the serial port to normal operation.
+ * tty_disestablish_ppp - Restore the serial port to normal operation.
  * This shouldn't call die() because it's called from die().
  */
 
-void disestablish_ppp(int tty_fd)
+void tty_disestablish_ppp(int tty_fd)
 {
     if (!hungup) {
 /*
@@ -392,12 +523,12 @@ void disestablish_ppp(int tty_fd)
  */
        if (ioctl(tty_fd, TIOCSETD, &tty_disc) < 0) {
            if ( ! ok_error (errno))
-               error("ioctl(TIOCSETD, N_TTY): %m");
+               error("ioctl(TIOCSETD, N_TTY): %m (line %d)", __LINE__);
        }
-       
+
        if (ioctl(tty_fd, TIOCNXCL, 0) < 0) {
            if ( ! ok_error (errno))
-               warn("ioctl(TIOCNXCL): %m(%d)", errno);
+               warn("ioctl(TIOCNXCL): %m (line %d)", __LINE__);
        }
 
        /* Reset non-blocking mode on fd. */
@@ -407,6 +538,122 @@ void disestablish_ppp(int tty_fd)
        }
     }
     initfdflags = -1;
+
+    generic_disestablish_ppp(tty_fd);
+}
+
+/********************************************************************
+ *
+ * generic_disestablish_ppp - Restore device components to normal
+ * operation, and reconnect the ppp unit to the loopback if in demand
+ * mode.  This shouldn't call die() because it's called from die().
+ */
+void generic_disestablish_ppp(int dev_fd)
+{
+    if (new_style_driver) {
+       close(ppp_fd);
+       ppp_fd = -1;
+       if (demand) {
+           set_flags(ppp_dev_fd, get_flags(ppp_dev_fd) | SC_LOOP_TRAFFIC);
+           looped = 1;
+       } else if (ifunit >= 0 && ioctl(ppp_dev_fd, PPPIOCDETACH) < 0)
+           error("Couldn't release PPP unit: %m");
+       if (!multilink)
+           remove_fd(ppp_dev_fd);
+    } else {
+       /* old-style driver */
+       if (demand)
+           set_ppp_fd(slave_fd);
+    }
+}
+
+/*
+ * make_ppp_unit - make a new ppp unit for ppp_dev_fd.
+ * Assumes new_style_driver.
+ */
+static int make_ppp_unit()
+{
+       int x;
+
+       ifunit = req_unit;
+       x = ioctl(ppp_dev_fd, PPPIOCNEWUNIT, &ifunit);
+       if (x < 0 && req_unit >= 0 && errno == EEXIST) {
+               warn("Couldn't allocate PPP unit %d as it is already in use");
+               ifunit = -1;
+               x = ioctl(ppp_dev_fd, PPPIOCNEWUNIT, &ifunit);
+       }
+       if (x < 0)
+               error("Couldn't create new ppp unit: %m");
+       return x;
+}
+
+/*
+ * cfg_bundle - configure the existing bundle.
+ * Used in demand mode.
+ */
+void cfg_bundle(int mrru, int mtru, int rssn, int tssn)
+{
+       int flags;
+
+       if (!new_style_driver)
+               return;
+
+       /* set the mrru, mtu and flags */
+       if (ioctl(ppp_dev_fd, PPPIOCSMRRU, &mrru) < 0)
+               error("Couldn't set MRRU: %m");
+       flags = get_flags(ppp_dev_fd);
+       flags &= ~(SC_MP_SHORTSEQ | SC_MP_XSHORTSEQ);
+       flags |= (rssn? SC_MP_SHORTSEQ: 0) | (tssn? SC_MP_XSHORTSEQ: 0)
+               | (mrru? SC_MULTILINK: 0);
+
+       set_flags(ppp_dev_fd, flags);
+
+       /* connect up the channel */
+       if (ioctl(ppp_fd, PPPIOCCONNECT, &ifunit) < 0)
+               fatal("Couldn't attach to PPP unit %d: %m", ifunit);
+       add_fd(ppp_dev_fd);
+}
+
+/*
+ * make_new_bundle - create a new PPP unit (i.e. a bundle)
+ * and connect our channel to it.  This should only get called
+ * if `multilink' was set at the time establish_ppp was called.
+ * In demand mode this uses our existing bundle instead of making
+ * a new one.
+ */
+void make_new_bundle(int mrru, int mtru, int rssn, int tssn)
+{
+       if (!new_style_driver)
+               return;
+
+       /* make us a ppp unit */
+       if (make_ppp_unit() < 0)
+               die(1);
+
+       /* set the mrru and flags */
+       cfg_bundle(mrru, mtru, rssn, tssn);
+}
+
+/*
+ * bundle_attach - attach our link to a given PPP unit.
+ * We assume the unit is controlled by another pppd.
+ */
+int bundle_attach(int ifnum)
+{
+       if (!new_style_driver)
+               return -1;
+
+       if (ioctl(ppp_dev_fd, PPPIOCATTACH, &ifnum) < 0) {
+               if (errno == ENXIO)
+                       return 0;       /* doesn't still exist */
+               fatal("Couldn't attach to interface unit %d: %m\n", ifnum);
+       }
+       if (ioctl(ppp_fd, PPPIOCCONNECT, &ifnum) < 0)
+               fatal("Couldn't connect to interface unit %d: %m", ifnum);
+       set_flags(ppp_dev_fd, get_flags(ppp_dev_fd) | SC_MULTILINK);
+
+       ifunit = ifnum;
+       return 1;
 }
 
 /********************************************************************
@@ -424,28 +671,22 @@ void clean_check(void)
            s = NULL;
            switch (~x & (SC_RCV_B7_0|SC_RCV_B7_1|SC_RCV_EVNP|SC_RCV_ODDP)) {
            case SC_RCV_B7_0:
-           case SC_RCV_B7_0 | SC_RCV_EVNP:
-           case SC_RCV_B7_0 | SC_RCV_ODDP:
-           case SC_RCV_B7_0 | SC_RCV_ODDP | SC_RCV_EVNP:
                s = "all had bit 7 set to 1";
                break;
-               
+
            case SC_RCV_B7_1:
-           case SC_RCV_B7_1 | SC_RCV_EVNP:
-           case SC_RCV_B7_1 | SC_RCV_ODDP:
-           case SC_RCV_B7_1 | SC_RCV_ODDP | SC_RCV_EVNP:
                s = "all had bit 7 set to 0";
                break;
-               
+
            case SC_RCV_EVNP:
                s = "all had odd parity";
                break;
-               
+
            case SC_RCV_ODDP:
                s = "all had even parity";
                break;
            }
-           
+
            if (s != NULL) {
                warn("Receive serial link is not 8-bit clean:");
                warn("Problem: %s", s);
@@ -453,7 +694,7 @@ void clean_check(void)
        }
     }
 }
-       
+
 
 /*
  * List of valid speeds.
@@ -519,6 +760,9 @@ struct speed {
 #ifdef B57600
     { 57600, B57600 },
 #endif
+#ifdef B76800
+    { 76800, B76800 },
+#endif
 #ifdef B115200
     { 115200, B115200 },
 #endif
@@ -533,6 +777,9 @@ struct speed {
 #endif
 #ifdef B460800
     { 460800, B460800 },
+#endif
+#ifdef B921600
+    { 921600, B921600 },
 #endif
     { 0, 0 }
 };
@@ -564,7 +811,7 @@ static int translate_speed (int bps)
 static int baud_rate_of (int speed)
 {
     struct speed *speedp;
-    
+
     if (speed != 0) {
        for (speedp = speeds; speedp->speed_int; speedp++) {
            if (speed == speedp->speed_val)
@@ -589,13 +836,13 @@ void set_up_tty(int tty_fd, int local)
     setdtr(tty_fd, 1);
     if (tcgetattr(tty_fd, &tios) < 0) {
        if (!ok_error(errno))
-           fatal("tcgetattr: %m(%d)", errno);
+           fatal("tcgetattr: %m (line %d)", __LINE__);
        return;
     }
-    
+
     if (!restore_term)
        inittermios = tios;
-    
+
     tios.c_cflag     &= ~(CSIZE | CSTOPB | PARENB | CLOCAL);
     tios.c_cflag     |= CS8 | CREAD | HUPCL;
 
@@ -604,7 +851,7 @@ void set_up_tty(int tty_fd, int local)
     tios.c_lflag      = 0;
     tios.c_cc[VMIN]   = 1;
     tios.c_cc[VTIME]  = 0;
-    
+
     if (local || !modem)
        tios.c_cflag ^= (CLOCAL | HUPCL);
 
@@ -626,7 +873,7 @@ void set_up_tty(int tty_fd, int local)
     default:
        break;
     }
-    
+
     speed = translate_speed(inspeed);
     if (speed) {
        cfsetospeed (&tios, speed);
@@ -644,8 +891,8 @@ void set_up_tty(int tty_fd, int local)
 
     if (tcsetattr(tty_fd, TCSAFLUSH, &tios) < 0)
        if (!ok_error(errno))
-           fatal("tcsetattr: %m");
-    
+           fatal("tcsetattr: %m (line %d)", __LINE__);
+
     baud_rate    = baud_rate_of(speed);
     restore_term = 1;
 }
@@ -680,10 +927,10 @@ void restore_tty (int tty_fd)
  */
        if (!default_device)
            inittermios.c_lflag &= ~(ECHO | ECHONL);
-       
+
        if (tcsetattr(tty_fd, TCSAFLUSH, &inittermios) < 0) {
            if (! ok_error (errno))
-               warn("tcsetattr: %m");
+               warn("tcsetattr: %m (line %d)", __LINE__);
        }
     }
 }
@@ -695,10 +942,22 @@ void restore_tty (int tty_fd)
 
 void output (int unit, unsigned char *p, int len)
 {
-    if (debug)
-       dbglog("sent %P", p, len);
-    
-    if (write(ppp_fd, p, len) < 0) {
+    int fd = ppp_fd;
+    int proto;
+
+    dump_packet("sent", p, len);
+    if (snoop_send_hook) snoop_send_hook(p, len);
+
+    if (len < PPP_HDRLEN)
+       return;
+    if (new_style_driver) {
+       p += 2;
+       len -= 2;
+       proto = (p[0] << 8) + p[1];
+       if (ifunit >= 0 && !(proto >= 0xc000 || proto == PPP_CCPFRAG))
+           fd = ppp_dev_fd;
+    }
+    if (write(fd, p, len) < 0) {
        if (errno == EWOULDBLOCK || errno == ENOBUFS
            || errno == ENXIO || errno == EIO || errno == EINTR)
            warn("write: warning: %m (%d)", errno);
@@ -716,13 +975,14 @@ void output (int unit, unsigned char *p, int len)
 
 void wait_input(struct timeval *timo)
 {
-    fd_set ready;
+    fd_set ready, exc;
     int n;
 
     ready = in_fds;
-    n = select(max_in_fd + 1, &ready, NULL, &ready, timo);
+    exc = in_fds;
+    n = select(max_in_fd + 1, &ready, NULL, &exc, timo);
     if (n < 0 && errno != EINTR)
-       fatal("select: %m(%d)", errno);
+       fatal("select: %m");
 }
 
 /*
@@ -743,42 +1003,6 @@ void remove_fd(int fd)
     FD_CLR(fd, &in_fds);
 }
 
-#if 0
-/********************************************************************
- *
- * wait_loop_output - wait until there is data available on the
- * loopback, for the length of time specified by *timo (indefinite
- * if timo is NULL).
- */
-void wait_loop_output(timo)
-    struct timeval *timo;
-{
-    fd_set ready;
-    int n;
-
-    FD_ZERO(&ready);
-    FD_SET(master_fd, &ready);
-    n = select(master_fd + 1, &ready, NULL, &ready, timo);
-    if (n < 0 && errno != EINTR)
-       fatal("select: %m(%d)", errno);
-}
-
-/********************************************************************
- *
- * wait_time - wait for a given length of time or until a
- * signal is received.
- */
-
-void wait_time(timo)
-    struct timeval *timo;
-{
-    int n;
-
-    n = select(0, NULL, NULL, NULL, timo);
-    if (n < 0 && errno != EINTR)
-        fatal("select: %m(%d)", errno);
-}
-#endif
 
 /********************************************************************
  *
@@ -787,15 +1011,31 @@ void wait_time(timo)
 
 int read_packet (unsigned char *buf)
 {
-    int len;
-  
-    len = read(ppp_fd, buf, PPP_MTU + PPP_HDRLEN);
-    if (len < 0) {
-       if (errno == EWOULDBLOCK || errno == EIO)
-           return -1;
-       fatal("read: %m(%d)", errno);
+    int len, nr;
+
+    len = PPP_MRU + PPP_HDRLEN;
+    if (new_style_driver) {
+       *buf++ = PPP_ALLSTATIONS;
+       *buf++ = PPP_UI;
+       len -= 2;
+    }
+    nr = -1;
+    if (ppp_fd >= 0) {
+       nr = read(ppp_fd, buf, len);
+       if (nr < 0 && errno != EWOULDBLOCK && errno != EIO && errno != EINTR)
+           error("read: %m");
+       if (nr < 0 && errno == ENXIO)
+           return 0;
     }
-    return len;
+    if (nr < 0 && new_style_driver && ifunit >= 0) {
+       /* N.B. we read ppp_fd first since LCP packets come in there. */
+       nr = read(ppp_dev_fd, buf, len);
+       if (nr < 0 && errno != EWOULDBLOCK && errno != EIO && errno != EINTR)
+           error("read /dev/ppp: %m");
+       if (nr < 0 && errno == ENXIO)
+           return 0;
+    }
+    return (new_style_driver && nr > 0)? nr+2: nr;
 }
 
 /********************************************************************
@@ -808,90 +1048,102 @@ int
 get_loop_output(void)
 {
     int rv = 0;
-    int n  = read(master_fd, inbuf, sizeof(inbuf));
+    int n;
 
-    while (n > 0) {
+    if (new_style_driver) {
+       while ((n = read_packet(inpacket_buf)) > 0)
+           if (loop_frame(inpacket_buf, n))
+               rv = 1;
+       return rv;
+    }
+
+    while ((n = read(master_fd, inbuf, sizeof(inbuf))) > 0)
        if (loop_chars(inbuf, n))
            rv = 1;
-       n = read(master_fd, inbuf, sizeof(inbuf));
-    }
 
     if (n == 0)
        fatal("eof on loopback");
 
     if (errno != EWOULDBLOCK)
        fatal("read from loopback: %m(%d)", errno);
-    
+
     return rv;
 }
 
+/*
+ * netif_set_mtu - set the MTU on the PPP network interface.
+ */
+void
+netif_set_mtu(int unit, int mtu)
+{
+    struct ifreq ifr;
+
+    SYSDEBUG ((LOG_DEBUG, "netif_set_mtu: mtu = %d\n", mtu));
+
+    memset (&ifr, '\0', sizeof (ifr));
+    strlcpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
+    ifr.ifr_mtu = mtu;
+
+    if (ifunit >= 0 && ioctl(sock_fd, SIOCSIFMTU, (caddr_t) &ifr) < 0)
+       error("ioctl(SIOCSIFMTU): %m (line %d)", __LINE__);
+}
+
 /********************************************************************
  *
- * ppp_send_config - configure the transmit characteristics of
+ * tty_send_config - configure the transmit characteristics of
  * the ppp interface.
  */
 
-void ppp_send_config (int unit,int mtu,u_int32_t asyncmap,int pcomp,int accomp)
+void tty_send_config (int mtu,u_int32_t asyncmap,int pcomp,int accomp)
 {
     u_int x;
-    struct ifreq ifr;
-  
-    SYSDEBUG ((LOG_DEBUG, "send_config: mtu = %d\n", mtu));
+
 /*
- * Ensure that the link is still up.
+ * Set the asyncmap and other parameters for the ppp device
  */
     if (!still_ppp())
        return;
-/*
- * Set the MTU and other parameters for the ppp device
- */
-    memset (&ifr, '\0', sizeof (ifr));
-    strlcpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
-    ifr.ifr_mtu = mtu;
-       
-    if (ioctl(sock_fd, SIOCSIFMTU, (caddr_t) &ifr) < 0)
-       fatal("ioctl(SIOCSIFMTU): %m(%d)", errno);
-       
+    link_mtu = mtu;
     SYSDEBUG ((LOG_DEBUG, "send_config: asyncmap = %lx\n", asyncmap));
     if (ioctl(ppp_fd, PPPIOCSASYNCMAP, (caddr_t) &asyncmap) < 0) {
        if (!ok_error(errno))
-           fatal("ioctl(PPPIOCSASYNCMAP): %m(%d)", errno);
+           fatal("ioctl(PPPIOCSASYNCMAP): %m (line %d)", __LINE__);
        return;
     }
-    
-    x = get_flags();
+
+    x = get_flags(ppp_fd);
     x = pcomp  ? x | SC_COMP_PROT : x & ~SC_COMP_PROT;
     x = accomp ? x | SC_COMP_AC   : x & ~SC_COMP_AC;
     x = sync_serial ? x | SC_SYNC : x & ~SC_SYNC;
-    set_flags(x);
+    set_flags(ppp_fd, x);
 }
 
 /********************************************************************
  *
- * ppp_set_xaccm - set the extended transmit ACCM for the interface.
+ * tty_set_xaccm - set the extended transmit ACCM for the interface.
  */
 
-void ppp_set_xaccm (int unit, ext_accm accm)
+void tty_set_xaccm (ext_accm accm)
 {
     SYSDEBUG ((LOG_DEBUG, "set_xaccm: %08lx %08lx %08lx %08lx\n",
                accm[0], accm[1], accm[2], accm[3]));
 
+    if (!still_ppp())
+       return;
     if (ioctl(ppp_fd, PPPIOCSXASYNCMAP, accm) < 0 && errno != ENOTTY) {
        if ( ! ok_error (errno))
-           warn("ioctl(set extended ACCM): %m(%d)", errno);
+           warn("ioctl(set extended ACCM): %m (line %d)", __LINE__);
     }
 }
 
 /********************************************************************
  *
- * ppp_recv_config - configure the receive-side characteristics of
+ * tty_recv_config - configure the receive-side characteristics of
  * the ppp interface.
  */
 
-void ppp_recv_config (int unit,int mru,u_int32_t asyncmap,int pcomp,int accomp)
+void tty_recv_config (int mru,u_int32_t asyncmap,int pcomp,int accomp)
 {
-    u_int x;
-
     SYSDEBUG ((LOG_DEBUG, "recv_config: mru = %d\n", mru));
 /*
  * If we were called because the link has gone down then there is nothing
@@ -904,18 +1156,17 @@ void ppp_recv_config (int unit,int mru,u_int32_t asyncmap,int pcomp,int accomp)
  */
     if (ioctl(ppp_fd, PPPIOCSMRU, (caddr_t) &mru) < 0) {
        if ( ! ok_error (errno))
-           error("ioctl(PPPIOCSMRU): %m(%d)", errno);
+           error("ioctl(PPPIOCSMRU): %m (line %d)", __LINE__);
     }
+    if (new_style_driver && ifunit >= 0
+       && ioctl(ppp_dev_fd, PPPIOCSMRU, (caddr_t) &mru) < 0)
+       error("Couldn't set MRU in generic PPP layer: %m");
 
     SYSDEBUG ((LOG_DEBUG, "recv_config: asyncmap = %lx\n", asyncmap));
     if (ioctl(ppp_fd, PPPIOCSRASYNCMAP, (caddr_t) &asyncmap) < 0) {
        if (!ok_error(errno))
-           error("ioctl(PPPIOCSRASYNCMAP): %m(%d)", errno);
+           error("ioctl(PPPIOCSRASYNCMAP): %m (line %d)", __LINE__);
     }
-
-    x = get_flags();
-    x = !accomp? x | SC_REJ_COMP_AC: x &~ SC_REJ_COMP_AC;
-    set_flags (x);
 }
 
 /********************************************************************
@@ -933,7 +1184,7 @@ int ccp_test (int unit, u_char *opt_ptr, int opt_len, int for_transmit)
     data.length   = opt_len;
     data.transmit = for_transmit;
 
-    if (ioctl(ppp_fd, PPPIOCSCOMPRESS, (caddr_t) &data) >= 0)
+    if (ioctl(ppp_dev_fd, PPPIOCSCOMPRESS, (caddr_t) &data) >= 0)
        return 1;
 
     return (errno == ENOBUFS)? 0: -1;
@@ -946,14 +1197,41 @@ int ccp_test (int unit, u_char *opt_ptr, int opt_len, int for_transmit)
 
 void ccp_flags_set (int unit, int isopen, int isup)
 {
-    if (still_ppp()) {
-       int x = get_flags();
+    if (still_ppp() && ifunit >= 0) {
+       int x = get_flags(ppp_dev_fd);
        x = isopen? x | SC_CCP_OPEN : x &~ SC_CCP_OPEN;
        x = isup?   x | SC_CCP_UP   : x &~ SC_CCP_UP;
-       set_flags (x);
+       set_flags (ppp_dev_fd, x);
     }
 }
 
+#ifdef PPP_FILTER
+/*
+ * set_filters - set the active and pass filters in the kernel driver.
+ */
+int set_filters(struct bpf_program *pass, struct bpf_program *active)
+{
+       struct sock_fprog fp;
+
+       fp.len = pass->bf_len;
+       fp.filter = (struct sock_filter *) pass->bf_insns;
+       if (ioctl(ppp_dev_fd, PPPIOCSPASS, &fp) < 0) {
+               if (errno == ENOTTY)
+                       warn("kernel does not support PPP filtering");
+               else
+                       error("Couldn't set pass-filter in kernel: %m");
+               return 0;
+       }
+       fp.len = active->bf_len;
+       fp.filter = (struct sock_filter *) active->bf_insns;
+       if (ioctl(ppp_dev_fd, PPPIOCSACTIVE, &fp) < 0) {
+               error("Couldn't set active-filter in kernel: %m");
+               return 0;
+       }
+       return 1;
+}
+#endif /* PPP_FILTER */
+
 /********************************************************************
  *
  * get_idle_time - return how long the link has been idle.
@@ -963,8 +1241,8 @@ get_idle_time(u, ip)
     int u;
     struct ppp_idle *ip;
 {
-    return ioctl(ppp_fd, PPPIOCGIDLE, ip) >= 0;
-} 
+    return ioctl(ppp_dev_fd, PPPIOCGIDLE, ip) >= 0;
+}
 
 /********************************************************************
  *
@@ -987,6 +1265,8 @@ get_ppp_stats(u, stats)
     }
     stats->bytes_in = req.stats.p.ppp_ibytes;
     stats->bytes_out = req.stats.p.ppp_obytes;
+    stats->pkts_in = req.stats.p.ppp_ipackets;
+    stats->pkts_out = req.stats.p.ppp_opackets;
     return 1;
 }
 
@@ -999,71 +1279,60 @@ get_ppp_stats(u, stats)
 
 int ccp_fatal_error (int unit)
 {
-    int x = get_flags();
+    int x = get_flags(ppp_dev_fd);
 
     return x & SC_DC_FERROR;
 }
 
-/*
- * path_to_route - determine the path to the proc file system data
- */
-#define ROUTE_MAX_COLS 12
-FILE *route_fd = (FILE *) 0;
-static char route_buffer [512];
-static int route_dev_col, route_dest_col, route_gw_col;
-static int route_flags_col, route_mask_col;
-static int route_num_cols;
-
-static char *path_to_route (void);
-static int open_route_table (void);
-static void close_route_table (void);
-static int read_route_table (struct rtentry *rt);
-
 /********************************************************************
  *
  * path_to_procfs - find the path to the proc file system mount point
  */
+static char proc_path[MAXPATHLEN];
+static int proc_path_len;
 
-static int path_to_procfs (void)
+static char *path_to_procfs(const char *tail)
 {
     struct mntent *mntent;
     FILE *fp;
 
-    fp = fopen(MOUNTED, "r");
-    if (fp == NULL) {
+    if (proc_path_len == 0) {
        /* Default the mount location of /proc */
-       strlcpy (route_buffer, "/proc", sizeof (route_buffer));
-       return 1;
-    }
-
-    while ((mntent = getmntent(fp)) != NULL) {
-       if (strcmp(mntent->mnt_type, MNTTYPE_IGNORE) == 0)
-           continue;
-       if (strcmp(mntent->mnt_type, "proc") == 0)
-           break;
+       strlcpy (proc_path, "/proc", sizeof(proc_path));
+       proc_path_len = 5;
+       fp = fopen(MOUNTED, "r");
+       if (fp != NULL) {
+           while ((mntent = getmntent(fp)) != NULL) {
+               if (strcmp(mntent->mnt_type, MNTTYPE_IGNORE) == 0)
+                   continue;
+               if (strcmp(mntent->mnt_type, "proc") == 0) {
+                   strlcpy(proc_path, mntent->mnt_dir, sizeof(proc_path));
+                   proc_path_len = strlen(proc_path);
+                   break;
+               }
+           }
+           fclose (fp);
+       }
     }
-    fclose (fp);
-    if (mntent == 0)
-       return 0;
 
-    strlcpy(route_buffer, mntent->mnt_dir, sizeof (route_buffer));
-    return 1;
+    strlcpy(proc_path + proc_path_len, tail,
+           sizeof(proc_path) - proc_path_len);
+    return proc_path;
 }
 
-/********************************************************************
- *
- * path_to_route - find the path to the route tables in the proc file system
+/*
+ * /proc/net/route parsing stuff.
  */
+#define ROUTE_MAX_COLS 12
+FILE *route_fd = (FILE *) 0;
+static char route_buffer[512];
+static int route_dev_col, route_dest_col, route_gw_col;
+static int route_flags_col, route_mask_col;
+static int route_num_cols;
 
-static char *path_to_route (void)
-{
-    if (!path_to_procfs()) {
-       error("proc file system not mounted");
-       return 0;
-    }
-    strlcat (route_buffer, "/net/route", sizeof(route_buffer));
-    return (route_buffer);
-}
+static int open_route_table (void);
+static void close_route_table (void);
+static int read_route_table (struct rtentry *rt);
 
 /********************************************************************
  *
@@ -1073,8 +1342,8 @@ static char *path_to_route (void)
 static void close_route_table (void)
 {
     if (route_fd != (FILE *) 0) {
-        fclose (route_fd);
-        route_fd = (FILE *) 0;
+       fclose (route_fd);
+       route_fd = (FILE *) 0;
     }
 }
 
@@ -1090,14 +1359,11 @@ static int open_route_table (void)
 
     close_route_table();
 
-    path = path_to_route();
-    if (path == NULL)
-        return 0;
-
+    path = path_to_procfs("/net/route");
     route_fd = fopen (path, "r");
     if (route_fd == NULL) {
-        error("can't open %s: %m (%d)", path, errno);
-        return 0;
+       error("can't open routing table %s: %m", path);
+       return 0;
     }
 
     route_dev_col = 0;         /* default to usual columns */
@@ -1145,7 +1411,7 @@ static int read_route_table(struct rtentry *rt)
 {
     char *cols[ROUTE_MAX_COLS], *p;
     int col;
-       
+
     memset (rt, '\0', sizeof (struct rtentry));
 
     if (fgets (route_buffer, sizeof (route_buffer), route_fd) == (char *) 0)
@@ -1156,16 +1422,12 @@ static int read_route_table(struct rtentry *rt)
        cols[col] = strtok(p, route_delims);
        if (cols[col] == NULL)
            return 0;           /* didn't get enough columns */
+       p = NULL;
     }
 
-    ((struct sockaddr_in *) &rt->rt_dst)->sin_addr.s_addr =
-       strtoul(cols[route_dest_col], NULL, 16);
-
-    ((struct sockaddr_in *) &rt->rt_gateway)->sin_addr.s_addr =
-       strtoul(cols[route_gw_col], NULL, 16);
-
-    ((struct sockaddr_in *) &rt->rt_genmask)->sin_addr.s_addr =
-       strtoul(cols[route_mask_col], NULL, 16);
+    SIN_ADDR(rt->rt_dst) = strtoul(cols[route_dest_col], NULL, 16);
+    SIN_ADDR(rt->rt_gateway) = strtoul(cols[route_gw_col], NULL, 16);
+    SIN_ADDR(rt->rt_genmask) = strtoul(cols[route_mask_col], NULL, 16);
 
     rt->rt_flags = (short) strtoul(cols[route_flags_col], NULL, 16);
     rt->rt_dev   = cols[route_dev_col];
@@ -1183,13 +1445,15 @@ static int defaultroute_exists (struct rtentry *rt)
     int result = 0;
 
     if (!open_route_table())
-        return 0;
+       return 0;
 
     while (read_route_table(rt) != 0) {
-        if ((rt->rt_flags & RTF_UP) == 0)
+       if ((rt->rt_flags & RTF_UP) == 0)
            continue;
 
-        if (((struct sockaddr_in *) (&rt->rt_dst))->sin_addr.s_addr == 0L) {
+       if (kernel_version > KVERSION(2,1,0) && SIN_ADDR(rt->rt_genmask) != 0)
+           continue;
+       if (SIN_ADDR(rt->rt_dst) == 0L) {
            result = 1;
            break;
        }
@@ -1217,8 +1481,7 @@ int have_route_to(u_int32_t addr)
     while (read_route_table(&rt)) {
        if ((rt.rt_flags & RTF_UP) == 0 || strcmp(rt.rt_dev, ifname) == 0)
            continue;
-       if ((addr & ((struct sockaddr_in *)&rt.rt_genmask)->sin_addr.s_addr)
-           == ((struct sockaddr_in *)&rt.rt_dst)->sin_addr.s_addr) {
+       if ((addr & SIN_ADDR(rt.rt_genmask)) == SIN_ADDR(rt.rt_dst)) {
            result = 1;
            break;
        }
@@ -1238,10 +1501,9 @@ int sifdefaultroute (int unit, u_int32_t ouraddr, u_int32_t gateway)
     struct rtentry rt;
 
     if (defaultroute_exists(&rt) && strcmp(rt.rt_dev, ifname) != 0) {
-       struct in_addr old_gateway =
-         ((struct sockaddr_in *) (&rt.rt_gateway))-> sin_addr;
+       u_int32_t old_gateway = SIN_ADDR(rt.rt_gateway);
 
-       if (old_gateway.s_addr != gateway)
+       if (old_gateway != gateway)
            error("not replacing existing default route to %s [%I]",
                  rt.rt_dev, old_gateway);
        return 0;
@@ -1251,17 +1513,19 @@ int sifdefaultroute (int unit, u_int32_t ouraddr, u_int32_t gateway)
     SET_SA_FAMILY (rt.rt_dst,     AF_INET);
     SET_SA_FAMILY (rt.rt_gateway, AF_INET);
 
+    rt.rt_dev = ifname;
+
     if (kernel_version > KVERSION(2,1,0)) {
        SET_SA_FAMILY (rt.rt_genmask, AF_INET);
-       ((struct sockaddr_in *) &rt.rt_genmask)->sin_addr.s_addr = 0L;
+       SIN_ADDR(rt.rt_genmask) = 0L;
     }
 
-    ((struct sockaddr_in *) &rt.rt_gateway)->sin_addr.s_addr = gateway;
-    
-    rt.rt_flags = RTF_UP | RTF_GATEWAY | RTF_DEFAULT;
+    SIN_ADDR(rt.rt_gateway) = gateway;
+
+    rt.rt_flags = RTF_UP | RTF_GATEWAY;
     if (ioctl(sock_fd, SIOCADDRT, &rt) < 0) {
        if ( ! ok_error ( errno ))
-           error("default route ioctl(SIOCADDRT): %m(%d)", errno);
+           error("default route ioctl(SIOCADDRT): %m");
        return 0;
     }
 
@@ -1286,16 +1550,16 @@ int cifdefaultroute (int unit, u_int32_t ouraddr, u_int32_t gateway)
 
     if (kernel_version > KVERSION(2,1,0)) {
        SET_SA_FAMILY (rt.rt_genmask, AF_INET);
-       ((struct sockaddr_in *) &rt.rt_genmask)->sin_addr.s_addr = 0L;
+       SIN_ADDR(rt.rt_genmask) = 0L;
     }
 
-    ((struct sockaddr_in *) &rt.rt_gateway)->sin_addr.s_addr = gateway;
-    
-    rt.rt_flags = RTF_UP | RTF_GATEWAY | RTF_DEFAULT;
+    SIN_ADDR(rt.rt_gateway) = gateway;
+
+    rt.rt_flags = RTF_UP | RTF_GATEWAY;
     if (ioctl(sock_fd, SIOCDELRT, &rt) < 0 && errno != ESRCH) {
        if (still_ppp()) {
            if ( ! ok_error ( errno ))
-               error("default route ioctl(SIOCDELRT): %m (%d)", errno);
+               error("default route ioctl(SIOCDELRT): %m");
            return 0;
        }
     }
@@ -1311,12 +1575,13 @@ int cifdefaultroute (int unit, u_int32_t ouraddr, u_int32_t gateway)
 int sifproxyarp (int unit, u_int32_t his_adr)
 {
     struct arpreq arpreq;
+    char *forw_path;
 
     if (has_proxy_arp == 0) {
        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;
+       SIN_ADDR(arpreq.arp_pa) = his_adr;
        arpreq.arp_flags = ATF_PERM | ATF_PUBL;
 /*
  * Get the hardware address of an interface on the same subnet
@@ -1331,11 +1596,23 @@ int sifproxyarp (int unit, u_int32_t his_adr)
 
        if (ioctl(sock_fd, SIOCSARP, (caddr_t)&arpreq) < 0) {
            if ( ! ok_error ( errno ))
-               error("ioctl(SIOCSARP): %m(%d)", errno);
+               error("ioctl(SIOCSARP): %m");
            return 0;
        }
        proxy_arp_addr = his_adr;
        has_proxy_arp = 1;
+
+       if (tune_kernel) {
+           forw_path = path_to_procfs("/sys/net/ipv4/ip_forward");
+           if (forw_path != 0) {
+               int fd = open(forw_path, O_WRONLY);
+               if (fd >= 0) {
+                   if (write(fd, "1", 1) != 1)
+                       error("Couldn't enable IP forwarding: %m");
+                   close(fd);
+               }
+           }
+       }
     }
 
     return 1;
@@ -1354,19 +1631,19 @@ int cifproxyarp (int unit, u_int32_t his_adr)
        has_proxy_arp = 0;
        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;
+       SIN_ADDR(arpreq.arp_pa) = his_adr;
        arpreq.arp_flags = ATF_PERM | ATF_PUBL;
        strlcpy(arpreq.arp_dev, proxy_arp_dev, sizeof(arpreq.arp_dev));
 
        if (ioctl(sock_fd, SIOCDARP, (caddr_t)&arpreq) < 0) {
            if ( ! ok_error ( errno ))
-               warn("ioctl(SIOCDARP): %m(%d)", errno);
+               warn("ioctl(SIOCDARP): %m");
            return 0;
        }
     }
     return 1;
 }
-     
+
 /********************************************************************
  *
  * get_ether_addr - get the hardware address of an interface on the
@@ -1379,15 +1656,19 @@ static int get_ether_addr (u_int32_t ipaddr,
 {
     struct ifreq *ifr, *ifend;
     u_int32_t ina, mask;
-    struct ifreq ifreq;
+    char *aliasp;
+    struct ifreq ifreq, bestifreq;
     struct ifconf ifc;
     struct ifreq ifs[MAX_IFS];
-    
+
+    u_int32_t bestmask=0;
+    int found_interface = 0;
+
     ifc.ifc_len = sizeof(ifs);
     ifc.ifc_req = ifs;
     if (ioctl(sock_fd, SIOCGIFCONF, &ifc) < 0) {
        if ( ! ok_error ( errno ))
-           error("ioctl(SIOCGIFCONF): %m(%d)", errno);
+           error("ioctl(SIOCGIFCONF): %m (line %d)", __LINE__);
        return 0;
     }
 
@@ -1400,9 +1681,9 @@ static int get_ether_addr (u_int32_t 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) {
-           ina = ((struct sockaddr_in *) &ifr->ifr_addr)->sin_addr.s_addr;
+           ina = SIN_ADDR(ifr->ifr_addr);
            strlcpy(ifreq.ifr_name, ifr->ifr_name, sizeof(ifreq.ifr_name));
-            SYSDEBUG ((LOG_DEBUG, "proxy arp: examining interface %s",
+           SYSDEBUG ((LOG_DEBUG, "proxy arp: examining interface %s",
                        ifreq.ifr_name));
 /*
  * Check that the interface is up, and not point-to-point
@@ -1417,34 +1698,46 @@ static int get_ether_addr (u_int32_t ipaddr,
  * Get its netmask and check that it's on the right subnet.
  */
            if (ioctl(sock_fd, SIOCGIFNETMASK, &ifreq) < 0)
-               continue;
+               continue;
 
-           mask = ((struct sockaddr_in *) &ifreq.ifr_addr)->sin_addr.s_addr;
+           mask = SIN_ADDR(ifreq.ifr_addr);
            SYSDEBUG ((LOG_DEBUG, "proxy arp: interface addr %s mask %lx",
-                       ip_ntoa(ina), ntohl(mask)));
+                      ip_ntoa(ina), ntohl(mask)));
 
            if (((ipaddr ^ ina) & mask) != 0)
-               continue;
-           break;
+               continue; /* no match */
+           /* matched */
+           if (mask >= bestmask) {
+               /* Compare using >= instead of > -- it is possible for
+                  an interface to have a netmask of 0.0.0.0 */
+               found_interface = 1;
+               bestifreq = ifreq;
+               bestmask = mask;
+           }
        }
     }
-    
-    if (ifr >= ifend)
-        return 0;
 
-    strlcpy(name, ifreq.ifr_name, namelen);
+    if (!found_interface) return 0;
+
+    strlcpy(name, bestifreq.ifr_name, namelen);
+
+    /* trim off the :1 in eth0:1 */
+    aliasp = strchr(name, ':');
+    if (aliasp != 0)
+       *aliasp = 0;
+
     info("found interface %s for proxy arp", name);
 /*
  * Now get the hardware address.
  */
-    memset (&ifreq.ifr_hwaddr, 0, sizeof (struct sockaddr));
-    if (ioctl (sock_fd, SIOCGIFHWADDR, &ifreq) < 0) {
-        error("SIOCGIFHWADDR(%s): %m(%d)", ifreq.ifr_name, errno);
-        return 0;
+    memset (&bestifreq.ifr_hwaddr, 0, sizeof (struct sockaddr));
+    if (ioctl (sock_fd, SIOCGIFHWADDR, &bestifreq) < 0) {
+       error("SIOCGIFHWADDR(%s): %m", bestifreq.ifr_name);
+       return 0;
     }
 
     memcpy (hwaddr,
-           &ifreq.ifr_hwaddr,
+           &bestifreq.ifr_hwaddr,
            sizeof (struct sockaddr));
 
     SYSDEBUG ((LOG_DEBUG,
@@ -1460,6 +1753,38 @@ static int get_ether_addr (u_int32_t ipaddr,
     return 1;
 }
 
+/*
+ * get_if_hwaddr - get the hardware address for the specified
+ * network interface device.
+ */
+int
+get_if_hwaddr(u_char *addr, char *name)
+{
+       struct ifreq ifreq;
+       int ret, sock_fd;
+
+       sock_fd = socket(AF_INET, SOCK_DGRAM, 0);
+       if (sock_fd < 0)
+               return 0;
+       memset(&ifreq.ifr_hwaddr, 0, sizeof(struct sockaddr));
+       strlcpy(ifreq.ifr_name, name, sizeof(ifreq.ifr_name));
+       ret = ioctl(sock_fd, SIOCGIFHWADDR, &ifreq);
+       close(sock_fd);
+       if (ret >= 0)
+               memcpy(addr, ifreq.ifr_hwaddr.sa_data, 6);
+       return ret;
+}
+
+/*
+ * get_first_ethernet - return the name of the first ethernet-style
+ * interface on this system.
+ */
+char *
+get_first_ethernet()
+{
+       return "eth0";
+}
+
 /********************************************************************
  *
  * Return user specified netmask, modified by any mask we might determine
@@ -1478,14 +1803,14 @@ u_int32_t GetMask (u_int32_t addr)
     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);
 /*
@@ -1495,10 +1820,10 @@ u_int32_t GetMask (u_int32_t addr)
     ifc.ifc_req = ifs;
     if (ioctl(sock_fd, SIOCGIFCONF, &ifc) < 0) {
        if ( ! ok_error ( errno ))
-           warn("ioctl(SIOCGIFCONF): %m(%d)", errno);
+           warn("ioctl(SIOCGIFCONF): %m (line %d)", __LINE__);
        return mask;
     }
-    
+
     ifend = (struct ifreq *) (ifc.ifc_buf + ifc.ifc_len);
     for (ifr = ifc.ifc_req; ifr < ifend; ifr++) {
 /*
@@ -1506,7 +1831,7 @@ u_int32_t GetMask (u_int32_t addr)
  */
        if (ifr->ifr_addr.sa_family != AF_INET)
            continue;
-       ina = ((struct sockaddr_in *) &ifr->ifr_addr)->sin_addr.s_addr;
+       ina = SIN_ADDR(ifr->ifr_addr);
        if (((ntohl(ina) ^ addr) & nmask) != 0)
            continue;
 /*
@@ -1515,7 +1840,7 @@ u_int32_t GetMask (u_int32_t addr)
        strlcpy(ifreq.ifr_name, ifr->ifr_name, sizeof(ifreq.ifr_name));
        if (ioctl(sock_fd, SIOCGIFFLAGS, &ifreq) < 0)
            continue;
-       
+
        if (((ifreq.ifr_flags ^ FLAGS_GOOD) & FLAGS_MASK) != 0)
            continue;
 /*
@@ -1523,7 +1848,7 @@ u_int32_t GetMask (u_int32_t addr)
  */
        if (ioctl(sock_fd, SIOCGIFNETMASK, &ifreq) < 0)
            continue;
-       mask |= ((struct sockaddr_in *)&ifreq.ifr_addr)->sin_addr.s_addr;
+       mask |= SIN_ADDR(ifreq.ifr_addr);
        break;
     }
     return mask;
@@ -1537,24 +1862,20 @@ u_int32_t GetMask (u_int32_t addr)
 static void decode_version (char *buf, int *version,
                            int *modification, int *patch)
 {
-    *version      = (int) strtoul (buf, &buf, 10);
+    char *endp;
+
+    *version      = (int) strtoul (buf, &endp, 10);
     *modification = 0;
     *patch        = 0;
-    
-    if (*buf == '.') {
-       ++buf;
-       *modification = (int) strtoul (buf, &buf, 10);
-       if (*buf == '.') {
-           ++buf;
+
+    if (endp != buf && *endp == '.') {
+       buf = endp + 1;
+       *modification = (int) strtoul (buf, &endp, 10);
+       if (endp != buf && *endp == '.') {
+           buf = endp + 1;
            *patch = (int) strtoul (buf, &buf, 10);
        }
     }
-    
-    if (*buf != '\0') {
-       *version      =
-       *modification =
-       *patch        = 0;
-    }
 }
 
 /********************************************************************
@@ -1586,10 +1907,10 @@ ppp_registered(void)
      * Try to put the device into the PPP discipline.
      */
     if (ioctl(local_fd, TIOCSETD, &ppp_disc) < 0) {
-       error("ioctl(TIOCSETD(PPP)): %m(%d)", errno);
+       error("ioctl(TIOCSETD(PPP)): %m (line %d)", __LINE__);
     } else
        ret = 1;
-    
+
     close(local_fd);
     close(mfd);
     return ret;
@@ -1603,12 +1924,13 @@ ppp_registered(void)
 
 int ppp_available(void)
 {
-    int s, ok;
+    int s, ok, fd;
     struct ifreq ifr;
     int    size;
     int    my_version, my_modification, my_patch;
+    int osmaj, osmin, ospatch;
 
-    no_ppp_msg = 
+    no_ppp_msg =
        "This system lacks kernel support for PPP.  This could be because\n"
        "the PPP kernel module could not be loaded, or because PPP was not\n"
        "included in the kernel configuration.  If PPP was included as a\n"
@@ -1616,13 +1938,55 @@ int ppp_available(void)
        "ppp.o exists in /lib/modules/`uname -r`/net.\n"
        "See README.linux file in the ppp distribution for more details.\n";
 
+    /* get the kernel version now, since we are called before sys_init */
+    uname(&utsname);
+    osmaj = osmin = ospatch = 0;
+    sscanf(utsname.release, "%d.%d.%d", &osmaj, &osmin, &ospatch);
+    kernel_version = KVERSION(osmaj, osmin, ospatch);
+
+    fd = open("/dev/ppp", O_RDWR);
+#if 0
+    if (fd < 0 && errno == ENOENT) {
+       /* try making it and see if that helps. */
+       if (mknod("/dev/ppp", S_IFCHR | S_IRUSR | S_IWUSR,
+                 makedev(108, 0)) >= 0) {
+           fd = open("/dev/ppp", O_RDWR);
+           if (fd >= 0)
+               info("Created /dev/ppp device node");
+           else
+               unlink("/dev/ppp");     /* didn't work, undo the mknod */
+       } else if (errno == EEXIST) {
+           fd = open("/dev/ppp", O_RDWR);
+       }
+    }
+#endif /* 0 */
+    if (fd >= 0) {
+       new_style_driver = 1;
+
+       /* XXX should get from driver */
+       driver_version = 2;
+       driver_modification = 4;
+       driver_patch = 0;
+       close(fd);
+       return 1;
+    }
+    if (kernel_version >= KVERSION(2,3,13)) {
+       if (errno == ENOENT)
+           no_ppp_msg =
+               "pppd is unable to open the /dev/ppp device.\n"
+               "You need to create the /dev/ppp device node by\n"
+               "executing the following command as root:\n"
+               "       mknod /dev/ppp c 108 0\n";
+       return 0;
+    }
+
 /*
  * Open a socket for doing the ioctl operations.
- */    
+ */
     s = socket(AF_INET, SOCK_DGRAM, 0);
     if (s < 0)
        return 0;
-    
+
     strlcpy (ifr.ifr_name, "ppp0", sizeof (ifr.ifr_name));
     ok = ioctl(s, SIOCGIFFLAGS, (caddr_t) &ifr) >= 0;
 /*
@@ -1640,10 +2004,10 @@ int ppp_available(void)
  * Ensure that the hardware address is for PPP and not something else
  */
     if (ok)
-        ok = ioctl (s, SIOCGIFHWADDR, (caddr_t) &ifr) >= 0;
+       ok = ioctl (s, SIOCGIFHWADDR, (caddr_t) &ifr) >= 0;
 
     if (ok && ((ifr.ifr_hwaddr.sa_family & ~0xFF) != ARPHRD_PPP))
-        ok = 0;
+       ok = 0;
 
 /*
  *  This is the PPP device. Validate the version of the driver at this
@@ -1675,7 +2039,7 @@ 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 < 3) {
                if (driver_modification >= 2) {
@@ -1706,9 +2070,12 @@ int ppp_available(void)
 
 void logwtmp (const char *line, const char *name, const char *host)
 {
-    int    wtmp;
     struct utmp ut, *utp;
     pid_t  mypid = getpid();
+#if __GLIBC__ < 2
+    int    wtmp;
+#endif
+
 /*
  * Update the signon database for users.
  * Christoph Lameter: Copied from poeigl-1.36 Jan 3, 1996
@@ -1716,11 +2083,8 @@ void logwtmp (const char *line, const char *name, const char *host)
     utmpname(_PATH_UTMP);
     setutent();
     while ((utp = getutent()) && (utp->ut_pid != mypid))
-        /* nothing */;
+       /* nothing */;
 
-    /* Is this call really necessary? There is another one after the 'put' */
-    endutent();
-    
     if (utp)
        memcpy(&ut, utp, sizeof(ut));
     else
@@ -1729,7 +2093,7 @@ void logwtmp (const char *line, const char *name, const char *host)
 
     if (ut.ut_id[0] == 0)
        strncpy(ut.ut_id, line + 3, sizeof(ut.ut_id));
-       
+
     strncpy(ut.ut_user, name, sizeof(ut.ut_user));
     strncpy(ut.ut_line, line, sizeof(ut.ut_line));
 
@@ -1746,7 +2110,7 @@ void logwtmp (const char *line, const char *name, const char *host)
     if (ipcp_protent.enabled_flag && ipcp_hisoptions[0].neg_addr)
        memcpy(&ut.ut_addr, (char *) &ipcp_hisoptions[0].hisaddr,
                 sizeof(ut.ut_addr));
-       
+
     /* CL: Makes sure that the logout works */
     if (*host == 0 && *name==0)
        ut.ut_host[0]=0;
@@ -1756,164 +2120,24 @@ void logwtmp (const char *line, const char *name, const char *host)
 /*
  * Update the wtmp file.
  */
+#if __GLIBC__ >= 2
+    updwtmp(_PATH_WTMP, &ut);
+#else
     wtmp = open(_PATH_WTMP, O_APPEND|O_WRONLY);
     if (wtmp >= 0) {
        flock(wtmp, LOCK_EX);
 
-       /* we really should check for error on the write for a full disk! */
-       write (wtmp, (char *)&ut, sizeof(ut));
-       close (wtmp);
+       if (write (wtmp, (char *)&ut, sizeof(ut)) != sizeof(ut))
+           warn("error writing %s: %m", _PATH_WTMP);
 
        flock(wtmp, LOCK_UN);
-    }
-}
-
-#if 0
-/********************************************************************
- * Code for locking/unlocking the serial device.
- * This code is derived from chat.c.
- */
-
-#ifndef LOCK_PREFIX
-#define LOCK_PREFIX    "/var/lock/LCK.."
-#endif
-
-static char *lock_file;
-
-/*
- * lock - create a lock file for the named device
- */
-
-int lock (char *dev)
-{
-#ifdef LOCKLIB
-    int result;
-    lock_file = strdup(dev);
-    if (lock_file == NULL)
-       novm("lock file name");
-    result = mklock (dev, (void *) 0);
-
-    if (result > 0) {
-        notice("Device %s is locked by pid %d", dev, result);
-       free (lock_file);
-       lock_file = NULL;
-       result = -1;
-    }
-    else {
-        if (result < 0) {
-           error("Can't create lock file %s", lock_file);
-           free (lock_file);
-           lock_file = NULL;
-           result = -1;
-       }
-    }
-    return (result);
-#else
-    char hdb_lock_buffer[12];
-    int fd, n;
-    int pid = getpid();
-    char *p;
-    size_t l;
-
-    p = strrchr(dev, '/');
-    if (p != NULL)
-       dev = ++p;
-
-    l = strlen(LOCK_PREFIX) + strlen(dev) + 1;
-    lock_file = malloc(l);
-    if (lock_file == NULL)
-       novm("lock file name");
-
-    slprintf(lock_file, l, "%s%s", LOCK_PREFIX, dev);
-/*
- * Attempt to create the lock file at this point.
- */
-    while (1) {
-       fd = open(lock_file, O_EXCL | O_CREAT | O_RDWR, 0644);
-       if (fd >= 0) {
-           pid = getpid();
-#ifndef PID_BINARY
-           slprintf(hdb_lock_buffer, sizeof(hdb_lock_buffer), "%010d\n", pid);
-           write (fd, hdb_lock_buffer, 11);
-#else
-           write(fd, &pid, sizeof (pid));
-#endif
-           close(fd);
-           return 0;
-       }
-/*
- * If the file exists then check to see if the pid is stale
- */
-       if (errno == EEXIST) {
-           fd = open(lock_file, O_RDONLY, 0);
-           if (fd < 0) {
-               if (errno == ENOENT) /* This is just a timing problem. */
-                   continue;
-               break;
-           }
-
-           /* Read the lock file to find out who has the device locked */
-           n = read (fd, hdb_lock_buffer, 11);
-           close (fd);
-           if (n < 0) {
-               error("Can't read pid from lock file %s", lock_file);
-               break;
-           }
-
-           /* See the process still exists. */
-           if (n > 0) {
-#ifndef PID_BINARY
-               hdb_lock_buffer[n] = '\0';
-               sscanf (hdb_lock_buffer, " %d", &pid);
-#else
-               pid = ((int *) hdb_lock_buffer)[0];
-#endif
-               if (pid == 0 || pid == getpid()
-                   || (kill(pid, 0) == -1 && errno == ESRCH))
-                   n = 0;
-           }
-
-           /* If the process does not exist then try to remove the lock */
-           if (n == 0 && unlink (lock_file) == 0) {
-               notice("Removed stale lock on %s (pid %d)",
-                       dev, pid);
-               continue;
-           }
 
-           notice("Device %s is locked by pid %d", dev, pid);
-           break;
-       }
-
-       error("Can't create lock file %s: %m(%d)", lock_file, errno);
-       break;
+       close (wtmp);
     }
-
-    free(lock_file);
-    lock_file = NULL;
-    return -1;
 #endif
 }
 
 
-/********************************************************************
- *
- * unlock - remove our lockfile
- */
-
-void unlock(void)
-{
-    if (lock_file) {
-#ifdef LOCKLIB
-       (void) rmlock (lock_file, (void *) 0);
-#else
-       unlink(lock_file);
-#endif
-       free(lock_file);
-       lock_file = NULL;
-    }
-}
-#endif
-
 /********************************************************************
  *
  * sifvjcomp - config tcp header compression
@@ -1921,19 +2145,19 @@ void unlock(void)
 
 int sifvjcomp (int u, int vjcomp, int cidcomp, int maxcid)
 {
-    u_int x = get_flags();
+    u_int x = get_flags(ppp_dev_fd);
 
     if (vjcomp) {
-        if (ioctl (ppp_fd, PPPIOCSMAXCID, (caddr_t) &maxcid) < 0) {
+       if (ioctl (ppp_dev_fd, PPPIOCSMAXCID, (caddr_t) &maxcid) < 0) {
            if (! ok_error (errno))
-               error("ioctl(PPPIOCSMAXCID): %m(%d)", errno);
+               error("ioctl(PPPIOCSMAXCID): %m (line %d)", __LINE__);
            vjcomp = 0;
        }
     }
 
     x = vjcomp  ? x | SC_COMP_TCP     : x &~ SC_COMP_TCP;
     x = cidcomp ? x & ~SC_NO_TCP_CCID : x | SC_NO_TCP_CCID;
-    set_flags (x);
+    set_flags (ppp_dev_fd, x);
 
     return 1;
 }
@@ -1943,7 +2167,7 @@ int sifvjcomp (int u, int vjcomp, int cidcomp, int maxcid)
  * sifup - Config the interface up and enable IP packets to pass.
  */
 
-int sifup (int u)
+int sifup(int u)
 {
     struct ifreq ifr;
 
@@ -1951,36 +2175,39 @@ int sifup (int u)
     strlcpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
     if (ioctl(sock_fd, SIOCGIFFLAGS, (caddr_t) &ifr) < 0) {
        if (! ok_error (errno))
-           error("ioctl (SIOCGIFFLAGS): %m(%d)", errno);
+           error("ioctl (SIOCGIFFLAGS): %m (line %d)", __LINE__);
        return 0;
     }
 
     ifr.ifr_flags |= (IFF_UP | IFF_POINTOPOINT);
     if (ioctl(sock_fd, SIOCSIFFLAGS, (caddr_t) &ifr) < 0) {
        if (! ok_error (errno))
-           error("ioctl(SIOCSIFFLAGS): %m(%d)", errno);
+           error("ioctl(SIOCSIFFLAGS): %m (line %d)", __LINE__);
        return 0;
     }
-    if_is_up = 1;
+    if_is_up++;
+
     return 1;
 }
 
 /********************************************************************
  *
- * sifdown - Config the interface down and disable IP.
+ * sifdown - Disable the indicated protocol and config the interface
+ *          down if there are no remaining protocols.
  */
 
 int sifdown (int u)
 {
     struct ifreq ifr;
 
-    if_is_up = 0;
+    if (if_is_up && --if_is_up > 0)
+       return 1;
 
     memset (&ifr, '\0', sizeof (ifr));
     strlcpy(ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
     if (ioctl(sock_fd, SIOCGIFFLAGS, (caddr_t) &ifr) < 0) {
        if (! ok_error (errno))
-           error("ioctl (SIOCGIFFLAGS): %m(%d)", errno);
+           error("ioctl (SIOCGIFFLAGS): %m (line %d)", __LINE__);
        return 0;
     }
 
@@ -1988,7 +2215,7 @@ int sifdown (int u)
     ifr.ifr_flags |= IFF_POINTOPOINT;
     if (ioctl(sock_fd, SIOCSIFFLAGS, (caddr_t) &ifr) < 0) {
        if (! ok_error (errno))
-           error("ioctl(SIOCSIFFLAGS): %m(%d)", errno);
+           error("ioctl(SIOCSIFFLAGS): %m (line %d)", __LINE__);
        return 0;
     }
     return 1;
@@ -2002,40 +2229,40 @@ int sifdown (int u)
 int sifaddr (int unit, u_int32_t our_adr, u_int32_t his_adr,
             u_int32_t net_mask)
 {
-    struct ifreq   ifr; 
+    struct ifreq   ifr;
     struct rtentry rt;
-    
+
     memset (&ifr, '\0', sizeof (ifr));
     memset (&rt,  '\0', sizeof (rt));
-    
-    SET_SA_FAMILY (ifr.ifr_addr,    AF_INET); 
-    SET_SA_FAMILY (ifr.ifr_dstaddr, AF_INET); 
-    SET_SA_FAMILY (ifr.ifr_netmask, AF_INET); 
+
+    SET_SA_FAMILY (ifr.ifr_addr,    AF_INET);
+    SET_SA_FAMILY (ifr.ifr_dstaddr, AF_INET);
+    SET_SA_FAMILY (ifr.ifr_netmask, AF_INET);
 
     strlcpy (ifr.ifr_name, ifname, sizeof (ifr.ifr_name));
 /*
  *  Set our IP address
  */
-    ((struct sockaddr_in *) &ifr.ifr_addr)->sin_addr.s_addr = our_adr;
+    SIN_ADDR(ifr.ifr_addr) = our_adr;
     if (ioctl(sock_fd, SIOCSIFADDR, (caddr_t) &ifr) < 0) {
        if (errno != EEXIST) {
            if (! ok_error (errno))
-               error("ioctl(SIOCSIFADDR): %m(%d)", errno);
+               error("ioctl(SIOCSIFADDR): %m (line %d)", __LINE__);
        }
-        else {
+       else {
            warn("ioctl(SIOCSIFADDR): Address already exists");
        }
-        return (0);
+       return (0);
     }
 /*
  *  Set the gateway address
  */
-    ((struct sockaddr_in *) &ifr.ifr_dstaddr)->sin_addr.s_addr = his_adr;
+    SIN_ADDR(ifr.ifr_dstaddr) = his_adr;
     if (ioctl(sock_fd, SIOCSIFDSTADDR, (caddr_t) &ifr) < 0) {
        if (! ok_error (errno))
-           error("ioctl(SIOCSIFDSTADDR): %m(%d)", errno); 
+           error("ioctl(SIOCSIFDSTADDR): %m (line %d)", __LINE__);
        return (0);
-    } 
+    }
 /*
  *  Set the netmask.
  *  For recent kernels, force the netmask to 255.255.255.255.
@@ -2043,12 +2270,12 @@ int sifaddr (int unit, u_int32_t our_adr, u_int32_t his_adr,
     if (kernel_version >= KVERSION(2,1,16))
        net_mask = ~0L;
     if (net_mask != 0) {
-       ((struct sockaddr_in *) &ifr.ifr_netmask)->sin_addr.s_addr = net_mask;
+       SIN_ADDR(ifr.ifr_netmask) = net_mask;
        if (ioctl(sock_fd, SIOCSIFNETMASK, (caddr_t) &ifr) < 0) {
            if (! ok_error (errno))
-               error("ioctl(SIOCSIFNETMASK): %m(%d)", errno); 
+               error("ioctl(SIOCSIFNETMASK): %m (line %d)", __LINE__);
            return (0);
-       } 
+       }
     }
 /*
  *  Add the device route
@@ -2058,21 +2285,39 @@ int sifaddr (int unit, u_int32_t our_adr, u_int32_t his_adr,
        SET_SA_FAMILY (rt.rt_gateway, AF_INET);
        rt.rt_dev = ifname;
 
-       ((struct sockaddr_in *) &rt.rt_gateway)->sin_addr.s_addr = 0L;
-       ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr     = his_adr;
+       SIN_ADDR(rt.rt_gateway) = 0L;
+       SIN_ADDR(rt.rt_dst)     = his_adr;
        rt.rt_flags = RTF_UP | RTF_HOST;
 
        if (kernel_version > KVERSION(2,1,0)) {
            SET_SA_FAMILY (rt.rt_genmask, AF_INET);
-           ((struct sockaddr_in *) &rt.rt_genmask)->sin_addr.s_addr = -1L;
+           SIN_ADDR(rt.rt_genmask) = -1L;
        }
 
        if (ioctl(sock_fd, SIOCADDRT, &rt) < 0) {
            if (! ok_error (errno))
-               error("ioctl(SIOCADDRT) device route: %m(%d)", errno);
+               error("ioctl(SIOCADDRT) device route: %m (line %d)", __LINE__);
            return (0);
        }
     }
+
+    /* set ip_dynaddr in demand mode if address changes */
+    if (demand && tune_kernel && !dynaddr_set
+       && our_old_addr && our_old_addr != our_adr) {
+       /* set ip_dynaddr if possible */
+       char *path;
+       int fd;
+
+       path = path_to_procfs("/sys/net/ipv4/ip_dynaddr");
+       if (path != 0 && (fd = open(path, O_WRONLY)) >= 0) {
+           if (write(fd, "1", 1) != 1)
+               error("Couldn't enable dynamic IP addressing: %m");
+           close(fd);
+       }
+       dynaddr_set = 1;        /* only 1 attempt */
+    }
+    our_old_addr = 0;
+
     return 1;
 }
 
@@ -2084,39 +2329,146 @@ int sifaddr (int unit, u_int32_t our_adr, u_int32_t his_adr,
 
 int cifaddr (int unit, u_int32_t our_adr, u_int32_t his_adr)
 {
-    struct rtentry rt;
+    struct ifreq ifr;
 
     if (kernel_version < KVERSION(2,1,16)) {
 /*
  *  Delete the route through the device
  */
+       struct rtentry rt;
        memset (&rt, '\0', sizeof (rt));
 
        SET_SA_FAMILY (rt.rt_dst,     AF_INET);
        SET_SA_FAMILY (rt.rt_gateway, AF_INET);
        rt.rt_dev = ifname;
 
-       ((struct sockaddr_in *) &rt.rt_gateway)->sin_addr.s_addr = 0;
-       ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr     = his_adr;
+       SIN_ADDR(rt.rt_gateway) = 0;
+       SIN_ADDR(rt.rt_dst)     = his_adr;
        rt.rt_flags = RTF_UP | RTF_HOST;
 
        if (kernel_version > KVERSION(2,1,0)) {
            SET_SA_FAMILY (rt.rt_genmask, AF_INET);
-           ((struct sockaddr_in *) &rt.rt_genmask)->sin_addr.s_addr = -1L;
+           SIN_ADDR(rt.rt_genmask) = -1L;
        }
 
        if (ioctl(sock_fd, SIOCDELRT, &rt) < 0 && errno != ESRCH) {
            if (still_ppp() && ! ok_error (errno))
-               error("ioctl(SIOCDELRT) device route: %m(%d)", errno);
+               error("ioctl(SIOCDELRT) device route: %m (line %d)", __LINE__);
            return (0);
        }
     }
+
+    /* This way it is possible to have an IPX-only or IPv6-only interface */
+    memset(&ifr, 0, sizeof(ifr));
+    SET_SA_FAMILY(ifr.ifr_addr, AF_INET);
+    strlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
+
+    if (ioctl(sock_fd, SIOCSIFADDR, (caddr_t) &ifr) < 0) {
+       if (! ok_error (errno)) {
+           error("ioctl(SIOCSIFADDR): %m (line %d)", __LINE__);
+           return 0;
+       }
+    }
+
+    our_old_addr = our_adr;
+
+    return 1;
+}
+
+#ifdef INET6
+/********************************************************************
+ *
+ * sif6addr - Config the interface with an IPv6 link-local address
+ */
+int sif6addr (int unit, eui64_t our_eui64, eui64_t his_eui64)
+{
+    struct in6_ifreq ifr6;
+    struct ifreq ifr;
+    struct in6_rtmsg rt6;
+
+    if (sock6_fd < 0) {
+       errno = -sock6_fd;
+       error("IPv6 socket creation failed: %m");
+       return 0;
+    }
+    memset(&ifr, 0, sizeof (ifr));
+    strlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
+    if (ioctl(sock6_fd, SIOCGIFINDEX, (caddr_t) &ifr) < 0) {
+       error("sif6addr: ioctl(SIOCGIFINDEX): %m (line %d)", __LINE__);
+       return 0;
+    }
+
+    /* Local interface */
+    memset(&ifr6, 0, sizeof(ifr6));
+    IN6_LLADDR_FROM_EUI64(ifr6.ifr6_addr, our_eui64);
+    ifr6.ifr6_ifindex = ifr.ifr_ifindex;
+    ifr6.ifr6_prefixlen = 10;
+
+    if (ioctl(sock6_fd, SIOCSIFADDR, &ifr6) < 0) {
+       error("sif6addr: ioctl(SIOCSIFADDR): %m (line %d)", __LINE__);
+       return 0;
+    }
+
+    /* Route to remote host */
+    memset(&rt6, 0, sizeof(rt6));
+    IN6_LLADDR_FROM_EUI64(rt6.rtmsg_dst, his_eui64);
+    rt6.rtmsg_flags = RTF_UP;
+    rt6.rtmsg_dst_len = 10;
+    rt6.rtmsg_ifindex = ifr.ifr_ifindex;
+    rt6.rtmsg_metric = 1;
+
+    if (ioctl(sock6_fd, SIOCADDRT, &rt6) < 0) {
+       error("sif6addr: ioctl(SIOCADDRT): %m (line %d)", __LINE__);
+       return 0;
+    }
+
     return 1;
 }
 
+
+/********************************************************************
+ *
+ * cif6addr - Remove IPv6 address from interface
+ */
+int cif6addr (int unit, eui64_t our_eui64, eui64_t his_eui64)
+{
+    struct ifreq ifr;
+    struct in6_ifreq ifr6;
+
+    if (sock6_fd < 0) {
+       errno = -sock6_fd;
+       error("IPv6 socket creation failed: %m");
+       return 0;
+    }
+    memset(&ifr, 0, sizeof(ifr));
+    strlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
+    if (ioctl(sock6_fd, SIOCGIFINDEX, (caddr_t) &ifr) < 0) {
+       error("cif6addr: ioctl(SIOCGIFINDEX): %m (line %d)", __LINE__);
+       return 0;
+    }
+
+    memset(&ifr6, 0, sizeof(ifr6));
+    IN6_LLADDR_FROM_EUI64(ifr6.ifr6_addr, our_eui64);
+    ifr6.ifr6_ifindex = ifr.ifr_ifindex;
+    ifr6.ifr6_prefixlen = 10;
+
+    if (ioctl(sock6_fd, SIOCDIFADDR, &ifr6) < 0) {
+       if (errno != EADDRNOTAVAIL) {
+           if (! ok_error (errno))
+               error("cif6addr: ioctl(SIOCDIFADDR): %m (line %d)", __LINE__);
+       }
+       else {
+           warn("cif6addr: ioctl(SIOCDIFADDR): No such address");
+       }
+       return (0);
+    }
+    return 1;
+}
+#endif /* INET6 */
+
 /*
  * get_pty - get a pty master/slave pair and chown the slave side
- * to the uid given.  Assumes slave_name points to >= 12 bytes of space.
+ * to the uid given.  Assumes slave_name points to >= 16 bytes of space.
  */
 int
 get_pty(master_fdp, slave_fdp, slave_name, uid)
@@ -2125,35 +2477,60 @@ get_pty(master_fdp, slave_fdp, slave_name, uid)
     char *slave_name;
     int uid;
 {
-    int i, mfd, sfd;
-    char pty_name[12];
+    int i, mfd, sfd = -1;
+    char pty_name[16];
     struct termios tios;
 
-    sfd = -1;
-    for (i = 0; i < 64; ++i) {
-       slprintf(pty_name, sizeof(pty_name), "/dev/pty%c%x",
-                'p' + i / 16, i % 16);
-       mfd = open(pty_name, O_RDWR, 0);
-       if (mfd >= 0) {
-           pty_name[5] = 't';
-           sfd = open(pty_name, O_RDWR | O_NOCTTY, 0);
-           if (sfd >= 0)
-               break;
-           close(mfd);
+#ifdef TIOCGPTN
+    /*
+     * Try the unix98 way first.
+     */
+    mfd = open("/dev/ptmx", O_RDWR);
+    if (mfd >= 0) {
+       int ptn;
+       if (ioctl(mfd, TIOCGPTN, &ptn) >= 0) {
+           slprintf(pty_name, sizeof(pty_name), "/dev/pts/%d", ptn);
+           chmod(pty_name, S_IRUSR | S_IWUSR);
+#ifdef TIOCSPTLCK
+           ptn = 0;
+           if (ioctl(mfd, TIOCSPTLCK, &ptn) < 0)
+               warn("Couldn't unlock pty slave %s: %m", pty_name);
+#endif
+           if ((sfd = open(pty_name, O_RDWR | O_NOCTTY)) < 0)
+               warn("Couldn't open pty slave %s: %m", pty_name);
        }
     }
+#endif /* TIOCGPTN */
+
+    if (sfd < 0) {
+       /* the old way - scan through the pty name space */
+       for (i = 0; i < 64; ++i) {
+           slprintf(pty_name, sizeof(pty_name), "/dev/pty%c%x",
+                    'p' + i / 16, i % 16);
+           mfd = open(pty_name, O_RDWR, 0);
+           if (mfd >= 0) {
+               pty_name[5] = 't';
+               sfd = open(pty_name, O_RDWR | O_NOCTTY, 0);
+               if (sfd >= 0) {
+                   fchown(sfd, uid, -1);
+                   fchmod(sfd, S_IRUSR | S_IWUSR);
+                   break;
+               }
+               close(mfd);
+           }
+       }
+    }
+
     if (sfd < 0)
        return 0;
 
-    strlcpy(slave_name, pty_name, 12);
+    strlcpy(slave_name, pty_name, 16);
     *master_fdp = mfd;
     *slave_fdp = sfd;
-    fchown(sfd, uid, -1);
-    fchmod(sfd, S_IRUSR | S_IWUSR);
     if (tcgetattr(sfd, &tios) == 0) {
        tios.c_cflag &= ~(CSIZE | CSTOPB | PARENB);
-       tios.c_cflag |= CS8 | CREAD;
-       tios.c_iflag  = IGNPAR | CLOCAL;
+       tios.c_cflag |= CS8 | CREAD | CLOCAL;
+       tios.c_iflag  = IGNPAR;
        tios.c_oflag  = 0;
        tios.c_lflag  = 0;
        if (tcsetattr(sfd, TCSAFLUSH, &tios) < 0)
@@ -2174,6 +2551,17 @@ open_ppp_loopback(void)
 {
     int flags;
 
+    looped = 1;
+    if (new_style_driver) {
+       /* allocate ourselves a ppp unit */
+       if (make_ppp_unit() < 0)
+           die(1);
+       set_flags(ppp_dev_fd, SC_LOOP_TRAFFIC);
+       set_kdebugflag(kdebugflag);
+       ppp_fd = -1;
+       return ppp_dev_fd;
+    }
+
     if (!get_pty(&master_fd, &slave_fd, loop_name, 0))
        fatal("No free pty for loopback");
     SYSDEBUG(("using %s for loopback", loop_name));
@@ -2183,20 +2571,20 @@ open_ppp_loopback(void)
     flags = fcntl(master_fd, F_GETFL);
     if (flags == -1 ||
        fcntl(master_fd, F_SETFL, flags | O_NONBLOCK) == -1)
-       warn("couldn't set master loopback to nonblock: %m(%d)", errno);
+       warn("couldn't set master loopback to nonblock: %m");
 
     flags = fcntl(ppp_fd, F_GETFL);
     if (flags == -1 ||
        fcntl(ppp_fd, F_SETFL, flags | O_NONBLOCK) == -1)
-       warn("couldn't set slave loopback to nonblock: %m(%d)", errno);
+       warn("couldn't set slave loopback to nonblock: %m");
 
     if (ioctl(ppp_fd, TIOCSETD, &ppp_disc) < 0)
-       fatal("ioctl(TIOCSETD): %m(%d)", errno);
+       fatal("ioctl(TIOCSETD): %m (line %d)", __LINE__);
 /*
  * Find out which interface we were given.
  */
     if (ioctl(ppp_fd, PPPIOCGUNIT, &ifunit) < 0)
-       fatal("ioctl(PPPIOCGUNIT): %m(%d)", errno);
+       fatal("ioctl(PPPIOCGUNIT): %m (line %d)", __LINE__);
 /*
  * Enable debug in the driver if requested.
  */
@@ -2205,28 +2593,6 @@ open_ppp_loopback(void)
     return master_fd;
 }
 
-/********************************************************************
- *
- * restore_loop - reattach the ppp unit to the loopback.
- *
- * The kernel ppp driver automatically reattaches the ppp unit to
- * the loopback if the serial port is set to a line discipline other
- * than ppp, or if it detects a modem hangup.  The former will happen
- * in disestablish_ppp if the latter hasn't already happened, so we
- * shouldn't need to do anything.
- *
- * Just to be sure, set the real serial port to the normal discipline.
- */
-
-void
-restore_loop(void)
-{
-    if (ppp_fd != slave_fd) {
-       (void) ioctl(ppp_fd, TIOCSETD, &tty_disc);
-       set_ppp_fd(slave_fd);
-    }
-}
-
 /********************************************************************
  *
  * sifnpmode - Set the mode for handling packets for a given NP.
@@ -2242,12 +2608,9 @@ sifnpmode(u, proto, mode)
 
     npi.protocol = proto;
     npi.mode     = mode;
-    if (ioctl(ppp_fd, PPPIOCSNPMODE, (caddr_t) &npi) < 0) {
-       if (! ok_error (errno)) {
-           error("ioctl(PPPIOCSNPMODE, %d, %d): %m (%d)",
-                  proto, mode, errno);
-           error("ppp_fd=%d slave_fd=%d\n", ppp_fd, slave_fd);
-       }
+    if (ioctl(ppp_dev_fd, PPPIOCSNPMODE, (caddr_t) &npi) < 0) {
+       if (! ok_error (errno))
+           error("ioctl(PPPIOCSNPMODE, %d, %d): %m", proto, mode);
        return 0;
     }
     return 1;
@@ -2264,14 +2627,14 @@ int sipxfaddr (int unit, unsigned long int network, unsigned char * node )
     int    result = 1;
 
 #ifdef IPX_CHANGE
-    int    skfd; 
+    int    skfd;
     struct ifreq         ifr;
     struct sockaddr_ipx *sipx = (struct sockaddr_ipx *) &ifr.ifr_addr;
 
     skfd = socket (AF_IPX, SOCK_DGRAM, 0);
-    if (skfd < 0) { 
+    if (skfd < 0) {
        if (! ok_error (errno))
-           dbglog("socket(AF_IPX): %m (%d)", errno);
+           dbglog("socket(AF_IPX): %m (line %d)", __LINE__);
        result = 0;
     }
     else {
@@ -2291,7 +2654,7 @@ int sipxfaddr (int unit, unsigned long int network, unsigned char * node )
            result = 0;
            if (errno != EEXIST) {
                if (! ok_error (errno))
-                   dbglog("ioctl(SIOCSIFADDR, CRTITF): %m (%d)", errno);
+                   dbglog("ioctl(SIOCSIFADDR, CRTITF): %m (line %d)", __LINE__);
            }
            else {
                warn("ioctl(SIOCSIFADDR, CRTITF): Address already exists");
@@ -2315,14 +2678,14 @@ int cipxfaddr (int unit)
     int    result = 1;
 
 #ifdef IPX_CHANGE
-    int    skfd; 
+    int    skfd;
     struct ifreq         ifr;
     struct sockaddr_ipx *sipx = (struct sockaddr_ipx *) &ifr.ifr_addr;
 
     skfd = socket (AF_IPX, SOCK_DGRAM, 0);
-    if (skfd < 0) { 
+    if (skfd < 0) {
        if (! ok_error (errno))
-           dbglog("socket(AF_IPX): %m (%d)", errno);
+           dbglog("socket(AF_IPX): %m (line %d)", __LINE__);
        result = 0;
     }
     else {
@@ -2337,7 +2700,7 @@ int cipxfaddr (int unit)
  */
        if (ioctl(skfd, SIOCSIFADDR, (caddr_t) &ifr) < 0) {
            if (! ok_error (errno))
-               info("ioctl(SIOCSIFADDR, IPX_DLTITF): %m (%d)", errno);
+               info("ioctl(SIOCSIFADDR, IPX_DLTITF): %m (line %d)", __LINE__);
            result = 0;
        }
        close (skfd);
@@ -2346,32 +2709,6 @@ int cipxfaddr (int unit)
     return result;
 }
 
-#if 0
-/*
- * daemon - Detach us from controlling terminal session.
- */
-int
-daemon(nochdir, noclose)
-    int nochdir, noclose;
-{
-    int pid;
-
-    if ((pid = fork()) < 0)
-       return -1;
-    if (pid != 0)
-       exit(0);                /* parent dies */
-    setsid();
-    if (!nochdir)
-       chdir("/");
-    if (!noclose) {
-       fclose(stdin);          /* don't need stdin, stdout, stderr */
-       fclose(stdout);
-       fclose(stderr);
-    }
-    return 0;
-}
-#endif
-
 /*
  * Use the hostname as part of the random number seed.
  */
@@ -2396,21 +2733,18 @@ int
 sys_check_options(void)
 {
 #ifdef IPX_CHANGE
-    struct stat stat_buf;
 /*
  * Disable the IPX protocol if the support is not present in the kernel.
- * If we disable it then ensure that IP support is enabled.
  */
-    while (ipxcp_protent.enabled_flag) {
-        if (path_to_procfs()) {
-           strlcat (route_buffer, "/net/ipx_interface", sizeof(route_buffer));
-           if (lstat (route_buffer, &stat_buf) >= 0)
-               break;
+    char *path;
+
+    if (ipxcp_protent.enabled_flag) {
+       struct stat stat_buf;
+       if ((path = path_to_procfs("/net/ipx_interface")) == 0
+           || lstat(path, &stat_buf) < 0) {
+           error("IPX support is not present in the kernel\n");
+           ipxcp_protent.enabled_flag = 0;
        }
-       error("IPX support is not present in the kernel\n");
-       ipxcp_protent.enabled_flag = 0;
-       ipcp_protent.enabled_flag  = 1;
-       break;
     }
 #endif
     if (demand && driver_is_old) {
@@ -2419,5 +2753,9 @@ sys_check_options(void)
                     driver_patch);
        return 0;
     }
+    if (multilink && !new_style_driver) {
+       warn("Warning: multilink is not supported by the kernel driver");
+       multilink = 0;
+    }
     return 1;
 }