typo
[ppp.git] / pppd / ipxcp.c
index 1b8942e68d577fc4d5a2be156a3d69b6a56653f6..937dea1095cc55dac734b8173b0cf0e3546b78dd 100644 (file)
@@ -18,9 +18,8 @@
  */
 
 #ifdef IPX_CHANGE
-#ifndef lint
-static char rcsid[] = "$Id: ipxcp.c,v 1.2 1996/07/01 01:14:25 paulus Exp $";
-#endif
+
+#define RCSID  "$Id: ipxcp.c,v 1.17 1999/08/13 06:46:14 paulus Exp $"
 
 /*
  * TODO:
@@ -28,7 +27,8 @@ static char rcsid[] = "$Id: ipxcp.c,v 1.2 1996/07/01 01:14:25 paulus Exp $";
 
 #include <stdio.h>
 #include <string.h>
-#include <syslog.h>
+#include <unistd.h>
+#include <ctype.h>
 #include <sys/types.h>
 #include <sys/socket.h>
 #include <netinet/in.h>
@@ -37,6 +37,9 @@ static char rcsid[] = "$Id: ipxcp.c,v 1.2 1996/07/01 01:14:25 paulus Exp $";
 #include "fsm.h"
 #include "ipxcp.h"
 #include "pathnames.h"
+#include "magic.h"
+
+static const char rcsid[] = RCSID;
 
 /* global vars */
 ipxcp_options ipxcp_wantoptions[NUM_PPP];      /* Options that we want to request */
@@ -61,6 +64,7 @@ static int  ipxcp_rejci __P((fsm *, u_char *, int));  /* Peer rej'd our CI */
 static int  ipxcp_reqci __P((fsm *, u_char *, int *, int)); /* Rcv CI */
 static void ipxcp_up __P((fsm *));             /* We're UP */
 static void ipxcp_down __P((fsm *));           /* We're DOWN */
+static void ipxcp_finished __P((fsm *));       /* Don't need lower layer */
 static void ipxcp_script __P((fsm *, char *)); /* Run an up/down script */
 
 fsm ipxcp_fsm[NUM_PPP];                /* IPXCP fsm structure */
@@ -76,13 +80,57 @@ static fsm_callbacks ipxcp_callbacks = { /* IPXCP callback routines */
     ipxcp_up,                  /* Called when fsm reaches OPENED state */
     ipxcp_down,                        /* Called when fsm leaves OPENED state */
     NULL,                      /* Called when we want the lower layer up */
-    NULL,                      /* Called when we want the lower layer down */
+    ipxcp_finished,            /* Called when we want the lower layer down */
     NULL,                      /* Called when Protocol-Reject received */
     NULL,                      /* Retransmission is necessary */
     NULL,                      /* Called to handle protocol-specific codes */
     "IPXCP"                    /* String name of protocol */
 };
 
+/*
+ * Command-line options.
+ */
+static int setipxnode __P((char **));
+static int setipxname __P((char **));
+
+static option_t ipxcp_option_list[] = {
+    { "ipx", o_bool, &ipxcp_protent.enabled_flag,
+      "Enable IPXCP (and IPX)", 1 },
+    { "+ipx", o_bool, &ipxcp_protent.enabled_flag,
+      "Enable IPXCP (and IPX)", 1 },
+    { "noipx", o_bool, &ipxcp_protent.enabled_flag,
+      "Disable IPXCP (and IPX)" },
+    { "-ipx", o_bool, &ipxcp_protent.enabled_flag,
+      "Disable IPXCP (and IPX)" } ,
+    { "ipx-network", o_uint32, &ipxcp_wantoptions[0].our_network,
+      "Set our IPX network number", 0, &ipxcp_wantoptions[0].neg_nn },
+    { "ipxcp-accept-network", o_bool, &ipxcp_wantoptions[0].accept_network,
+      "Accept peer IPX network number", 1,
+      &ipxcp_allowoptions[0].accept_network },
+    { "ipx-node", o_special, setipxnode,
+      "Set IPX node number" },
+    { "ipxcp-accept-local", o_bool, &ipxcp_wantoptions[0].accept_local,
+      "Accept our IPX address", 1,
+      &ipxcp_allowoptions[0].accept_local },
+    { "ipxcp-accept-remote", o_bool, &ipxcp_wantoptions[0].accept_remote,
+      "Accept peer's IPX address", 1,
+      &ipxcp_allowoptions[0].accept_remote },
+    { "ipx-routing", o_int, &ipxcp_wantoptions[0].router,
+      "Set IPX routing proto number", 0,
+      &ipxcp_wantoptions[0].neg_router },
+    { "ipx-router-name", o_special, setipxname,
+      "Set IPX router name" },
+    { "ipxcp-restart", o_int, &ipxcp_fsm[0].timeouttime,
+      "Set timeout for IPXCP" },
+    { "ipxcp-max-terminate", o_int, &ipxcp_fsm[0].maxtermtransmits,
+      "Set max #xmits for IPXCP term-reqs" },
+    { "ipxcp-max-configure", o_int, &ipxcp_fsm[0].maxconfreqtransmits,
+      "Set max #xmits for IPXCP conf-reqs" },
+    { "ipxcp-max-failure", o_int, &ipxcp_fsm[0].maxnakloops,
+      "Set max #conf-naks for IPXCP" },
+    { NULL }
+};
+
 /*
  * Protocol entry points.
  */
@@ -110,12 +158,13 @@ struct protent ipxcp_protent = {
     NULL,
     0,
     "IPXCP",
+    "IPX",
+    ipxcp_option_list,
     NULL,
     NULL,
     NULL
 };
 
-
 /*
  * Lengths of configuration options.
  */
@@ -131,26 +180,129 @@ struct protent ipxcp_protent = {
 #define CODENAME(x)    ((x) == CONFACK ? "ACK" : \
                         (x) == CONFNAK ? "NAK" : "REJ")
 
+static int ipxcp_is_up;
+
+static char *ipx_ntoa __P((u_int32_t));
+
 /* Used in printing the node number */
 #define NODE(base) base[0], base[1], base[2], base[3], base[4], base[5]
 
 /* Used to generate the proper bit mask */
 #define BIT(num)   (1 << (num))
 
+/*
+ * Convert from internal to external notation
+ */
+
+static short int
+to_external(internal)
+short int internal;
+{
+    short int  external;
+
+    if (internal & BIT(IPX_NONE) )
+        external = IPX_NONE;
+    else
+        external = RIP_SAP;
+
+    return external;
+}
+
 /*
  * Make a string representation of a network IP address.
  */
 
-char *
+static char *
 ipx_ntoa(ipxaddr)
 u_int32_t ipxaddr;
 {
     static char b[64];
-    sprintf(b, "%lx", ipxaddr);
+    slprintf(b, sizeof(b), "%x", ipxaddr);
     return b;
 }
 
 
+static u_char *
+setipxnodevalue(src,dst)
+u_char *src, *dst;
+{
+    int indx;
+    int item;
+
+    for (;;) {
+        if (!isxdigit (*src))
+           break;
+       
+       for (indx = 0; indx < 5; ++indx) {
+           dst[indx] <<= 4;
+           dst[indx] |= (dst[indx + 1] >> 4) & 0x0F;
+       }
+
+       item = toupper (*src) - '0';
+       if (item > 9)
+           item -= 7;
+
+       dst[5] = (dst[5] << 4) | item;
+       ++src;
+    }
+    return src;
+}
+
+static int
+setipxnode(argv)
+    char **argv;
+{
+    char *end;
+
+    memset (&ipxcp_wantoptions[0].our_node[0], 0, 6);
+    memset (&ipxcp_wantoptions[0].his_node[0], 0, 6);
+
+    end = setipxnodevalue (*argv, &ipxcp_wantoptions[0].our_node[0]);
+    if (*end == ':')
+       end = setipxnodevalue (++end, &ipxcp_wantoptions[0].his_node[0]);
+
+    if (*end == '\0') {
+        ipxcp_wantoptions[0].neg_node = 1;
+        return 1;
+    }
+
+    option_error("invalid parameter '%s' for ipx-node option", *argv);
+    return 0;
+}
+
+static int
+setipxname (argv)
+    char **argv;
+{
+    char *dest = ipxcp_wantoptions[0].name;
+    char *src  = *argv;
+    int  count;
+    char ch;
+
+    ipxcp_wantoptions[0].neg_name  = 1;
+    ipxcp_allowoptions[0].neg_name = 1;
+    memset (dest, '\0', sizeof (ipxcp_wantoptions[0].name));
+
+    count = 0;
+    while (*src) {
+        ch = *src++;
+       if (! isalnum (ch) && ch != '_') {
+           option_error("IPX router name must be alphanumeric or _");
+           return 0;
+       }
+
+       if (count >= sizeof (ipxcp_wantoptions[0].name)) {
+           option_error("IPX router name is limited to %d characters",
+                        sizeof (ipxcp_wantoptions[0].name) - 1);
+           return 0;
+       }
+
+       dest[count++] = toupper (ch);
+    }
+
+    return 1;
+}
+
 /*
  * ipxcp_init - Initialize IPXCP.
  */
@@ -182,6 +334,9 @@ ipxcp_init(unit)
     ao->accept_local   = 0;
     ao->accept_remote  = 0;
     ao->accept_network = 0;
+
+    wo->tried_rip      = 0;
+    wo->tried_nlsp     = 0;
 }
 
 /*
@@ -316,9 +471,6 @@ static void
 ipxcp_resetci(f)
     fsm *f;
 {
-    u_int32_t network;
-    int unit = f->unit;
-
     wo->req_node = wo->neg_node && ao->neg_node;
     wo->req_nn  = wo->neg_nn   && ao->neg_nn;
 
@@ -342,16 +494,17 @@ ipxcp_resetci(f)
        ao->accept_remote = 1;
     }
 /*
- * Unless router protocol is suppressed then assume that we can do RIP.
- */
-    if (! (wo->router & BIT(0)))
-       wo->router |= BIT(2);
-/*
- * Router protocol is only negotiated if requested. Others force the
- * negotiation.
+ * If no routing agent was specified then we do RIP/SAP according to the
+ * RFC documents. If you have specified something then OK. Otherwise, we
+ * do RIP/SAP.
  */
-    if (wo->router & (BIT(2) | BIT(4)))
-       wo->neg_router = 1;
+    if (ao->router == 0) {
+       ao->router |= BIT(RIP_SAP);
+       wo->router |= BIT(RIP_SAP);
+    }
+
+    /* Always specify a routing protocol unless it was REJected. */
+    wo->neg_router = 1;
 /*
  * Start with these default values
  */
@@ -361,30 +514,20 @@ ipxcp_resetci(f)
 /*
  * ipxcp_cilen - Return length of our CI.
  */
+
 static int
 ipxcp_cilen(f)
     fsm *f;
 {
-    int unit = f->unit;
     int len;
 
     len         = go->neg_nn       ? CILEN_NETN     : 0;
     len += go->neg_node            ? CILEN_NODEN    : 0;
     len += go->neg_name            ? CILEN_NAME + strlen (go->name) - 1 : 0;
-    len += go->neg_complete ? CILEN_COMPLETE : 0;
-/*
- * Router protocol 0 is mutually exclusive with the others.
- */
-    if (go->neg_router) {
-       if (go->router & BIT(0))
-           len += CILEN_PROTOCOL;
-       else {
-           if (go->router & BIT(2))
-               len += CILEN_PROTOCOL;
-           if (go->router & BIT(4))
-               len += CILEN_PROTOCOL;
-       }
-    }
+
+    /* RFC says that defaults should not be included. */
+    if (go->neg_router && to_external(go->router) != RIP_SAP)
+        len += CILEN_PROTOCOL;
 
     return (len);
 }
@@ -399,8 +542,6 @@ ipxcp_addci(f, ucp, lenp)
     u_char *ucp;
     int *lenp;
 {
-    int len = *lenp;
-    int unit = f->unit;
 /*
  * Add the options to the record.
  */
@@ -427,30 +568,14 @@ ipxcp_addci(f, ucp, lenp)
            PUTCHAR (go->name [indx], ucp);
     }
 
-    if (go->neg_router && (go->router & (BIT(0) | BIT(2) | BIT(4)))) {
-       if (go->router & BIT(0)) {
+    if (go->neg_router) {
+        short external = to_external (go->router);
+       if (external != RIP_SAP) {
            PUTCHAR  (IPX_ROUTER_PROTOCOL, ucp);
-           PUTCHAR  (CILEN_PROTOCOL,      ucp);
-           PUTSHORT (0,                   ucp);
-       } else {
-           if (go->router & BIT(2)) {
-               PUTCHAR  (IPX_ROUTER_PROTOCOL, ucp);
-               PUTCHAR  (CILEN_PROTOCOL,      ucp);
-               PUTSHORT (2,                   ucp);
-           }
-           
-           if (go->router & BIT(4)) {
-               PUTCHAR  (IPX_ROUTER_PROTOCOL, ucp);
-               PUTCHAR  (CILEN_PROTOCOL,      ucp);
-               PUTSHORT (4,                   ucp);
-           }
+           PUTCHAR  (CILEN_PROTOCOL,      ucp);
+           PUTSHORT (external,            ucp);
        }
     }
-
-    if (go->neg_complete) {
-       PUTCHAR (IPX_COMPLETE,   ucp);
-       PUTCHAR (CILEN_COMPLETE, ucp);
-    }
 }
 
 /*
@@ -466,7 +591,6 @@ ipxcp_ackci(f, p, len)
     u_char *p;
     int len;
 {
-    int unit = f->unit;
     u_short cilen, citype, cishort;
     u_char cichar;
     u_int32_t cilong;
@@ -521,9 +645,8 @@ ipxcp_ackci(f, p, len)
            break; \
     }
 
-#define ACKCIPROTO(opt, neg, val, bit) \
-    if (neg && (val & BIT(bit))) \
-      { \
+#define ACKCIPROTO(opt, neg, val) \
+    if (neg) { \
        if (len < 2) \
            break; \
        GETCHAR(citype, p); \
@@ -534,7 +657,7 @@ ipxcp_ackci(f, p, len)
        if (len < 0) \
            break; \
        GETSHORT(cishort, p); \
-       if (cishort != (bit)) \
+       if (cishort != to_external (val) || cishort == RIP_SAP) \
            break; \
       }
 /*
@@ -544,10 +667,8 @@ ipxcp_ackci(f, p, len)
        ACKCINETWORK  (IPX_NETWORK_NUMBER,  go->neg_nn,     go->our_network);
        ACKCINODE     (IPX_NODE_NUMBER,     go->neg_node,   go->our_node);
        ACKCINAME     (IPX_ROUTER_NAME,     go->neg_name,   go->name);
-       ACKCIPROTO    (IPX_ROUTER_PROTOCOL, go->neg_router, go->router, 0);
-       ACKCIPROTO    (IPX_ROUTER_PROTOCOL, go->neg_router, go->router, 2);
-       ACKCIPROTO    (IPX_ROUTER_PROTOCOL, go->neg_router, go->router, 4);
-       ACKCICOMPLETE (IPX_COMPLETE,        go->neg_complete);
+       if (len > 0)
+               ACKCIPROTO    (IPX_ROUTER_PROTOCOL, go->neg_router, go->router);
 /*
  * This is the end of the record.
  */
@@ -557,7 +678,7 @@ ipxcp_ackci(f, p, len)
 /*
  * The frame is invalid
  */
-    IPXCPDEBUG((LOG_INFO, "ipxcp_ackci: received bad Ack!"));
+    IPXCPDEBUG(("ipxcp_ackci: received bad Ack!"));
     return (0);
 }
 
@@ -577,7 +698,6 @@ ipxcp_nakci(f, p, len)
     u_char *p;
     int len;
 {
-    int unit = f->unit;
     u_char citype, cilen, *next;
     u_short s;
     u_int32_t l;
@@ -602,7 +722,6 @@ ipxcp_nakci(f, p, len)
            no.neg_nn = 1;
 
            GETLONG(l, p);
-           IPXCPDEBUG((LOG_INFO, "local IP address %d", l));
            if (l && ao->accept_network)
                try.our_network = l;
            break;
@@ -612,16 +731,12 @@ ipxcp_nakci(f, p, len)
                goto bad;
            no.neg_node = 1;
 
-           IPXCPDEBUG((LOG_INFO,
-                       "local node number %02X%02X%02X%02X%02X%02X",
-                       NODE(p)));
-
            if (!zero_node (p) && ao->accept_local &&
                ! compare_node (p, ho->his_node))
                copy_node (p, try.our_node);
            break;
 
-           /* These have never been sent. Ignore the NAK frame */
+           /* This has never been sent. Ignore the NAK frame */
        case IPX_COMPRESSION_PROTOCOL:
            goto bad;
 
@@ -630,19 +745,19 @@ ipxcp_nakci(f, p, len)
                goto bad;
 
            GETSHORT (s, p);
-           if ((s != 0) && (s != 2) && (s != 4))
-               goto bad;
+           if (s > 15)         /* This is just bad, but ignore for now. */
+               break;
 
-           if (no.router & BIT(s))
+           s = BIT(s);
+           if (no.router & s)  /* duplicate NAKs are always bad */
                goto bad;
 
            if (no.router == 0) /* Reset on first NAK only */
                try.router = 0;
-           no.router      |= BIT(s);
-           try.router     |= BIT(s);
-           try.neg_router  = 1;
 
-           IPXCPDEBUG((LOG_INFO, "Router protocol number %d", s));
+           no.router      |= s;
+           try.router     |= s;
+           try.neg_router  = 1;
            break;
 
            /* These, according to the RFC, must never be NAKed. */
@@ -657,22 +772,20 @@ ipxcp_nakci(f, p, len)
        p = next;
     }
 
-    /* If there is still anything left, this packet is bad. */
-    if (len != 0)
-       goto bad;
-
     /*
      * Do not permit the peer to force a router protocol which we do not
-     * support.
+     * support. However, default to the condition that will accept "NONE".
      */
-    try.router &= go->router;
-    if (try.router == 0 && go->router != 0) {
+    try.router &= (ao->router | BIT(IPX_NONE));
+    if (try.router == 0 && ao->router != 0)
+       try.router = BIT(IPX_NONE);
+
+    if (try.router != 0)
         try.neg_router = 1;
-       try.router     = BIT(0);
-    }
     
     /*
      * OK, the Nak is good.  Now we can update state.
+     * If there are any options left, we ignore them.
      */
     if (f->state != OPENED)
        *go = try;
@@ -680,7 +793,7 @@ ipxcp_nakci(f, p, len)
     return 1;
 
 bad:
-    IPXCPDEBUG((LOG_INFO, "ipxcp_nakci: received bad Nak!"));
+    IPXCPDEBUG(("ipxcp_nakci: received bad Nak!"));
     return 0;
 }
 
@@ -693,15 +806,13 @@ ipxcp_rejci(f, p, len)
     u_char *p;
     int len;
 {
-    int unit = f->unit;
     u_short cilen, citype, cishort;
     u_char cichar;
     u_int32_t cilong;
     ipxcp_options try;         /* options to request next time */
 
 #define REJCINETWORK(opt, neg, val) \
-    if (neg) { \
-       neg = 0; \
+    if (neg && p[0] == opt) { \
        if ((len -= CILEN_NETN) < 0) \
            break; \
        GETCHAR(citype, p); \
@@ -712,13 +823,12 @@ ipxcp_rejci(f, p, len)
        GETLONG(cilong, p); \
        if (cilong != val) \
            break; \
-       IPXCPDEBUG((LOG_INFO,"ipxcp_rejci rejected long opt %d", opt)); \
+       neg = 0; \
     }
 
 #define REJCICHARS(opt, neg, val, cnt) \
-    if (neg) { \
+    if (neg && p[0] == opt) { \
        int indx, count = cnt; \
-       neg = 0; \
        len -= (count + 2); \
        if (len < 0) \
            break; \
@@ -734,45 +844,38 @@ ipxcp_rejci(f, p, len)
        }\
        if (indx != count) \
            break; \
-       IPXCPDEBUG((LOG_INFO,"ipxcp_rejci rejected opt %d", opt)); \
+       neg = 0; \
     }
 
 #define REJCINODE(opt,neg,val) REJCICHARS(opt,neg,val,sizeof(val))
 #define REJCINAME(opt,neg,val) REJCICHARS(opt,neg,val,strlen(val))
 
 #define REJCIVOID(opt, neg) \
-    if (neg) { \
-       neg = 0; \
+    if (neg && p[0] == opt) { \
        if ((len -= CILEN_VOID) < 0) \
            break; \
        GETCHAR(citype, p); \
        GETCHAR(cilen, p); \
        if (cilen != CILEN_VOID || citype != opt) \
            break; \
-       IPXCPDEBUG((LOG_INFO, "ipxcp_rejci rejected void opt %d", opt)); \
+       neg = 0; \
     }
 
+/* a reject for RIP/SAP is invalid since we don't send it and you can't
+   reject something which is not sent. (You can NAK, but you can't REJ.) */
 #define REJCIPROTO(opt, neg, val, bit) \
-    if (neg && (val & BIT(bit))) \
-      { \
-       if (len < 2) \
+    if (neg && p[0] == opt) { \
+       if ((len -= CILEN_PROTOCOL) < 0) \
            break; \
        GETCHAR(citype, p); \
        GETCHAR(cilen, p); \
-       if (cilen != CILEN_PROTOCOL || citype != opt) \
-           break; \
-       len -= cilen; \
-       if (len < 0) \
+       if (cilen != CILEN_PROTOCOL) \
            break; \
        GETSHORT(cishort, p); \
-       if (cishort != (bit)) \
+       if (cishort != to_external (val) || cishort == RIP_SAP) \
            break; \
-       IPXCPDEBUG((LOG_INFO, "ipxcp_rejci rejected router proto %d", bit)); \
-       val &= ~BIT(bit); \
-       if (val == 0) \
-           neg = 0; \
-      }
-
+       neg = 0; \
+    }
 /*
  * Any Rejected CIs must be in exactly the same order that we sent.
  * Check packet length and CI length at each step.
@@ -783,11 +886,8 @@ ipxcp_rejci(f, p, len)
     do {
        REJCINETWORK (IPX_NETWORK_NUMBER,  try.neg_nn,     try.our_network);
        REJCINODE    (IPX_NODE_NUMBER,     try.neg_node,   try.our_node);
-       REJCIPROTO   (IPX_ROUTER_PROTOCOL, try.neg_router, try.router, 0);
-       REJCIPROTO   (IPX_ROUTER_PROTOCOL, try.neg_router, try.router, 2);
-       REJCIPROTO   (IPX_ROUTER_PROTOCOL, try.neg_router, try.router, 4);
        REJCINAME    (IPX_ROUTER_NAME,     try.neg_name,   try.name);
-       REJCIVOID    (IPX_COMPLETE,        try.neg_complete);
+       REJCIPROTO   (IPX_ROUTER_PROTOCOL, try.neg_router, try.router, 0);
 /*
  * This is the end of the record.
  */
@@ -800,7 +900,7 @@ ipxcp_rejci(f, p, len)
 /*
  * The frame is invalid at this point.
  */
-    IPXCPDEBUG((LOG_INFO, "ipxcp_rejci: received bad Reject!"));
+    IPXCPDEBUG(("ipxcp_rejci: received bad Reject!"));
     return 0;
 }
 
@@ -818,17 +918,15 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
     int *len;                  /* Length of requested CIs */
     int reject_if_disagree;
 {
-    int unit = f->unit;
     u_char *cip, *next;                /* Pointer to current and next CIs */
     u_short cilen, citype;     /* Parsed len, type */
-    u_short cishort, ts;       /* Parsed short value */
-    u_int32_t tl, cinetwork, outnet;/* Parsed address values */
+    u_short cishort;           /* Parsed short value */
+    u_int32_t cinetwork;       /* Parsed address values */
     int rc = CONFACK;          /* Final packet return code */
     int orc;                   /* Individual option return code */
     u_char *p;                 /* Pointer to next char to parse */
     u_char *ucp = inp;         /* Pointer to current output char */
     int l = *len;              /* Length left */
-    u_char maxslotindex, cflag;
 
     /*
      * Reset all his options.
@@ -845,7 +943,7 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
        if (l < 2 ||                    /* Not enough data for CI header or */
            p[1] < 2 ||                 /*  CI length too small or */
            p[1] > l) {                 /*  CI length too big? */
-           IPXCPDEBUG((LOG_INFO, "ipxcp_reqci: bad CI length!"));
+           IPXCPDEBUG(("ipxcp_reqci: bad CI length!"));
            orc = CONFREJ;              /* Reject bad CI */
            cilen = l;                  /* Reject till end of packet */
            l = 0;                      /* Don't loop again */
@@ -861,8 +959,6 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
  * The network number must match. Choose the larger of the two.
  */
        case IPX_NETWORK_NUMBER:
-           IPXCPDEBUG((LOG_INFO, "ipxcp: received Network Number request"));
-           
            /* if we wont negotiate the network number or the length is wrong
               then reject the option */
            if ( !ao->neg_nn || cilen != CILEN_NETN ) {
@@ -870,7 +966,6 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
                break;          
            }
            GETLONG(cinetwork, p);
-           IPXCPDEBUG((LOG_INFO,"Remote proposed IPX network number is %8Lx",tl));
 
            /* If the network numbers match then acknowledge them. */
            if (cinetwork != 0) {
@@ -907,8 +1002,6 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
  * The node number is required
  */
        case IPX_NODE_NUMBER:
-           IPXCPDEBUG((LOG_INFO, "ipxcp: received Node Number request"));
-
            /* if we wont negotiate the node number or the length is wrong
               then reject the option */
            if ( cilen != CILEN_NODEN ) {
@@ -966,13 +1059,12 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
  * Compression is not desired at this time. It is always rejected.
  */
        case IPX_COMPRESSION_PROTOCOL:
-           IPXCPDEBUG((LOG_INFO, "ipxcp: received Compression Protocol request "));
            orc = CONFREJ;
            break;
 /*
  * The routing protocol is a bitmask of various types. Any combination
- * of the values 2 and 4 are permissible. '0' for no routing protocol must
- * be specified only once.
+ * of the values RIP_SAP and NLSP are permissible. 'IPX_NONE' for no
+ * routing protocol must be specified only once.
  */
        case IPX_ROUTER_PROTOCOL:
            if ( !ao->neg_router || cilen < CILEN_PROTOCOL ) {
@@ -981,33 +1073,50 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
            }
 
            GETSHORT (cishort, p);
-           IPXCPDEBUG((LOG_INFO,
-                       "Remote router protocol number %d",
-                       cishort));
 
-           if ((cishort == 0 && ho->router != 0) || (ho->router & BIT(0))) {
-               orc = CONFREJ;
-               break;          
+           if (wo->neg_router == 0) {
+               wo->neg_router = 1;
+               wo->router     = BIT(IPX_NONE);
            }
 
-           if (cishort != 0 && cishort != 2 && cishort != 4) {
+           if ((cishort == IPX_NONE && ho->router != 0) ||
+               (ho->router & BIT(IPX_NONE))) {
                orc = CONFREJ;
                break;
            }
 
-           if (ho->router & BIT (cishort)) {
+           cishort = BIT(cishort);
+           if (ho->router & cishort) {
                orc = CONFREJ;
                break;
            }
 
-           ho->router    |= BIT (cishort);
+           ho->router    |= cishort;
            ho->neg_router = 1;
+
+           /* Finally do not allow a router protocol which we do not
+              support. */
+
+           if ((cishort & (ao->router | BIT(IPX_NONE))) == 0) {
+               int protocol;
+
+               if (cishort == BIT(NLSP) &&
+                   (ao->router & BIT(RIP_SAP)) &&
+                   !wo->tried_rip) {
+                   protocol      = RIP_SAP;
+                   wo->tried_rip = 1;
+               } else
+                   protocol = IPX_NONE;
+
+               DECPTR (sizeof (u_int16_t), p);
+               PUTSHORT (protocol, p);
+               orc = CONFNAK;
+           }
            break;
 /*
  * The router name is advisorary. Just accept it if it is not too large.
  */
        case IPX_ROUTER_NAME:
-           IPXCPDEBUG((LOG_INFO, "ipxcp: received Router Name request"));
            if (cilen >= CILEN_NAME) {
                int name_size = cilen - CILEN_NAME;
                if (name_size > sizeof (ho->name))
@@ -1025,7 +1134,6 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
  * This is advisorary.
  */
        case IPX_COMPLETE:
-           IPXCPDEBUG((LOG_INFO, "ipxcp: received Complete request"));
            if (cilen != CILEN_COMPLETE)
                orc = CONFREJ;
            else {
@@ -1037,14 +1145,10 @@ ipxcp_reqci(f, inp, len, reject_if_disagree)
  * All other entries are not known at this time.
  */
        default:
-           IPXCPDEBUG((LOG_INFO, "ipxcp: received Complete request"));
            orc = CONFREJ;
            break;
        }
-
 endswitch:
-       IPXCPDEBUG((LOG_INFO, " (%s)\n", CODENAME(orc)));
-
        if (orc == CONFACK &&           /* Good CI */
            rc != CONFACK)              /*  but prior CI wasnt? */
            continue;                   /* Don't send this one */
@@ -1084,7 +1188,6 @@ endswitch:
 
     if (rc != CONFREJ && !ho->neg_node &&
        wo->req_nn && !reject_if_disagree) {
-       u_char *ps;
        if (rc == CONFACK) {
            rc = CONFNAK;
            wo->req_nn = 0;             /* don't ask again */
@@ -1101,7 +1204,7 @@ endswitch:
     }
 
     *len = ucp - inp;                  /* Compute output length */
-    IPXCPDEBUG((LOG_INFO, "ipxcp: returning Configure-%s", CODENAME(rc)));
+    IPXCPDEBUG(("ipxcp: returning Configure-%s", CODENAME(rc)));
     return (rc);                       /* Return final code */
 }
 
@@ -1117,8 +1220,16 @@ ipxcp_up(f)
 {
     int unit = f->unit;
 
-    IPXCPDEBUG((LOG_INFO, "ipxcp: up"));
+    IPXCPDEBUG(("ipxcp: up"));
+
+    /* The default router protocol is RIP/SAP. */
+    if (ho->router == 0)
+        ho->router = BIT(RIP_SAP);
+
+    if (go->router == 0)
+        go->router = BIT(RIP_SAP);
 
+    /* Fetch the network number */
     if (!ho->neg_nn)
        ho->his_network = wo->his_network;
 
@@ -1129,8 +1240,10 @@ ipxcp_up(f)
        copy_node (wo->our_node, go->our_node);
 
     if (zero_node (go->our_node)) {
-       IPXCPDEBUG((LOG_ERR, "Could not determine local IPX node address"));
-       ipxcp_close(f->unit, "Could not determine local IPX node address");
+        static char errmsg[] = "Could not determine local IPX node address";
+       if (debug)
+           error(errmsg);
+       ipxcp_close(f->unit, errmsg);
        return;
     }
 
@@ -1139,31 +1252,38 @@ ipxcp_up(f)
        go->network = ho->his_network;
 
     if (go->network == 0) {
-       IPXCPDEBUG((LOG_ERR, "Could not determine network number"));
-       ipxcp_close (unit, "Could not determine network number");
+        static char errmsg[] = "Can not determine network number";
+       if (debug)
+           error(errmsg);
+       ipxcp_close (unit, errmsg);
        return;
     }
 
     /* bring the interface up */
     if (!sifup(unit)) {
-       IPXCPDEBUG((LOG_WARNING, "sifup failed"));
+       if (debug)
+           warn("sifup failed (IPX)");
        ipxcp_close(unit, "Interface configuration failed");
        return;
     }
 
     /* set the network number for IPX */
     if (!sipxfaddr(unit, go->network, go->our_node)) {
-       IPXCPDEBUG((LOG_WARNING, "sipxfaddr failed"));
+       if (debug)
+           warn("sipxfaddr failed");
        ipxcp_close(unit, "Interface configuration failed");
        return;
     }
 
+    ipxcp_is_up = 1;
+    np_up(f->unit, PPP_IPX);
+
     /*
      * Execute the ipx-up script, like this:
      * /etc/ppp/ipx-up interface tty speed local-IPX remote-IPX
      */
 
-    ipxcp_script (f, "/etc/ppp/ipx-up");
+    ipxcp_script (f, _PATH_IPXUP);
 }
 
 /*
@@ -1177,13 +1297,26 @@ static void
 ipxcp_down(f)
     fsm *f;
 {
-    u_int32_t ournn, network;
-
-    IPXCPDEBUG((LOG_INFO, "ipxcp: down"));
+    IPXCPDEBUG(("ipxcp: down"));
 
+    if (ipxcp_is_up) {
+       ipxcp_is_up = 0;
+       np_down(f->unit, PPP_IPX);
+    }
     cipxfaddr (f->unit);
     sifdown(f->unit);
-    ipxcp_script (f, "/etc/ppp/ipx-down");
+    ipxcp_script (f, _PATH_IPXDOWN);
+}
+
+
+/*
+ * ipxcp_finished - possibly shut down the lower layers.
+ */
+static void
+ipxcp_finished(f)
+    fsm *f;
+{
+    np_finished(f->unit, PPP_IPX);
 }
 
 
@@ -1196,49 +1329,44 @@ ipxcp_script(f, script)
     fsm *f;
     char *script;
 {
-    int         unit = f->unit;
     char strspeed[32],  strlocal[32],     strremote[32];
     char strnetwork[32], strpid[32];
     char *argv[14],     strproto_lcl[32], strproto_rmt[32];
 
-    sprintf (strpid,   "%d", getpid());
-    sprintf (strspeed, "%d", baud_rate);
+    slprintf(strpid, sizeof(strpid), "%d", getpid());
+    slprintf(strspeed, sizeof(strspeed),"%d", baud_rate);
 
     strproto_lcl[0] = '\0';
-    if (go->neg_router) {
-       if (go->router & BIT(2))
-           strcpy (strproto_lcl, "RIP ");
-       if (go->router & BIT(4))
-           strcpy (strproto_lcl, "NLSP ");
+    if (go->neg_router && ((go->router & BIT(IPX_NONE)) == 0)) {
+       if (go->router & BIT(RIP_SAP))
+           strlcpy (strproto_lcl, "RIP ", sizeof(strproto_lcl));
+       if (go->router & BIT(NLSP))
+           strlcat (strproto_lcl, "NLSP ", sizeof(strproto_lcl));
     }
 
     if (strproto_lcl[0] == '\0')
-       strcpy (strproto_lcl, "NONE ");
+       strlcpy (strproto_lcl, "NONE ", sizeof(strproto_lcl));
 
     strproto_lcl[strlen (strproto_lcl)-1] = '\0';
 
     strproto_rmt[0] = '\0';
-    if (ho->neg_router) {
-       if (ho->router & BIT(2))
-           strcpy (strproto_rmt, "RIP ");
-       if (ho->router & BIT(4))
-           strcpy (strproto_rmt, "NLSP ");
+    if (ho->neg_router && ((ho->router & BIT(IPX_NONE)) == 0)) {
+       if (ho->router & BIT(RIP_SAP))
+           strlcpy (strproto_rmt, "RIP ", sizeof(strproto_rmt));
+       if (ho->router & BIT(NLSP))
+           strlcat (strproto_rmt, "NLSP ", sizeof(strproto_rmt));
     }
 
     if (strproto_rmt[0] == '\0')
-       strcpy (strproto_rmt, "NONE ");
+       strlcpy (strproto_rmt, "NONE ", sizeof(strproto_rmt));
 
     strproto_rmt[strlen (strproto_rmt)-1] = '\0';
 
-    strcpy (strnetwork, ipx_ntoa (go->network));
+    strlcpy (strnetwork, ipx_ntoa (go->network), sizeof(strnetwork));
 
-    sprintf (strlocal,
-            "%02X%02X%02X%02X%02X%02X",
-            NODE(go->our_node));
+    slprintf (strlocal, sizeof(strlocal), "%0.6B", go->our_node);
 
-    sprintf (strremote,
-            "%02X%02X%02X%02X%02X%02X",
-            NODE(ho->his_node));
+    slprintf (strremote, sizeof(strremote), "%0.6B", ho->his_node);
 
     argv[0]  = script;
     argv[1]  = ifname;
@@ -1254,7 +1382,7 @@ ipxcp_script(f, script)
     argv[11] = ipparam;
     argv[12] = strpid;
     argv[13] = NULL;
-    run_program(script, argv, 0);
+    run_program(script, argv, 0, NULL, NULL);
 }
 
 /*
@@ -1269,7 +1397,7 @@ static int
 ipxcp_printpkt(p, plen, printer, arg)
     u_char *p;
     int plen;
-    void (*printer)();
+    void (*printer) __P((void *, char *, ...));
     void *arg;
 {
     int code, id, len, olen;
@@ -1311,52 +1439,52 @@ ipxcp_printpkt(p, plen, printer, arg)
            switch (code) {
            case IPX_NETWORK_NUMBER:
                if (olen == CILEN_NETN) {
-                   p += CILEN_VOID;
+                   p += 2;
                    GETLONG(cilong, p);
                    printer (arg, "network %s", ipx_ntoa (cilong));
                }
                break;
            case IPX_NODE_NUMBER:
                if (olen == CILEN_NODEN) {
-                   p += CILEN_VOID;
+                   p += 2;
                    printer (arg, "node ");
                    while (p < optend) {
                        GETCHAR(code, p);
-                       printer(arg, "%.2x", code);
+                       printer(arg, "%.2x", (int) (unsigned int) (unsigned char) code);
                    }
                }
                break;
            case IPX_COMPRESSION_PROTOCOL:
                if (olen == CILEN_COMPRESS) {
-                   p += CILEN_VOID;
+                   p += 2;
                    GETSHORT (cishort, p);
-                   printer (arg, "compression %d", cishort);
+                   printer (arg, "compression %d", (int) cishort);
                }
                break;
            case IPX_ROUTER_PROTOCOL:
                if (olen == CILEN_PROTOCOL) {
-                   p += CILEN_VOID;
+                   p += 2;
                    GETSHORT (cishort, p);
-                   printer (arg, "router proto %d", cishort);
+                   printer (arg, "router proto %d", (int) cishort);
                }
                break;
            case IPX_ROUTER_NAME:
                if (olen >= CILEN_NAME) {
-                   p += CILEN_VOID;
+                   p += 2;
                    printer (arg, "router name \"");
                    while (p < optend) {
                        GETCHAR(code, p);
-                       if (code >= 0x20 && code < 0x7E)
-                           printer (arg, "%c", code);
+                       if (code >= 0x20 && code <= 0x7E)
+                           printer (arg, "%c", (int) (unsigned int) (unsigned char) code);
                        else
-                           printer (arg, " \\%.2x", code);
+                           printer (arg, " \\%.2x", (int) (unsigned int) (unsigned char) code);
                    }
                    printer (arg, "\"");
                }
                break;
            case IPX_COMPLETE:
                if (olen == CILEN_COMPLETE) {
-                   p += CILEN_VOID;
+                   p += 2;
                    printer (arg, "complete");
                }
                break;
@@ -1366,7 +1494,7 @@ ipxcp_printpkt(p, plen, printer, arg)
 
            while (p < optend) {
                GETCHAR(code, p);
-               printer(arg, " %.2x", code);
+               printer(arg, " %.2x", (int) (unsigned int) (unsigned char) code);
            }
            printer(arg, ">");
        }
@@ -1386,7 +1514,7 @@ ipxcp_printpkt(p, plen, printer, arg)
     /* print the rest of the bytes in the packet */
     for (; len > 0; --len) {
        GETCHAR(code, p);
-       printer(arg, " %.2x", code);
+       printer(arg, " %.2x", (int) (unsigned int) (unsigned char) code);
     }
 
     return p - pstart;