FreeCalypso > hg > fc-selenite
annotate src/g23m-fad/ppp/ppp_papf.c @ 192:4f40ae165be4
abb.c & init.c: sync with Magnetite for Luna additions
These Luna target-specific additions are conditionalized on CONFIG_TARGET_LUNA,
a C preprocessor symbol that will never be defined in Selenite, hence this
change has exactly zero impact on FC Selenite.  However, they are being pulled
in as a sync in order to keep the diff between Magnetite and Selenite to a
minimum; keeping this diff to a minimum increases our opportunities for
possible evolution of future FC firmwares.
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Sat, 23 May 2020 07:03:46 +0000 | 
| parents | d393cd9bb723 | 
| children | 
| rev | line source | 
|---|---|
| 1 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 1 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 2 +----------------------------------------------------------------------------- | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 3 | Project : | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 4 | Modul : | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 5 +----------------------------------------------------------------------------- | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 6 | Copyright 2002 Texas Instruments Berlin, AG | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 7 | All rights reserved. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 8 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 9 | This file is confidential and a trade secret of Texas | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 10 | Instruments Berlin, AG | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 11 | The receipt of or possession of this file does not convey | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 12 | any rights to reproduce or disclose its contents or to | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 13 | manufacture, use, or sell anything it may describe, in | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 14 | whole, or in part, without the specific written consent of | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 15 | Texas Instruments Berlin, AG. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 16 +----------------------------------------------------------------------------- | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 17 | Purpose : This modul is part of the entity PPP and implements all | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 18 | procedures and functions as described in the | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 19 | SDL-documentation (PAP-statemachine) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 20 +----------------------------------------------------------------------------- | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 21 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 22 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 23 #ifndef PPP_PAPF_C | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 24 #define PPP_PAPF_C | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 25 #endif /* !PPP_PAPF_C */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 26 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 27 #define ENTITY_PPP | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 28 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 29 /*==== INCLUDES =============================================================*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 30 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 31 #include "typedefs.h" /* to get Condat data types */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 32 #include "vsi.h" /* to get a lot of macros */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 33 #include "macdef.h" /* to get a lot of macros */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 34 #include "custom.h" /* to get a lot of macros */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 35 #include "gsm.h" /* to get a lot of macros */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 36 #include "cnf_ppp.h" /* to get cnf-definitions */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 37 #include "mon_ppp.h" /* to get mon-definitions */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 38 #include "prim.h" /* to get the definitions of used SAP and directions */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 39 #include "dti.h" /* to get the DTILIB definitions */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 40 #include "ppp.h" /* to get the global entity definitions */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 41 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 42 #include "ppp_arbf.h" /* to get function interface from arb */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 43 #include <string.h> /* to get memcpy */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 44 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 45 /*==== CONST ================================================================*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 46 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 47 #define PAP_AUTH_ACK_LENGTH 5 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 48 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 49 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 50 * the authentication request packet must be passable to the ISP in protocol | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 51 * configuration options (pco). The maximum length of pco is | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 52 * 251 octets (253 - 2 (identification overhead) = 251). There must also be | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 53 * space for other protocol packet, like LCP and IPCP. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 54 * LCP needs | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 55 * 15 octets (3 (overhead pco) + 4 (overhead packet) + 4 (mru) + 4 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 56 * (authentication protocol PAP) = 15) for server packet and | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 57 * 11 octets (3 (overhead pco) + 4 (overhead packet) + 4 (mru) = 11) for | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 58 * client packet. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 59 * IPCP needs | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 60 * 31 octets (3 (overhead pco) + 4 (overhead packet) + 6 (IP address) + 6 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 61 * (VJ header compression) + 6 (primary DNS) + 6 (secondary DNS) = 31) for | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 62 * client packet and | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 63 * 13 octets (3 (overhead pco) + 4 (overhead packet) + 6 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 64 * (Gateway address) = 13) for gateway address packet. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 65 * PAP needs | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 66 * 3 octets for pco overhead. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 67 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 68 #define PAP_AUTH_REQ_LENGTH_MAX (251 - 15 - 11 - 31 - 13 - 3) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 69 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 70 #define PAP_AUTH_NAK_TEXT "authentication packet to long" | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 71 #define PAP_AUTH_NAK_TEXT_LENGTH sizeof(PAP_AUTH_NAK_TEXT) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 72 #define PAP_AUTH_NAK_LENGTH (5 + PAP_AUTH_NAK_TEXT_LENGTH) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 73 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 74 /*==== LOCAL VARS ===========================================================*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 75 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 76 /*==== PRIVATE FUNCTIONS ====================================================*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 77 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 78 /*==== PUBLIC FUNCTIONS =====================================================*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 79 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 80 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 81 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 82 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 83 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 84 | Function : pap_init | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 85 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 86 | Description : The function pap_init() initializes Password Authentication | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 87 | Protocol | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 88 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 89 | Parameters : no parameters | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 90 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 91 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 92 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 93 GLOBAL void pap_init () | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 94 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 95 TRACE_FUNCTION( "pap_init" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 96 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 97 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 98 * initialize values | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 99 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 100 ppp_data->pap.counter = 0; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 101 ppp_data->pap.nari = 0; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 102 ppp_data->pap.ar_packet = NULL; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 103 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 104 INIT_STATE( PPP_SERVICE_PAP , PAP_DOWN ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 105 } /* pap_init() */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 106 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 107 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 108 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 109 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 110 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 111 | Function : pap_fill_out_packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 112 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 113 | Description : The function pap_fill_out_packet() puts a PAP packet into | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 114 | the protocol configuration list | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 115 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 116 | Parameters : pco_buf - pco list buffer | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 117 | ptr_pos - position where to write the PAP packet, this value | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 118 | must get back to the calling funtion | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 119 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 120 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 121 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 122 GLOBAL void pap_fill_out_packet (UBYTE pco_buf[], USHORT* ptr_pos) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 123 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 124 USHORT pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 125 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 126 TRACE_FUNCTION( "pap_fill_out_packet" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 127 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 128 pos = *ptr_pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 129 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 130 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 131 * copy stored authentication request packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 132 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 133 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 134 * Protocol ID | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 135 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 136 pco_buf[pos] = PROTOCOL_PAP_MSB; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 137 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 138 pco_buf[pos] = PROTOCOL_PAP_LSB; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 139 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 140 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 141 * Length of Protocol contents | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 142 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 143 pco_buf[pos] = (UBYTE)ppp_data->pap.ar_packet->len; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 144 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 145 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 146 * copy packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 147 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 148 memcpy(&pco_buf[pos], | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 149 ppp_data->pap.ar_packet->buffer, | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 150 ppp_data->pap.ar_packet->len); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 151 pos+= ppp_data->pap.ar_packet->len; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 152 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 153 * return new position | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 154 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 155 *ptr_pos = pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 156 } /* pap_fill_out_packet() */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 157 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 158 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 159 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 160 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 161 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 162 | Function : pap_get_sar | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 163 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 164 | Description : The function pap_get_sar() returns a PAP Authenticate Request | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 165 | packet. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 166 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 167 | Parameters : ptr_packet - returns the Authenticate Request packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 168 | THE MEMORY FOR THE PACKET WILL BE ALLOCATED BY | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 169 | THIS FUNCTION | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 170 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 171 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 172 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 173 GLOBAL void pap_get_sar (T_desc2** ptr_packet) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 174 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 175 T_desc2* ret_desc; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 176 USHORT len_pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 177 USHORT pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 178 UBYTE i; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 179 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 180 TRACE_FUNCTION( "pap_get_sar" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 181 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 182 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 183 * Allocate the necessary size for the data descriptor. The size is | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 184 * calculated as follows: | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 185 * - take the size of a descriptor structure | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 186 * - subtract one because of the array buffer[1] to get the size of | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 187 * descriptor control information | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 188 * - add number of octets of descriptor data | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 189 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 190 MALLOC (ret_desc, (USHORT)(sizeof(T_desc2) - 1 + | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 191 5 + /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 192 * 1 octet code field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 193 * 1 octet identifier field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 194 * 2 octets packet length field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 195 * 1 octet peer id length field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 196 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 197 ppp_data->login.name_len + | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 198 1 + /* size of password length field */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 199 ppp_data->login.password_len)); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 200 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 201 * fill the packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 202 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 203 ret_desc->next = (ULONG)NULL; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 204 pos = 0; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 205 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 206 * Code field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 207 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 208 ret_desc->buffer[pos] = CODE_AUTH_REQ; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 209 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 210 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 211 * Identifier field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 212 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 213 ret_desc->buffer[pos] = ppp_data->pap.nari;/*lint !e415 (Warning -- access of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 214 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 215 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 216 * Length field (store the position) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 217 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 218 len_pos = pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 219 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 220 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 221 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 222 * authentication: peer-id and passwort | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 223 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 224 ret_desc->buffer[pos] = ppp_data->login.name_len;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 225 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 226 for (i = 0; i < ppp_data->login.name_len; i++) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 227 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 228 ret_desc->buffer[pos] = ppp_data->login.name[i];/*lint !e661 !e662 (Warning -- Possible access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 229 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 230 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 231 ret_desc->buffer[pos] = ppp_data->login.password_len;/*lint !e661 !e662 (Warning -- Possible access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 232 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 233 for (i = 0; i < ppp_data->login.password_len; i++) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 234 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 235 ret_desc->buffer[pos] = ppp_data->login.password[i];/*lint !e661 !e662 (Warning -- Possible access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 236 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 237 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 238 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 239 * insert packet length | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 240 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 241 ret_desc->len = pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 242 ret_desc->buffer[len_pos] = (UBYTE)(pos >> 8);/*lint !e661 !e662 (Warning -- Possible access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 243 len_pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 244 ret_desc->buffer[len_pos] = (UBYTE)(pos & 0x00ff);/*lint !e661 !e662 (Warning -- Possible access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 245 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 246 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 247 * return the created packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 248 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 249 *ptr_packet = ret_desc; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 250 } /* pap_get_sar() */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 251 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 252 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 253 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 254 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 255 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 256 | Function : pap_get_saa | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 257 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 258 | Description : The function pap_get_saa() returns a PAP Authenticate Ack | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 259 | packet. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 260 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 261 | Parameters : ptr_packet - returns the Authenticate Ack packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 262 | THE MEMORY FOR THE PACKET WILL BE ALLOCATED BY | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 263 | THIS FUNCTION | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 264 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 265 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 266 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 267 GLOBAL void pap_get_saa (T_desc2** ptr_packet) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 268 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 269 T_desc2* packet; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 270 USHORT pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 271 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 272 TRACE_FUNCTION( "pap_get_saa" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 273 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 274 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 275 * Allocate the necessary size for the data descriptor. The size is | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 276 * calculated as follows: | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 277 * - take the size of a descriptor structure | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 278 * - subtract one because of the array buffer[1] to get the size of | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 279 * descriptor control information | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 280 * - add number of octets of descriptor data | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 281 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 282 MALLOC (packet, (USHORT)(sizeof(T_desc2) - 1 + PAP_AUTH_ACK_LENGTH)); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 283 packet->len = PAP_AUTH_ACK_LENGTH; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 284 packet->next = (ULONG)NULL; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 285 pos = 0; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 286 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 287 * code field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 288 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 289 packet->buffer[pos] = CODE_AUTH_ACK; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 290 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 291 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 292 * identifier field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 293 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 294 packet->buffer[pos] = ppp_data->pap.nari;/*lint !e415 (Warning -- access of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 295 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 296 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 297 * length field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 298 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 299 packet->buffer[pos] = 0;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 300 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 301 packet->buffer[pos] = PAP_AUTH_ACK_LENGTH;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 302 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 303 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 304 * set Msg-Length field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 305 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 306 packet->buffer[pos] = 0;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 307 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 308 * return the created packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 309 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 310 *ptr_packet = packet; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 311 } /* pap_get_saa() */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 312 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 313 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 314 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 315 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 316 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 317 | Function : pap_rar | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 318 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 319 | Description : The function pap_rar() checks whether the given | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 320 | Authenticate Request packet is valid and if so it returns | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 321 | FORWARD_RARP and an Authentication Ack packet. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 322 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 323 | Parameters : ptr_packet - Authenticate Request packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 324 | forward - returns result of analysis | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 325 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 326 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 327 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 328 GLOBAL void pap_rar (T_desc2** ptr_packet, UBYTE* forward) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 329 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 330 T_desc2* packet; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 331 USHORT packet_len; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 332 USHORT pos; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 333 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 334 TRACE_FUNCTION( "pap_rar" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 335 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 336 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 337 * this packet can only reveiced in server mode | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 338 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 339 if(ppp_data->mode NEQ PPP_SERVER) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 340 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 341 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 342 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 343 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 344 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 345 * check correct length | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 346 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 347 packet = *ptr_packet; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 348 packet_len = packet->buffer[2];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 349 packet_len = packet_len << 8; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 350 packet_len+= packet->buffer[3];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 351 if((packet_len < 6) || (packet_len > packet->len)) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 352 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 353 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 354 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 355 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 356 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 357 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 358 * check consistence of length of packet and length of log on information | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 359 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 360 pos = 4; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 361 pos+= packet->buffer[pos];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 362 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 363 pos+= packet->buffer[pos]; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 364 pos++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 365 if(pos > packet_len) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 366 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 367 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 368 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 369 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 370 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 371 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 372 * store authentication packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 373 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 374 if(packet_len > PAP_AUTH_REQ_LENGTH_MAX) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 375 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 376 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 377 * create Authentication Nak | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 378 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 379 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 380 * change code field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 381 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 382 packet->buffer[0] = CODE_AUTH_NAK; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 383 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 384 * change length field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 385 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 386 packet->buffer[2] = 0;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 387 packet->buffer[3] = PAP_AUTH_NAK_LENGTH;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 388 packet->len = PAP_AUTH_NAK_LENGTH; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 389 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 390 * set Msg-Length field | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 391 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 392 packet->buffer[4] = PAP_AUTH_NAK_TEXT_LENGTH;/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 393 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 394 * fill out Message | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 395 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 396 memcpy(&packet->buffer[5], PAP_AUTH_NAK_TEXT, PAP_AUTH_NAK_TEXT_LENGTH);/*lint !e419 !e416 (Warning -- creation of out-of-bounds pointer, Apparent data overrun)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 397 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 398 * set return values | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 399 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 400 *forward = FORWARD_RARN; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 401 *ptr_packet = packet; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 402 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 403 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 404 arb_discard_packet(ppp_data->pap.ar_packet); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 405 ppp_data->pap.ar_packet = packet; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 406 ppp_data->pap.nari = packet->buffer[1];/*lint !e415 (Warning -- access of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 407 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 408 * create Authenticate Ack packet and | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 409 * set return values | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 410 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 411 pap_get_saa(ptr_packet); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 412 *forward = FORWARD_RARP; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 413 } /* pap_rar */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 414 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 415 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 416 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 417 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 418 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 419 | Function : pap_raa | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 420 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 421 | Description : The function pap_raa() checks whether the given | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 422 | Authenticate Ack packet is valid and if so it returns | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 423 | FORWARD_RAA. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 424 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 425 | Parameters : packet - Authenticate Ack packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 426 | forward - returns result of analysis | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 427 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 428 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 429 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 430 GLOBAL void pap_raa (T_desc2* packet, UBYTE* forward) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 431 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 432 USHORT packet_len; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 433 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 434 TRACE_FUNCTION( "pap_raa" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 435 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 436 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 437 * this packet can only reveiced in client mode | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 438 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 439 if(ppp_data->mode NEQ PPP_CLIENT) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 440 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 441 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 442 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 443 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 444 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 445 * check correct length | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 446 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 447 packet_len = packet->buffer[2];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 448 packet_len = packet_len << 8; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 449 packet_len+= packet->buffer[3];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 450 if((packet_len < 5) || (packet_len > packet->len)) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 451 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 452 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 453 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 454 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 455 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 456 if(packet->buffer[1] NEQ ppp_data->pap.nari)/*lint !e415 (Warning -- access of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 457 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 458 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 459 * invalid packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 460 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 461 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 462 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 463 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 464 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 465 * acceptable packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 466 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 467 arb_discard_packet(packet); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 468 ppp_data->pap.nari++; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 469 *forward = FORWARD_RAA; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 470 } /* pap_raa */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 471 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 472 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 473 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 474 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 475 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 476 | Function : pap_ran | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 477 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 478 | Description : The function pap_ran() checks whether the given | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 479 | Authenticate Nak packet is valid and if so it returns | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 480 | FORWARD_RAN. | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 481 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 482 | Parameters : packet - Authenticate Nak packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 483 | forward - returns result of analysis | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 484 | | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 485 +------------------------------------------------------------------------------ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 486 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 487 GLOBAL void pap_ran (T_desc2* packet, UBYTE* forward) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 488 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 489 USHORT packet_len; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 490 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 491 TRACE_FUNCTION( "pap_ran" ); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 492 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 493 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 494 * this packet can only reveiced in client mode | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 495 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 496 if(ppp_data->mode NEQ PPP_CLIENT) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 497 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 498 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 499 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 500 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 501 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 502 * check correct length | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 503 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 504 packet_len = packet->buffer[2];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 505 packet_len = packet_len << 8; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 506 packet_len+= packet->buffer[3];/*lint !e415 !e416 (Warning -- access/creation of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 507 if((packet_len < 5) || (packet_len > packet->len)) | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 508 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 509 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 510 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 511 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 512 | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 513 if(packet->buffer[1] NEQ ppp_data->pap.nari)/*lint !e415 (Warning -- access of out-of-bounds pointer)*/ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 514 { | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 515 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 516 * invalid packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 517 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 518 *forward = FORWARD_DISCARD; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 519 return; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 520 } | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 521 /* | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 522 * acceptable packet | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 523 */ | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 524 arb_discard_packet(packet); | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 525 *forward = FORWARD_RAN; | 
| 
d393cd9bb723
src/g23m-*: initial import from Magnetite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 526 } /* pap_ran */ | 
