Donatien Garnier / LwIPNetworking

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   DebugLib Socket lwip lwip-sys

Dependents:   EthernetInterface

Fork of NetworkingCoreLib by Donatien Garnier

main/lwip/src/netif/ppp/ipcp.c@0:013f5d54248c, 2012-05-24 (annotated)

Committer:
donatien
Date:
Thu May 24 14:49:40 2012 +0000
Revision:
0:013f5d54248c
Initial Commit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:013f5d54248c 1 /** In contrast to pppd 2.3.1, DNS support has been added, proxy-ARP and
donatien 0:013f5d54248c 2 dial-on-demand has been stripped. */
donatien 0:013f5d54248c 3 /*****************************************************************************
donatien 0:013f5d54248c 4 * ipcp.c - Network PPP IP Control Protocol program file.
donatien 0:013f5d54248c 5 *
donatien 0:013f5d54248c 6 * Copyright (c) 2003 by Marc Boucher, Services Informatiques (MBSI) inc.
donatien 0:013f5d54248c 7 * portions Copyright (c) 1997 by Global Election Systems Inc.
donatien 0:013f5d54248c 8 *
donatien 0:013f5d54248c 9 * The authors hereby grant permission to use, copy, modify, distribute,
donatien 0:013f5d54248c 10 * and license this software and its documentation for any purpose, provided
donatien 0:013f5d54248c 11 * that existing copyright notices are retained in all copies and that this
donatien 0:013f5d54248c 12 * notice and the following disclaimer are included verbatim in any
donatien 0:013f5d54248c 13 * distributions. No written agreement, license, or royalty fee is required
donatien 0:013f5d54248c 14 * for any of the authorized uses.
donatien 0:013f5d54248c 15 *
donatien 0:013f5d54248c 16 * THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTORS *AS IS* AND ANY EXPRESS OR
donatien 0:013f5d54248c 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
donatien 0:013f5d54248c 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
donatien 0:013f5d54248c 19 * IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
donatien 0:013f5d54248c 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
donatien 0:013f5d54248c 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
donatien 0:013f5d54248c 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
donatien 0:013f5d54248c 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
donatien 0:013f5d54248c 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
donatien 0:013f5d54248c 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
donatien 0:013f5d54248c 26 *
donatien 0:013f5d54248c 27 ******************************************************************************
donatien 0:013f5d54248c 28 * REVISION HISTORY
donatien 0:013f5d54248c 29 *
donatien 0:013f5d54248c 30 * 03-01-01 Marc Boucher <marc@mbsi.ca>
donatien 0:013f5d54248c 31 * Ported to lwIP.
donatien 0:013f5d54248c 32 * 97-12-08 Guy Lancaster <lancasterg@acm.org>, Global Election Systems Inc.
donatien 0:013f5d54248c 33 * Original.
donatien 0:013f5d54248c 34 *****************************************************************************/
donatien 0:013f5d54248c 35 /*
donatien 0:013f5d54248c 36 * ipcp.c - PPP IP Control Protocol.
donatien 0:013f5d54248c 37 *
donatien 0:013f5d54248c 38 * Copyright (c) 1989 Carnegie Mellon University.
donatien 0:013f5d54248c 39 * All rights reserved.
donatien 0:013f5d54248c 40 *
donatien 0:013f5d54248c 41 * Redistribution and use in source and binary forms are permitted
donatien 0:013f5d54248c 42 * provided that the above copyright notice and this paragraph are
donatien 0:013f5d54248c 43 * duplicated in all such forms and that any documentation,
donatien 0:013f5d54248c 44 * advertising materials, and other materials related to such
donatien 0:013f5d54248c 45 * distribution and use acknowledge that the software was developed
donatien 0:013f5d54248c 46 * by Carnegie Mellon University. The name of the
donatien 0:013f5d54248c 47 * University may not be used to endorse or promote products derived
donatien 0:013f5d54248c 48 * from this software without specific prior written permission.
donatien 0:013f5d54248c 49 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
donatien 0:013f5d54248c 50 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
donatien 0:013f5d54248c 51 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
donatien 0:013f5d54248c 52 */
donatien 0:013f5d54248c 53
donatien 0:013f5d54248c 54 #include "lwip/opt.h"
donatien 0:013f5d54248c 55
donatien 0:013f5d54248c 56 #if PPP_SUPPORT /* don't build if not configured for use in lwipopts.h */
donatien 0:013f5d54248c 57
donatien 0:013f5d54248c 58 #include "ppp.h"
donatien 0:013f5d54248c 59 #include "pppdebug.h"
donatien 0:013f5d54248c 60
donatien 0:013f5d54248c 61 #include "auth.h"
donatien 0:013f5d54248c 62 #include "fsm.h"
donatien 0:013f5d54248c 63 #include "vj.h"
donatien 0:013f5d54248c 64 #include "ipcp.h"
donatien 0:013f5d54248c 65
donatien 0:013f5d54248c 66 #include "lwip/inet.h"
donatien 0:013f5d54248c 67
donatien 0:013f5d54248c 68 #include <string.h>
donatien 0:013f5d54248c 69
donatien 0:013f5d54248c 70 /* #define OLD_CI_ADDRS 1 */ /* Support deprecated address negotiation. */
donatien 0:013f5d54248c 71
donatien 0:013f5d54248c 72 /* global vars */
donatien 0:013f5d54248c 73 ipcp_options ipcp_wantoptions[NUM_PPP]; /* Options that we want to request */
donatien 0:013f5d54248c 74 ipcp_options ipcp_gotoptions[NUM_PPP]; /* Options that peer ack'd */
donatien 0:013f5d54248c 75 ipcp_options ipcp_allowoptions[NUM_PPP]; /* Options we allow peer to request */
donatien 0:013f5d54248c 76 ipcp_options ipcp_hisoptions[NUM_PPP]; /* Options that we ack'd */
donatien 0:013f5d54248c 77
donatien 0:013f5d54248c 78 /* local vars */
donatien 0:013f5d54248c 79 static int default_route_set[NUM_PPP]; /* Have set up a default route */
donatien 0:013f5d54248c 80 static int cis_received[NUM_PPP]; /* # Conf-Reqs received */
donatien 0:013f5d54248c 81
donatien 0:013f5d54248c 82
donatien 0:013f5d54248c 83 /*
donatien 0:013f5d54248c 84 * Callbacks for fsm code. (CI = Configuration Information)
donatien 0:013f5d54248c 85 */
donatien 0:013f5d54248c 86 static void ipcp_resetci (fsm *); /* Reset our CI */
donatien 0:013f5d54248c 87 static int ipcp_cilen (fsm *); /* Return length of our CI */
donatien 0:013f5d54248c 88 static void ipcp_addci (fsm *, u_char *, int *); /* Add our CI */
donatien 0:013f5d54248c 89 static int ipcp_ackci (fsm *, u_char *, int); /* Peer ack'd our CI */
donatien 0:013f5d54248c 90 static int ipcp_nakci (fsm *, u_char *, int); /* Peer nak'd our CI */
donatien 0:013f5d54248c 91 static int ipcp_rejci (fsm *, u_char *, int); /* Peer rej'd our CI */
donatien 0:013f5d54248c 92 static int ipcp_reqci (fsm *, u_char *, int *, int); /* Rcv CI */
donatien 0:013f5d54248c 93 static void ipcp_up (fsm *); /* We're UP */
donatien 0:013f5d54248c 94 static void ipcp_down (fsm *); /* We're DOWN */
donatien 0:013f5d54248c 95 #if PPP_ADDITIONAL_CALLBACKS
donatien 0:013f5d54248c 96 static void ipcp_script (fsm *, char *); /* Run an up/down script */
donatien 0:013f5d54248c 97 #endif
donatien 0:013f5d54248c 98 static void ipcp_finished (fsm *); /* Don't need lower layer */
donatien 0:013f5d54248c 99
donatien 0:013f5d54248c 100
donatien 0:013f5d54248c 101 fsm ipcp_fsm[NUM_PPP]; /* IPCP fsm structure */
donatien 0:013f5d54248c 102
donatien 0:013f5d54248c 103
donatien 0:013f5d54248c 104 static fsm_callbacks ipcp_callbacks = { /* IPCP callback routines */
donatien 0:013f5d54248c 105 ipcp_resetci, /* Reset our Configuration Information */
donatien 0:013f5d54248c 106 ipcp_cilen, /* Length of our Configuration Information */
donatien 0:013f5d54248c 107 ipcp_addci, /* Add our Configuration Information */
donatien 0:013f5d54248c 108 ipcp_ackci, /* ACK our Configuration Information */
donatien 0:013f5d54248c 109 ipcp_nakci, /* NAK our Configuration Information */
donatien 0:013f5d54248c 110 ipcp_rejci, /* Reject our Configuration Information */
donatien 0:013f5d54248c 111 ipcp_reqci, /* Request peer's Configuration Information */
donatien 0:013f5d54248c 112 ipcp_up, /* Called when fsm reaches LS_OPENED state */
donatien 0:013f5d54248c 113 ipcp_down, /* Called when fsm leaves LS_OPENED state */
donatien 0:013f5d54248c 114 NULL, /* Called when we want the lower layer up */
donatien 0:013f5d54248c 115 ipcp_finished, /* Called when we want the lower layer down */
donatien 0:013f5d54248c 116 NULL, /* Called when Protocol-Reject received */
donatien 0:013f5d54248c 117 NULL, /* Retransmission is necessary */
donatien 0:013f5d54248c 118 NULL, /* Called to handle protocol-specific codes */
donatien 0:013f5d54248c 119 "IPCP" /* String name of protocol */
donatien 0:013f5d54248c 120 };
donatien 0:013f5d54248c 121
donatien 0:013f5d54248c 122 /*
donatien 0:013f5d54248c 123 * Protocol entry points from main code.
donatien 0:013f5d54248c 124 */
donatien 0:013f5d54248c 125 static void ipcp_init (int);
donatien 0:013f5d54248c 126 static void ipcp_open (int);
donatien 0:013f5d54248c 127 static void ipcp_close (int, char *);
donatien 0:013f5d54248c 128 static void ipcp_lowerup (int);
donatien 0:013f5d54248c 129 static void ipcp_lowerdown (int);
donatien 0:013f5d54248c 130 static void ipcp_input (int, u_char *, int);
donatien 0:013f5d54248c 131 static void ipcp_protrej (int);
donatien 0:013f5d54248c 132
donatien 0:013f5d54248c 133
donatien 0:013f5d54248c 134 struct protent ipcp_protent = {
donatien 0:013f5d54248c 135 PPP_IPCP,
donatien 0:013f5d54248c 136 ipcp_init,
donatien 0:013f5d54248c 137 ipcp_input,
donatien 0:013f5d54248c 138 ipcp_protrej,
donatien 0:013f5d54248c 139 ipcp_lowerup,
donatien 0:013f5d54248c 140 ipcp_lowerdown,
donatien 0:013f5d54248c 141 ipcp_open,
donatien 0:013f5d54248c 142 ipcp_close,
donatien 0:013f5d54248c 143 #if PPP_ADDITIONAL_CALLBACKS
donatien 0:013f5d54248c 144 ipcp_printpkt,
donatien 0:013f5d54248c 145 NULL,
donatien 0:013f5d54248c 146 #endif /* PPP_ADDITIONAL_CALLBACKS */
donatien 0:013f5d54248c 147 1,
donatien 0:013f5d54248c 148 "IPCP",
donatien 0:013f5d54248c 149 #if PPP_ADDITIONAL_CALLBACKS
donatien 0:013f5d54248c 150 ip_check_options,
donatien 0:013f5d54248c 151 NULL,
donatien 0:013f5d54248c 152 ip_active_pkt
donatien 0:013f5d54248c 153 #endif /* PPP_ADDITIONAL_CALLBACKS */
donatien 0:013f5d54248c 154 };
donatien 0:013f5d54248c 155
donatien 0:013f5d54248c 156 static void ipcp_clear_addrs (int);
donatien 0:013f5d54248c 157
donatien 0:013f5d54248c 158 /*
donatien 0:013f5d54248c 159 * Lengths of configuration options.
donatien 0:013f5d54248c 160 */
donatien 0:013f5d54248c 161 #define CILEN_VOID 2
donatien 0:013f5d54248c 162 #define CILEN_COMPRESS 4 /* min length for compression protocol opt. */
donatien 0:013f5d54248c 163 #define CILEN_VJ 6 /* length for RFC1332 Van-Jacobson opt. */
donatien 0:013f5d54248c 164 #define CILEN_ADDR 6 /* new-style single address option */
donatien 0:013f5d54248c 165 #define CILEN_ADDRS 10 /* old-style dual address option */
donatien 0:013f5d54248c 166
donatien 0:013f5d54248c 167
donatien 0:013f5d54248c 168 #define CODENAME(x) ((x) == CONFACK ? "ACK" : \
donatien 0:013f5d54248c 169 (x) == CONFNAK ? "NAK" : "REJ")
donatien 0:013f5d54248c 170
donatien 0:013f5d54248c 171
donatien 0:013f5d54248c 172 /*
donatien 0:013f5d54248c 173 * ipcp_init - Initialize IPCP.
donatien 0:013f5d54248c 174 */
donatien 0:013f5d54248c 175 static void
donatien 0:013f5d54248c 176 ipcp_init(int unit)
donatien 0:013f5d54248c 177 {
donatien 0:013f5d54248c 178 fsm *f = &ipcp_fsm[unit];
donatien 0:013f5d54248c 179 ipcp_options *wo = &ipcp_wantoptions[unit];
donatien 0:013f5d54248c 180 ipcp_options *ao = &ipcp_allowoptions[unit];
donatien 0:013f5d54248c 181
donatien 0:013f5d54248c 182 f->unit = unit;
donatien 0:013f5d54248c 183 f->protocol = PPP_IPCP;
donatien 0:013f5d54248c 184 f->callbacks = &ipcp_callbacks;
donatien 0:013f5d54248c 185 fsm_init(&ipcp_fsm[unit]);
donatien 0:013f5d54248c 186
donatien 0:013f5d54248c 187 memset(wo, 0, sizeof(*wo));
donatien 0:013f5d54248c 188 memset(ao, 0, sizeof(*ao));
donatien 0:013f5d54248c 189
donatien 0:013f5d54248c 190 wo->neg_addr = 1;
donatien 0:013f5d54248c 191 wo->ouraddr = 0;
donatien 0:013f5d54248c 192 #if VJ_SUPPORT
donatien 0:013f5d54248c 193 wo->neg_vj = 1;
donatien 0:013f5d54248c 194 #else /* VJ_SUPPORT */
donatien 0:013f5d54248c 195 wo->neg_vj = 0;
donatien 0:013f5d54248c 196 #endif /* VJ_SUPPORT */
donatien 0:013f5d54248c 197 wo->vj_protocol = IPCP_VJ_COMP;
donatien 0:013f5d54248c 198 wo->maxslotindex = MAX_SLOTS - 1;
donatien 0:013f5d54248c 199 wo->cflag = 0;
donatien 0:013f5d54248c 200 wo->default_route = 1;
donatien 0:013f5d54248c 201
donatien 0:013f5d54248c 202 ao->neg_addr = 1;
donatien 0:013f5d54248c 203 #if VJ_SUPPORT
donatien 0:013f5d54248c 204 ao->neg_vj = 1;
donatien 0:013f5d54248c 205 #else /* VJ_SUPPORT */
donatien 0:013f5d54248c 206 ao->neg_vj = 0;
donatien 0:013f5d54248c 207 #endif /* VJ_SUPPORT */
donatien 0:013f5d54248c 208 ao->maxslotindex = MAX_SLOTS - 1;
donatien 0:013f5d54248c 209 ao->cflag = 1;
donatien 0:013f5d54248c 210 ao->default_route = 1;
donatien 0:013f5d54248c 211 }
donatien 0:013f5d54248c 212
donatien 0:013f5d54248c 213
donatien 0:013f5d54248c 214 /*
donatien 0:013f5d54248c 215 * ipcp_open - IPCP is allowed to come up.
donatien 0:013f5d54248c 216 */
donatien 0:013f5d54248c 217 static void
donatien 0:013f5d54248c 218 ipcp_open(int unit)
donatien 0:013f5d54248c 219 {
donatien 0:013f5d54248c 220 fsm_open(&ipcp_fsm[unit]);
donatien 0:013f5d54248c 221 }
donatien 0:013f5d54248c 222
donatien 0:013f5d54248c 223
donatien 0:013f5d54248c 224 /*
donatien 0:013f5d54248c 225 * ipcp_close - Take IPCP down.
donatien 0:013f5d54248c 226 */
donatien 0:013f5d54248c 227 static void
donatien 0:013f5d54248c 228 ipcp_close(int unit, char *reason)
donatien 0:013f5d54248c 229 {
donatien 0:013f5d54248c 230 fsm_close(&ipcp_fsm[unit], reason);
donatien 0:013f5d54248c 231 }
donatien 0:013f5d54248c 232
donatien 0:013f5d54248c 233
donatien 0:013f5d54248c 234 /*
donatien 0:013f5d54248c 235 * ipcp_lowerup - The lower layer is up.
donatien 0:013f5d54248c 236 */
donatien 0:013f5d54248c 237 static void
donatien 0:013f5d54248c 238 ipcp_lowerup(int unit)
donatien 0:013f5d54248c 239 {
donatien 0:013f5d54248c 240 fsm_lowerup(&ipcp_fsm[unit]);
donatien 0:013f5d54248c 241 }
donatien 0:013f5d54248c 242
donatien 0:013f5d54248c 243
donatien 0:013f5d54248c 244 /*
donatien 0:013f5d54248c 245 * ipcp_lowerdown - The lower layer is down.
donatien 0:013f5d54248c 246 */
donatien 0:013f5d54248c 247 static void
donatien 0:013f5d54248c 248 ipcp_lowerdown(int unit)
donatien 0:013f5d54248c 249 {
donatien 0:013f5d54248c 250 fsm_lowerdown(&ipcp_fsm[unit]);
donatien 0:013f5d54248c 251 }
donatien 0:013f5d54248c 252
donatien 0:013f5d54248c 253
donatien 0:013f5d54248c 254 /*
donatien 0:013f5d54248c 255 * ipcp_input - Input IPCP packet.
donatien 0:013f5d54248c 256 */
donatien 0:013f5d54248c 257 static void
donatien 0:013f5d54248c 258 ipcp_input(int unit, u_char *p, int len)
donatien 0:013f5d54248c 259 {
donatien 0:013f5d54248c 260 fsm_input(&ipcp_fsm[unit], p, len);
donatien 0:013f5d54248c 261 }
donatien 0:013f5d54248c 262
donatien 0:013f5d54248c 263
donatien 0:013f5d54248c 264 /*
donatien 0:013f5d54248c 265 * ipcp_protrej - A Protocol-Reject was received for IPCP.
donatien 0:013f5d54248c 266 *
donatien 0:013f5d54248c 267 * Pretend the lower layer went down, so we shut up.
donatien 0:013f5d54248c 268 */
donatien 0:013f5d54248c 269 static void
donatien 0:013f5d54248c 270 ipcp_protrej(int unit)
donatien 0:013f5d54248c 271 {
donatien 0:013f5d54248c 272 fsm_lowerdown(&ipcp_fsm[unit]);
donatien 0:013f5d54248c 273 }
donatien 0:013f5d54248c 274
donatien 0:013f5d54248c 275
donatien 0:013f5d54248c 276 /*
donatien 0:013f5d54248c 277 * ipcp_resetci - Reset our CI.
donatien 0:013f5d54248c 278 */
donatien 0:013f5d54248c 279 static void
donatien 0:013f5d54248c 280 ipcp_resetci(fsm *f)
donatien 0:013f5d54248c 281 {
donatien 0:013f5d54248c 282 ipcp_options *wo = &ipcp_wantoptions[f->unit];
donatien 0:013f5d54248c 283
donatien 0:013f5d54248c 284 wo->req_addr = wo->neg_addr && ipcp_allowoptions[f->unit].neg_addr;
donatien 0:013f5d54248c 285 if (wo->ouraddr == 0) {
donatien 0:013f5d54248c 286 wo->accept_local = 1;
donatien 0:013f5d54248c 287 }
donatien 0:013f5d54248c 288 if (wo->hisaddr == 0) {
donatien 0:013f5d54248c 289 wo->accept_remote = 1;
donatien 0:013f5d54248c 290 }
donatien 0:013f5d54248c 291 /* Request DNS addresses from the peer */
donatien 0:013f5d54248c 292 wo->req_dns1 = ppp_settings.usepeerdns;
donatien 0:013f5d54248c 293 wo->req_dns2 = ppp_settings.usepeerdns;
donatien 0:013f5d54248c 294 ipcp_gotoptions[f->unit] = *wo;
donatien 0:013f5d54248c 295 cis_received[f->unit] = 0;
donatien 0:013f5d54248c 296 }
donatien 0:013f5d54248c 297
donatien 0:013f5d54248c 298
donatien 0:013f5d54248c 299 /*
donatien 0:013f5d54248c 300 * ipcp_cilen - Return length of our CI.
donatien 0:013f5d54248c 301 */
donatien 0:013f5d54248c 302 static int
donatien 0:013f5d54248c 303 ipcp_cilen(fsm *f)
donatien 0:013f5d54248c 304 {
donatien 0:013f5d54248c 305 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 306 ipcp_options *wo = &ipcp_wantoptions[f->unit];
donatien 0:013f5d54248c 307 ipcp_options *ho = &ipcp_hisoptions[f->unit];
donatien 0:013f5d54248c 308
donatien 0:013f5d54248c 309 #define LENCIVJ(neg, old) (neg ? (old? CILEN_COMPRESS : CILEN_VJ) : 0)
donatien 0:013f5d54248c 310 #define LENCIADDR(neg, old) (neg ? (old? CILEN_ADDRS : CILEN_ADDR) : 0)
donatien 0:013f5d54248c 311 #define LENCIDNS(neg) (neg ? (CILEN_ADDR) : 0)
donatien 0:013f5d54248c 312
donatien 0:013f5d54248c 313 /*
donatien 0:013f5d54248c 314 * First see if we want to change our options to the old
donatien 0:013f5d54248c 315 * forms because we have received old forms from the peer.
donatien 0:013f5d54248c 316 */
donatien 0:013f5d54248c 317 if (wo->neg_addr && !go->neg_addr && !go->old_addrs) {
donatien 0:013f5d54248c 318 /* use the old style of address negotiation */
donatien 0:013f5d54248c 319 go->neg_addr = 1;
donatien 0:013f5d54248c 320 go->old_addrs = 1;
donatien 0:013f5d54248c 321 }
donatien 0:013f5d54248c 322 if (wo->neg_vj && !go->neg_vj && !go->old_vj) {
donatien 0:013f5d54248c 323 /* try an older style of VJ negotiation */
donatien 0:013f5d54248c 324 if (cis_received[f->unit] == 0) {
donatien 0:013f5d54248c 325 /* keep trying the new style until we see some CI from the peer */
donatien 0:013f5d54248c 326 go->neg_vj = 1;
donatien 0:013f5d54248c 327 } else {
donatien 0:013f5d54248c 328 /* use the old style only if the peer did */
donatien 0:013f5d54248c 329 if (ho->neg_vj && ho->old_vj) {
donatien 0:013f5d54248c 330 go->neg_vj = 1;
donatien 0:013f5d54248c 331 go->old_vj = 1;
donatien 0:013f5d54248c 332 go->vj_protocol = ho->vj_protocol;
donatien 0:013f5d54248c 333 }
donatien 0:013f5d54248c 334 }
donatien 0:013f5d54248c 335 }
donatien 0:013f5d54248c 336
donatien 0:013f5d54248c 337 return (LENCIADDR(go->neg_addr, go->old_addrs) +
donatien 0:013f5d54248c 338 LENCIVJ(go->neg_vj, go->old_vj) +
donatien 0:013f5d54248c 339 LENCIDNS(go->req_dns1) +
donatien 0:013f5d54248c 340 LENCIDNS(go->req_dns2));
donatien 0:013f5d54248c 341 }
donatien 0:013f5d54248c 342
donatien 0:013f5d54248c 343
donatien 0:013f5d54248c 344 /*
donatien 0:013f5d54248c 345 * ipcp_addci - Add our desired CIs to a packet.
donatien 0:013f5d54248c 346 */
donatien 0:013f5d54248c 347 static void
donatien 0:013f5d54248c 348 ipcp_addci(fsm *f, u_char *ucp, int *lenp)
donatien 0:013f5d54248c 349 {
donatien 0:013f5d54248c 350 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 351 int len = *lenp;
donatien 0:013f5d54248c 352
donatien 0:013f5d54248c 353 #define ADDCIVJ(opt, neg, val, old, maxslotindex, cflag) \
donatien 0:013f5d54248c 354 if (neg) { \
donatien 0:013f5d54248c 355 int vjlen = old? CILEN_COMPRESS : CILEN_VJ; \
donatien 0:013f5d54248c 356 if (len >= vjlen) { \
donatien 0:013f5d54248c 357 PUTCHAR(opt, ucp); \
donatien 0:013f5d54248c 358 PUTCHAR(vjlen, ucp); \
donatien 0:013f5d54248c 359 PUTSHORT(val, ucp); \
donatien 0:013f5d54248c 360 if (!old) { \
donatien 0:013f5d54248c 361 PUTCHAR(maxslotindex, ucp); \
donatien 0:013f5d54248c 362 PUTCHAR(cflag, ucp); \
donatien 0:013f5d54248c 363 } \
donatien 0:013f5d54248c 364 len -= vjlen; \
donatien 0:013f5d54248c 365 } else { \
donatien 0:013f5d54248c 366 neg = 0; \
donatien 0:013f5d54248c 367 } \
donatien 0:013f5d54248c 368 }
donatien 0:013f5d54248c 369
donatien 0:013f5d54248c 370 #define ADDCIADDR(opt, neg, old, val1, val2) \
donatien 0:013f5d54248c 371 if (neg) { \
donatien 0:013f5d54248c 372 int addrlen = (old? CILEN_ADDRS: CILEN_ADDR); \
donatien 0:013f5d54248c 373 if (len >= addrlen) { \
donatien 0:013f5d54248c 374 u32_t l; \
donatien 0:013f5d54248c 375 PUTCHAR(opt, ucp); \
donatien 0:013f5d54248c 376 PUTCHAR(addrlen, ucp); \
donatien 0:013f5d54248c 377 l = ntohl(val1); \
donatien 0:013f5d54248c 378 PUTLONG(l, ucp); \
donatien 0:013f5d54248c 379 if (old) { \
donatien 0:013f5d54248c 380 l = ntohl(val2); \
donatien 0:013f5d54248c 381 PUTLONG(l, ucp); \
donatien 0:013f5d54248c 382 } \
donatien 0:013f5d54248c 383 len -= addrlen; \
donatien 0:013f5d54248c 384 } else { \
donatien 0:013f5d54248c 385 neg = 0; \
donatien 0:013f5d54248c 386 } \
donatien 0:013f5d54248c 387 }
donatien 0:013f5d54248c 388
donatien 0:013f5d54248c 389 #define ADDCIDNS(opt, neg, addr) \
donatien 0:013f5d54248c 390 if (neg) { \
donatien 0:013f5d54248c 391 if (len >= CILEN_ADDR) { \
donatien 0:013f5d54248c 392 u32_t l; \
donatien 0:013f5d54248c 393 PUTCHAR(opt, ucp); \
donatien 0:013f5d54248c 394 PUTCHAR(CILEN_ADDR, ucp); \
donatien 0:013f5d54248c 395 l = ntohl(addr); \
donatien 0:013f5d54248c 396 PUTLONG(l, ucp); \
donatien 0:013f5d54248c 397 len -= CILEN_ADDR; \
donatien 0:013f5d54248c 398 } else { \
donatien 0:013f5d54248c 399 neg = 0; \
donatien 0:013f5d54248c 400 } \
donatien 0:013f5d54248c 401 }
donatien 0:013f5d54248c 402
donatien 0:013f5d54248c 403 ADDCIADDR((go->old_addrs? CI_ADDRS: CI_ADDR), go->neg_addr,
donatien 0:013f5d54248c 404 go->old_addrs, go->ouraddr, go->hisaddr);
donatien 0:013f5d54248c 405
donatien 0:013f5d54248c 406 ADDCIVJ(CI_COMPRESSTYPE, go->neg_vj, go->vj_protocol, go->old_vj,
donatien 0:013f5d54248c 407 go->maxslotindex, go->cflag);
donatien 0:013f5d54248c 408
donatien 0:013f5d54248c 409 ADDCIDNS(CI_MS_DNS1, go->req_dns1, go->dnsaddr[0]);
donatien 0:013f5d54248c 410
donatien 0:013f5d54248c 411 ADDCIDNS(CI_MS_DNS2, go->req_dns2, go->dnsaddr[1]);
donatien 0:013f5d54248c 412
donatien 0:013f5d54248c 413 *lenp -= len;
donatien 0:013f5d54248c 414 }
donatien 0:013f5d54248c 415
donatien 0:013f5d54248c 416
donatien 0:013f5d54248c 417 /*
donatien 0:013f5d54248c 418 * ipcp_ackci - Ack our CIs.
donatien 0:013f5d54248c 419 *
donatien 0:013f5d54248c 420 * Returns:
donatien 0:013f5d54248c 421 * 0 - Ack was bad.
donatien 0:013f5d54248c 422 * 1 - Ack was good.
donatien 0:013f5d54248c 423 */
donatien 0:013f5d54248c 424 static int
donatien 0:013f5d54248c 425 ipcp_ackci(fsm *f, u_char *p, int len)
donatien 0:013f5d54248c 426 {
donatien 0:013f5d54248c 427 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 428 u_short cilen, citype, cishort;
donatien 0:013f5d54248c 429 u32_t cilong;
donatien 0:013f5d54248c 430 u_char cimaxslotindex, cicflag;
donatien 0:013f5d54248c 431
donatien 0:013f5d54248c 432 /*
donatien 0:013f5d54248c 433 * CIs must be in exactly the same order that we sent...
donatien 0:013f5d54248c 434 * Check packet length and CI length at each step.
donatien 0:013f5d54248c 435 * If we find any deviations, then this packet is bad.
donatien 0:013f5d54248c 436 */
donatien 0:013f5d54248c 437
donatien 0:013f5d54248c 438 #define ACKCIVJ(opt, neg, val, old, maxslotindex, cflag) \
donatien 0:013f5d54248c 439 if (neg) { \
donatien 0:013f5d54248c 440 int vjlen = old? CILEN_COMPRESS : CILEN_VJ; \
donatien 0:013f5d54248c 441 if ((len -= vjlen) < 0) { \
donatien 0:013f5d54248c 442 goto bad; \
donatien 0:013f5d54248c 443 } \
donatien 0:013f5d54248c 444 GETCHAR(citype, p); \
donatien 0:013f5d54248c 445 GETCHAR(cilen, p); \
donatien 0:013f5d54248c 446 if (cilen != vjlen || \
donatien 0:013f5d54248c 447 citype != opt) { \
donatien 0:013f5d54248c 448 goto bad; \
donatien 0:013f5d54248c 449 } \
donatien 0:013f5d54248c 450 GETSHORT(cishort, p); \
donatien 0:013f5d54248c 451 if (cishort != val) { \
donatien 0:013f5d54248c 452 goto bad; \
donatien 0:013f5d54248c 453 } \
donatien 0:013f5d54248c 454 if (!old) { \
donatien 0:013f5d54248c 455 GETCHAR(cimaxslotindex, p); \
donatien 0:013f5d54248c 456 if (cimaxslotindex != maxslotindex) { \
donatien 0:013f5d54248c 457 goto bad; \
donatien 0:013f5d54248c 458 } \
donatien 0:013f5d54248c 459 GETCHAR(cicflag, p); \
donatien 0:013f5d54248c 460 if (cicflag != cflag) { \
donatien 0:013f5d54248c 461 goto bad; \
donatien 0:013f5d54248c 462 } \
donatien 0:013f5d54248c 463 } \
donatien 0:013f5d54248c 464 }
donatien 0:013f5d54248c 465
donatien 0:013f5d54248c 466 #define ACKCIADDR(opt, neg, old, val1, val2) \
donatien 0:013f5d54248c 467 if (neg) { \
donatien 0:013f5d54248c 468 int addrlen = (old? CILEN_ADDRS: CILEN_ADDR); \
donatien 0:013f5d54248c 469 u32_t l; \
donatien 0:013f5d54248c 470 if ((len -= addrlen) < 0) { \
donatien 0:013f5d54248c 471 goto bad; \
donatien 0:013f5d54248c 472 } \
donatien 0:013f5d54248c 473 GETCHAR(citype, p); \
donatien 0:013f5d54248c 474 GETCHAR(cilen, p); \
donatien 0:013f5d54248c 475 if (cilen != addrlen || \
donatien 0:013f5d54248c 476 citype != opt) { \
donatien 0:013f5d54248c 477 goto bad; \
donatien 0:013f5d54248c 478 } \
donatien 0:013f5d54248c 479 GETLONG(l, p); \
donatien 0:013f5d54248c 480 cilong = htonl(l); \
donatien 0:013f5d54248c 481 if (val1 != cilong) { \
donatien 0:013f5d54248c 482 goto bad; \
donatien 0:013f5d54248c 483 } \
donatien 0:013f5d54248c 484 if (old) { \
donatien 0:013f5d54248c 485 GETLONG(l, p); \
donatien 0:013f5d54248c 486 cilong = htonl(l); \
donatien 0:013f5d54248c 487 if (val2 != cilong) { \
donatien 0:013f5d54248c 488 goto bad; \
donatien 0:013f5d54248c 489 } \
donatien 0:013f5d54248c 490 } \
donatien 0:013f5d54248c 491 }
donatien 0:013f5d54248c 492
donatien 0:013f5d54248c 493 #define ACKCIDNS(opt, neg, addr) \
donatien 0:013f5d54248c 494 if (neg) { \
donatien 0:013f5d54248c 495 u32_t l; \
donatien 0:013f5d54248c 496 if ((len -= CILEN_ADDR) < 0) { \
donatien 0:013f5d54248c 497 goto bad; \
donatien 0:013f5d54248c 498 } \
donatien 0:013f5d54248c 499 GETCHAR(citype, p); \
donatien 0:013f5d54248c 500 GETCHAR(cilen, p); \
donatien 0:013f5d54248c 501 if (cilen != CILEN_ADDR || \
donatien 0:013f5d54248c 502 citype != opt) { \
donatien 0:013f5d54248c 503 goto bad; \
donatien 0:013f5d54248c 504 } \
donatien 0:013f5d54248c 505 GETLONG(l, p); \
donatien 0:013f5d54248c 506 cilong = htonl(l); \
donatien 0:013f5d54248c 507 if (addr != cilong) { \
donatien 0:013f5d54248c 508 goto bad; \
donatien 0:013f5d54248c 509 } \
donatien 0:013f5d54248c 510 }
donatien 0:013f5d54248c 511
donatien 0:013f5d54248c 512 ACKCIADDR((go->old_addrs? CI_ADDRS: CI_ADDR), go->neg_addr,
donatien 0:013f5d54248c 513 go->old_addrs, go->ouraddr, go->hisaddr);
donatien 0:013f5d54248c 514
donatien 0:013f5d54248c 515 ACKCIVJ(CI_COMPRESSTYPE, go->neg_vj, go->vj_protocol, go->old_vj,
donatien 0:013f5d54248c 516 go->maxslotindex, go->cflag);
donatien 0:013f5d54248c 517
donatien 0:013f5d54248c 518 ACKCIDNS(CI_MS_DNS1, go->req_dns1, go->dnsaddr[0]);
donatien 0:013f5d54248c 519
donatien 0:013f5d54248c 520 ACKCIDNS(CI_MS_DNS2, go->req_dns2, go->dnsaddr[1]);
donatien 0:013f5d54248c 521
donatien 0:013f5d54248c 522 /*
donatien 0:013f5d54248c 523 * If there are any remaining CIs, then this packet is bad.
donatien 0:013f5d54248c 524 */
donatien 0:013f5d54248c 525 if (len != 0) {
donatien 0:013f5d54248c 526 goto bad;
donatien 0:013f5d54248c 527 }
donatien 0:013f5d54248c 528 return (1);
donatien 0:013f5d54248c 529
donatien 0:013f5d54248c 530 bad:
donatien 0:013f5d54248c 531 IPCPDEBUG(LOG_INFO, ("ipcp_ackci: received bad Ack!\n"));
donatien 0:013f5d54248c 532 return (0);
donatien 0:013f5d54248c 533 }
donatien 0:013f5d54248c 534
donatien 0:013f5d54248c 535 /*
donatien 0:013f5d54248c 536 * ipcp_nakci - Peer has sent a NAK for some of our CIs.
donatien 0:013f5d54248c 537 * This should not modify any state if the Nak is bad
donatien 0:013f5d54248c 538 * or if IPCP is in the LS_OPENED state.
donatien 0:013f5d54248c 539 *
donatien 0:013f5d54248c 540 * Returns:
donatien 0:013f5d54248c 541 * 0 - Nak was bad.
donatien 0:013f5d54248c 542 * 1 - Nak was good.
donatien 0:013f5d54248c 543 */
donatien 0:013f5d54248c 544 static int
donatien 0:013f5d54248c 545 ipcp_nakci(fsm *f, u_char *p, int len)
donatien 0:013f5d54248c 546 {
donatien 0:013f5d54248c 547 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 548 u_char cimaxslotindex, cicflag;
donatien 0:013f5d54248c 549 u_char citype, cilen, *next;
donatien 0:013f5d54248c 550 u_short cishort;
donatien 0:013f5d54248c 551 u32_t ciaddr1, ciaddr2, l, cidnsaddr;
donatien 0:013f5d54248c 552 ipcp_options no; /* options we've seen Naks for */
donatien 0:013f5d54248c 553 ipcp_options try; /* options to request next time */
donatien 0:013f5d54248c 554
donatien 0:013f5d54248c 555 BZERO(&no, sizeof(no));
donatien 0:013f5d54248c 556 try = *go;
donatien 0:013f5d54248c 557
donatien 0:013f5d54248c 558 /*
donatien 0:013f5d54248c 559 * Any Nak'd CIs must be in exactly the same order that we sent.
donatien 0:013f5d54248c 560 * Check packet length and CI length at each step.
donatien 0:013f5d54248c 561 * If we find any deviations, then this packet is bad.
donatien 0:013f5d54248c 562 */
donatien 0:013f5d54248c 563 #define NAKCIADDR(opt, neg, old, code) \
donatien 0:013f5d54248c 564 if (go->neg && \
donatien 0:013f5d54248c 565 len >= (cilen = (old? CILEN_ADDRS: CILEN_ADDR)) && \
donatien 0:013f5d54248c 566 p[1] == cilen && \
donatien 0:013f5d54248c 567 p[0] == opt) { \
donatien 0:013f5d54248c 568 len -= cilen; \
donatien 0:013f5d54248c 569 INCPTR(2, p); \
donatien 0:013f5d54248c 570 GETLONG(l, p); \
donatien 0:013f5d54248c 571 ciaddr1 = htonl(l); \
donatien 0:013f5d54248c 572 if (old) { \
donatien 0:013f5d54248c 573 GETLONG(l, p); \
donatien 0:013f5d54248c 574 ciaddr2 = htonl(l); \
donatien 0:013f5d54248c 575 no.old_addrs = 1; \
donatien 0:013f5d54248c 576 } else { \
donatien 0:013f5d54248c 577 ciaddr2 = 0; \
donatien 0:013f5d54248c 578 } \
donatien 0:013f5d54248c 579 no.neg = 1; \
donatien 0:013f5d54248c 580 code \
donatien 0:013f5d54248c 581 }
donatien 0:013f5d54248c 582
donatien 0:013f5d54248c 583 #define NAKCIVJ(opt, neg, code) \
donatien 0:013f5d54248c 584 if (go->neg && \
donatien 0:013f5d54248c 585 ((cilen = p[1]) == CILEN_COMPRESS || cilen == CILEN_VJ) && \
donatien 0:013f5d54248c 586 len >= cilen && \
donatien 0:013f5d54248c 587 p[0] == opt) { \
donatien 0:013f5d54248c 588 len -= cilen; \
donatien 0:013f5d54248c 589 INCPTR(2, p); \
donatien 0:013f5d54248c 590 GETSHORT(cishort, p); \
donatien 0:013f5d54248c 591 no.neg = 1; \
donatien 0:013f5d54248c 592 code \
donatien 0:013f5d54248c 593 }
donatien 0:013f5d54248c 594
donatien 0:013f5d54248c 595 #define NAKCIDNS(opt, neg, code) \
donatien 0:013f5d54248c 596 if (go->neg && \
donatien 0:013f5d54248c 597 ((cilen = p[1]) == CILEN_ADDR) && \
donatien 0:013f5d54248c 598 len >= cilen && \
donatien 0:013f5d54248c 599 p[0] == opt) { \
donatien 0:013f5d54248c 600 len -= cilen; \
donatien 0:013f5d54248c 601 INCPTR(2, p); \
donatien 0:013f5d54248c 602 GETLONG(l, p); \
donatien 0:013f5d54248c 603 cidnsaddr = htonl(l); \
donatien 0:013f5d54248c 604 no.neg = 1; \
donatien 0:013f5d54248c 605 code \
donatien 0:013f5d54248c 606 }
donatien 0:013f5d54248c 607
donatien 0:013f5d54248c 608 /*
donatien 0:013f5d54248c 609 * Accept the peer's idea of {our,his} address, if different
donatien 0:013f5d54248c 610 * from our idea, only if the accept_{local,remote} flag is set.
donatien 0:013f5d54248c 611 */
donatien 0:013f5d54248c 612 NAKCIADDR((go->old_addrs? CI_ADDRS: CI_ADDR), neg_addr, go->old_addrs,
donatien 0:013f5d54248c 613 if (go->accept_local && ciaddr1) { /* Do we know our address? */
donatien 0:013f5d54248c 614 try.ouraddr = ciaddr1;
donatien 0:013f5d54248c 615 IPCPDEBUG(LOG_INFO, ("local IP address %s\n",
donatien 0:013f5d54248c 616 inet_ntoa(ciaddr1)));
donatien 0:013f5d54248c 617 }
donatien 0:013f5d54248c 618 if (go->accept_remote && ciaddr2) { /* Does he know his? */
donatien 0:013f5d54248c 619 try.hisaddr = ciaddr2;
donatien 0:013f5d54248c 620 IPCPDEBUG(LOG_INFO, ("remote IP address %s\n",
donatien 0:013f5d54248c 621 inet_ntoa(ciaddr2)));
donatien 0:013f5d54248c 622 }
donatien 0:013f5d54248c 623 );
donatien 0:013f5d54248c 624
donatien 0:013f5d54248c 625 /*
donatien 0:013f5d54248c 626 * Accept the peer's value of maxslotindex provided that it
donatien 0:013f5d54248c 627 * is less than what we asked for. Turn off slot-ID compression
donatien 0:013f5d54248c 628 * if the peer wants. Send old-style compress-type option if
donatien 0:013f5d54248c 629 * the peer wants.
donatien 0:013f5d54248c 630 */
donatien 0:013f5d54248c 631 NAKCIVJ(CI_COMPRESSTYPE, neg_vj,
donatien 0:013f5d54248c 632 if (cilen == CILEN_VJ) {
donatien 0:013f5d54248c 633 GETCHAR(cimaxslotindex, p);
donatien 0:013f5d54248c 634 GETCHAR(cicflag, p);
donatien 0:013f5d54248c 635 if (cishort == IPCP_VJ_COMP) {
donatien 0:013f5d54248c 636 try.old_vj = 0;
donatien 0:013f5d54248c 637 if (cimaxslotindex < go->maxslotindex) {
donatien 0:013f5d54248c 638 try.maxslotindex = cimaxslotindex;
donatien 0:013f5d54248c 639 }
donatien 0:013f5d54248c 640 if (!cicflag) {
donatien 0:013f5d54248c 641 try.cflag = 0;
donatien 0:013f5d54248c 642 }
donatien 0:013f5d54248c 643 } else {
donatien 0:013f5d54248c 644 try.neg_vj = 0;
donatien 0:013f5d54248c 645 }
donatien 0:013f5d54248c 646 } else {
donatien 0:013f5d54248c 647 if (cishort == IPCP_VJ_COMP || cishort == IPCP_VJ_COMP_OLD) {
donatien 0:013f5d54248c 648 try.old_vj = 1;
donatien 0:013f5d54248c 649 try.vj_protocol = cishort;
donatien 0:013f5d54248c 650 } else {
donatien 0:013f5d54248c 651 try.neg_vj = 0;
donatien 0:013f5d54248c 652 }
donatien 0:013f5d54248c 653 }
donatien 0:013f5d54248c 654 );
donatien 0:013f5d54248c 655
donatien 0:013f5d54248c 656 NAKCIDNS(CI_MS_DNS1, req_dns1,
donatien 0:013f5d54248c 657 try.dnsaddr[0] = cidnsaddr;
donatien 0:013f5d54248c 658 IPCPDEBUG(LOG_INFO, ("primary DNS address %s\n", inet_ntoa(cidnsaddr)));
donatien 0:013f5d54248c 659 );
donatien 0:013f5d54248c 660
donatien 0:013f5d54248c 661 NAKCIDNS(CI_MS_DNS2, req_dns2,
donatien 0:013f5d54248c 662 try.dnsaddr[1] = cidnsaddr;
donatien 0:013f5d54248c 663 IPCPDEBUG(LOG_INFO, ("secondary DNS address %s\n", inet_ntoa(cidnsaddr)));
donatien 0:013f5d54248c 664 );
donatien 0:013f5d54248c 665
donatien 0:013f5d54248c 666 /*
donatien 0:013f5d54248c 667 * There may be remaining CIs, if the peer is requesting negotiation
donatien 0:013f5d54248c 668 * on an option that we didn't include in our request packet.
donatien 0:013f5d54248c 669 * If they want to negotiate about IP addresses, we comply.
donatien 0:013f5d54248c 670 * If they want us to ask for compression, we refuse.
donatien 0:013f5d54248c 671 */
donatien 0:013f5d54248c 672 while (len > CILEN_VOID) {
donatien 0:013f5d54248c 673 GETCHAR(citype, p);
donatien 0:013f5d54248c 674 GETCHAR(cilen, p);
donatien 0:013f5d54248c 675 if( (len -= cilen) < 0 ) {
donatien 0:013f5d54248c 676 goto bad;
donatien 0:013f5d54248c 677 }
donatien 0:013f5d54248c 678 next = p + cilen - 2;
donatien 0:013f5d54248c 679
donatien 0:013f5d54248c 680 switch (citype) {
donatien 0:013f5d54248c 681 case CI_COMPRESSTYPE:
donatien 0:013f5d54248c 682 if (go->neg_vj || no.neg_vj ||
donatien 0:013f5d54248c 683 (cilen != CILEN_VJ && cilen != CILEN_COMPRESS)) {
donatien 0:013f5d54248c 684 goto bad;
donatien 0:013f5d54248c 685 }
donatien 0:013f5d54248c 686 no.neg_vj = 1;
donatien 0:013f5d54248c 687 break;
donatien 0:013f5d54248c 688 case CI_ADDRS:
donatien 0:013f5d54248c 689 if ((go->neg_addr && go->old_addrs) || no.old_addrs
donatien 0:013f5d54248c 690 || cilen != CILEN_ADDRS) {
donatien 0:013f5d54248c 691 goto bad;
donatien 0:013f5d54248c 692 }
donatien 0:013f5d54248c 693 try.neg_addr = 1;
donatien 0:013f5d54248c 694 try.old_addrs = 1;
donatien 0:013f5d54248c 695 GETLONG(l, p);
donatien 0:013f5d54248c 696 ciaddr1 = htonl(l);
donatien 0:013f5d54248c 697 if (ciaddr1 && go->accept_local) {
donatien 0:013f5d54248c 698 try.ouraddr = ciaddr1;
donatien 0:013f5d54248c 699 }
donatien 0:013f5d54248c 700 GETLONG(l, p);
donatien 0:013f5d54248c 701 ciaddr2 = htonl(l);
donatien 0:013f5d54248c 702 if (ciaddr2 && go->accept_remote) {
donatien 0:013f5d54248c 703 try.hisaddr = ciaddr2;
donatien 0:013f5d54248c 704 }
donatien 0:013f5d54248c 705 no.old_addrs = 1;
donatien 0:013f5d54248c 706 break;
donatien 0:013f5d54248c 707 case CI_ADDR:
donatien 0:013f5d54248c 708 if (go->neg_addr || no.neg_addr || cilen != CILEN_ADDR) {
donatien 0:013f5d54248c 709 goto bad;
donatien 0:013f5d54248c 710 }
donatien 0:013f5d54248c 711 try.old_addrs = 0;
donatien 0:013f5d54248c 712 GETLONG(l, p);
donatien 0:013f5d54248c 713 ciaddr1 = htonl(l);
donatien 0:013f5d54248c 714 if (ciaddr1 && go->accept_local) {
donatien 0:013f5d54248c 715 try.ouraddr = ciaddr1;
donatien 0:013f5d54248c 716 }
donatien 0:013f5d54248c 717 if (try.ouraddr != 0) {
donatien 0:013f5d54248c 718 try.neg_addr = 1;
donatien 0:013f5d54248c 719 }
donatien 0:013f5d54248c 720 no.neg_addr = 1;
donatien 0:013f5d54248c 721 break;
donatien 0:013f5d54248c 722 }
donatien 0:013f5d54248c 723 p = next;
donatien 0:013f5d54248c 724 }
donatien 0:013f5d54248c 725
donatien 0:013f5d54248c 726 /* If there is still anything left, this packet is bad. */
donatien 0:013f5d54248c 727 if (len != 0) {
donatien 0:013f5d54248c 728 goto bad;
donatien 0:013f5d54248c 729 }
donatien 0:013f5d54248c 730
donatien 0:013f5d54248c 731 /*
donatien 0:013f5d54248c 732 * OK, the Nak is good. Now we can update state.
donatien 0:013f5d54248c 733 */
donatien 0:013f5d54248c 734 if (f->state != LS_OPENED) {
donatien 0:013f5d54248c 735 *go = try;
donatien 0:013f5d54248c 736 }
donatien 0:013f5d54248c 737
donatien 0:013f5d54248c 738 return 1;
donatien 0:013f5d54248c 739
donatien 0:013f5d54248c 740 bad:
donatien 0:013f5d54248c 741 IPCPDEBUG(LOG_INFO, ("ipcp_nakci: received bad Nak!\n"));
donatien 0:013f5d54248c 742 return 0;
donatien 0:013f5d54248c 743 }
donatien 0:013f5d54248c 744
donatien 0:013f5d54248c 745
donatien 0:013f5d54248c 746 /*
donatien 0:013f5d54248c 747 * ipcp_rejci - Reject some of our CIs.
donatien 0:013f5d54248c 748 */
donatien 0:013f5d54248c 749 static int
donatien 0:013f5d54248c 750 ipcp_rejci(fsm *f, u_char *p, int len)
donatien 0:013f5d54248c 751 {
donatien 0:013f5d54248c 752 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 753 u_char cimaxslotindex, ciflag, cilen;
donatien 0:013f5d54248c 754 u_short cishort;
donatien 0:013f5d54248c 755 u32_t cilong;
donatien 0:013f5d54248c 756 ipcp_options try; /* options to request next time */
donatien 0:013f5d54248c 757
donatien 0:013f5d54248c 758 try = *go;
donatien 0:013f5d54248c 759 /*
donatien 0:013f5d54248c 760 * Any Rejected CIs must be in exactly the same order that we sent.
donatien 0:013f5d54248c 761 * Check packet length and CI length at each step.
donatien 0:013f5d54248c 762 * If we find any deviations, then this packet is bad.
donatien 0:013f5d54248c 763 */
donatien 0:013f5d54248c 764 #define REJCIADDR(opt, neg, old, val1, val2) \
donatien 0:013f5d54248c 765 if (go->neg && \
donatien 0:013f5d54248c 766 len >= (cilen = old? CILEN_ADDRS: CILEN_ADDR) && \
donatien 0:013f5d54248c 767 p[1] == cilen && \
donatien 0:013f5d54248c 768 p[0] == opt) { \
donatien 0:013f5d54248c 769 u32_t l; \
donatien 0:013f5d54248c 770 len -= cilen; \
donatien 0:013f5d54248c 771 INCPTR(2, p); \
donatien 0:013f5d54248c 772 GETLONG(l, p); \
donatien 0:013f5d54248c 773 cilong = htonl(l); \
donatien 0:013f5d54248c 774 /* Check rejected value. */ \
donatien 0:013f5d54248c 775 if (cilong != val1) { \
donatien 0:013f5d54248c 776 goto bad; \
donatien 0:013f5d54248c 777 } \
donatien 0:013f5d54248c 778 if (old) { \
donatien 0:013f5d54248c 779 GETLONG(l, p); \
donatien 0:013f5d54248c 780 cilong = htonl(l); \
donatien 0:013f5d54248c 781 /* Check rejected value. */ \
donatien 0:013f5d54248c 782 if (cilong != val2) { \
donatien 0:013f5d54248c 783 goto bad; \
donatien 0:013f5d54248c 784 } \
donatien 0:013f5d54248c 785 } \
donatien 0:013f5d54248c 786 try.neg = 0; \
donatien 0:013f5d54248c 787 }
donatien 0:013f5d54248c 788
donatien 0:013f5d54248c 789 #define REJCIVJ(opt, neg, val, old, maxslot, cflag) \
donatien 0:013f5d54248c 790 if (go->neg && \
donatien 0:013f5d54248c 791 p[1] == (old? CILEN_COMPRESS : CILEN_VJ) && \
donatien 0:013f5d54248c 792 len >= p[1] && \
donatien 0:013f5d54248c 793 p[0] == opt) { \
donatien 0:013f5d54248c 794 len -= p[1]; \
donatien 0:013f5d54248c 795 INCPTR(2, p); \
donatien 0:013f5d54248c 796 GETSHORT(cishort, p); \
donatien 0:013f5d54248c 797 /* Check rejected value. */ \
donatien 0:013f5d54248c 798 if (cishort != val) { \
donatien 0:013f5d54248c 799 goto bad; \
donatien 0:013f5d54248c 800 } \
donatien 0:013f5d54248c 801 if (!old) { \
donatien 0:013f5d54248c 802 GETCHAR(cimaxslotindex, p); \
donatien 0:013f5d54248c 803 if (cimaxslotindex != maxslot) { \
donatien 0:013f5d54248c 804 goto bad; \
donatien 0:013f5d54248c 805 } \
donatien 0:013f5d54248c 806 GETCHAR(ciflag, p); \
donatien 0:013f5d54248c 807 if (ciflag != cflag) { \
donatien 0:013f5d54248c 808 goto bad; \
donatien 0:013f5d54248c 809 } \
donatien 0:013f5d54248c 810 } \
donatien 0:013f5d54248c 811 try.neg = 0; \
donatien 0:013f5d54248c 812 }
donatien 0:013f5d54248c 813
donatien 0:013f5d54248c 814 #define REJCIDNS(opt, neg, dnsaddr) \
donatien 0:013f5d54248c 815 if (go->neg && \
donatien 0:013f5d54248c 816 ((cilen = p[1]) == CILEN_ADDR) && \
donatien 0:013f5d54248c 817 len >= cilen && \
donatien 0:013f5d54248c 818 p[0] == opt) { \
donatien 0:013f5d54248c 819 u32_t l; \
donatien 0:013f5d54248c 820 len -= cilen; \
donatien 0:013f5d54248c 821 INCPTR(2, p); \
donatien 0:013f5d54248c 822 GETLONG(l, p); \
donatien 0:013f5d54248c 823 cilong = htonl(l); \
donatien 0:013f5d54248c 824 /* Check rejected value. */ \
donatien 0:013f5d54248c 825 if (cilong != dnsaddr) { \
donatien 0:013f5d54248c 826 goto bad; \
donatien 0:013f5d54248c 827 } \
donatien 0:013f5d54248c 828 try.neg = 0; \
donatien 0:013f5d54248c 829 }
donatien 0:013f5d54248c 830
donatien 0:013f5d54248c 831 REJCIADDR((go->old_addrs? CI_ADDRS: CI_ADDR), neg_addr,
donatien 0:013f5d54248c 832 go->old_addrs, go->ouraddr, go->hisaddr);
donatien 0:013f5d54248c 833
donatien 0:013f5d54248c 834 REJCIVJ(CI_COMPRESSTYPE, neg_vj, go->vj_protocol, go->old_vj,
donatien 0:013f5d54248c 835 go->maxslotindex, go->cflag);
donatien 0:013f5d54248c 836
donatien 0:013f5d54248c 837 REJCIDNS(CI_MS_DNS1, req_dns1, go->dnsaddr[0]);
donatien 0:013f5d54248c 838
donatien 0:013f5d54248c 839 REJCIDNS(CI_MS_DNS2, req_dns2, go->dnsaddr[1]);
donatien 0:013f5d54248c 840
donatien 0:013f5d54248c 841 /*
donatien 0:013f5d54248c 842 * If there are any remaining CIs, then this packet is bad.
donatien 0:013f5d54248c 843 */
donatien 0:013f5d54248c 844 if (len != 0) {
donatien 0:013f5d54248c 845 goto bad;
donatien 0:013f5d54248c 846 }
donatien 0:013f5d54248c 847 /*
donatien 0:013f5d54248c 848 * Now we can update state.
donatien 0:013f5d54248c 849 */
donatien 0:013f5d54248c 850 if (f->state != LS_OPENED) {
donatien 0:013f5d54248c 851 *go = try;
donatien 0:013f5d54248c 852 }
donatien 0:013f5d54248c 853 return 1;
donatien 0:013f5d54248c 854
donatien 0:013f5d54248c 855 bad:
donatien 0:013f5d54248c 856 IPCPDEBUG(LOG_INFO, ("ipcp_rejci: received bad Reject!\n"));
donatien 0:013f5d54248c 857 return 0;
donatien 0:013f5d54248c 858 }
donatien 0:013f5d54248c 859
donatien 0:013f5d54248c 860
donatien 0:013f5d54248c 861 /*
donatien 0:013f5d54248c 862 * ipcp_reqci - Check the peer's requested CIs and send appropriate response.
donatien 0:013f5d54248c 863 *
donatien 0:013f5d54248c 864 * Returns: CONFACK, CONFNAK or CONFREJ and input packet modified
donatien 0:013f5d54248c 865 * appropriately. If reject_if_disagree is non-zero, doesn't return
donatien 0:013f5d54248c 866 * CONFNAK; returns CONFREJ if it can't return CONFACK.
donatien 0:013f5d54248c 867 */
donatien 0:013f5d54248c 868 static int
donatien 0:013f5d54248c 869 ipcp_reqci(fsm *f, u_char *inp/* Requested CIs */,int *len/* Length of requested CIs */,int reject_if_disagree)
donatien 0:013f5d54248c 870 {
donatien 0:013f5d54248c 871 ipcp_options *wo = &ipcp_wantoptions[f->unit];
donatien 0:013f5d54248c 872 ipcp_options *ho = &ipcp_hisoptions[f->unit];
donatien 0:013f5d54248c 873 ipcp_options *ao = &ipcp_allowoptions[f->unit];
donatien 0:013f5d54248c 874 #ifdef OLD_CI_ADDRS
donatien 0:013f5d54248c 875 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 876 #endif
donatien 0:013f5d54248c 877 u_char *cip, *next; /* Pointer to current and next CIs */
donatien 0:013f5d54248c 878 u_short cilen, citype; /* Parsed len, type */
donatien 0:013f5d54248c 879 u_short cishort; /* Parsed short value */
donatien 0:013f5d54248c 880 u32_t tl, ciaddr1; /* Parsed address values */
donatien 0:013f5d54248c 881 #ifdef OLD_CI_ADDRS
donatien 0:013f5d54248c 882 u32_t ciaddr2; /* Parsed address values */
donatien 0:013f5d54248c 883 #endif
donatien 0:013f5d54248c 884 int rc = CONFACK; /* Final packet return code */
donatien 0:013f5d54248c 885 int orc; /* Individual option return code */
donatien 0:013f5d54248c 886 u_char *p; /* Pointer to next char to parse */
donatien 0:013f5d54248c 887 u_char *ucp = inp; /* Pointer to current output char */
donatien 0:013f5d54248c 888 int l = *len; /* Length left */
donatien 0:013f5d54248c 889 u_char maxslotindex, cflag;
donatien 0:013f5d54248c 890 int d;
donatien 0:013f5d54248c 891
donatien 0:013f5d54248c 892 cis_received[f->unit] = 1;
donatien 0:013f5d54248c 893
donatien 0:013f5d54248c 894 /*
donatien 0:013f5d54248c 895 * Reset all his options.
donatien 0:013f5d54248c 896 */
donatien 0:013f5d54248c 897 BZERO(ho, sizeof(*ho));
donatien 0:013f5d54248c 898
donatien 0:013f5d54248c 899 /*
donatien 0:013f5d54248c 900 * Process all his options.
donatien 0:013f5d54248c 901 */
donatien 0:013f5d54248c 902 next = inp;
donatien 0:013f5d54248c 903 while (l) {
donatien 0:013f5d54248c 904 orc = CONFACK; /* Assume success */
donatien 0:013f5d54248c 905 cip = p = next; /* Remember begining of CI */
donatien 0:013f5d54248c 906 if (l < 2 || /* Not enough data for CI header or */
donatien 0:013f5d54248c 907 p[1] < 2 || /* CI length too small or */
donatien 0:013f5d54248c 908 p[1] > l) { /* CI length too big? */
donatien 0:013f5d54248c 909 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: bad CI length!\n"));
donatien 0:013f5d54248c 910 orc = CONFREJ; /* Reject bad CI */
donatien 0:013f5d54248c 911 cilen = (u_short)l;/* Reject till end of packet */
donatien 0:013f5d54248c 912 l = 0; /* Don't loop again */
donatien 0:013f5d54248c 913 goto endswitch;
donatien 0:013f5d54248c 914 }
donatien 0:013f5d54248c 915 GETCHAR(citype, p); /* Parse CI type */
donatien 0:013f5d54248c 916 GETCHAR(cilen, p); /* Parse CI length */
donatien 0:013f5d54248c 917 l -= cilen; /* Adjust remaining length */
donatien 0:013f5d54248c 918 next += cilen; /* Step to next CI */
donatien 0:013f5d54248c 919
donatien 0:013f5d54248c 920 switch (citype) { /* Check CI type */
donatien 0:013f5d54248c 921 #ifdef OLD_CI_ADDRS /* Need to save space... */
donatien 0:013f5d54248c 922 case CI_ADDRS:
donatien 0:013f5d54248c 923 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: received ADDRS\n"));
donatien 0:013f5d54248c 924 if (!ao->neg_addr ||
donatien 0:013f5d54248c 925 cilen != CILEN_ADDRS) { /* Check CI length */
donatien 0:013f5d54248c 926 orc = CONFREJ; /* Reject CI */
donatien 0:013f5d54248c 927 break;
donatien 0:013f5d54248c 928 }
donatien 0:013f5d54248c 929
donatien 0:013f5d54248c 930 /*
donatien 0:013f5d54248c 931 * If he has no address, or if we both have his address but
donatien 0:013f5d54248c 932 * disagree about it, then NAK it with our idea.
donatien 0:013f5d54248c 933 * In particular, if we don't know his address, but he does,
donatien 0:013f5d54248c 934 * then accept it.
donatien 0:013f5d54248c 935 */
donatien 0:013f5d54248c 936 GETLONG(tl, p); /* Parse source address (his) */
donatien 0:013f5d54248c 937 ciaddr1 = htonl(tl);
donatien 0:013f5d54248c 938 IPCPDEBUG(LOG_INFO, ("his addr %s\n", inet_ntoa(ciaddr1)));
donatien 0:013f5d54248c 939 if (ciaddr1 != wo->hisaddr
donatien 0:013f5d54248c 940 && (ciaddr1 == 0 || !wo->accept_remote)) {
donatien 0:013f5d54248c 941 orc = CONFNAK;
donatien 0:013f5d54248c 942 if (!reject_if_disagree) {
donatien 0:013f5d54248c 943 DECPTR(sizeof(u32_t), p);
donatien 0:013f5d54248c 944 tl = ntohl(wo->hisaddr);
donatien 0:013f5d54248c 945 PUTLONG(tl, p);
donatien 0:013f5d54248c 946 }
donatien 0:013f5d54248c 947 } else if (ciaddr1 == 0 && wo->hisaddr == 0) {
donatien 0:013f5d54248c 948 /*
donatien 0:013f5d54248c 949 * If neither we nor he knows his address, reject the option.
donatien 0:013f5d54248c 950 */
donatien 0:013f5d54248c 951 orc = CONFREJ;
donatien 0:013f5d54248c 952 wo->req_addr = 0; /* don't NAK with 0.0.0.0 later */
donatien 0:013f5d54248c 953 break;
donatien 0:013f5d54248c 954 }
donatien 0:013f5d54248c 955
donatien 0:013f5d54248c 956 /*
donatien 0:013f5d54248c 957 * If he doesn't know our address, or if we both have our address
donatien 0:013f5d54248c 958 * but disagree about it, then NAK it with our idea.
donatien 0:013f5d54248c 959 */
donatien 0:013f5d54248c 960 GETLONG(tl, p); /* Parse desination address (ours) */
donatien 0:013f5d54248c 961 ciaddr2 = htonl(tl);
donatien 0:013f5d54248c 962 IPCPDEBUG(LOG_INFO, ("our addr %s\n", inet_ntoa(ciaddr2)));
donatien 0:013f5d54248c 963 if (ciaddr2 != wo->ouraddr) {
donatien 0:013f5d54248c 964 if (ciaddr2 == 0 || !wo->accept_local) {
donatien 0:013f5d54248c 965 orc = CONFNAK;
donatien 0:013f5d54248c 966 if (!reject_if_disagree) {
donatien 0:013f5d54248c 967 DECPTR(sizeof(u32_t), p);
donatien 0:013f5d54248c 968 tl = ntohl(wo->ouraddr);
donatien 0:013f5d54248c 969 PUTLONG(tl, p);
donatien 0:013f5d54248c 970 }
donatien 0:013f5d54248c 971 } else {
donatien 0:013f5d54248c 972 go->ouraddr = ciaddr2; /* accept peer's idea */
donatien 0:013f5d54248c 973 }
donatien 0:013f5d54248c 974 }
donatien 0:013f5d54248c 975
donatien 0:013f5d54248c 976 ho->neg_addr = 1;
donatien 0:013f5d54248c 977 ho->old_addrs = 1;
donatien 0:013f5d54248c 978 ho->hisaddr = ciaddr1;
donatien 0:013f5d54248c 979 ho->ouraddr = ciaddr2;
donatien 0:013f5d54248c 980 break;
donatien 0:013f5d54248c 981 #endif
donatien 0:013f5d54248c 982
donatien 0:013f5d54248c 983 case CI_ADDR:
donatien 0:013f5d54248c 984 if (!ao->neg_addr) {
donatien 0:013f5d54248c 985 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Reject ADDR not allowed\n"));
donatien 0:013f5d54248c 986 orc = CONFREJ; /* Reject CI */
donatien 0:013f5d54248c 987 break;
donatien 0:013f5d54248c 988 } else if (cilen != CILEN_ADDR) { /* Check CI length */
donatien 0:013f5d54248c 989 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Reject ADDR bad len\n"));
donatien 0:013f5d54248c 990 orc = CONFREJ; /* Reject CI */
donatien 0:013f5d54248c 991 break;
donatien 0:013f5d54248c 992 }
donatien 0:013f5d54248c 993
donatien 0:013f5d54248c 994 /*
donatien 0:013f5d54248c 995 * If he has no address, or if we both have his address but
donatien 0:013f5d54248c 996 * disagree about it, then NAK it with our idea.
donatien 0:013f5d54248c 997 * In particular, if we don't know his address, but he does,
donatien 0:013f5d54248c 998 * then accept it.
donatien 0:013f5d54248c 999 */
donatien 0:013f5d54248c 1000 GETLONG(tl, p); /* Parse source address (his) */
donatien 0:013f5d54248c 1001 ciaddr1 = htonl(tl);
donatien 0:013f5d54248c 1002 if (ciaddr1 != wo->hisaddr
donatien 0:013f5d54248c 1003 && (ciaddr1 == 0 || !wo->accept_remote)) {
donatien 0:013f5d54248c 1004 orc = CONFNAK;
donatien 0:013f5d54248c 1005 if (!reject_if_disagree) {
donatien 0:013f5d54248c 1006 DECPTR(sizeof(u32_t), p);
donatien 0:013f5d54248c 1007 tl = ntohl(wo->hisaddr);
donatien 0:013f5d54248c 1008 PUTLONG(tl, p);
donatien 0:013f5d54248c 1009 }
donatien 0:013f5d54248c 1010 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Nak ADDR %s\n", inet_ntoa(ciaddr1)));
donatien 0:013f5d54248c 1011 } else if (ciaddr1 == 0 && wo->hisaddr == 0) {
donatien 0:013f5d54248c 1012 /*
donatien 0:013f5d54248c 1013 * Don't ACK an address of 0.0.0.0 - reject it instead.
donatien 0:013f5d54248c 1014 */
donatien 0:013f5d54248c 1015 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Reject ADDR %s\n", inet_ntoa(ciaddr1)));
donatien 0:013f5d54248c 1016 orc = CONFREJ;
donatien 0:013f5d54248c 1017 wo->req_addr = 0; /* don't NAK with 0.0.0.0 later */
donatien 0:013f5d54248c 1018 break;
donatien 0:013f5d54248c 1019 }
donatien 0:013f5d54248c 1020
donatien 0:013f5d54248c 1021 ho->neg_addr = 1;
donatien 0:013f5d54248c 1022 ho->hisaddr = ciaddr1;
donatien 0:013f5d54248c 1023 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: ADDR %s\n", inet_ntoa(ciaddr1)));
donatien 0:013f5d54248c 1024 break;
donatien 0:013f5d54248c 1025
donatien 0:013f5d54248c 1026 case CI_MS_DNS1:
donatien 0:013f5d54248c 1027 case CI_MS_DNS2:
donatien 0:013f5d54248c 1028 /* Microsoft primary or secondary DNS request */
donatien 0:013f5d54248c 1029 d = citype == CI_MS_DNS2;
donatien 0:013f5d54248c 1030
donatien 0:013f5d54248c 1031 /* If we do not have a DNS address then we cannot send it */
donatien 0:013f5d54248c 1032 if (ao->dnsaddr[d] == 0 ||
donatien 0:013f5d54248c 1033 cilen != CILEN_ADDR) { /* Check CI length */
donatien 0:013f5d54248c 1034 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Rejecting DNS%d Request\n", d+1));
donatien 0:013f5d54248c 1035 orc = CONFREJ; /* Reject CI */
donatien 0:013f5d54248c 1036 break;
donatien 0:013f5d54248c 1037 }
donatien 0:013f5d54248c 1038 GETLONG(tl, p);
donatien 0:013f5d54248c 1039 if (htonl(tl) != ao->dnsaddr[d]) {
donatien 0:013f5d54248c 1040 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Naking DNS%d Request %s\n",
donatien 0:013f5d54248c 1041 d+1, inet_ntoa(tl)));
donatien 0:013f5d54248c 1042 DECPTR(sizeof(u32_t), p);
donatien 0:013f5d54248c 1043 tl = ntohl(ao->dnsaddr[d]);
donatien 0:013f5d54248c 1044 PUTLONG(tl, p);
donatien 0:013f5d54248c 1045 orc = CONFNAK;
donatien 0:013f5d54248c 1046 }
donatien 0:013f5d54248c 1047 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: received DNS%d Request\n", d+1));
donatien 0:013f5d54248c 1048 break;
donatien 0:013f5d54248c 1049
donatien 0:013f5d54248c 1050 case CI_MS_WINS1:
donatien 0:013f5d54248c 1051 case CI_MS_WINS2:
donatien 0:013f5d54248c 1052 /* Microsoft primary or secondary WINS request */
donatien 0:013f5d54248c 1053 d = citype == CI_MS_WINS2;
donatien 0:013f5d54248c 1054 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: received WINS%d Request\n", d+1));
donatien 0:013f5d54248c 1055
donatien 0:013f5d54248c 1056 /* If we do not have a DNS address then we cannot send it */
donatien 0:013f5d54248c 1057 if (ao->winsaddr[d] == 0 ||
donatien 0:013f5d54248c 1058 cilen != CILEN_ADDR) { /* Check CI length */
donatien 0:013f5d54248c 1059 orc = CONFREJ; /* Reject CI */
donatien 0:013f5d54248c 1060 break;
donatien 0:013f5d54248c 1061 }
donatien 0:013f5d54248c 1062 GETLONG(tl, p);
donatien 0:013f5d54248c 1063 if (htonl(tl) != ao->winsaddr[d]) {
donatien 0:013f5d54248c 1064 DECPTR(sizeof(u32_t), p);
donatien 0:013f5d54248c 1065 tl = ntohl(ao->winsaddr[d]);
donatien 0:013f5d54248c 1066 PUTLONG(tl, p);
donatien 0:013f5d54248c 1067 orc = CONFNAK;
donatien 0:013f5d54248c 1068 }
donatien 0:013f5d54248c 1069 break;
donatien 0:013f5d54248c 1070
donatien 0:013f5d54248c 1071 case CI_COMPRESSTYPE:
donatien 0:013f5d54248c 1072 if (!ao->neg_vj) {
donatien 0:013f5d54248c 1073 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Rejecting COMPRESSTYPE not allowed\n"));
donatien 0:013f5d54248c 1074 orc = CONFREJ;
donatien 0:013f5d54248c 1075 break;
donatien 0:013f5d54248c 1076 } else if (cilen != CILEN_VJ && cilen != CILEN_COMPRESS) {
donatien 0:013f5d54248c 1077 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Rejecting COMPRESSTYPE len=%d\n", cilen));
donatien 0:013f5d54248c 1078 orc = CONFREJ;
donatien 0:013f5d54248c 1079 break;
donatien 0:013f5d54248c 1080 }
donatien 0:013f5d54248c 1081 GETSHORT(cishort, p);
donatien 0:013f5d54248c 1082
donatien 0:013f5d54248c 1083 if (!(cishort == IPCP_VJ_COMP ||
donatien 0:013f5d54248c 1084 (cishort == IPCP_VJ_COMP_OLD && cilen == CILEN_COMPRESS))) {
donatien 0:013f5d54248c 1085 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Rejecting COMPRESSTYPE %d\n", cishort));
donatien 0:013f5d54248c 1086 orc = CONFREJ;
donatien 0:013f5d54248c 1087 break;
donatien 0:013f5d54248c 1088 }
donatien 0:013f5d54248c 1089
donatien 0:013f5d54248c 1090 ho->neg_vj = 1;
donatien 0:013f5d54248c 1091 ho->vj_protocol = cishort;
donatien 0:013f5d54248c 1092 if (cilen == CILEN_VJ) {
donatien 0:013f5d54248c 1093 GETCHAR(maxslotindex, p);
donatien 0:013f5d54248c 1094 if (maxslotindex > ao->maxslotindex) {
donatien 0:013f5d54248c 1095 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Naking VJ max slot %d\n", maxslotindex));
donatien 0:013f5d54248c 1096 orc = CONFNAK;
donatien 0:013f5d54248c 1097 if (!reject_if_disagree) {
donatien 0:013f5d54248c 1098 DECPTR(1, p);
donatien 0:013f5d54248c 1099 PUTCHAR(ao->maxslotindex, p);
donatien 0:013f5d54248c 1100 }
donatien 0:013f5d54248c 1101 }
donatien 0:013f5d54248c 1102 GETCHAR(cflag, p);
donatien 0:013f5d54248c 1103 if (cflag && !ao->cflag) {
donatien 0:013f5d54248c 1104 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Naking VJ cflag %d\n", cflag));
donatien 0:013f5d54248c 1105 orc = CONFNAK;
donatien 0:013f5d54248c 1106 if (!reject_if_disagree) {
donatien 0:013f5d54248c 1107 DECPTR(1, p);
donatien 0:013f5d54248c 1108 PUTCHAR(wo->cflag, p);
donatien 0:013f5d54248c 1109 }
donatien 0:013f5d54248c 1110 }
donatien 0:013f5d54248c 1111 ho->maxslotindex = maxslotindex;
donatien 0:013f5d54248c 1112 ho->cflag = cflag;
donatien 0:013f5d54248c 1113 } else {
donatien 0:013f5d54248c 1114 ho->old_vj = 1;
donatien 0:013f5d54248c 1115 ho->maxslotindex = MAX_SLOTS - 1;
donatien 0:013f5d54248c 1116 ho->cflag = 1;
donatien 0:013f5d54248c 1117 }
donatien 0:013f5d54248c 1118 IPCPDEBUG(LOG_INFO, (
donatien 0:013f5d54248c 1119 "ipcp_reqci: received COMPRESSTYPE p=%d old=%d maxslot=%d cflag=%d\n",
donatien 0:013f5d54248c 1120 ho->vj_protocol, ho->old_vj, ho->maxslotindex, ho->cflag));
donatien 0:013f5d54248c 1121 break;
donatien 0:013f5d54248c 1122
donatien 0:013f5d54248c 1123 default:
donatien 0:013f5d54248c 1124 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Rejecting unknown CI type %d\n", citype));
donatien 0:013f5d54248c 1125 orc = CONFREJ;
donatien 0:013f5d54248c 1126 break;
donatien 0:013f5d54248c 1127 }
donatien 0:013f5d54248c 1128
donatien 0:013f5d54248c 1129 endswitch:
donatien 0:013f5d54248c 1130 if (orc == CONFACK && /* Good CI */
donatien 0:013f5d54248c 1131 rc != CONFACK) { /* but prior CI wasnt? */
donatien 0:013f5d54248c 1132 continue; /* Don't send this one */
donatien 0:013f5d54248c 1133 }
donatien 0:013f5d54248c 1134
donatien 0:013f5d54248c 1135 if (orc == CONFNAK) { /* Nak this CI? */
donatien 0:013f5d54248c 1136 if (reject_if_disagree) { /* Getting fed up with sending NAKs? */
donatien 0:013f5d54248c 1137 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Rejecting too many naks\n"));
donatien 0:013f5d54248c 1138 orc = CONFREJ; /* Get tough if so */
donatien 0:013f5d54248c 1139 } else {
donatien 0:013f5d54248c 1140 if (rc == CONFREJ) { /* Rejecting prior CI? */
donatien 0:013f5d54248c 1141 continue; /* Don't send this one */
donatien 0:013f5d54248c 1142 }
donatien 0:013f5d54248c 1143 if (rc == CONFACK) { /* Ack'd all prior CIs? */
donatien 0:013f5d54248c 1144 rc = CONFNAK; /* Not anymore... */
donatien 0:013f5d54248c 1145 ucp = inp; /* Backup */
donatien 0:013f5d54248c 1146 }
donatien 0:013f5d54248c 1147 }
donatien 0:013f5d54248c 1148 }
donatien 0:013f5d54248c 1149
donatien 0:013f5d54248c 1150 if (orc == CONFREJ && /* Reject this CI */
donatien 0:013f5d54248c 1151 rc != CONFREJ) { /* but no prior ones? */
donatien 0:013f5d54248c 1152 rc = CONFREJ;
donatien 0:013f5d54248c 1153 ucp = inp; /* Backup */
donatien 0:013f5d54248c 1154 }
donatien 0:013f5d54248c 1155
donatien 0:013f5d54248c 1156 /* Need to move CI? */
donatien 0:013f5d54248c 1157 if (ucp != cip) {
donatien 0:013f5d54248c 1158 BCOPY(cip, ucp, cilen); /* Move it */
donatien 0:013f5d54248c 1159 }
donatien 0:013f5d54248c 1160
donatien 0:013f5d54248c 1161 /* Update output pointer */
donatien 0:013f5d54248c 1162 INCPTR(cilen, ucp);
donatien 0:013f5d54248c 1163 }
donatien 0:013f5d54248c 1164
donatien 0:013f5d54248c 1165 /*
donatien 0:013f5d54248c 1166 * If we aren't rejecting this packet, and we want to negotiate
donatien 0:013f5d54248c 1167 * their address, and they didn't send their address, then we
donatien 0:013f5d54248c 1168 * send a NAK with a CI_ADDR option appended. We assume the
donatien 0:013f5d54248c 1169 * input buffer is long enough that we can append the extra
donatien 0:013f5d54248c 1170 * option safely.
donatien 0:013f5d54248c 1171 */
donatien 0:013f5d54248c 1172 if (rc != CONFREJ && !ho->neg_addr &&
donatien 0:013f5d54248c 1173 wo->req_addr && !reject_if_disagree) {
donatien 0:013f5d54248c 1174 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: Requesting peer address\n"));
donatien 0:013f5d54248c 1175 if (rc == CONFACK) {
donatien 0:013f5d54248c 1176 rc = CONFNAK;
donatien 0:013f5d54248c 1177 ucp = inp; /* reset pointer */
donatien 0:013f5d54248c 1178 wo->req_addr = 0; /* don't ask again */
donatien 0:013f5d54248c 1179 }
donatien 0:013f5d54248c 1180 PUTCHAR(CI_ADDR, ucp);
donatien 0:013f5d54248c 1181 PUTCHAR(CILEN_ADDR, ucp);
donatien 0:013f5d54248c 1182 tl = ntohl(wo->hisaddr);
donatien 0:013f5d54248c 1183 PUTLONG(tl, ucp);
donatien 0:013f5d54248c 1184 }
donatien 0:013f5d54248c 1185
donatien 0:013f5d54248c 1186 *len = (int)(ucp - inp); /* Compute output length */
donatien 0:013f5d54248c 1187 IPCPDEBUG(LOG_INFO, ("ipcp_reqci: returning Configure-%s\n", CODENAME(rc)));
donatien 0:013f5d54248c 1188 return (rc); /* Return final code */
donatien 0:013f5d54248c 1189 }
donatien 0:013f5d54248c 1190
donatien 0:013f5d54248c 1191
donatien 0:013f5d54248c 1192 #if 0
donatien 0:013f5d54248c 1193 /*
donatien 0:013f5d54248c 1194 * ip_check_options - check that any IP-related options are OK,
donatien 0:013f5d54248c 1195 * and assign appropriate defaults.
donatien 0:013f5d54248c 1196 */
donatien 0:013f5d54248c 1197 static void
donatien 0:013f5d54248c 1198 ip_check_options(u_long localAddr)
donatien 0:013f5d54248c 1199 {
donatien 0:013f5d54248c 1200 ipcp_options *wo = &ipcp_wantoptions[0];
donatien 0:013f5d54248c 1201
donatien 0:013f5d54248c 1202 /*
donatien 0:013f5d54248c 1203 * Load our default IP address but allow the remote host to give us
donatien 0:013f5d54248c 1204 * a new address.
donatien 0:013f5d54248c 1205 */
donatien 0:013f5d54248c 1206 if (wo->ouraddr == 0 && !ppp_settings.disable_defaultip) {
donatien 0:013f5d54248c 1207 wo->accept_local = 1; /* don't insist on this default value */
donatien 0:013f5d54248c 1208 wo->ouraddr = htonl(localAddr);
donatien 0:013f5d54248c 1209 }
donatien 0:013f5d54248c 1210 }
donatien 0:013f5d54248c 1211 #endif
donatien 0:013f5d54248c 1212
donatien 0:013f5d54248c 1213
donatien 0:013f5d54248c 1214 /*
donatien 0:013f5d54248c 1215 * ipcp_up - IPCP has come UP.
donatien 0:013f5d54248c 1216 *
donatien 0:013f5d54248c 1217 * Configure the IP network interface appropriately and bring it up.
donatien 0:013f5d54248c 1218 */
donatien 0:013f5d54248c 1219 static void
donatien 0:013f5d54248c 1220 ipcp_up(fsm *f)
donatien 0:013f5d54248c 1221 {
donatien 0:013f5d54248c 1222 u32_t mask;
donatien 0:013f5d54248c 1223 ipcp_options *ho = &ipcp_hisoptions[f->unit];
donatien 0:013f5d54248c 1224 ipcp_options *go = &ipcp_gotoptions[f->unit];
donatien 0:013f5d54248c 1225 ipcp_options *wo = &ipcp_wantoptions[f->unit];
donatien 0:013f5d54248c 1226
donatien 0:013f5d54248c 1227 np_up(f->unit, PPP_IP);
donatien 0:013f5d54248c 1228 IPCPDEBUG(LOG_INFO, ("ipcp: up\n"));
donatien 0:013f5d54248c 1229
donatien 0:013f5d54248c 1230 /*
donatien 0:013f5d54248c 1231 * We must have a non-zero IP address for both ends of the link.
donatien 0:013f5d54248c 1232 */
donatien 0:013f5d54248c 1233 if (!ho->neg_addr) {
donatien 0:013f5d54248c 1234 ho->hisaddr = wo->hisaddr;
donatien 0:013f5d54248c 1235 }
donatien 0:013f5d54248c 1236
donatien 0:013f5d54248c 1237 if (ho->hisaddr == 0) {
donatien 0:013f5d54248c 1238 #if 0
donatien 0:013f5d54248c 1239 IPCPDEBUG(LOG_ERR, ("Could not determine remote IP address\n"));
donatien 0:013f5d54248c 1240 ipcp_close(f->unit, "Could not determine remote IP address");
donatien 0:013f5d54248c 1241 return;
donatien 0:013f5d54248c 1242 #else //DG Kludge
donatien 0:013f5d54248c 1243 ho->hisaddr = 0; //Set remote IP to 0.0.0.0, this is needed as most 3g providers do not advertise the remote IP to the user
donatien 0:013f5d54248c 1244 #endif
donatien 0:013f5d54248c 1245 }
donatien 0:013f5d54248c 1246 if (go->ouraddr == 0) {
donatien 0:013f5d54248c 1247 IPCPDEBUG(LOG_ERR, ("Could not determine local IP address\n"));
donatien 0:013f5d54248c 1248 ipcp_close(f->unit, "Could not determine local IP address");
donatien 0:013f5d54248c 1249 return;
donatien 0:013f5d54248c 1250 }
donatien 0:013f5d54248c 1251
donatien 0:013f5d54248c 1252 if (ppp_settings.usepeerdns && (go->dnsaddr[0] || go->dnsaddr[1])) {
donatien 0:013f5d54248c 1253 /*pppGotDNSAddrs(go->dnsaddr[0], go->dnsaddr[1]);*/
donatien 0:013f5d54248c 1254 }
donatien 0:013f5d54248c 1255
donatien 0:013f5d54248c 1256 /*
donatien 0:013f5d54248c 1257 * Check that the peer is allowed to use the IP address it wants.
donatien 0:013f5d54248c 1258 */
donatien 0:013f5d54248c 1259 if (!auth_ip_addr(f->unit, ho->hisaddr)) {
donatien 0:013f5d54248c 1260 IPCPDEBUG(LOG_ERR, ("Peer is not authorized to use remote address %s\n",
donatien 0:013f5d54248c 1261 inet_ntoa(ho->hisaddr)));
donatien 0:013f5d54248c 1262 ipcp_close(f->unit, "Unauthorized remote IP address");
donatien 0:013f5d54248c 1263 return;
donatien 0:013f5d54248c 1264 }
donatien 0:013f5d54248c 1265
donatien 0:013f5d54248c 1266 /* set tcp compression */
donatien 0:013f5d54248c 1267 sifvjcomp(f->unit, ho->neg_vj, ho->cflag, ho->maxslotindex);
donatien 0:013f5d54248c 1268
donatien 0:013f5d54248c 1269 /*
donatien 0:013f5d54248c 1270 * Set IP addresses and (if specified) netmask.
donatien 0:013f5d54248c 1271 */
donatien 0:013f5d54248c 1272 mask = GetMask(go->ouraddr);
donatien 0:013f5d54248c 1273
donatien 0:013f5d54248c 1274 if (!sifaddr(f->unit, go->ouraddr, ho->hisaddr, mask, go->dnsaddr[0], go->dnsaddr[1])) {
donatien 0:013f5d54248c 1275 IPCPDEBUG(LOG_WARNING, ("sifaddr failed\n"));
donatien 0:013f5d54248c 1276 ipcp_close(f->unit, "Interface configuration failed");
donatien 0:013f5d54248c 1277 return;
donatien 0:013f5d54248c 1278 }
donatien 0:013f5d54248c 1279
donatien 0:013f5d54248c 1280 /* bring the interface up for IP */
donatien 0:013f5d54248c 1281 if (!sifup(f->unit)) {
donatien 0:013f5d54248c 1282 IPCPDEBUG(LOG_WARNING, ("sifup failed\n"));
donatien 0:013f5d54248c 1283 ipcp_close(f->unit, "Interface configuration failed");
donatien 0:013f5d54248c 1284 return;
donatien 0:013f5d54248c 1285 }
donatien 0:013f5d54248c 1286
donatien 0:013f5d54248c 1287 sifnpmode(f->unit, PPP_IP, NPMODE_PASS);
donatien 0:013f5d54248c 1288
donatien 0:013f5d54248c 1289 /* assign a default route through the interface if required */
donatien 0:013f5d54248c 1290 if (ipcp_wantoptions[f->unit].default_route) {
donatien 0:013f5d54248c 1291 if (sifdefaultroute(f->unit, go->ouraddr, ho->hisaddr)) {
donatien 0:013f5d54248c 1292 default_route_set[f->unit] = 1;
donatien 0:013f5d54248c 1293 }
donatien 0:013f5d54248c 1294 }
donatien 0:013f5d54248c 1295
donatien 0:013f5d54248c 1296 IPCPDEBUG(LOG_NOTICE, ("local IP address %s\n", inet_ntoa(go->ouraddr)));
donatien 0:013f5d54248c 1297 IPCPDEBUG(LOG_NOTICE, ("remote IP address %s\n", inet_ntoa(ho->hisaddr)));
donatien 0:013f5d54248c 1298 if (go->dnsaddr[0]) {
donatien 0:013f5d54248c 1299 IPCPDEBUG(LOG_NOTICE, ("primary DNS address %s\n", inet_ntoa(go->dnsaddr[0])));
donatien 0:013f5d54248c 1300 }
donatien 0:013f5d54248c 1301 if (go->dnsaddr[1]) {
donatien 0:013f5d54248c 1302 IPCPDEBUG(LOG_NOTICE, ("secondary DNS address %s\n", inet_ntoa(go->dnsaddr[1])));
donatien 0:013f5d54248c 1303 }
donatien 0:013f5d54248c 1304 }
donatien 0:013f5d54248c 1305
donatien 0:013f5d54248c 1306
donatien 0:013f5d54248c 1307 /*
donatien 0:013f5d54248c 1308 * ipcp_down - IPCP has gone DOWN.
donatien 0:013f5d54248c 1309 *
donatien 0:013f5d54248c 1310 * Take the IP network interface down, clear its addresses
donatien 0:013f5d54248c 1311 * and delete routes through it.
donatien 0:013f5d54248c 1312 */
donatien 0:013f5d54248c 1313 static void
donatien 0:013f5d54248c 1314 ipcp_down(fsm *f)
donatien 0:013f5d54248c 1315 {
donatien 0:013f5d54248c 1316 IPCPDEBUG(LOG_INFO, ("ipcp: down\n"));
donatien 0:013f5d54248c 1317 np_down(f->unit, PPP_IP);
donatien 0:013f5d54248c 1318 sifvjcomp(f->unit, 0, 0, 0);
donatien 0:013f5d54248c 1319
donatien 0:013f5d54248c 1320 sifdown(f->unit);
donatien 0:013f5d54248c 1321 ipcp_clear_addrs(f->unit);
donatien 0:013f5d54248c 1322 }
donatien 0:013f5d54248c 1323
donatien 0:013f5d54248c 1324
donatien 0:013f5d54248c 1325 /*
donatien 0:013f5d54248c 1326 * ipcp_clear_addrs() - clear the interface addresses, routes, etc.
donatien 0:013f5d54248c 1327 */
donatien 0:013f5d54248c 1328 static void
donatien 0:013f5d54248c 1329 ipcp_clear_addrs(int unit)
donatien 0:013f5d54248c 1330 {
donatien 0:013f5d54248c 1331 u32_t ouraddr, hisaddr;
donatien 0:013f5d54248c 1332
donatien 0:013f5d54248c 1333 ouraddr = ipcp_gotoptions[unit].ouraddr;
donatien 0:013f5d54248c 1334 hisaddr = ipcp_hisoptions[unit].hisaddr;
donatien 0:013f5d54248c 1335 if (default_route_set[unit]) {
donatien 0:013f5d54248c 1336 cifdefaultroute(unit, ouraddr, hisaddr);
donatien 0:013f5d54248c 1337 default_route_set[unit] = 0;
donatien 0:013f5d54248c 1338 }
donatien 0:013f5d54248c 1339 cifaddr(unit, ouraddr, hisaddr);
donatien 0:013f5d54248c 1340 }
donatien 0:013f5d54248c 1341
donatien 0:013f5d54248c 1342
donatien 0:013f5d54248c 1343 /*
donatien 0:013f5d54248c 1344 * ipcp_finished - possibly shut down the lower layers.
donatien 0:013f5d54248c 1345 */
donatien 0:013f5d54248c 1346 static void
donatien 0:013f5d54248c 1347 ipcp_finished(fsm *f)
donatien 0:013f5d54248c 1348 {
donatien 0:013f5d54248c 1349 np_finished(f->unit, PPP_IP);
donatien 0:013f5d54248c 1350 }
donatien 0:013f5d54248c 1351
donatien 0:013f5d54248c 1352 #if PPP_ADDITIONAL_CALLBACKS
donatien 0:013f5d54248c 1353 static int
donatien 0:013f5d54248c 1354 ipcp_printpkt(u_char *p, int plen, void (*printer) (void *, char *, ...), void *arg)
donatien 0:013f5d54248c 1355 {
donatien 0:013f5d54248c 1356 LWIP_UNUSED_ARG(p);
donatien 0:013f5d54248c 1357 LWIP_UNUSED_ARG(plen);
donatien 0:013f5d54248c 1358 LWIP_UNUSED_ARG(printer);
donatien 0:013f5d54248c 1359 LWIP_UNUSED_ARG(arg);
donatien 0:013f5d54248c 1360 return 0;
donatien 0:013f5d54248c 1361 }
donatien 0:013f5d54248c 1362
donatien 0:013f5d54248c 1363 /*
donatien 0:013f5d54248c 1364 * ip_active_pkt - see if this IP packet is worth bringing the link up for.
donatien 0:013f5d54248c 1365 * We don't bring the link up for IP fragments or for TCP FIN packets
donatien 0:013f5d54248c 1366 * with no data.
donatien 0:013f5d54248c 1367 */
donatien 0:013f5d54248c 1368 #define IP_HDRLEN 20 /* bytes */
donatien 0:013f5d54248c 1369 #define IP_OFFMASK 0x1fff
donatien 0:013f5d54248c 1370 #define IPPROTO_TCP 6
donatien 0:013f5d54248c 1371 #define TCP_HDRLEN 20
donatien 0:013f5d54248c 1372 #define TH_FIN 0x01
donatien 0:013f5d54248c 1373
donatien 0:013f5d54248c 1374 /*
donatien 0:013f5d54248c 1375 * We use these macros because the IP header may be at an odd address,
donatien 0:013f5d54248c 1376 * and some compilers might use word loads to get th_off or ip_hl.
donatien 0:013f5d54248c 1377 */
donatien 0:013f5d54248c 1378
donatien 0:013f5d54248c 1379 #define net_short(x) (((x)[0] << 8) + (x)[1])
donatien 0:013f5d54248c 1380 #define get_iphl(x) (((unsigned char *)(x))[0] & 0xF)
donatien 0:013f5d54248c 1381 #define get_ipoff(x) net_short((unsigned char *)(x) + 6)
donatien 0:013f5d54248c 1382 #define get_ipproto(x) (((unsigned char *)(x))[9])
donatien 0:013f5d54248c 1383 #define get_tcpoff(x) (((unsigned char *)(x))[12] >> 4)
donatien 0:013f5d54248c 1384 #define get_tcpflags(x) (((unsigned char *)(x))[13])
donatien 0:013f5d54248c 1385
donatien 0:013f5d54248c 1386 static int
donatien 0:013f5d54248c 1387 ip_active_pkt(u_char *pkt, int len)
donatien 0:013f5d54248c 1388 {
donatien 0:013f5d54248c 1389 u_char *tcp;
donatien 0:013f5d54248c 1390 int hlen;
donatien 0:013f5d54248c 1391
donatien 0:013f5d54248c 1392 len -= PPP_HDRLEN;
donatien 0:013f5d54248c 1393 pkt += PPP_HDRLEN;
donatien 0:013f5d54248c 1394 if (len < IP_HDRLEN) {
donatien 0:013f5d54248c 1395 return 0;
donatien 0:013f5d54248c 1396 }
donatien 0:013f5d54248c 1397 if ((get_ipoff(pkt) & IP_OFFMASK) != 0) {
donatien 0:013f5d54248c 1398 return 0;
donatien 0:013f5d54248c 1399 }
donatien 0:013f5d54248c 1400 if (get_ipproto(pkt) != IPPROTO_TCP) {
donatien 0:013f5d54248c 1401 return 1;
donatien 0:013f5d54248c 1402 }
donatien 0:013f5d54248c 1403 hlen = get_iphl(pkt) * 4;
donatien 0:013f5d54248c 1404 if (len < hlen + TCP_HDRLEN) {
donatien 0:013f5d54248c 1405 return 0;
donatien 0:013f5d54248c 1406 }
donatien 0:013f5d54248c 1407 tcp = pkt + hlen;
donatien 0:013f5d54248c 1408 if ((get_tcpflags(tcp) & TH_FIN) != 0 && len == hlen + get_tcpoff(tcp) * 4) {
donatien 0:013f5d54248c 1409 return 0;
donatien 0:013f5d54248c 1410 }
donatien 0:013f5d54248c 1411 return 1;
donatien 0:013f5d54248c 1412 }
donatien 0:013f5d54248c 1413 #endif /* PPP_ADDITIONAL_CALLBACKS */
donatien 0:013f5d54248c 1414
donatien 0:013f5d54248c 1415 #endif /* PPP_SUPPORT */