The Internet Power Line Adapter - University of Queensland

More documents

Recommendations

Info

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 */
Home Automation, Power Lines and the Internet Quenten Alick } break; /* * Read command: get length byte */ case ISR_RCV_LEN: SPDR = 0; while(!spif) ; /* wait for transfer complete */ transBfr.len = SPDR; ISRstate = ISR_RCV_BUF; /* change state */ break; case ISR_RCV_BUF: if(transBfr.index == transBfr.len) { ISRstate = ISR_IDLE; /* done */ } else { SPDR = 0; while(!spif) ; if (transBfr.len
Page 1 and 2:
The Internet Power Line Adapter by
Page 3 and 4:
Home Automation, Power Lines and th
Page 5 and 6:
Page 7 and 8:
Page 9 and 10:
Page 11 and 12:
Page 13 and 14: Home Automation, Power Lines and th
Page 43 and 44: Wall Module POWER SW3 J1 1 12 VAC V
Page 63: Home Automation, Power Lines and th
Page 69: Home Automation, Power Lines and th
show all

The Internet Power Line Adapter - University of Queensland

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?