Describe environment variables set for scripts.
[ppp.git] / pppd / ipcp.c
index ecbb74904cac8f6c4baceee6ec6465a035290c73..fee6757439d76df99299c58f2312c9be1059639a 100644 (file)
@@ -18,7 +18,7 @@
  */
 
 #ifndef lint
-static char rcsid[] = "$Id: ipcp.c,v 1.28 1996/08/28 06:40:29 paulus Exp $";
+static char rcsid[] = "$Id: ipcp.c,v 1.33 1998/03/25 03:08:47 paulus Exp $";
 #endif
 
 /*
@@ -33,9 +33,6 @@ static char rcsid[] = "$Id: ipcp.c,v 1.28 1996/08/28 06:40:29 paulus Exp $";
 #include <sys/types.h>
 #include <sys/socket.h>
 #include <netinet/in.h>
-#include <netinet/in_systm.h>
-#include <netinet/ip.h>
-#include <netinet/tcp.h>
 
 #include "pppd.h"
 #include "fsm.h"
@@ -122,6 +119,8 @@ struct protent ipcp_protent = {
     ip_active_pkt
 };
 
+static void ipcp_clear_addrs __P((int));
+
 /*
  * Lengths of configuration options.
  */
@@ -605,7 +604,7 @@ ipcp_nakci(f, p, len)
            no.neg_vj = 1;
            break;
        case CI_ADDRS:
-           if (go->neg_addr && go->old_addrs || no.old_addrs
+           if ((go->neg_addr && go->old_addrs) || no.old_addrs
                || cilen != CILEN_ADDRS)
                goto bad;
            try.neg_addr = 1;
@@ -922,6 +921,27 @@ ipcp_reqci(f, inp, len, reject_if_disagree)
                orc = CONFNAK;
             }
             break;
+
+       case CI_MS_WINS1:
+       case CI_MS_WINS2:
+           /* Microsoft primary or secondary WINS request */
+           d = citype == CI_MS_WINS2;
+           IPCPDEBUG((LOG_INFO, "ipcp: received WINS%d Request ", d+1));
+
+           /* If we do not have a DNS address then we cannot send it */
+           if (ao->winsaddr[d] == 0 ||
+               cilen != CILEN_ADDR) {  /* Check CI length */
+               orc = CONFREJ;          /* Reject CI */
+               break;
+           }
+           GETLONG(tl, p);
+           if (htonl(tl) != ao->winsaddr[d]) {
+                DECPTR(sizeof(u_int32_t), p);
+               tl = ntohl(ao->winsaddr[d]);
+               PUTLONG(tl, p);
+               orc = CONFNAK;
+            }
+            break;
        
        case CI_COMPRESSTYPE:
            IPCPDEBUG((LOG_INFO, "ipcp: received COMPRESSTYPE "));
@@ -1065,10 +1085,12 @@ ip_check_options()
        option_error("remote IP address required for demand-dialling\n");
        exit(1);
     }
+#if 0
     if (demand && wo->accept_remote) {
        option_error("ipcp-accept-remote is incompatible with demand\n");
        exit(1);
     }
+#endif
 }
 
 
@@ -1089,7 +1111,7 @@ ip_demand_conf(u)
     if (!sifnpmode(u, PPP_IP, NPMODE_QUEUE))
        return 0;
     if (wo->default_route)
-       if (sifdefaultroute(u, wo->hisaddr))
+       if (sifdefaultroute(u, wo->ouraddr, wo->hisaddr))
            default_route_set[u] = 1;
     if (wo->proxy_arp)
        if (sifproxyarp(u, wo->hisaddr))
@@ -1135,6 +1157,8 @@ ipcp_up(f)
        ipcp_close(f->unit, "Could not determine local IP address");
        return;
     }
+    script_setenv("IPLOCAL", ip_ntoa(go->ouraddr));
+    script_setenv("IPREMOTE", ip_ntoa(ho->hisaddr));
 
     /*
      * Check that the peer is allowed to use the IP address it wants.
@@ -1156,26 +1180,49 @@ ipcp_up(f)
      */
     if (demand) {
        if (go->ouraddr != wo->ouraddr || ho->hisaddr != wo->hisaddr) {
-           syslog(LOG_ERR, "Failed to negotiate desired IP addresses");
-           ipcp_close(f->unit, "Wrong IP addresses");
-           return;
+           if (go->ouraddr != wo->ouraddr)
+               syslog(LOG_WARNING, "Local IP address changed to %s",
+                      ip_ntoa(go->ouraddr));
+           if (ho->hisaddr != wo->hisaddr)
+               syslog(LOG_WARNING, "Remote IP address changed to %s",
+                      ip_ntoa(ho->hisaddr));
+           ipcp_clear_addrs(f->unit);
+
+           /* Set the interface to the new addresses */
+           mask = GetMask(go->ouraddr);
+           if (!sifaddr(f->unit, go->ouraddr, ho->hisaddr, mask)) {
+               IPCPDEBUG((LOG_WARNING, "sifaddr failed"));
+               ipcp_close(f->unit, "Interface configuration failed");
+               return;
+           }
+
+           /* assign a default route through the interface if required */
+           if (ipcp_wantoptions[f->unit].default_route) 
+               if (sifdefaultroute(f->unit, go->ouraddr, ho->hisaddr))
+                   default_route_set[f->unit] = 1;
+
+           /* Make a proxy ARP entry if requested. */
+           if (ipcp_wantoptions[f->unit].proxy_arp)
+               if (sifproxyarp(f->unit, ho->hisaddr))
+                   proxy_arp_set[f->unit] = 1;
+
        }
        demand_rexmit(PPP_IP);
        sifnpmode(f->unit, PPP_IP, NPMODE_PASS);
-    }
-#ifndef _linux_  /* Linux destroys routes when the device goes down. */
-    else         /* always use the code which adds the routes. */
-#endif
-    {
+
+    } else {
        /*
         * Set IP addresses and (if specified) netmask.
         */
        mask = GetMask(go->ouraddr);
+
+#if !(defined(SVR4) && (defined(SNI) || defined(__USLC__)))
        if (!sifaddr(f->unit, go->ouraddr, ho->hisaddr, mask)) {
            IPCPDEBUG((LOG_WARNING, "sifaddr failed"));
            ipcp_close(f->unit, "Interface configuration failed");
            return;
        }
+#endif
 
        /* bring the interface up for IP */
        if (!sifup(f->unit)) {
@@ -1183,11 +1230,19 @@ ipcp_up(f)
            ipcp_close(f->unit, "Interface configuration failed");
            return;
        }
+
+#if (defined(SVR4) && (defined(SNI) || defined(__USLC__)))
+       if (!sifaddr(f->unit, go->ouraddr, ho->hisaddr, mask)) {
+           IPCPDEBUG((LOG_WARNING, "sifaddr failed"));
+           ipcp_close(f->unit, "Interface configuration failed");
+           return;
+       }
+#endif
        sifnpmode(f->unit, PPP_IP, NPMODE_PASS);
 
        /* assign a default route through the interface if required */
        if (ipcp_wantoptions[f->unit].default_route) 
-           if (sifdefaultroute(f->unit, ho->hisaddr))
+           if (sifdefaultroute(f->unit, go->ouraddr, ho->hisaddr))
                default_route_set[f->unit] = 1;
 
        /* Make a proxy ARP entry if requested. */
@@ -1218,8 +1273,6 @@ static void
 ipcp_down(f)
     fsm *f;
 {
-    u_int32_t ouraddr, hisaddr;
-
     IPCPDEBUG((LOG_INFO, "ipcp: down"));
     np_down(f->unit, PPP_IP);
     sifvjcomp(f->unit, 0, 0, 0);
@@ -1230,20 +1283,9 @@ ipcp_down(f)
      */
     if (demand) {
        sifnpmode(f->unit, PPP_IP, NPMODE_QUEUE);
-
     } else {
-       ouraddr = ipcp_gotoptions[f->unit].ouraddr;
-       hisaddr = ipcp_hisoptions[f->unit].hisaddr;
-       if (proxy_arp_set[f->unit]) {
-           cifproxyarp(f->unit, hisaddr);
-           proxy_arp_set[f->unit] = 0;
-       }
-       if (default_route_set[f->unit]) {
-           cifdefaultroute(f->unit, hisaddr);
-           default_route_set[f->unit] = 0;
-       }
        sifdown(f->unit);
-       cifaddr(f->unit, ouraddr, hisaddr);
+       ipcp_clear_addrs(f->unit);
     }
 
     /* Execute the ip-down script */
@@ -1251,6 +1293,30 @@ ipcp_down(f)
 }
 
 
+/*
+ * ipcp_clear_addrs() - clear the interface addresses, routes,
+ * proxy arp entries, etc.
+ */
+static void
+ipcp_clear_addrs(unit)
+    int unit;
+{
+    u_int32_t ouraddr, hisaddr;
+
+    ouraddr = ipcp_gotoptions[unit].ouraddr;
+    hisaddr = ipcp_hisoptions[unit].hisaddr;
+    if (proxy_arp_set[unit]) {
+       cifproxyarp(unit, hisaddr);
+       proxy_arp_set[unit] = 0;
+    }
+    if (default_route_set[unit]) {
+       cifdefaultroute(unit, ouraddr, hisaddr);
+       default_route_set[unit] = 0;
+    }
+    cifaddr(unit, ouraddr, hisaddr);
+}
+
+
 /*
  * ipcp_finished - possibly shut down the lower layers.
  */
@@ -1374,6 +1440,18 @@ ipcp_printpkt(p, plen, printer, arg)
                    printer(arg, "addr %s", ip_ntoa(htonl(cilong)));
                }
                break;
+           case CI_MS_DNS1:
+           case CI_MS_DNS2:
+               p += 2;
+               GETLONG(cilong, p);
+               printer(arg, "dns-addr %s", ip_ntoa(htonl(cilong)));
+               break;
+           case CI_MS_WINS1:
+           case CI_MS_WINS2:
+               p += 2;
+               GETLONG(cilong, p);
+               printer(arg, "wins-addr %s", ip_ntoa(htonl(cilong)));
+               break;
            }
            while (p < optend) {
                GETCHAR(code, p);
@@ -1408,9 +1486,11 @@ ipcp_printpkt(p, plen, printer, arg)
  * We don't bring the link up for IP fragments or for TCP FIN packets
  * with no data.
  */
-#ifndef IP_OFFMASK
+#define IP_HDRLEN      20      /* bytes */
 #define IP_OFFMASK     0x1fff
-#endif
+#define IPPROTO_TCP    6
+#define TCP_HDRLEN     20
+#define TH_FIN         0x01
 
 /*
  * We use these macros because the IP header may be at an odd address,
@@ -1420,31 +1500,31 @@ ipcp_printpkt(p, plen, printer, arg)
 #define net_short(x)   (((x)[0] << 8) + (x)[1])
 #define get_iphl(x)    (((unsigned char *)(x))[0] & 0xF)
 #define get_ipoff(x)   net_short((unsigned char *)(x) + 6)
+#define get_ipproto(x) (((unsigned char *)(x))[9])
 #define get_tcpoff(x)  (((unsigned char *)(x))[12] >> 4)
+#define get_tcpflags(x)        (((unsigned char *)(x))[13])
 
 static int
 ip_active_pkt(pkt, len)
     u_char *pkt;
     int len;
 {
-    struct ip *ip;
-    struct tcphdr *tcp;
+    u_char *tcp;
     int hlen;
 
     len -= PPP_HDRLEN;
-    if (len < sizeof(struct ip) + PPP_HDRLEN)
-       return 0;
     pkt += PPP_HDRLEN;
-    ip = (struct ip *) pkt;
-    if ((get_ipoff(ip) & IP_OFFMASK) != 0)
+    if (len < IP_HDRLEN)
+       return 0;
+    if ((get_ipoff(pkt) & IP_OFFMASK) != 0)
        return 0;
-    if (ip->ip_p != IPPROTO_TCP)
+    if (get_ipproto(pkt) != IPPROTO_TCP)
        return 1;
-    hlen = get_iphl(ip) * 4;
-    if (len < hlen + sizeof(struct tcphdr))
+    hlen = get_iphl(pkt) * 4;
+    if (len < hlen + TCP_HDRLEN)
        return 0;
-    tcp = (struct tcphdr *) (pkt + hlen);
-    if ((tcp->th_flags & TH_FIN) != 0 && len == hlen + get_tcpoff(tcp) * 4)
+    tcp = pkt + hlen;
+    if ((get_tcpflags(tcp) & TH_FIN) != 0 && len == hlen + get_tcpoff(tcp) * 4)
        return 0;
     return 1;
 }