/*****************************************************************************
*
* Copyright (c) 1995 Microsoft Corporation
*
* File: irlaplog.c
*
* Description: IRLAP state machine logging and errors
*
* Author: mbert
*
* Date: 4/15/95
*
*/
#include <irda.h>
#include <irdalink.h>
#include <irlap.h>
#include <irlapp.h>
#include <irlaplog.h>
#include <decdirda.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#define _IRLAPLOG_C_
#ifdef DEBUG
TCHAR *DecodeIRDA(int *pFrameType,// returned frame type (-1=bad frame)
BYTE *pFrameBuf, // pointer to buffer containing IRLAP frame
UINT FrameLen, // length of buffer
TCHAR *pOutStr, // string where decoded packet is placed
UINT DecodeLayer,// 1,LAP only, 2 LAP/LMP, 3, LAP/LMP/TTP
BOOL fNoConnAddr,// TRUE->Don't show connection address in str
int DispMode )
{
*pOutStr = TEXT('\0');
return pOutStr;
}
TCHAR _ABuf[512];
#ifndef PEG
TCHAR _DecodeStr1[1000];
TCHAR _DecodeStr2[1000];
#else
TCHAR _DecodeStr1[] = TEXT("(null)");
TCHAR _DecodeStr2[] = TEXT("(null)");
#endif
int _FrameType;
int ActCnt[10];
int vNestedEvent = 0;
// Keep in sync with IRLAP_STATE in irlap.h
TCHAR *IRLAP_StateStr[] = {
TEXT("NDM"),
TEXT("DSCV_MEDIA_SENSE"),
TEXT("DSCV_QUERY"),
TEXT("DSCV_REPLY"),
TEXT("CONN_MEDIA_SENSE"),
TEXT("SNRM_SENT"),
TEXT("BACKOFF_WAIT"),
TEXT("SNRM_RECEIVED"),
TEXT("P_XMIT"),
TEXT("P_RECV"),
TEXT("P_DISCONNECT_PEND"),
TEXT("P_CLOSE"),
TEXT("S_NRM"),
TEXT("S_DISCONNECT_PEND"),
TEXT("S_ERROR"),
TEXT("S_CLOSE")
};
// Keep in sync with IRDA_SERVICE_PRIM in irda.h
TCHAR *IRDA_PrimStr[] =
{
TEXT("MAC_DATA_REQ"),
TEXT("MAC_DATA_IND"),
TEXT("MAC_CONTROL_REQ"),
TEXT("MAC_CONTROL_CONF"),
TEXT("IRLAP_DISCOVERY_REQ"),
TEXT("IRLAP_DISCOVERY_IND"),
TEXT("IRLAP_DISCOVERY_CONF"),
TEXT("IRLAP_CONNECT_REQ"),
TEXT("IRLAP_CONNECT_IND"),
TEXT("IRLAP_CONNECT_RESP"),
TEXT("IRLAP_CONNECT_CONF"),
TEXT("IRLAP_DISCONNECT_REQ"),
TEXT("IRLAP_DISCONNECT_IND"),
TEXT("IRLAP_DATA_REQ"),
TEXT("IRLAP_DATA_IND"),
TEXT("IRLAP_DATA_CONF"),
TEXT("IRLAP_UDATA_REQ"),
TEXT("IRLAP_UDATA_IND"),
TEXT("IRLAP_UDATA_CONF"),
TEXT("IRLAP_STATUS_IND"),
TEXT("IRLAP_FLOWON_REQ"),
TEXT("IRLAP_FLOWON_IND")
TEXT("IRLMP_DISCOVERY_REQ"),
TEXT("IRLMP_DISCOVERY_CONF"),
TEXT("IRLMP_CONNECT_REQ"),
TEXT("IRLMP_CONNECT_IND"),
TEXT("IRLMP_CONNECT_RESP"),
TEXT("IRLMP_CONNECT_CONF"),
TEXT("IRLMP_DISCONNECT_REQ"),
TEXT("IRLMP_DISCONNECT_IND"),
TEXT("IRLMP_DATA_REQ"),
TEXT("IRLMP_DATA_IND"),
TEXT("IRLMP_DATA_CONF"),
TEXT("IRLMP_UDATA_REQ"),
TEXT("IRLMP_UDATA_IND"),
TEXT("IRLMP_UDATA_CONF"),
TEXT("IRLMP_ACCESSMODE_REQ"),
TEXT("IRLMP_ACCESSMODE_IND"),
TEXT("IRLMP_ACCESSMODE_CONF"),
TEXT("IRLMP_FLOWON_REQ"),
TEXT("IRLMP_FLOWON_IND")
};
// keep in sync with IRDA_ServiceStatus in irda.h
TCHAR *IRDA_StatStr[] =
{
TEXT(" - MEDIA_BUSY"),
TEXT(" - MEDIA_CLEAR"),
TEXT(" - DISCOVERY_COLLISION"),
TEXT(" - REMOTE_DISCOVERY_IN_PROGRESS"),
TEXT(" - REMOTE_CONNECT_IN_PROGRSS"),
TEXT(" - DISCOVERY_COMPLETED"),
TEXT(" - REMOTE_CONNECTION_IN_PROGRESS"),
TEXT(" - CONNECTION_COMPLETED"),
TEXT(" - REMOTE_INITIATED"),
TEXT(" - PRIMARY_CONFLICT"),
TEXT(" - DISCONNECT_COMPLETE"),
TEXT(" - NO_RESPONSE"),
TEXT(" - IRLAP_DECLINE_RESET"),
TEXT(" - DATA_REQUEST_COMPLETED"),
TEXT(" - DATA_REQUEST_FAILED_LINK_RESET"),
TEXT(" - DATA_REQUEST_FAILED_REMOTE_BUSY")
};
// Keep in sync with MAC_CONTROL_OPERATION in irda.h
TCHAR *MAC_OpStr[] =
{
TEXT("initialize link"),
TEXT("shutdown link"),
TEXT("reconfig link"),
TEXT("media sense")
};
TCHAR
*FrameToStr(IRDA_MSG *pMsg)
{
#ifndef PEG
BYTE *ptr;
int i = 0;
int j;
TCHAR *pD1 = _DecodeStr1;
TCHAR *pD2 = _DecodeStr2;
// copy the frame to a contiguous buffer
ptr = pMsg->IRDA_MSG_pHdrRead;
while (ptr != pMsg->IRDA_MSG_pHdrWrite)
{
_ABuf[i++] = *ptr++;
}
ptr = pMsg->IRDA_MSG_pRead;
while (ptr != pMsg->IRDA_MSG_pWrite)
{
_ABuf[i++] = *ptr++;
}
DecodeIRDA(&_FrameType, (char *)_ABuf, i, _DecodeStr1, 2, FALSE, 1);
// insert spaces and break-up into multiple lines
i = 0;
do
{
if (i++%69 == 0)
{
*pD2++ = TEXT('\r');
*pD2++ = TEXT('\n');
for (j = 0; j<7;j++)
{
*pD2++ = TEXT(' ');
}
}
*pD2++ = *pD1++;
} while (*pD1 != TEXT('\0'));
*pD2 = TEXT('\0');
#endif
return (_DecodeStr2);
}
void
IRLAP_EventLogStart(PIRLAP_CB pIrlapCb, TCHAR *pFormat, ...)
{
va_list ArgList;
va_start (ArgList, pFormat);
if (++vNestedEvent == 1)
{
DEBUGMSG(DBG_IRLAPLOG, (TEXT("----------------\r\n")));
}
else
{
DEBUGMSG(DBG_IRLAPLOG, (TEXT("!!!!!!!!!!!!!!!!\r\n")));
}
DEBUGMSG(DBG_IRLAPLOG, (TEXT("Ev%d: "), vNestedEvent));
ActCnt[vNestedEvent] = 0;
vsprintf(_ABuf, pFormat, ArgList);
DEBUGMSG(DBG_IRLAPLOG, (_ABuf));
DEBUGMSG(DBG_IRLAPLOG, (TEXT("\r\nStart State: %s\r\nActions:\r\n"),
IRLAP_StateStr[pIrlapCb->State]));
va_end (ArgList);
}
void __cdecl
IRLAP_LogAction(PIRLAP_CB pIrlapCb, TCHAR *pFormat, ...)
{
va_list ArgList;
va_start (ArgList, pFormat);
DEBUGMSG(DBG_IRLAPLOG, (TEXT(" %d. "), ++ActCnt[vNestedEvent]));
vsprintf(_ABuf, pFormat, ArgList);
DEBUGMSG(DBG_IRLAPLOG, (_ABuf));
DEBUGMSG(DBG_IRLAPLOG, (TEXT("\n")));
va_end (ArgList);
}
#define PRINT_IF_TRUE(bool, str) (bool == TRUE ? str : TEXT(""))
void
IRLAP_EventLogComplete(PIRLAP_CB pIrlapCb)
{
DEBUGMSG(DBG_IRLAPLOG,
(TEXT("Vs=%d Vr=%d RxWin(%d,%d) TxWin(%d,%d) TxListLen=%d\r\n"),
pIrlapCb->Vs, pIrlapCb->Vr,
pIrlapCb->RxWin.Start, pIrlapCb->RxWin.End,
pIrlapCb->TxWin.Start, pIrlapCb->TxWin.End,
pIrlapCb->TxMsgList.Len));
DEBUGMSG(DBG_IRLAPLOG, (TEXT("Ev%d End St: %s\r\n"),
vNestedEvent--, IRLAP_StateStr[pIrlapCb->State]));
if (vNestedEvent > 0)
{
DEBUGMSG(DBG_IRLAPLOG, (TEXT("!!!!!!!!!!!!!!!!\r\n")));
}
}
#endif
