The Internet Power Line Adapter - University of Queensland

Home Automation, Power Lines and the Internet Quenten Alick
#define WTIX 0x0f /* NPDU_Field Write with Index */
#define WRS46 0x46 /* DLL_Access_Control Write */
#define RRS4 0x84 /* DLL_Rc_Link_Status Read */
/*
* Access control flags
*/
#define ENABLE_AUTO_RETRY 0x80 /* bit in NIC
DLL_Access_Control structure */
#define ENABLE_IMMEDIATE_RETRY 0x40
#define ADRUNACK_TRIES_4 0x02
#define DELAY_100MS 0x10
#define DELAY_200MS 0x20
#define DELAY_300MS 0x30
/*
* ServiceISR transmit/receive state machine states
*/
#define ISR_IDLE 0
#define ISR_XMIT_LEN 1
#define ISR_XMIT_BUF 2
#define ISR_RCV_LEN 3
#define ISR_RCV_BUF 4
#define ISR_ATTN 5
#define packetReceived (LL.b2)
#define rawPacketReceived (LL.b3)
#define receivePacketPending (LL.b4)
#define receiveHeaderPending (LL.b5)
void ReadCommand (uint8 command, @near uint8*
rawData, uint8* length);
void WriteCommand(uint8 command, @near uint8*
rawData, uint8 length);
uint8 basicTransmitStatus;
uint8 ISRstate;
TRANS_BFR transBfr;
boolean delayTimerRunning;
uint8 delayTimer;
boolean UseWTI;
uint8 NICtype;
uint8 GetNICtype ( void )
{
/*
* ID values in "status read" info from NIC
*/
#define P200_ID 0x03
#define P300_ID 0x04
#define ID_MASK 0x0f
uint8 statusStore[6]; /* for "status read" info */
uint8 len; /* length of expected data */
/*
** execute "status read" command and set NICtype
accordingly
*/
ReadCommand(SR,statusStore,&len);
NICtype = UNKNOWN_NIC;
statusStore[5] &= ID_MASK;
if(statusStore[5] & P300_ID)
NICtype = P300;
return NICtype;
}
uint8 InitializeLL ( void )
{
uint8 save[2]; /* local store */
/*
* initialize flags
*/
- 58 -
UseDelay = FALSE;
delayTimerRunning = FALSE;
UseWTI = FALSE;
/*
* write current "config" to NIC
*/
WriteCommand(LW,&config.modeByte,sizeof(CONFIG));
/*
* ignore extended service CEBus packets
*/
save[0] = 0;
save[1] = IGNORE_EXTENDED;
WriteCommand(CW,save,2);
save[0] = ENABLE_AUTO_RETRY |
ENABLE_IMMEDIATE_RETRY | ADRUNACK_TRIES_4;
WriteCommand(WRS46,save,1);
/*
* Initialize logical link semaphores/flags
*/
basicTransmitStatus = IDLE;
TxBfrAvailable = TRUE;
RxBfrAvailable = TRUE;
receivePacketPending = FALSE;
receiveHeaderPending = FALSE;
packetReceived = FALSE;
rawPacketReceived = FALSE;
return TRUE;
}
boolean ReceivePacket ( void )
{
if(packetReceived) {
packetReceived = FALSE;
return TRUE;
} else {
return FALSE;
}
}
boolean ReceiveRawPacket ( void )
{
if(rawPacketReceived) {
rawPacketReceived = FALSE;
return TRUE;
} else {
return FALSE;
}
}
interrupt void ServiceISR( void )
{
/*
switch(ISRstate) {
case ISR_XMIT_LEN:
SPDR = transBfr.len;
while(!spif) ; /* wait for transfer complete */
ISRstate = ISR_XMIT_BUF; /* change state */
break;
case ISR_XMIT_BUF:
if(transBfr.index == transBfr.len) {
ISRstate = ISR_IDLE; /* done */
} else {
SPDR = transBfr.buf[transBfr.index];
transBfr.index++;
while(!spif) ; /* wait for transfer complete */