int main(int argc, char *argv[])
{
WSADATA data;
int index;
DBG *d = dbg_init();
WSAStartup(MAKEWORD(2, 2), &data);
dbg_open_stream(d, stderr);
dbg_open_stream(d, stdout);
dbg_open_dummy(d);
index = dbg_open_net(d, "localhost", 8888);
dbg_open_file(d, "log.txt");
dbg_open_stream(d, stderr);
dbg_open_custom(d, WriteToMessageBox);
dbg_printf_raw(d, "Hello %s", "World");
dbg_hexdump_ascii(d, "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa", strlen("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"));
dbg_switch(d, 0);
dbg_hexdump(d, "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa", strlen("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"));
dbg_switch(d, 1);
dbg_hexdump_ascii(d, (const unsigned char *) d, sizeof(*d));
dbg_close(d);
return 0;
}
void ddramc_dump_regs(unsigned int base_address)
{
#if (BOOTSTRAP_DEBUG_LEVEL >= DEBUG_LOUD)
unsigned int size = 0x160;
dbg_info("\nDump DDRAMC Registers:\n");
dbg_hexdump((unsigned char *)base_address, size, DUMP_WIDTH_BIT_32);
#endif
}
static int load_1wire_info(unsigned char *buff, unsigned int size,
unsigned int *psn, unsigned int *prev)
{
board_info_t board_info;
board_info_t *bd_info = &board_info;
unsigned int count;
unsigned int parsing = 0;
int i;
memset(bd_info, 0, sizeof(*bd_info));
dbg_info("1-Wire: Loading 1-Wire information ...\n");
count = enumerate_all_rom();
if (!count) {
dbg_info("WARNING: 1-Wire: No 1-Wire chip found\n");
return -1;
}
dbg_info("1-Wire: BoardName | [Revid] | VendorName\n");
for (i = 0; i < count; i++) {
if (ds24xx_read_memory(i, 0, 0, size, buff) < 0) {
dbg_info("WARNING: 1-Wire: Failed to read from 1-Wire chip!\n");
return -1;
}
dbg_loud("board: #%d: ", i);
#if (BOOTSTRAP_DEBUG_LEVEL >= DEBUG_LOUD)
dbg_hexdump(buff, size, DUMP_WIDTH_BIT_8);
#endif
if (get_board_hw_info(buff, i, bd_info))
continue;
if (construct_sn_rev(bd_info, psn, prev))
continue;
parsing++;
}
if (!parsing)
return -1;
return 0;
}
static bytebuff_t *
paa_process(pana_session_t * pacs, bytebuff_t * datain) {
paa_ctx_t * ctx = pacs->ctx;
bytebuff_t * respData;
pana_packet_t * pkt_in = NULL;
pana_avp_node_t * tmpavplist = NULL;
pana_avp_t * tmp_avp;
if (datain != NULL) {
dbg_hexdump(PKT_RECVD, "Packet-contents:", bytebuff_data(datain), datain->used);
pkt_in = parse_pana_packet(datain);
if (pkt_in == NULL) {
dbg_printf(MSG_ERROR,"Packet is invalid");
clear_events();
return NULL;
}
}
#define RTX_COUNTER (ctx->rtx_timer.count)
#define RTX_MAX_NUM (cfg->rtx_max_count)
// ----------
// State: ANY
// ----------
// - - - - - - - - - - - - - (Re-transmissions)- - - - - - - - - -
// RTX_TIMEOUT && Retransmit(); (no change)
// RTX_COUNTER<
// RTX_MAX_NUM
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RTX_TIMEOUT && RTX_COUNTER < RTX_MAX_NUM) {
clear_events();
Retransmit(pacs);
}
// - - - - - - - (Reach maximum number of transmissions)- - - - - -
// (RTX_TIMEOUT && Disconnect(); CLOSED
// RTX_COUNTER>=
// RTX_MAX_NUM) ||
// SESS_TIMEOUT
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if ((RTX_TIMEOUT && RTX_COUNTER >= RTX_MAX_NUM) ||
SESS_TIMEOUT) {
clear_events();
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
}
if (PKT_RECVD) {
// -------------------------
// State: ANY except INITIAL
// -------------------------
// - - - - - - - - - - (liveness test initiated by peer)- - - - - -
// Rx:PNR[P] Tx:PNA[P](); (no change)
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (pacs->cstate != PAA_STATE_INITIAL) {
if (RX_PNR_P(pkt_in)) {
/* reset the event status */
clear_events();
TX_PNA_P(respData, NULL);
}
}
// -------------------------
// State: ANY except WAIT_PNA_PING
// -------------------------
// - - - - - - - - - - - - (liveness test response) - - - - - - - -
// Rx:PNA[P] None(); (no change)
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (pacs->cstate != PAA_STATE_WAIT_PNA_PING){
if (RX_PNA_P(pkt_in)) {
clear_events();
/* just discard the packet because it's not meant occur in this phase */
}
}
}
// -------------------------
// State: CLOSED
// -------------------------
// - - - - - - - -(Catch all event on closed state) - - - - - - - -
// ANY None(); CLOSED
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (pacs->cstate == PAA_STATE_CLOSED){
clear_events();
/* just discard the packet because it's not meant occur in this phase */
}
while(ctx->event_occured) {
switch (pacs->cstate) {
// ------------------------------
// State: INITIAL (Initial State)
// ------------------------------
case PAA_STATE_INITIAL:
// ------------------------+--------------------------+------------
// - - - - - - - - (PCI and PAA initiated PANA) - - - - - - - - -
// (Rx:PCI[] || if (OPTIMIZED_INIT == INITIAL
// PAC_FOUND) Set) {
// EAP_Restart();
// SessionTimerReStart
// (FAILED_SESS_TIMEOUT);
// }
// else {
// if (generate_pana_sa())
// Tx:PAR[S]("PRF-Algorithm",
// "Integrity-Algorithm");
// else
// Tx:PAR[S]();
// }
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PCI(pkt_in)) {
clear_events();
if (OPTIMIZED_INIT) {
EAP_Restart(pacs);
SessionTimerReStart(pacs, FAILED_SESS_TIMEOUT);
}
else {
if (generate_pana_sa()) {
tmpavplist = AVPLIST(PAVP_PRF_ALG,"Integrity-Algorithm");
TX_PAR_S(respData, tmpavplist);
}
else {
TX_PAR_S(respData, NULL);
}
}
pacs->cstate = PAA_STATE_INITIAL;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// EAP_REQUEST if (generate_pana_sa()) INITIAL
// Tx:PAR[S]("EAP-Payload",
// "PRF-Algorithm",
// "Integrity-Algorithm");
// else
// Tx:PAR[S]("EAP-Payload");
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_REQUEST) {
clear_events();
if (generate_pana_sa()) {
tmpavplist = AVPLIST(PAVP_EAP_PAYLOAD,PAVP_PRF_ALG,"Integrity-Algorithm");
TX_PAR_S(respData, tmpavplist);
}
else{
tmpavplist = AVPLIST(PAVP_EAP_PAYLOAD);
TX_PAR_S(respData, tmpavplist);
}
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_INITIAL;
}
// - - - - - - - - - - - - - - (PAN Handling) - - - - - - - - - -
// Rx:PAN[S] && if (PAN.exist_avp WAIT_EAP_MSG
// ((OPTIMIZED_INIT == ("EAP-Payload"))
// Unset) || TxEAP();
// PAN.exist_avp else {
// ("EAP-Payload")) EAP_Restart();
// SessionTimerReStart
// (FAILED_SESS_TIMEOUT);
// }
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (RX_PAN_S(pkt_in) &&
((!OPTIMIZED_INIT) || exists_avp(pkt_in, PAVP_EAP_PAYLOAD))) {
clear_events();
pacs->seq_rx = pkt_in->pp_seq_number;
tmp_avp = get_vend_avp_by_code(pkt_in->pp_avp_list, PAVP_PEER_MACADDR,
PANA_VENDOR_UPB, AVP_GET_FIRST);
if (tmp_avp) {
memcpy(ctx->peer_macaddr, tmp_avp->avp_value, MACADDR_LEN);
}
if (exists_avp(pkt_in, PAVP_EAP_PAYLOAD)) {
TxEAP(pacs, pkt_in);
}
else {
EAP_Restart(pacs);
SessionTimerReStart(pacs, FAILED_SESS_TIMEOUT);
}
pacs->cstate = PAA_STATE_WAIT_EAP_MSG;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Rx:PAN[S] && None(); WAIT_PAN_OR_PAR
// (OPTIMIZED_INIT ==
// Set) &&
// ! PAN.exist_avp
// ("EAP-Payload")
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (RX_PAN_S(pkt_in) &&(OPTIMIZED_INIT) &&
!exists_avp(pkt_in, PAVP_EAP_PAYLOAD)) {
clear_events();
pacs->seq_rx = pkt_in->pp_seq_number;
// None();
pacs->cstate = PAA_STATE_WAIT_PAN_OR_PAR;
} break;
// -------------------
// State: WAIT_EAP_MSG
// -------------------
case PAA_STATE_WAIT_EAP_MSG:
// - - - - - - - - - - - -(Receiving EAP-Request)- - - - - - - - -
// EAP_REQUEST if (NONCE_SENT==Unset) { WAIT_PAN_OR_PAR
// Tx:PAR[]("Nonce",
// "EAP-Payload");
// NONCE_SENT=Set;
// }
// else
// Tx:PAR[]("EAP-Payload");
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (EAP_REQUEST) {
clear_events();
if (!NONCE_SENT) {
tmpavplist = AVPLIST(PAVP_NONCE, PAVP_EAP_PAYLOAD);
TX_PAR(respData, tmpavplist);
NONCE_SENT_Set();
}
else {
tmpavplist = AVPLIST(PAVP_EAP_PAYLOAD);
TX_PAR(respData, tmpavplist);
}
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_WAIT_PAN_OR_PAR;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// - - - - - - - - - - -(Receiving EAP-Success/Failure) - - - - -
// EAP_FAILURE PAR.RESULT_CODE = WAIT_FAIL_PAN
// PANA_AUTHENTICATION_
// REJECTED;
// Tx:PAR[C]("EAP-Payload");
// RtxTimerStart();
// SessionTimerStop();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_FAILURE) {
clear_events();
tmpavplist = AVPLIST(PAVP_RESULT_AUTHENTICATION_REJECTED,
PAVP_EAP_PAYLOAD);
TX_PAR_C(respData, tmpavplist);
RtxTimerStart(pacs, respData);
SessionTimerStop(pacs);
pacs->cstate = PAA_STATE_WAIT_FAIL_PAN;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// EAP_SUCCESS && PAR.RESULT_CODE = WAIT_SUCC_PAN
// Authorize() PANA_SUCCESS;
// if (new_key_available())
// Tx:PAR[C]("EAP-Payload",
// "Key-Id");
// else
// Tx:PAR[C]("EAP-Payload");
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_SUCCESS && Authorize(pacs)) {
clear_events();
if (new_key_available()) {
tmpavplist = AVPLIST(PAVP_RESULT_SUCCESS,
PAVP_EAP_PAYLOAD,"Key-Id");
TX_PAR_C(respData, tmpavplist);
} else{
tmpavplist = AVPLIST(PAVP_RESULT_SUCCESS, PAVP_EAP_PAYLOAD);
TX_PAR_C(respData, tmpavplist);}
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_WAIT_SUCC_PAN;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// EAP_SUCCESS && PAR.RESULT_CODE = WAIT_FAIL_PAN
// !Authorize() PANA_AUTHORIZATION_
// REJECTED;
// if (new_key_available())
// Tx:PAR[C]("EAP-Payload",
// "Key-Id");
// else
// Tx:PAR[C]("EAP-Payload");
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_SUCCESS && !Authorize(pacs)) {
clear_events();
if (new_key_available()) {
tmpavplist = AVPLIST(PAVP_RESULT_AUTHORIZATION_REJECTED ,PAVP_EAP_PAYLOAD,"Key-Id");
TX_PAR_C(respData, tmpavplist);
}else{
tmpavplist = AVPLIST(PAVP_RESULT_AUTHORIZATION_REJECTED, PAVP_EAP_PAYLOAD);
TX_PAR_C(respData, tmpavplist);
}
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_WAIT_FAIL_PAN;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// - - - - - (Receiving EAP-Timeout or invalid message) - - - - -
// EAP_TIMEOUT || SessionTimerStop(); CLOSED
// EAP_DISCARD Disconnect();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_TIMEOUT || EAP_DISCARD) {
clear_events();
SessionTimerStop(pacs);
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
} break;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// --------------------
// State: WAIT_SUCC_PAN
// --------------------
case PAA_STATE_WAIT_SUCC_PAN:
// - - - - - - - - - - - - - (PAN Processing)- - - - - - - - - - -
// Rx:PAN[C] RtxTimerStop(); OPEN
// SessionTimerReStart
// (LIFETIME_SESS_TIMEOUT);
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PAN_C(pkt_in)) {
clear_events();
RtxTimerStop(pacs);
SessionTimerReStart(pacs, LIFETIME_SESS_TIMEOUT);
pacs->cstate = PAA_STATE_OPEN;
} break;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// --------------------
// State: WAIT_FAIL_PAN
// --------------------
case PAA_STATE_WAIT_FAIL_PAN:
// - - - - - - - - - - - - - - (PAN Processing)- - - - - - - - - -
// Rx:PAN[C] RtxTimerStop(); CLOSED
// Disconnect();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PAN_C(pkt_in)) {
clear_events();
RtxTimerStop(pacs);
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
} break;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// -----------
// State: OPEN
// -----------
case PAA_STATE_OPEN:
// - - - - - - - - (re-authentication initiated by PaC) - - - - - -
// Rx:PNR[A] NONCE_SENT=Unset; WAIT_EAP_MSG
// EAP_Restart();
// Tx:PNA[A]();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PNR_A(pkt_in)) {
clear_events();
NONCE_SENT_Unset();
EAP_Restart(pacs);
TX_PNA_A(respData, NULL);
pacs->cstate = PAA_STATE_WAIT_EAP_MSG;
}
// - - - - - - - - (re-authentication initiated by PAA)- - - - - -
// REAUTH || NONCE_SENT=Unset; WAIT_EAP_MSG
// REAUTH_TIMEOUT EAP_Restart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/* will require the PaC to reauth */
else if (REAUTH ) {
clear_events();
NONCE_SENT_Unset();
EAP_Restart(pacs);
pacs->cstate = PAA_STATE_WAIT_EAP_MSG;
}
// - - (liveness test based on PNR-PNA exchange initiated by PAA)-
// PANA_PING Tx:PNR[P](); WAIT_PNA_PING
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (PANA_PING) {
clear_events();
TX_PNR_P(respData, NULL);
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_WAIT_PNA_PING;
}
// - - - - - - - - (Session termination initated from PAA) - - - -
// TERMINATE Tx:PTR[](); SESS_TERM
// SessionTimerStop();
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (TERMINATE) {
clear_events();
TX_PTR(respData, NULL);
SessionTimerStop(pacs);
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_SESS_TERM;
}
// - - - - - - - - (Session termination initated from PaC) - - - -
// Rx:PTR[] Tx:PTA[](); CLOSED
// SessionTimerStop();
// Disconnect();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (RX_PTR(pkt_in)) {
clear_events();
TX_PTA(respData, NULL);
SessionTimerStop(pacs);
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
} break;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// --------------------
// State: WAIT_PNA_PING
// --------------------
case PAA_STATE_WAIT_PNA_PING:
// - - - - - - - - - - - - - -(PNA processing) - - - - - - - - - -
// Rx:PNA[P] RtxTimerStop(); OPEN
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PNA_P(pkt_in)) {
clear_events();
RtxTimerStop(pacs);
pacs->cstate = PAA_STATE_OPEN;
}
// - - - - - - - - (re-authentication initiated by PaC) - - - - - -
// Rx:PNR[A] RtxTimerStop(); WAIT_EAP_MSG
// NONCE_SENT=Unset;
// EAP_Restart();
// Tx:PNA[A]();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (RX_PNR_A(pkt_in)) {
clear_events();
RtxTimerStop(pacs);
NONCE_SENT_Unset();
EAP_Restart(pacs);
TX_PNA_A(respData, NULL);
pacs->cstate = PAA_STATE_WAIT_EAP_MSG;
}
// - - - - - - - - (Session termination initated from PaC) - - - -
// Rx:PTR[] RtxTimerStop(); CLOSED
// Tx:PTA[]();
// SessionTimerStop();
// Disconnect();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if ( RX_PTR(pkt_in)) {
clear_events();
RtxTimerStop(pacs);
TX_PTA(respData, NULL);
SessionTimerStop(pacs);
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
} break;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// ----------------------
// State: WAIT_PAN_OR_PAR
// ----------------------
case PAA_STATE_WAIT_PAN_OR_PAR:
// - - - - - - - - - - - - - (PAR Processing)- - - - - - - - - - -
// Rx:PAR[] TxEAP(); WAIT_EAP_MSG
// RtxTimerStop();
// Tx:PAN[]();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PAR(pkt_in)) {
clear_events();
TxEAP(pacs, pkt_in);
RtxTimerStop(pacs);
TX_PAN(respData, NULL);
pacs->cstate = PAA_STATE_WAIT_EAP_MSG;
}
// - - - - - - (Pass EAP Response to the EAP authenticator)- - - -
// Rx:PAN[] && TxEAP(); WAIT_EAP_MSG
// PAN.exist_avp RtxTimerStop();
// ("EAP-Payload")
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (RX_PAN(pkt_in) && exists_avp(pkt_in, PAVP_EAP_PAYLOAD)) {
clear_events();
TxEAP(pacs, pkt_in);
RtxTimerStop(pacs);
pacs->cstate = PAA_STATE_WAIT_EAP_MSG;
}
// - - - - - - - - - - (PAN without an EAP response) - - - - - - -
// Rx:PAN[] && RtxTimerStop(); WAIT_PAN_OR_PAR
// !PAN.exist_avp
// ("EAP-Payload")
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (RX_PAN(pkt_in) && !exists_avp(pkt_in, PAVP_EAP_PAYLOAD)) {
clear_events();
RtxTimerStop(pacs);
pacs->cstate = PAA_STATE_WAIT_PAN_OR_PAR;
}
// - - - - - - - - - - - -(EAP retransmission) - - - - - - - - - -
// EAP_REQUEST RtxTimerStop(); WAIT_PAN_OR_PAR
// Tx:PAR[]("EAP-Payload");
// RtxTimerStart();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_REQUEST) {
clear_events();
RtxTimerStop(pacs);
tmpavplist = AVPLIST(PAVP_EAP_PAYLOAD);
TX_PAR(respData, tmpavplist);
RtxTimerStart(pacs, respData);
pacs->cstate = PAA_STATE_WAIT_PAN_OR_PAR;
}
// - - - - - - - (EAP authentication timeout or failure)- - - - -
// EAP_FAILURE || RtxTimerStop(); CLOSED
// EAP_TIMEOUT || SessionTimerStop();
// EAP_DISCARD Disconnect();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
else if (EAP_FAILURE || EAP_TIMEOUT ||EAP_DISCARD ) {
clear_events();
RtxTimerStop(pacs);
SessionTimerStop(pacs);
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
} break;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// ----------------
// State: SESS_TERM
// ----------------
case PAA_STATE_SESS_TERM:
// - - - - - - - - - - - - - -(PTA processing) - - - - - - - - - -
// Rx:PTA[] RtxTimerStop(); CLOSED
// Disconnect();
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (RX_PTA(pkt_in)) {
clear_events();
RtxTimerStop(pacs);
Disconnect(pacs);
pacs->cstate = PAA_STATE_CLOSED;
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/* End switch */
}
}
if (respData == NULL) {
return NULL;
}
dbgi_asciihexdump(respData,"replycontents:",bytebuff_data(respData), respData->used);
return respData;
}
static pana_avp_list_t paa_avplist_create(pana_session_t * pacs, uint32_t AVP, ...) {
va_list ap;
pana_avp_codes_t reqAVP = AVP;
pana_avp_t * tmp_avp = NULL;
paa_ctx_t * ctx = NULL;
pana_avp_list_t tmpavplist = NULL;
uint8_t * tmpval = NULL;
if (!pacs) {
return NULL;
}
ctx=pacs->ctx;
if(!ctx) {
return NULL;
}
va_start(ap,AVP);
do {
switch (reqAVP & 0xffff) {
case PAVP_NONCE:
if (pacs->sa == NULL) {
break;
}
if (os_get_random(pacs->sa->PaC_nonce,
sizeof(pacs->sa->PaC_nonce)) < 0) {
DEBUG("Nonce couldn't be generated");
}
dbg_hexdump(MSG_SEC, "Generated Nonce contents",
pacs->sa->PaC_nonce, sizeof(pacs->sa->PaC_nonce));
tmp_avp = create_avp(PAVP_NONCE, FAVP_FLAG_CLEARED, 0,
pacs->sa->PaC_nonce, sizeof(pacs->sa->PaC_nonce));
tmpavplist = avp_list_insert(tmpavplist, avp_node_create(tmp_avp));
break;
case PAVP_EAP_PAYLOAD:
if (ctx->eap_resp_payload == NULL) {
break;
}
tmp_avp = create_avp(PAVP_EAP_PAYLOAD, FAVP_FLAG_CLEARED, 0,
bytebuff_data(ctx->eap_resp_payload),
ctx->eap_resp_payload->used);
tmpavplist = avp_list_insert(tmpavplist, avp_node_create(tmp_avp));
break;
case PAVP_RESULT_CODE:
tmpval = szalloc(uint32_t);
buff_insert_be32(tmpval, (reqAVP >> 16) & 0xffff);
tmp_avp = create_avp(PAVP_RESULT_CODE, FAVP_FLAG_CLEARED, 0,
tmpval, sizeof(uint32_t));
tmpavplist = avp_list_insert(tmpavplist, avp_node_create(tmp_avp));
break;
}
reqAVP = va_arg(ap, pana_avp_codes_t);
} while (reqAVP != PAVP_NULL);
va_end(ap);
return tmpavplist;
}
