Michiel Berckvens / Mbed 2 deprecated ProjectHTTP

Dependencies:   DS1307 TextLCD mbed

Committer:
Michielber
Date:
Thu Dec 04 10:36:40 2014 +0000
Revision:
0:f615d151a72c
Berckvens Michiel & Basteyns Jonas 4/12/2014

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Michielber 0:f615d151a72c 1 /*****************************************************************************
Michielber 0:f615d151a72c 2 * fsm.c - Network Control Protocol Finite State Machine program file.
Michielber 0:f615d151a72c 3 *
Michielber 0:f615d151a72c 4 * Copyright (c) 2003 by Marc Boucher, Services Informatiques (MBSI) inc.
Michielber 0:f615d151a72c 5 * portions Copyright (c) 1997 by Global Election Systems Inc.
Michielber 0:f615d151a72c 6 *
Michielber 0:f615d151a72c 7 * The authors hereby grant permission to use, copy, modify, distribute,
Michielber 0:f615d151a72c 8 * and license this software and its documentation for any purpose, provided
Michielber 0:f615d151a72c 9 * that existing copyright notices are retained in all copies and that this
Michielber 0:f615d151a72c 10 * notice and the following disclaimer are included verbatim in any
Michielber 0:f615d151a72c 11 * distributions. No written agreement, license, or royalty fee is required
Michielber 0:f615d151a72c 12 * for any of the authorized uses.
Michielber 0:f615d151a72c 13 *
Michielber 0:f615d151a72c 14 * THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTORS *AS IS* AND ANY EXPRESS OR
Michielber 0:f615d151a72c 15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
Michielber 0:f615d151a72c 16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
Michielber 0:f615d151a72c 17 * IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
Michielber 0:f615d151a72c 18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
Michielber 0:f615d151a72c 19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
Michielber 0:f615d151a72c 20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
Michielber 0:f615d151a72c 21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
Michielber 0:f615d151a72c 22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
Michielber 0:f615d151a72c 23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
Michielber 0:f615d151a72c 24 *
Michielber 0:f615d151a72c 25 ******************************************************************************
Michielber 0:f615d151a72c 26 * REVISION HISTORY
Michielber 0:f615d151a72c 27 *
Michielber 0:f615d151a72c 28 * 03-01-01 Marc Boucher <marc@mbsi.ca>
Michielber 0:f615d151a72c 29 * Ported to lwIP.
Michielber 0:f615d151a72c 30 * 97-12-01 Guy Lancaster <lancasterg@acm.org>, Global Election Systems Inc.
Michielber 0:f615d151a72c 31 * Original based on BSD fsm.c.
Michielber 0:f615d151a72c 32 *****************************************************************************/
Michielber 0:f615d151a72c 33 /*
Michielber 0:f615d151a72c 34 * fsm.c - {Link, IP} Control Protocol Finite State Machine.
Michielber 0:f615d151a72c 35 *
Michielber 0:f615d151a72c 36 * Copyright (c) 1989 Carnegie Mellon University.
Michielber 0:f615d151a72c 37 * All rights reserved.
Michielber 0:f615d151a72c 38 *
Michielber 0:f615d151a72c 39 * Redistribution and use in source and binary forms are permitted
Michielber 0:f615d151a72c 40 * provided that the above copyright notice and this paragraph are
Michielber 0:f615d151a72c 41 * duplicated in all such forms and that any documentation,
Michielber 0:f615d151a72c 42 * advertising materials, and other materials related to such
Michielber 0:f615d151a72c 43 * distribution and use acknowledge that the software was developed
Michielber 0:f615d151a72c 44 * by Carnegie Mellon University. The name of the
Michielber 0:f615d151a72c 45 * University may not be used to endorse or promote products derived
Michielber 0:f615d151a72c 46 * from this software without specific prior written permission.
Michielber 0:f615d151a72c 47 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
Michielber 0:f615d151a72c 48 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
Michielber 0:f615d151a72c 49 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
Michielber 0:f615d151a72c 50 */
Michielber 0:f615d151a72c 51
Michielber 0:f615d151a72c 52 /*
Michielber 0:f615d151a72c 53 * TODO:
Michielber 0:f615d151a72c 54 * Randomize fsm id on link/init.
Michielber 0:f615d151a72c 55 * Deal with variable outgoing MTU.
Michielber 0:f615d151a72c 56 */
Michielber 0:f615d151a72c 57
Michielber 0:f615d151a72c 58 #include "lwip/opt.h"
Michielber 0:f615d151a72c 59
Michielber 0:f615d151a72c 60 #if PPP_SUPPORT /* don't build if not configured for use in lwipopts.h */
Michielber 0:f615d151a72c 61
Michielber 0:f615d151a72c 62 #include "ppp.h"
Michielber 0:f615d151a72c 63 #include "pppdebug.h"
Michielber 0:f615d151a72c 64
Michielber 0:f615d151a72c 65 #include "fsm.h"
Michielber 0:f615d151a72c 66
Michielber 0:f615d151a72c 67 #include <string.h>
Michielber 0:f615d151a72c 68
Michielber 0:f615d151a72c 69 #if PPP_DEBUG
Michielber 0:f615d151a72c 70 static const char *ppperr_strerr[] = {
Michielber 0:f615d151a72c 71 "LS_INITIAL", /* LS_INITIAL 0 */
Michielber 0:f615d151a72c 72 "LS_STARTING", /* LS_STARTING 1 */
Michielber 0:f615d151a72c 73 "LS_CLOSED", /* LS_CLOSED 2 */
Michielber 0:f615d151a72c 74 "LS_STOPPED", /* LS_STOPPED 3 */
Michielber 0:f615d151a72c 75 "LS_CLOSING", /* LS_CLOSING 4 */
Michielber 0:f615d151a72c 76 "LS_STOPPING", /* LS_STOPPING 5 */
Michielber 0:f615d151a72c 77 "LS_REQSENT", /* LS_REQSENT 6 */
Michielber 0:f615d151a72c 78 "LS_ACKRCVD", /* LS_ACKRCVD 7 */
Michielber 0:f615d151a72c 79 "LS_ACKSENT", /* LS_ACKSENT 8 */
Michielber 0:f615d151a72c 80 "LS_OPENED" /* LS_OPENED 9 */
Michielber 0:f615d151a72c 81 };
Michielber 0:f615d151a72c 82 #endif /* PPP_DEBUG */
Michielber 0:f615d151a72c 83
Michielber 0:f615d151a72c 84 static void fsm_timeout (void *);
Michielber 0:f615d151a72c 85 static void fsm_rconfreq (fsm *, u_char, u_char *, int);
Michielber 0:f615d151a72c 86 static void fsm_rconfack (fsm *, int, u_char *, int);
Michielber 0:f615d151a72c 87 static void fsm_rconfnakrej (fsm *, int, int, u_char *, int);
Michielber 0:f615d151a72c 88 static void fsm_rtermreq (fsm *, int, u_char *, int);
Michielber 0:f615d151a72c 89 static void fsm_rtermack (fsm *);
Michielber 0:f615d151a72c 90 static void fsm_rcoderej (fsm *, u_char *, int);
Michielber 0:f615d151a72c 91 static void fsm_sconfreq (fsm *, int);
Michielber 0:f615d151a72c 92
Michielber 0:f615d151a72c 93 #define PROTO_NAME(f) ((f)->callbacks->proto_name)
Michielber 0:f615d151a72c 94
Michielber 0:f615d151a72c 95 int peer_mru[NUM_PPP];
Michielber 0:f615d151a72c 96
Michielber 0:f615d151a72c 97
Michielber 0:f615d151a72c 98 /*
Michielber 0:f615d151a72c 99 * fsm_init - Initialize fsm.
Michielber 0:f615d151a72c 100 *
Michielber 0:f615d151a72c 101 * Initialize fsm state.
Michielber 0:f615d151a72c 102 */
Michielber 0:f615d151a72c 103 void
Michielber 0:f615d151a72c 104 fsm_init(fsm *f)
Michielber 0:f615d151a72c 105 {
Michielber 0:f615d151a72c 106 f->state = LS_INITIAL;
Michielber 0:f615d151a72c 107 f->flags = 0;
Michielber 0:f615d151a72c 108 f->id = 0; /* XXX Start with random id? */
Michielber 0:f615d151a72c 109 f->timeouttime = FSM_DEFTIMEOUT;
Michielber 0:f615d151a72c 110 f->maxconfreqtransmits = FSM_DEFMAXCONFREQS;
Michielber 0:f615d151a72c 111 f->maxtermtransmits = FSM_DEFMAXTERMREQS;
Michielber 0:f615d151a72c 112 f->maxnakloops = FSM_DEFMAXNAKLOOPS;
Michielber 0:f615d151a72c 113 f->term_reason_len = 0;
Michielber 0:f615d151a72c 114 }
Michielber 0:f615d151a72c 115
Michielber 0:f615d151a72c 116
Michielber 0:f615d151a72c 117 /*
Michielber 0:f615d151a72c 118 * fsm_lowerup - The lower layer is up.
Michielber 0:f615d151a72c 119 */
Michielber 0:f615d151a72c 120 void
Michielber 0:f615d151a72c 121 fsm_lowerup(fsm *f)
Michielber 0:f615d151a72c 122 {
Michielber 0:f615d151a72c 123 int oldState = f->state;
Michielber 0:f615d151a72c 124
Michielber 0:f615d151a72c 125 LWIP_UNUSED_ARG(oldState);
Michielber 0:f615d151a72c 126
Michielber 0:f615d151a72c 127 switch( f->state ) {
Michielber 0:f615d151a72c 128 case LS_INITIAL:
Michielber 0:f615d151a72c 129 f->state = LS_CLOSED;
Michielber 0:f615d151a72c 130 break;
Michielber 0:f615d151a72c 131
Michielber 0:f615d151a72c 132 case LS_STARTING:
Michielber 0:f615d151a72c 133 if( f->flags & OPT_SILENT ) {
Michielber 0:f615d151a72c 134 f->state = LS_STOPPED;
Michielber 0:f615d151a72c 135 } else {
Michielber 0:f615d151a72c 136 /* Send an initial configure-request */
Michielber 0:f615d151a72c 137 fsm_sconfreq(f, 0);
Michielber 0:f615d151a72c 138 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 139 }
Michielber 0:f615d151a72c 140 break;
Michielber 0:f615d151a72c 141
Michielber 0:f615d151a72c 142 default:
Michielber 0:f615d151a72c 143 FSMDEBUG(LOG_INFO, ("%s: Up event in state %d (%s)!\n",
Michielber 0:f615d151a72c 144 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 145 }
Michielber 0:f615d151a72c 146
Michielber 0:f615d151a72c 147 FSMDEBUG(LOG_INFO, ("%s: lowerup state %d (%s) -> %d (%s)\n",
Michielber 0:f615d151a72c 148 PROTO_NAME(f), oldState, ppperr_strerr[oldState], f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 149 }
Michielber 0:f615d151a72c 150
Michielber 0:f615d151a72c 151
Michielber 0:f615d151a72c 152 /*
Michielber 0:f615d151a72c 153 * fsm_lowerdown - The lower layer is down.
Michielber 0:f615d151a72c 154 *
Michielber 0:f615d151a72c 155 * Cancel all timeouts and inform upper layers.
Michielber 0:f615d151a72c 156 */
Michielber 0:f615d151a72c 157 void
Michielber 0:f615d151a72c 158 fsm_lowerdown(fsm *f)
Michielber 0:f615d151a72c 159 {
Michielber 0:f615d151a72c 160 int oldState = f->state;
Michielber 0:f615d151a72c 161
Michielber 0:f615d151a72c 162 LWIP_UNUSED_ARG(oldState);
Michielber 0:f615d151a72c 163
Michielber 0:f615d151a72c 164 switch( f->state ) {
Michielber 0:f615d151a72c 165 case LS_CLOSED:
Michielber 0:f615d151a72c 166 f->state = LS_INITIAL;
Michielber 0:f615d151a72c 167 break;
Michielber 0:f615d151a72c 168
Michielber 0:f615d151a72c 169 case LS_STOPPED:
Michielber 0:f615d151a72c 170 f->state = LS_STARTING;
Michielber 0:f615d151a72c 171 if( f->callbacks->starting ) {
Michielber 0:f615d151a72c 172 (*f->callbacks->starting)(f);
Michielber 0:f615d151a72c 173 }
Michielber 0:f615d151a72c 174 break;
Michielber 0:f615d151a72c 175
Michielber 0:f615d151a72c 176 case LS_CLOSING:
Michielber 0:f615d151a72c 177 f->state = LS_INITIAL;
Michielber 0:f615d151a72c 178 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 179 break;
Michielber 0:f615d151a72c 180
Michielber 0:f615d151a72c 181 case LS_STOPPING:
Michielber 0:f615d151a72c 182 case LS_REQSENT:
Michielber 0:f615d151a72c 183 case LS_ACKRCVD:
Michielber 0:f615d151a72c 184 case LS_ACKSENT:
Michielber 0:f615d151a72c 185 f->state = LS_STARTING;
Michielber 0:f615d151a72c 186 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 187 break;
Michielber 0:f615d151a72c 188
Michielber 0:f615d151a72c 189 case LS_OPENED:
Michielber 0:f615d151a72c 190 if( f->callbacks->down ) {
Michielber 0:f615d151a72c 191 (*f->callbacks->down)(f);
Michielber 0:f615d151a72c 192 }
Michielber 0:f615d151a72c 193 f->state = LS_STARTING;
Michielber 0:f615d151a72c 194 break;
Michielber 0:f615d151a72c 195
Michielber 0:f615d151a72c 196 default:
Michielber 0:f615d151a72c 197 FSMDEBUG(LOG_INFO, ("%s: Down event in state %d (%s)!\n",
Michielber 0:f615d151a72c 198 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 199 }
Michielber 0:f615d151a72c 200
Michielber 0:f615d151a72c 201 FSMDEBUG(LOG_INFO, ("%s: lowerdown state %d (%s) -> %d (%s)\n",
Michielber 0:f615d151a72c 202 PROTO_NAME(f), oldState, ppperr_strerr[oldState], f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 203 }
Michielber 0:f615d151a72c 204
Michielber 0:f615d151a72c 205
Michielber 0:f615d151a72c 206 /*
Michielber 0:f615d151a72c 207 * fsm_open - Link is allowed to come up.
Michielber 0:f615d151a72c 208 */
Michielber 0:f615d151a72c 209 void
Michielber 0:f615d151a72c 210 fsm_open(fsm *f)
Michielber 0:f615d151a72c 211 {
Michielber 0:f615d151a72c 212 int oldState = f->state;
Michielber 0:f615d151a72c 213
Michielber 0:f615d151a72c 214 LWIP_UNUSED_ARG(oldState);
Michielber 0:f615d151a72c 215
Michielber 0:f615d151a72c 216 switch( f->state ) {
Michielber 0:f615d151a72c 217 case LS_INITIAL:
Michielber 0:f615d151a72c 218 f->state = LS_STARTING;
Michielber 0:f615d151a72c 219 if( f->callbacks->starting ) {
Michielber 0:f615d151a72c 220 (*f->callbacks->starting)(f);
Michielber 0:f615d151a72c 221 }
Michielber 0:f615d151a72c 222 break;
Michielber 0:f615d151a72c 223
Michielber 0:f615d151a72c 224 case LS_CLOSED:
Michielber 0:f615d151a72c 225 if( f->flags & OPT_SILENT ) {
Michielber 0:f615d151a72c 226 f->state = LS_STOPPED;
Michielber 0:f615d151a72c 227 } else {
Michielber 0:f615d151a72c 228 /* Send an initial configure-request */
Michielber 0:f615d151a72c 229 fsm_sconfreq(f, 0);
Michielber 0:f615d151a72c 230 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 231 }
Michielber 0:f615d151a72c 232 break;
Michielber 0:f615d151a72c 233
Michielber 0:f615d151a72c 234 case LS_CLOSING:
Michielber 0:f615d151a72c 235 f->state = LS_STOPPING;
Michielber 0:f615d151a72c 236 /* fall through */
Michielber 0:f615d151a72c 237 case LS_STOPPED:
Michielber 0:f615d151a72c 238 case LS_OPENED:
Michielber 0:f615d151a72c 239 if( f->flags & OPT_RESTART ) {
Michielber 0:f615d151a72c 240 fsm_lowerdown(f);
Michielber 0:f615d151a72c 241 fsm_lowerup(f);
Michielber 0:f615d151a72c 242 }
Michielber 0:f615d151a72c 243 break;
Michielber 0:f615d151a72c 244 }
Michielber 0:f615d151a72c 245
Michielber 0:f615d151a72c 246 FSMDEBUG(LOG_INFO, ("%s: open state %d (%s) -> %d (%s)\n",
Michielber 0:f615d151a72c 247 PROTO_NAME(f), oldState, ppperr_strerr[oldState], f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 248 }
Michielber 0:f615d151a72c 249
Michielber 0:f615d151a72c 250 #if 0 /* backport pppd 2.4.4b1; */
Michielber 0:f615d151a72c 251 /*
Michielber 0:f615d151a72c 252 * terminate_layer - Start process of shutting down the FSM
Michielber 0:f615d151a72c 253 *
Michielber 0:f615d151a72c 254 * Cancel any timeout running, notify upper layers we're done, and
Michielber 0:f615d151a72c 255 * send a terminate-request message as configured.
Michielber 0:f615d151a72c 256 */
Michielber 0:f615d151a72c 257 static void
Michielber 0:f615d151a72c 258 terminate_layer(fsm *f, int nextstate)
Michielber 0:f615d151a72c 259 {
Michielber 0:f615d151a72c 260 /* @todo */
Michielber 0:f615d151a72c 261 }
Michielber 0:f615d151a72c 262 #endif
Michielber 0:f615d151a72c 263
Michielber 0:f615d151a72c 264 /*
Michielber 0:f615d151a72c 265 * fsm_close - Start closing connection.
Michielber 0:f615d151a72c 266 *
Michielber 0:f615d151a72c 267 * Cancel timeouts and either initiate close or possibly go directly to
Michielber 0:f615d151a72c 268 * the LS_CLOSED state.
Michielber 0:f615d151a72c 269 */
Michielber 0:f615d151a72c 270 void
Michielber 0:f615d151a72c 271 fsm_close(fsm *f, char *reason)
Michielber 0:f615d151a72c 272 {
Michielber 0:f615d151a72c 273 int oldState = f->state;
Michielber 0:f615d151a72c 274
Michielber 0:f615d151a72c 275 LWIP_UNUSED_ARG(oldState);
Michielber 0:f615d151a72c 276
Michielber 0:f615d151a72c 277 f->term_reason = reason;
Michielber 0:f615d151a72c 278 f->term_reason_len = (reason == NULL ? 0 : (int)strlen(reason));
Michielber 0:f615d151a72c 279 switch( f->state ) {
Michielber 0:f615d151a72c 280 case LS_STARTING:
Michielber 0:f615d151a72c 281 f->state = LS_INITIAL;
Michielber 0:f615d151a72c 282 break;
Michielber 0:f615d151a72c 283 case LS_STOPPED:
Michielber 0:f615d151a72c 284 f->state = LS_CLOSED;
Michielber 0:f615d151a72c 285 break;
Michielber 0:f615d151a72c 286 case LS_STOPPING:
Michielber 0:f615d151a72c 287 f->state = LS_CLOSING;
Michielber 0:f615d151a72c 288 break;
Michielber 0:f615d151a72c 289
Michielber 0:f615d151a72c 290 case LS_REQSENT:
Michielber 0:f615d151a72c 291 case LS_ACKRCVD:
Michielber 0:f615d151a72c 292 case LS_ACKSENT:
Michielber 0:f615d151a72c 293 case LS_OPENED:
Michielber 0:f615d151a72c 294 if( f->state != LS_OPENED ) {
Michielber 0:f615d151a72c 295 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 296 } else if( f->callbacks->down ) {
Michielber 0:f615d151a72c 297 (*f->callbacks->down)(f); /* Inform upper layers we're down */
Michielber 0:f615d151a72c 298 }
Michielber 0:f615d151a72c 299 /* Init restart counter, send Terminate-Request */
Michielber 0:f615d151a72c 300 f->retransmits = f->maxtermtransmits;
Michielber 0:f615d151a72c 301 fsm_sdata(f, TERMREQ, f->reqid = ++f->id,
Michielber 0:f615d151a72c 302 (u_char *) f->term_reason, f->term_reason_len);
Michielber 0:f615d151a72c 303 TIMEOUT(fsm_timeout, f, f->timeouttime);
Michielber 0:f615d151a72c 304 --f->retransmits;
Michielber 0:f615d151a72c 305
Michielber 0:f615d151a72c 306 f->state = LS_CLOSING;
Michielber 0:f615d151a72c 307 break;
Michielber 0:f615d151a72c 308 }
Michielber 0:f615d151a72c 309
Michielber 0:f615d151a72c 310 FSMDEBUG(LOG_INFO, ("%s: close reason=%s state %d (%s) -> %d (%s)\n",
Michielber 0:f615d151a72c 311 PROTO_NAME(f), reason, oldState, ppperr_strerr[oldState], f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 312 }
Michielber 0:f615d151a72c 313
Michielber 0:f615d151a72c 314
Michielber 0:f615d151a72c 315 /*
Michielber 0:f615d151a72c 316 * fsm_timeout - Timeout expired.
Michielber 0:f615d151a72c 317 */
Michielber 0:f615d151a72c 318 static void
Michielber 0:f615d151a72c 319 fsm_timeout(void *arg)
Michielber 0:f615d151a72c 320 {
Michielber 0:f615d151a72c 321 fsm *f = (fsm *) arg;
Michielber 0:f615d151a72c 322
Michielber 0:f615d151a72c 323 switch (f->state) {
Michielber 0:f615d151a72c 324 case LS_CLOSING:
Michielber 0:f615d151a72c 325 case LS_STOPPING:
Michielber 0:f615d151a72c 326 if( f->retransmits <= 0 ) {
Michielber 0:f615d151a72c 327 FSMDEBUG(LOG_WARNING, ("%s: timeout sending Terminate-Request state=%d (%s)\n",
Michielber 0:f615d151a72c 328 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 329 /*
Michielber 0:f615d151a72c 330 * We've waited for an ack long enough. Peer probably heard us.
Michielber 0:f615d151a72c 331 */
Michielber 0:f615d151a72c 332 f->state = (f->state == LS_CLOSING)? LS_CLOSED: LS_STOPPED;
Michielber 0:f615d151a72c 333 if( f->callbacks->finished ) {
Michielber 0:f615d151a72c 334 (*f->callbacks->finished)(f);
Michielber 0:f615d151a72c 335 }
Michielber 0:f615d151a72c 336 } else {
Michielber 0:f615d151a72c 337 FSMDEBUG(LOG_WARNING, ("%s: timeout resending Terminate-Requests state=%d (%s)\n",
Michielber 0:f615d151a72c 338 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 339 /* Send Terminate-Request */
Michielber 0:f615d151a72c 340 fsm_sdata(f, TERMREQ, f->reqid = ++f->id,
Michielber 0:f615d151a72c 341 (u_char *) f->term_reason, f->term_reason_len);
Michielber 0:f615d151a72c 342 TIMEOUT(fsm_timeout, f, f->timeouttime);
Michielber 0:f615d151a72c 343 --f->retransmits;
Michielber 0:f615d151a72c 344 }
Michielber 0:f615d151a72c 345 break;
Michielber 0:f615d151a72c 346
Michielber 0:f615d151a72c 347 case LS_REQSENT:
Michielber 0:f615d151a72c 348 case LS_ACKRCVD:
Michielber 0:f615d151a72c 349 case LS_ACKSENT:
Michielber 0:f615d151a72c 350 if (f->retransmits <= 0) {
Michielber 0:f615d151a72c 351 FSMDEBUG(LOG_WARNING, ("%s: timeout sending Config-Requests state=%d (%s)\n",
Michielber 0:f615d151a72c 352 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 353 f->state = LS_STOPPED;
Michielber 0:f615d151a72c 354 if( (f->flags & OPT_PASSIVE) == 0 && f->callbacks->finished ) {
Michielber 0:f615d151a72c 355 (*f->callbacks->finished)(f);
Michielber 0:f615d151a72c 356 }
Michielber 0:f615d151a72c 357 } else {
Michielber 0:f615d151a72c 358 FSMDEBUG(LOG_WARNING, ("%s: timeout resending Config-Request state=%d (%s)\n",
Michielber 0:f615d151a72c 359 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 360 /* Retransmit the configure-request */
Michielber 0:f615d151a72c 361 if (f->callbacks->retransmit) {
Michielber 0:f615d151a72c 362 (*f->callbacks->retransmit)(f);
Michielber 0:f615d151a72c 363 }
Michielber 0:f615d151a72c 364 fsm_sconfreq(f, 1); /* Re-send Configure-Request */
Michielber 0:f615d151a72c 365 if( f->state == LS_ACKRCVD ) {
Michielber 0:f615d151a72c 366 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 367 }
Michielber 0:f615d151a72c 368 }
Michielber 0:f615d151a72c 369 break;
Michielber 0:f615d151a72c 370
Michielber 0:f615d151a72c 371 default:
Michielber 0:f615d151a72c 372 FSMDEBUG(LOG_INFO, ("%s: UNHANDLED timeout event in state %d (%s)!\n",
Michielber 0:f615d151a72c 373 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 374 }
Michielber 0:f615d151a72c 375 }
Michielber 0:f615d151a72c 376
Michielber 0:f615d151a72c 377
Michielber 0:f615d151a72c 378 /*
Michielber 0:f615d151a72c 379 * fsm_input - Input packet.
Michielber 0:f615d151a72c 380 */
Michielber 0:f615d151a72c 381 void
Michielber 0:f615d151a72c 382 fsm_input(fsm *f, u_char *inpacket, int l)
Michielber 0:f615d151a72c 383 {
Michielber 0:f615d151a72c 384 u_char *inp = inpacket;
Michielber 0:f615d151a72c 385 u_char code, id;
Michielber 0:f615d151a72c 386 int len;
Michielber 0:f615d151a72c 387
Michielber 0:f615d151a72c 388 /*
Michielber 0:f615d151a72c 389 * Parse header (code, id and length).
Michielber 0:f615d151a72c 390 * If packet too short, drop it.
Michielber 0:f615d151a72c 391 */
Michielber 0:f615d151a72c 392 if (l < HEADERLEN) {
Michielber 0:f615d151a72c 393 FSMDEBUG(LOG_WARNING, ("fsm_input(%x): Rcvd short header.\n",
Michielber 0:f615d151a72c 394 f->protocol));
Michielber 0:f615d151a72c 395 return;
Michielber 0:f615d151a72c 396 }
Michielber 0:f615d151a72c 397 GETCHAR(code, inp);
Michielber 0:f615d151a72c 398 GETCHAR(id, inp);
Michielber 0:f615d151a72c 399 GETSHORT(len, inp);
Michielber 0:f615d151a72c 400 if (len < HEADERLEN) {
Michielber 0:f615d151a72c 401 FSMDEBUG(LOG_INFO, ("fsm_input(%x): Rcvd illegal length.\n",
Michielber 0:f615d151a72c 402 f->protocol));
Michielber 0:f615d151a72c 403 return;
Michielber 0:f615d151a72c 404 }
Michielber 0:f615d151a72c 405 if (len > l) {
Michielber 0:f615d151a72c 406 FSMDEBUG(LOG_INFO, ("fsm_input(%x): Rcvd short packet.\n",
Michielber 0:f615d151a72c 407 f->protocol));
Michielber 0:f615d151a72c 408 return;
Michielber 0:f615d151a72c 409 }
Michielber 0:f615d151a72c 410 len -= HEADERLEN; /* subtract header length */
Michielber 0:f615d151a72c 411
Michielber 0:f615d151a72c 412 if( f->state == LS_INITIAL || f->state == LS_STARTING ) {
Michielber 0:f615d151a72c 413 FSMDEBUG(LOG_INFO, ("fsm_input(%x): Rcvd packet in state %d (%s).\n",
Michielber 0:f615d151a72c 414 f->protocol, f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 415 return;
Michielber 0:f615d151a72c 416 }
Michielber 0:f615d151a72c 417 FSMDEBUG(LOG_INFO, ("fsm_input(%s):%d,%d,%d\n", PROTO_NAME(f), code, id, l));
Michielber 0:f615d151a72c 418 /*
Michielber 0:f615d151a72c 419 * Action depends on code.
Michielber 0:f615d151a72c 420 */
Michielber 0:f615d151a72c 421 switch (code) {
Michielber 0:f615d151a72c 422 case CONFREQ:
Michielber 0:f615d151a72c 423 fsm_rconfreq(f, id, inp, len);
Michielber 0:f615d151a72c 424 break;
Michielber 0:f615d151a72c 425
Michielber 0:f615d151a72c 426 case CONFACK:
Michielber 0:f615d151a72c 427 fsm_rconfack(f, id, inp, len);
Michielber 0:f615d151a72c 428 break;
Michielber 0:f615d151a72c 429
Michielber 0:f615d151a72c 430 case CONFNAK:
Michielber 0:f615d151a72c 431 case CONFREJ:
Michielber 0:f615d151a72c 432 fsm_rconfnakrej(f, code, id, inp, len);
Michielber 0:f615d151a72c 433 break;
Michielber 0:f615d151a72c 434
Michielber 0:f615d151a72c 435 case TERMREQ:
Michielber 0:f615d151a72c 436 fsm_rtermreq(f, id, inp, len);
Michielber 0:f615d151a72c 437 break;
Michielber 0:f615d151a72c 438
Michielber 0:f615d151a72c 439 case TERMACK:
Michielber 0:f615d151a72c 440 fsm_rtermack(f);
Michielber 0:f615d151a72c 441 break;
Michielber 0:f615d151a72c 442
Michielber 0:f615d151a72c 443 case CODEREJ:
Michielber 0:f615d151a72c 444 fsm_rcoderej(f, inp, len);
Michielber 0:f615d151a72c 445 break;
Michielber 0:f615d151a72c 446
Michielber 0:f615d151a72c 447 default:
Michielber 0:f615d151a72c 448 FSMDEBUG(LOG_INFO, ("fsm_input(%s): default: \n", PROTO_NAME(f)));
Michielber 0:f615d151a72c 449 if( !f->callbacks->extcode ||
Michielber 0:f615d151a72c 450 !(*f->callbacks->extcode)(f, code, id, inp, len) ) {
Michielber 0:f615d151a72c 451 fsm_sdata(f, CODEREJ, ++f->id, inpacket, len + HEADERLEN);
Michielber 0:f615d151a72c 452 }
Michielber 0:f615d151a72c 453 break;
Michielber 0:f615d151a72c 454 }
Michielber 0:f615d151a72c 455 }
Michielber 0:f615d151a72c 456
Michielber 0:f615d151a72c 457
Michielber 0:f615d151a72c 458 /*
Michielber 0:f615d151a72c 459 * fsm_rconfreq - Receive Configure-Request.
Michielber 0:f615d151a72c 460 */
Michielber 0:f615d151a72c 461 static void
Michielber 0:f615d151a72c 462 fsm_rconfreq(fsm *f, u_char id, u_char *inp, int len)
Michielber 0:f615d151a72c 463 {
Michielber 0:f615d151a72c 464 int code, reject_if_disagree;
Michielber 0:f615d151a72c 465
Michielber 0:f615d151a72c 466 FSMDEBUG(LOG_INFO, ("fsm_rconfreq(%s): Rcvd id %d state=%d (%s)\n",
Michielber 0:f615d151a72c 467 PROTO_NAME(f), id, f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 468 switch( f->state ) {
Michielber 0:f615d151a72c 469 case LS_CLOSED:
Michielber 0:f615d151a72c 470 /* Go away, we're closed */
Michielber 0:f615d151a72c 471 fsm_sdata(f, TERMACK, id, NULL, 0);
Michielber 0:f615d151a72c 472 return;
Michielber 0:f615d151a72c 473 case LS_CLOSING:
Michielber 0:f615d151a72c 474 case LS_STOPPING:
Michielber 0:f615d151a72c 475 return;
Michielber 0:f615d151a72c 476
Michielber 0:f615d151a72c 477 case LS_OPENED:
Michielber 0:f615d151a72c 478 /* Go down and restart negotiation */
Michielber 0:f615d151a72c 479 if( f->callbacks->down ) {
Michielber 0:f615d151a72c 480 (*f->callbacks->down)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 481 }
Michielber 0:f615d151a72c 482 fsm_sconfreq(f, 0); /* Send initial Configure-Request */
Michielber 0:f615d151a72c 483 break;
Michielber 0:f615d151a72c 484
Michielber 0:f615d151a72c 485 case LS_STOPPED:
Michielber 0:f615d151a72c 486 /* Negotiation started by our peer */
Michielber 0:f615d151a72c 487 fsm_sconfreq(f, 0); /* Send initial Configure-Request */
Michielber 0:f615d151a72c 488 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 489 break;
Michielber 0:f615d151a72c 490 }
Michielber 0:f615d151a72c 491
Michielber 0:f615d151a72c 492 /*
Michielber 0:f615d151a72c 493 * Pass the requested configuration options
Michielber 0:f615d151a72c 494 * to protocol-specific code for checking.
Michielber 0:f615d151a72c 495 */
Michielber 0:f615d151a72c 496 if (f->callbacks->reqci) { /* Check CI */
Michielber 0:f615d151a72c 497 reject_if_disagree = (f->nakloops >= f->maxnakloops);
Michielber 0:f615d151a72c 498 code = (*f->callbacks->reqci)(f, inp, &len, reject_if_disagree);
Michielber 0:f615d151a72c 499 } else if (len) {
Michielber 0:f615d151a72c 500 code = CONFREJ; /* Reject all CI */
Michielber 0:f615d151a72c 501 } else {
Michielber 0:f615d151a72c 502 code = CONFACK;
Michielber 0:f615d151a72c 503 }
Michielber 0:f615d151a72c 504
Michielber 0:f615d151a72c 505 /* send the Ack, Nak or Rej to the peer */
Michielber 0:f615d151a72c 506 fsm_sdata(f, (u_char)code, id, inp, len);
Michielber 0:f615d151a72c 507
Michielber 0:f615d151a72c 508 if (code == CONFACK) {
Michielber 0:f615d151a72c 509 if (f->state == LS_ACKRCVD) {
Michielber 0:f615d151a72c 510 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 511 f->state = LS_OPENED;
Michielber 0:f615d151a72c 512 if (f->callbacks->up) {
Michielber 0:f615d151a72c 513 (*f->callbacks->up)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 514 }
Michielber 0:f615d151a72c 515 } else {
Michielber 0:f615d151a72c 516 f->state = LS_ACKSENT;
Michielber 0:f615d151a72c 517 }
Michielber 0:f615d151a72c 518 f->nakloops = 0;
Michielber 0:f615d151a72c 519 } else {
Michielber 0:f615d151a72c 520 /* we sent CONFACK or CONFREJ */
Michielber 0:f615d151a72c 521 if (f->state != LS_ACKRCVD) {
Michielber 0:f615d151a72c 522 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 523 }
Michielber 0:f615d151a72c 524 if( code == CONFNAK ) {
Michielber 0:f615d151a72c 525 ++f->nakloops;
Michielber 0:f615d151a72c 526 }
Michielber 0:f615d151a72c 527 }
Michielber 0:f615d151a72c 528 }
Michielber 0:f615d151a72c 529
Michielber 0:f615d151a72c 530
Michielber 0:f615d151a72c 531 /*
Michielber 0:f615d151a72c 532 * fsm_rconfack - Receive Configure-Ack.
Michielber 0:f615d151a72c 533 */
Michielber 0:f615d151a72c 534 static void
Michielber 0:f615d151a72c 535 fsm_rconfack(fsm *f, int id, u_char *inp, int len)
Michielber 0:f615d151a72c 536 {
Michielber 0:f615d151a72c 537 FSMDEBUG(LOG_INFO, ("fsm_rconfack(%s): Rcvd id %d state=%d (%s)\n",
Michielber 0:f615d151a72c 538 PROTO_NAME(f), id, f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 539
Michielber 0:f615d151a72c 540 if (id != f->reqid || f->seen_ack) { /* Expected id? */
Michielber 0:f615d151a72c 541 return; /* Nope, toss... */
Michielber 0:f615d151a72c 542 }
Michielber 0:f615d151a72c 543 if( !(f->callbacks->ackci? (*f->callbacks->ackci)(f, inp, len): (len == 0)) ) {
Michielber 0:f615d151a72c 544 /* Ack is bad - ignore it */
Michielber 0:f615d151a72c 545 FSMDEBUG(LOG_INFO, ("%s: received bad Ack (length %d)\n",
Michielber 0:f615d151a72c 546 PROTO_NAME(f), len));
Michielber 0:f615d151a72c 547 return;
Michielber 0:f615d151a72c 548 }
Michielber 0:f615d151a72c 549 f->seen_ack = 1;
Michielber 0:f615d151a72c 550
Michielber 0:f615d151a72c 551 switch (f->state) {
Michielber 0:f615d151a72c 552 case LS_CLOSED:
Michielber 0:f615d151a72c 553 case LS_STOPPED:
Michielber 0:f615d151a72c 554 fsm_sdata(f, TERMACK, (u_char)id, NULL, 0);
Michielber 0:f615d151a72c 555 break;
Michielber 0:f615d151a72c 556
Michielber 0:f615d151a72c 557 case LS_REQSENT:
Michielber 0:f615d151a72c 558 f->state = LS_ACKRCVD;
Michielber 0:f615d151a72c 559 f->retransmits = f->maxconfreqtransmits;
Michielber 0:f615d151a72c 560 break;
Michielber 0:f615d151a72c 561
Michielber 0:f615d151a72c 562 case LS_ACKRCVD:
Michielber 0:f615d151a72c 563 /* Huh? an extra valid Ack? oh well... */
Michielber 0:f615d151a72c 564 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 565 fsm_sconfreq(f, 0);
Michielber 0:f615d151a72c 566 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 567 break;
Michielber 0:f615d151a72c 568
Michielber 0:f615d151a72c 569 case LS_ACKSENT:
Michielber 0:f615d151a72c 570 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 571 f->state = LS_OPENED;
Michielber 0:f615d151a72c 572 f->retransmits = f->maxconfreqtransmits;
Michielber 0:f615d151a72c 573 if (f->callbacks->up) {
Michielber 0:f615d151a72c 574 (*f->callbacks->up)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 575 }
Michielber 0:f615d151a72c 576 break;
Michielber 0:f615d151a72c 577
Michielber 0:f615d151a72c 578 case LS_OPENED:
Michielber 0:f615d151a72c 579 /* Go down and restart negotiation */
Michielber 0:f615d151a72c 580 if (f->callbacks->down) {
Michielber 0:f615d151a72c 581 (*f->callbacks->down)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 582 }
Michielber 0:f615d151a72c 583 fsm_sconfreq(f, 0); /* Send initial Configure-Request */
Michielber 0:f615d151a72c 584 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 585 break;
Michielber 0:f615d151a72c 586 }
Michielber 0:f615d151a72c 587 }
Michielber 0:f615d151a72c 588
Michielber 0:f615d151a72c 589
Michielber 0:f615d151a72c 590 /*
Michielber 0:f615d151a72c 591 * fsm_rconfnakrej - Receive Configure-Nak or Configure-Reject.
Michielber 0:f615d151a72c 592 */
Michielber 0:f615d151a72c 593 static void
Michielber 0:f615d151a72c 594 fsm_rconfnakrej(fsm *f, int code, int id, u_char *inp, int len)
Michielber 0:f615d151a72c 595 {
Michielber 0:f615d151a72c 596 int (*proc) (fsm *, u_char *, int);
Michielber 0:f615d151a72c 597 int ret;
Michielber 0:f615d151a72c 598
Michielber 0:f615d151a72c 599 FSMDEBUG(LOG_INFO, ("fsm_rconfnakrej(%s): Rcvd id %d state=%d (%s)\n",
Michielber 0:f615d151a72c 600 PROTO_NAME(f), id, f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 601
Michielber 0:f615d151a72c 602 if (id != f->reqid || f->seen_ack) { /* Expected id? */
Michielber 0:f615d151a72c 603 return; /* Nope, toss... */
Michielber 0:f615d151a72c 604 }
Michielber 0:f615d151a72c 605 proc = (code == CONFNAK)? f->callbacks->nakci: f->callbacks->rejci;
Michielber 0:f615d151a72c 606 if (!proc || !((ret = proc(f, inp, len)))) {
Michielber 0:f615d151a72c 607 /* Nak/reject is bad - ignore it */
Michielber 0:f615d151a72c 608 FSMDEBUG(LOG_INFO, ("%s: received bad %s (length %d)\n",
Michielber 0:f615d151a72c 609 PROTO_NAME(f), (code==CONFNAK? "Nak": "reject"), len));
Michielber 0:f615d151a72c 610 return;
Michielber 0:f615d151a72c 611 }
Michielber 0:f615d151a72c 612 f->seen_ack = 1;
Michielber 0:f615d151a72c 613
Michielber 0:f615d151a72c 614 switch (f->state) {
Michielber 0:f615d151a72c 615 case LS_CLOSED:
Michielber 0:f615d151a72c 616 case LS_STOPPED:
Michielber 0:f615d151a72c 617 fsm_sdata(f, TERMACK, (u_char)id, NULL, 0);
Michielber 0:f615d151a72c 618 break;
Michielber 0:f615d151a72c 619
Michielber 0:f615d151a72c 620 case LS_REQSENT:
Michielber 0:f615d151a72c 621 case LS_ACKSENT:
Michielber 0:f615d151a72c 622 /* They didn't agree to what we wanted - try another request */
Michielber 0:f615d151a72c 623 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 624 if (ret < 0) {
Michielber 0:f615d151a72c 625 f->state = LS_STOPPED; /* kludge for stopping CCP */
Michielber 0:f615d151a72c 626 } else {
Michielber 0:f615d151a72c 627 fsm_sconfreq(f, 0); /* Send Configure-Request */
Michielber 0:f615d151a72c 628 }
Michielber 0:f615d151a72c 629 break;
Michielber 0:f615d151a72c 630
Michielber 0:f615d151a72c 631 case LS_ACKRCVD:
Michielber 0:f615d151a72c 632 /* Got a Nak/reject when we had already had an Ack?? oh well... */
Michielber 0:f615d151a72c 633 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 634 fsm_sconfreq(f, 0);
Michielber 0:f615d151a72c 635 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 636 break;
Michielber 0:f615d151a72c 637
Michielber 0:f615d151a72c 638 case LS_OPENED:
Michielber 0:f615d151a72c 639 /* Go down and restart negotiation */
Michielber 0:f615d151a72c 640 if (f->callbacks->down) {
Michielber 0:f615d151a72c 641 (*f->callbacks->down)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 642 }
Michielber 0:f615d151a72c 643 fsm_sconfreq(f, 0); /* Send initial Configure-Request */
Michielber 0:f615d151a72c 644 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 645 break;
Michielber 0:f615d151a72c 646 }
Michielber 0:f615d151a72c 647 }
Michielber 0:f615d151a72c 648
Michielber 0:f615d151a72c 649
Michielber 0:f615d151a72c 650 /*
Michielber 0:f615d151a72c 651 * fsm_rtermreq - Receive Terminate-Req.
Michielber 0:f615d151a72c 652 */
Michielber 0:f615d151a72c 653 static void
Michielber 0:f615d151a72c 654 fsm_rtermreq(fsm *f, int id, u_char *p, int len)
Michielber 0:f615d151a72c 655 {
Michielber 0:f615d151a72c 656 LWIP_UNUSED_ARG(p);
Michielber 0:f615d151a72c 657
Michielber 0:f615d151a72c 658 FSMDEBUG(LOG_INFO, ("fsm_rtermreq(%s): Rcvd id %d state=%d (%s)\n",
Michielber 0:f615d151a72c 659 PROTO_NAME(f), id, f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 660
Michielber 0:f615d151a72c 661 switch (f->state) {
Michielber 0:f615d151a72c 662 case LS_ACKRCVD:
Michielber 0:f615d151a72c 663 case LS_ACKSENT:
Michielber 0:f615d151a72c 664 f->state = LS_REQSENT; /* Start over but keep trying */
Michielber 0:f615d151a72c 665 break;
Michielber 0:f615d151a72c 666
Michielber 0:f615d151a72c 667 case LS_OPENED:
Michielber 0:f615d151a72c 668 if (len > 0) {
Michielber 0:f615d151a72c 669 FSMDEBUG(LOG_INFO, ("%s terminated by peer (%p)\n", PROTO_NAME(f), p));
Michielber 0:f615d151a72c 670 } else {
Michielber 0:f615d151a72c 671 FSMDEBUG(LOG_INFO, ("%s terminated by peer\n", PROTO_NAME(f)));
Michielber 0:f615d151a72c 672 }
Michielber 0:f615d151a72c 673 if (f->callbacks->down) {
Michielber 0:f615d151a72c 674 (*f->callbacks->down)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 675 }
Michielber 0:f615d151a72c 676 f->retransmits = 0;
Michielber 0:f615d151a72c 677 f->state = LS_STOPPING;
Michielber 0:f615d151a72c 678 TIMEOUT(fsm_timeout, f, f->timeouttime);
Michielber 0:f615d151a72c 679 break;
Michielber 0:f615d151a72c 680 }
Michielber 0:f615d151a72c 681
Michielber 0:f615d151a72c 682 fsm_sdata(f, TERMACK, (u_char)id, NULL, 0);
Michielber 0:f615d151a72c 683 }
Michielber 0:f615d151a72c 684
Michielber 0:f615d151a72c 685
Michielber 0:f615d151a72c 686 /*
Michielber 0:f615d151a72c 687 * fsm_rtermack - Receive Terminate-Ack.
Michielber 0:f615d151a72c 688 */
Michielber 0:f615d151a72c 689 static void
Michielber 0:f615d151a72c 690 fsm_rtermack(fsm *f)
Michielber 0:f615d151a72c 691 {
Michielber 0:f615d151a72c 692 FSMDEBUG(LOG_INFO, ("fsm_rtermack(%s): state=%d (%s)\n",
Michielber 0:f615d151a72c 693 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 694
Michielber 0:f615d151a72c 695 switch (f->state) {
Michielber 0:f615d151a72c 696 case LS_CLOSING:
Michielber 0:f615d151a72c 697 UNTIMEOUT(fsm_timeout, f);
Michielber 0:f615d151a72c 698 f->state = LS_CLOSED;
Michielber 0:f615d151a72c 699 if( f->callbacks->finished ) {
Michielber 0:f615d151a72c 700 (*f->callbacks->finished)(f);
Michielber 0:f615d151a72c 701 }
Michielber 0:f615d151a72c 702 break;
Michielber 0:f615d151a72c 703
Michielber 0:f615d151a72c 704 case LS_STOPPING:
Michielber 0:f615d151a72c 705 UNTIMEOUT(fsm_timeout, f);
Michielber 0:f615d151a72c 706 f->state = LS_STOPPED;
Michielber 0:f615d151a72c 707 if( f->callbacks->finished ) {
Michielber 0:f615d151a72c 708 (*f->callbacks->finished)(f);
Michielber 0:f615d151a72c 709 }
Michielber 0:f615d151a72c 710 break;
Michielber 0:f615d151a72c 711
Michielber 0:f615d151a72c 712 case LS_ACKRCVD:
Michielber 0:f615d151a72c 713 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 714 break;
Michielber 0:f615d151a72c 715
Michielber 0:f615d151a72c 716 case LS_OPENED:
Michielber 0:f615d151a72c 717 if (f->callbacks->down) {
Michielber 0:f615d151a72c 718 (*f->callbacks->down)(f); /* Inform upper layers */
Michielber 0:f615d151a72c 719 }
Michielber 0:f615d151a72c 720 fsm_sconfreq(f, 0);
Michielber 0:f615d151a72c 721 break;
Michielber 0:f615d151a72c 722 default:
Michielber 0:f615d151a72c 723 FSMDEBUG(LOG_INFO, ("fsm_rtermack(%s): UNHANDLED state=%d (%s)!!!\n",
Michielber 0:f615d151a72c 724 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 725 }
Michielber 0:f615d151a72c 726 }
Michielber 0:f615d151a72c 727
Michielber 0:f615d151a72c 728
Michielber 0:f615d151a72c 729 /*
Michielber 0:f615d151a72c 730 * fsm_rcoderej - Receive an Code-Reject.
Michielber 0:f615d151a72c 731 */
Michielber 0:f615d151a72c 732 static void
Michielber 0:f615d151a72c 733 fsm_rcoderej(fsm *f, u_char *inp, int len)
Michielber 0:f615d151a72c 734 {
Michielber 0:f615d151a72c 735 u_char code, id;
Michielber 0:f615d151a72c 736
Michielber 0:f615d151a72c 737 FSMDEBUG(LOG_INFO, ("fsm_rcoderej(%s): state=%d (%s)\n",
Michielber 0:f615d151a72c 738 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 739
Michielber 0:f615d151a72c 740 if (len < HEADERLEN) {
Michielber 0:f615d151a72c 741 FSMDEBUG(LOG_INFO, ("fsm_rcoderej: Rcvd short Code-Reject packet!\n"));
Michielber 0:f615d151a72c 742 return;
Michielber 0:f615d151a72c 743 }
Michielber 0:f615d151a72c 744 GETCHAR(code, inp);
Michielber 0:f615d151a72c 745 GETCHAR(id, inp);
Michielber 0:f615d151a72c 746 FSMDEBUG(LOG_WARNING, ("%s: Rcvd Code-Reject for code %d, id %d\n",
Michielber 0:f615d151a72c 747 PROTO_NAME(f), code, id));
Michielber 0:f615d151a72c 748
Michielber 0:f615d151a72c 749 if( f->state == LS_ACKRCVD ) {
Michielber 0:f615d151a72c 750 f->state = LS_REQSENT;
Michielber 0:f615d151a72c 751 }
Michielber 0:f615d151a72c 752 }
Michielber 0:f615d151a72c 753
Michielber 0:f615d151a72c 754
Michielber 0:f615d151a72c 755 /*
Michielber 0:f615d151a72c 756 * fsm_protreject - Peer doesn't speak this protocol.
Michielber 0:f615d151a72c 757 *
Michielber 0:f615d151a72c 758 * Treat this as a catastrophic error (RXJ-).
Michielber 0:f615d151a72c 759 */
Michielber 0:f615d151a72c 760 void
Michielber 0:f615d151a72c 761 fsm_protreject(fsm *f)
Michielber 0:f615d151a72c 762 {
Michielber 0:f615d151a72c 763 switch( f->state ) {
Michielber 0:f615d151a72c 764 case LS_CLOSING:
Michielber 0:f615d151a72c 765 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 766 /* fall through */
Michielber 0:f615d151a72c 767 case LS_CLOSED:
Michielber 0:f615d151a72c 768 f->state = LS_CLOSED;
Michielber 0:f615d151a72c 769 if( f->callbacks->finished ) {
Michielber 0:f615d151a72c 770 (*f->callbacks->finished)(f);
Michielber 0:f615d151a72c 771 }
Michielber 0:f615d151a72c 772 break;
Michielber 0:f615d151a72c 773
Michielber 0:f615d151a72c 774 case LS_STOPPING:
Michielber 0:f615d151a72c 775 case LS_REQSENT:
Michielber 0:f615d151a72c 776 case LS_ACKRCVD:
Michielber 0:f615d151a72c 777 case LS_ACKSENT:
Michielber 0:f615d151a72c 778 UNTIMEOUT(fsm_timeout, f); /* Cancel timeout */
Michielber 0:f615d151a72c 779 /* fall through */
Michielber 0:f615d151a72c 780 case LS_STOPPED:
Michielber 0:f615d151a72c 781 f->state = LS_STOPPED;
Michielber 0:f615d151a72c 782 if( f->callbacks->finished ) {
Michielber 0:f615d151a72c 783 (*f->callbacks->finished)(f);
Michielber 0:f615d151a72c 784 }
Michielber 0:f615d151a72c 785 break;
Michielber 0:f615d151a72c 786
Michielber 0:f615d151a72c 787 case LS_OPENED:
Michielber 0:f615d151a72c 788 if( f->callbacks->down ) {
Michielber 0:f615d151a72c 789 (*f->callbacks->down)(f);
Michielber 0:f615d151a72c 790 }
Michielber 0:f615d151a72c 791 /* Init restart counter, send Terminate-Request */
Michielber 0:f615d151a72c 792 f->retransmits = f->maxtermtransmits;
Michielber 0:f615d151a72c 793 fsm_sdata(f, TERMREQ, f->reqid = ++f->id,
Michielber 0:f615d151a72c 794 (u_char *) f->term_reason, f->term_reason_len);
Michielber 0:f615d151a72c 795 TIMEOUT(fsm_timeout, f, f->timeouttime);
Michielber 0:f615d151a72c 796 --f->retransmits;
Michielber 0:f615d151a72c 797
Michielber 0:f615d151a72c 798 f->state = LS_STOPPING;
Michielber 0:f615d151a72c 799 break;
Michielber 0:f615d151a72c 800
Michielber 0:f615d151a72c 801 default:
Michielber 0:f615d151a72c 802 FSMDEBUG(LOG_INFO, ("%s: Protocol-reject event in state %d (%s)!\n",
Michielber 0:f615d151a72c 803 PROTO_NAME(f), f->state, ppperr_strerr[f->state]));
Michielber 0:f615d151a72c 804 }
Michielber 0:f615d151a72c 805 }
Michielber 0:f615d151a72c 806
Michielber 0:f615d151a72c 807
Michielber 0:f615d151a72c 808 /*
Michielber 0:f615d151a72c 809 * fsm_sconfreq - Send a Configure-Request.
Michielber 0:f615d151a72c 810 */
Michielber 0:f615d151a72c 811 static void
Michielber 0:f615d151a72c 812 fsm_sconfreq(fsm *f, int retransmit)
Michielber 0:f615d151a72c 813 {
Michielber 0:f615d151a72c 814 u_char *outp;
Michielber 0:f615d151a72c 815 int cilen;
Michielber 0:f615d151a72c 816
Michielber 0:f615d151a72c 817 if( f->state != LS_REQSENT && f->state != LS_ACKRCVD && f->state != LS_ACKSENT ) {
Michielber 0:f615d151a72c 818 /* Not currently negotiating - reset options */
Michielber 0:f615d151a72c 819 if( f->callbacks->resetci ) {
Michielber 0:f615d151a72c 820 (*f->callbacks->resetci)(f);
Michielber 0:f615d151a72c 821 }
Michielber 0:f615d151a72c 822 f->nakloops = 0;
Michielber 0:f615d151a72c 823 }
Michielber 0:f615d151a72c 824
Michielber 0:f615d151a72c 825 if( !retransmit ) {
Michielber 0:f615d151a72c 826 /* New request - reset retransmission counter, use new ID */
Michielber 0:f615d151a72c 827 f->retransmits = f->maxconfreqtransmits;
Michielber 0:f615d151a72c 828 f->reqid = ++f->id;
Michielber 0:f615d151a72c 829 }
Michielber 0:f615d151a72c 830
Michielber 0:f615d151a72c 831 f->seen_ack = 0;
Michielber 0:f615d151a72c 832
Michielber 0:f615d151a72c 833 /*
Michielber 0:f615d151a72c 834 * Make up the request packet
Michielber 0:f615d151a72c 835 */
Michielber 0:f615d151a72c 836 outp = outpacket_buf[f->unit] + PPP_HDRLEN + HEADERLEN;
Michielber 0:f615d151a72c 837 if( f->callbacks->cilen && f->callbacks->addci ) {
Michielber 0:f615d151a72c 838 cilen = (*f->callbacks->cilen)(f);
Michielber 0:f615d151a72c 839 if( cilen > peer_mru[f->unit] - (int)HEADERLEN ) {
Michielber 0:f615d151a72c 840 cilen = peer_mru[f->unit] - HEADERLEN;
Michielber 0:f615d151a72c 841 }
Michielber 0:f615d151a72c 842 if (f->callbacks->addci) {
Michielber 0:f615d151a72c 843 (*f->callbacks->addci)(f, outp, &cilen);
Michielber 0:f615d151a72c 844 }
Michielber 0:f615d151a72c 845 } else {
Michielber 0:f615d151a72c 846 cilen = 0;
Michielber 0:f615d151a72c 847 }
Michielber 0:f615d151a72c 848
Michielber 0:f615d151a72c 849 /* send the request to our peer */
Michielber 0:f615d151a72c 850 fsm_sdata(f, CONFREQ, f->reqid, outp, cilen);
Michielber 0:f615d151a72c 851
Michielber 0:f615d151a72c 852 /* start the retransmit timer */
Michielber 0:f615d151a72c 853 --f->retransmits;
Michielber 0:f615d151a72c 854 TIMEOUT(fsm_timeout, f, f->timeouttime);
Michielber 0:f615d151a72c 855
Michielber 0:f615d151a72c 856 FSMDEBUG(LOG_INFO, ("%s: sending Configure-Request, id %d\n",
Michielber 0:f615d151a72c 857 PROTO_NAME(f), f->reqid));
Michielber 0:f615d151a72c 858 }
Michielber 0:f615d151a72c 859
Michielber 0:f615d151a72c 860
Michielber 0:f615d151a72c 861 /*
Michielber 0:f615d151a72c 862 * fsm_sdata - Send some data.
Michielber 0:f615d151a72c 863 *
Michielber 0:f615d151a72c 864 * Used for all packets sent to our peer by this module.
Michielber 0:f615d151a72c 865 */
Michielber 0:f615d151a72c 866 void
Michielber 0:f615d151a72c 867 fsm_sdata( fsm *f, u_char code, u_char id, u_char *data, int datalen)
Michielber 0:f615d151a72c 868 {
Michielber 0:f615d151a72c 869 u_char *outp;
Michielber 0:f615d151a72c 870 int outlen;
Michielber 0:f615d151a72c 871
Michielber 0:f615d151a72c 872 /* Adjust length to be smaller than MTU */
Michielber 0:f615d151a72c 873 outp = outpacket_buf[f->unit];
Michielber 0:f615d151a72c 874 if (datalen > peer_mru[f->unit] - (int)HEADERLEN) {
Michielber 0:f615d151a72c 875 datalen = peer_mru[f->unit] - HEADERLEN;
Michielber 0:f615d151a72c 876 }
Michielber 0:f615d151a72c 877 if (datalen && data != outp + PPP_HDRLEN + HEADERLEN) {
Michielber 0:f615d151a72c 878 BCOPY(data, outp + PPP_HDRLEN + HEADERLEN, datalen);
Michielber 0:f615d151a72c 879 }
Michielber 0:f615d151a72c 880 outlen = datalen + HEADERLEN;
Michielber 0:f615d151a72c 881 MAKEHEADER(outp, f->protocol);
Michielber 0:f615d151a72c 882 PUTCHAR(code, outp);
Michielber 0:f615d151a72c 883 PUTCHAR(id, outp);
Michielber 0:f615d151a72c 884 PUTSHORT(outlen, outp);
Michielber 0:f615d151a72c 885 pppWrite(f->unit, outpacket_buf[f->unit], outlen + PPP_HDRLEN);
Michielber 0:f615d151a72c 886 FSMDEBUG(LOG_INFO, ("fsm_sdata(%s): Sent code %d,%d,%d.\n",
Michielber 0:f615d151a72c 887 PROTO_NAME(f), code, id, outlen));
Michielber 0:f615d151a72c 888 }
Michielber 0:f615d151a72c 889
Michielber 0:f615d151a72c 890 #endif /* PPP_SUPPORT */