1 /* Copyright (C) 2014-2015 by Jacob Alexander
3 * This file is free software: you can redistribute it and/or modify
4 * it under the terms of the GNU General Public License as published by
5 * the Free Software Foundation, either version 3 of the License, or
6 * (at your option) any later version.
8 * This file is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
13 * You should have received a copy of the GNU General Public License
14 * along with this file. If not, see <http://www.gnu.org/licenses/>.
17 // ----- Includes -----
20 #include <Lib/ScanLib.h>
32 // ----- Defines -----
34 #define I2C_TxBufferLength 300
35 #define I2C_RxBufferLength 8
37 #define LED_BufferLength 144
40 // ----- Structs -----
42 typedef struct I2C_Buffer {
50 typedef struct LED_Buffer {
51 uint8_t buffer[LED_BufferLength];
56 // ----- Function Declarations -----
59 void cliFunc_echo( char* args );
60 void cliFunc_i2cRecv( char* args );
61 void cliFunc_i2cSend( char* args );
62 void cliFunc_ledTest( char* args );
63 void cliFunc_ledZero( char* args );
65 uint8_t I2C_TxBufferPop();
66 void I2C_BufferPush( uint8_t byte, I2C_Buffer *buffer );
67 uint16_t I2C_BufferLen( I2C_Buffer *buffer );
68 uint8_t I2C_Send( uint8_t *data, uint8_t sendLen, uint8_t recvLen );
72 // ----- Variables -----
74 // Scan Module command dictionary
75 CLIDict_Entry( i2cRecv, "Send I2C sequence of bytes and expect a reply of 1 byte on the last sequence." NL "\t\tUse |'s to split sequences with a stop." );
76 CLIDict_Entry( i2cSend, "Send I2C sequence of bytes. Use |'s to split sequences with a stop." );
77 CLIDict_Entry( ledTest, "Test out the led pages." );
78 CLIDict_Entry( ledZero, "Zero out LED register pages (non-configuration)." );
80 CLIDict_Def( ledCLIDict, "ISSI LED Module Commands" ) = {
81 CLIDict_Item( i2cRecv ),
82 CLIDict_Item( i2cSend ),
83 CLIDict_Item( ledTest ),
84 CLIDict_Item( ledZero ),
85 { 0, 0, 0 } // Null entry for dictionary end
90 // Before sending the sequence, I2C_TxBuffer_CurLen is assigned and as each byte is sent, it is decremented
91 // Once I2C_TxBuffer_CurLen reaches zero, a STOP on the I2C bus is sent
92 volatile uint8_t I2C_TxBufferPtr[ I2C_TxBufferLength ];
93 volatile uint8_t I2C_RxBufferPtr[ I2C_TxBufferLength ];
95 volatile I2C_Buffer I2C_TxBuffer = { 0, 0, 0, I2C_TxBufferLength, (uint8_t*)I2C_TxBufferPtr };
96 volatile I2C_Buffer I2C_RxBuffer = { 0, 0, 0, I2C_RxBufferLength, (uint8_t*)I2C_RxBufferPtr };
98 LED_Buffer LED_pageBuffer;
100 // A bit mask determining which LEDs are enabled in the ISSI chip
102 const uint8_t LED_ledEnableMask[] = {
104 0x00, // Starting register address
105 0xFF, 0xFF, // C1-1 -> C1-16
106 0xFF, 0xFF, // C2-1 -> C2-16
107 0xFF, 0xFF, // C3-1 -> C3-16
108 0xFF, 0xFF, // C4-1 -> C4-16
109 0xFF, 0xFF, // C5-1 -> C5-16
110 0xFF, 0xFF, // C6-1 -> C6-16
111 0xFF, 0xFF, // C7-1 -> C7-16
112 0xFF, 0xFF, // C8-1 -> C8-16
113 0xFF, 0xFF, // C9-1 -> C9-16
116 // XXX Pre-fill example of buffers
117 const uint8_t examplePage[] = {
119 0x24, // Starting register address
120 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F, // C1-1 -> C1-16
121 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F, // C2-1 -> C2-16
122 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F, // C3-1 -> C3-16
123 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F, // C4-1 -> C4-16
124 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F, // C5-1 -> C5-16
125 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5A, 0x5B, 0x5C, 0x5D, 0x5E, 0x5F, // C6-1 -> C6-16
126 0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F, // C7-1 -> C7-16
127 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, 0x7F, // C8-1 -> C8-16
128 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, 0x8F, // C9-1 -> C9-16
133 // ----- Interrupt Functions -----
137 cli(); // Disable Interrupts
139 uint8_t status = I2C0_S; // Read I2C Bus status
141 // Master Mode Transmit
142 if ( I2C0_C1 & I2C_C1_TX )
144 // Check current use of the I2C bus
145 // Currently sending data
146 if ( I2C_TxBuffer.sequencePos > 0 )
148 // Make sure slave sent an ACK
149 if ( status & I2C_S_RXAK )
151 // NACK Detected, disable interrupt
152 erro_print("I2C NAK detected...");
153 I2C0_C1 = I2C_C1_IICEN;
156 I2C_TxBuffer.head = 0;
157 I2C_TxBuffer.tail = 0;
158 I2C_TxBuffer.sequencePos = 0;
163 I2C0_D = I2C_TxBufferPop();
167 else if ( I2C_RxBuffer.sequencePos > 0 )
169 // Master Receive, addr sent
170 if ( status & I2C_S_ARBL )
173 erro_print("Arbitration lost...");
176 I2C0_C1 = I2C_C1_IICEN;
177 I2C0_S = I2C_S_ARBL | I2C_S_IICIF; // Clear ARBL flag and interrupt
179 if ( status & I2C_S_RXAK )
181 // Slave Address NACK Detected, disable interrupt
182 erro_print("Slave Address I2C NAK detected...");
185 I2C0_C1 = I2C_C1_IICEN;
189 dbug_print("Attempting to read byte");
190 I2C0_C1 = I2C_RxBuffer.sequencePos == 1
191 ? I2C_C1_IICEN | I2C_C1_IICIE | I2C_C1_MST | I2C_C1_TXAK // Single byte read
192 : I2C_C1_IICEN | I2C_C1_IICIE | I2C_C1_MST; // Multi-byte read
199 printHex( I2C_BufferLen( (I2C_Buffer*)&I2C_TxBuffer ) );
203 // Delay around STOP to make sure it actually happens...
204 delayMicroseconds( 1 );
205 I2C0_C1 = I2C_C1_IICEN; // Send STOP
206 delayMicroseconds( 7 );
208 // If there is another sequence, start sending
209 if ( I2C_BufferLen( (I2C_Buffer*)&I2C_TxBuffer ) < I2C_TxBuffer.size )
211 // Clear status flags
212 I2C0_S = I2C_S_IICIF | I2C_S_ARBL;
214 // Wait...till the master dies
215 while ( I2C0_S & I2C_S_BUSY );
217 // Enable I2C interrupt
218 I2C0_C1 = I2C_C1_IICEN | I2C_C1_IICIE | I2C_C1_MST | I2C_C1_TX;
221 I2C0_D = I2C_TxBufferPop();
225 // Master Mode Receive
228 // XXX Do we need to handle 2nd last byte?
229 //I2C0_C1 = I2C_C1_IICEN | I2C_C1_IICIE | I2C_C1_MST | I2C_C1_TXAK; // No STOP, Rx, NAK on recv
232 if ( I2C_TxBuffer.sequencePos <= 1 )
235 I2C0_C1 = I2C_C1_IICEN | I2C_C1_MST | I2C_C1_TX;
238 I2C_BufferPush( I2C0_D, (I2C_Buffer*)&I2C_RxBuffer );
240 delayMicroseconds( 1 ); // Should be enough time before issuing the stop
241 I2C0_C1 = I2C_C1_IICEN; // Send STOP
246 I2C_BufferPush( I2C0_D, (I2C_Buffer*)&I2C_RxBuffer );
250 I2C0_S = I2C_S_IICIF; // Clear interrupt
252 sei(); // Re-enable Interrupts
257 // ----- Functions -----
259 inline void I2C_setup()
261 // Enable I2C internal clock
262 SIM_SCGC4 |= SIM_SCGC4_I2C0; // Bus 0
264 // External pull-up resistor
265 PORTB_PCR0 = PORT_PCR_ODE | PORT_PCR_SRE | PORT_PCR_DSE | PORT_PCR_MUX(2);
266 PORTB_PCR1 = PORT_PCR_ODE | PORT_PCR_SRE | PORT_PCR_DSE | PORT_PCR_MUX(2);
268 // SCL Frequency Divider
269 // 400kHz -> 120 (0x85) @ 48 MHz F_BUS
272 I2C0_C1 = I2C_C1_IICEN;
273 I2C0_C2 = I2C_C2_HDRS; // High drive select
276 // Enable I2C Interrupt
277 NVIC_ENABLE_IRQ( IRQ_I2C0 );
280 void LED_zeroPages( uint8_t startPage, uint8_t numPages, uint8_t startReg, uint8_t endReg )
283 uint8_t pageSetup[] = { 0xE8, 0xFD, 0x00 };
285 // Max length of a page + chip id + reg start
286 uint8_t fullPage[ 0xB4 + 2 ] = { 0 }; // Max size of page
287 fullPage[0] = 0xE8; // Set chip id
288 fullPage[1] = startReg; // Set start reg
290 // Iterate through given pages, zero'ing out the given register regions
291 for ( uint8_t page = startPage; page < startPage + numPages; page++ )
297 while ( I2C_Send( pageSetup, sizeof( pageSetup ), 0 ) == 0 )
301 while ( I2C_Send( fullPage, endReg - startReg + 2, 0 ) == 0 )
306 void LED_sendPage( uint8_t *buffer, uint8_t len, uint8_t page )
309 uint8_t pageSetup[] = { 0xE8, 0xFD, page };
312 while ( I2C_Send( pageSetup, sizeof( pageSetup ), 0 ) == 0 )
315 // Write page to I2C Tx Buffer
316 while ( I2C_Send( buffer, len, 0 ) == 0 )
321 void LED_writeReg( uint8_t reg, uint8_t val, uint8_t page )
324 uint8_t pageSetup[] = { 0xE8, 0xFD, page };
327 uint8_t writeData[] = { 0xE8, reg, val };
330 while ( I2C_Send( pageSetup, sizeof( pageSetup ), 0 ) == 0 )
333 while ( I2C_Send( writeData, sizeof( writeData ), 0 ) == 0 )
338 inline void LED_setup()
340 // Register Scan CLI dictionary
341 CLI_registerDictionary( ledCLIDict, ledCLIDictName );
346 // Zero out Frame Registers
347 // This needs to be done before disabling the hardware shutdown (or the leds will do undefined things)
348 LED_zeroPages( 0x0B, 1, 0x00, 0x0C ); // Control Registers
350 // Disable Hardware shutdown of ISSI chip (pull high)
351 GPIOD_PDDR |= (1<<1);
352 PORTD_PCR1 = PORT_PCR_SRE | PORT_PCR_DSE | PORT_PCR_MUX(1);
353 GPIOD_PSOR |= (1<<1);
356 LED_zeroPages( 0x00, 8, 0x00, 0xB4 ); // LED Registers
358 // Enable LEDs based upon mask
359 LED_sendPage( (uint8_t*)LED_ledEnableMask, sizeof( LED_ledEnableMask ), 0 );
361 // Disable Software shutdown of ISSI chip
362 LED_writeReg( 0x0A, 0x01, 0x0B );
366 inline uint8_t I2C_BufferCopy( uint8_t *data, uint8_t sendLen, uint8_t recvLen, I2C_Buffer *buffer )
370 // If sendLen is greater than buffer fail right away
371 if ( sendLen > buffer->size )
374 // Calculate new tail to determine if buffer has enough space
375 // The first element specifies the expected number of bytes from the slave (+1)
376 // The second element in the new buffer is the length of the buffer sequence (+1)
377 uint16_t newTail = buffer->tail + sendLen + 2;
378 if ( newTail >= buffer->size )
379 newTail -= buffer->size;
381 if ( I2C_BufferLen( buffer ) < sendLen + 2 )
386 printHex( sendLen + 2 );
394 // If buffer is clean, return 1, otherwise 2
395 reTurn = buffer->head == buffer->tail ? 1 : 2;
397 // Add to buffer, already know there is enough room (simplifies adding logic)
398 uint8_t bufferHeaderPos = 0;
399 for ( uint16_t c = 0; c < sendLen; c++ )
401 // Add data to buffer
402 switch ( bufferHeaderPos )
405 buffer->buffer[ buffer->tail ] = recvLen;
411 buffer->buffer[ buffer->tail ] = sendLen;
417 buffer->buffer[ buffer->tail ] = data[ c ];
421 // Check for wrap-around case
422 if ( buffer->tail + 1 >= buffer->size )
437 inline uint16_t I2C_BufferLen( I2C_Buffer *buffer )
440 if ( buffer->tail >= buffer->head )
441 return buffer->head + buffer->size - buffer->tail;
444 return buffer->head - buffer->tail;
448 void I2C_BufferPush( uint8_t byte, I2C_Buffer *buffer )
450 // Make sure buffer isn't full
451 if ( buffer->tail + 1 == buffer->head || ( buffer->head > buffer->tail && buffer->tail + 1 - buffer->size == buffer->head ) )
453 warn_msg("I2C_BufferPush failed, buffer full: ");
459 // Check for wrap-around case
460 if ( buffer->tail + 1 >= buffer->size )
470 // Add byte to buffer
471 buffer->buffer[ buffer->tail ] = byte;
475 uint8_t I2C_TxBufferPop()
477 // Return 0xFF if no buffer left (do not rely on this)
478 if ( I2C_BufferLen( (I2C_Buffer*)&I2C_TxBuffer ) >= I2C_TxBuffer.size )
480 erro_msg("No buffer to pop an entry from... ");
481 printHex( I2C_TxBuffer.head );
483 printHex( I2C_TxBuffer.tail );
485 printHex( I2C_TxBuffer.sequencePos );
490 // If there is currently no sequence being sent, the first entry in the RingBuffer is the length
491 if ( I2C_TxBuffer.sequencePos == 0 )
493 I2C_TxBuffer.sequencePos = 0xFF; // So this doesn't become an infinite loop
494 I2C_RxBuffer.sequencePos = I2C_TxBufferPop();
495 I2C_TxBuffer.sequencePos = I2C_TxBufferPop();
498 uint8_t data = I2C_TxBuffer.buffer[ I2C_TxBuffer.head ];
504 if ( I2C_TxBuffer.head >= I2C_TxBuffer.size )
505 I2C_TxBuffer.head = 0;
507 // Decrement buffer sequence (until next stop will be sent)
508 I2C_TxBuffer.sequencePos--;
511 dbug_msg("Popping: ");
514 printHex( I2C_TxBuffer.head );
516 printHex( I2C_TxBuffer.tail );
518 printHex( I2C_TxBuffer.sequencePos );
525 uint8_t I2C_Send( uint8_t *data, uint8_t sendLen, uint8_t recvLen )
527 // Check head and tail pointers
529 // If empty, start up I2C Master Tx
530 // If buffer is non-empty and non-full, just append to the buffer
531 switch ( I2C_BufferCopy( data, sendLen, recvLen, (I2C_Buffer*)&I2C_TxBuffer ) )
533 // Not enough buffer space...
536 erro_msg("Not enough Tx buffer space... ");
537 printHex( I2C_TxBuffer.head );
539 printHex( I2C_TxBuffer.tail );
543 printHex( I2C_TxBuffer.size );
548 // Empty buffer, initialize I2C
550 // Clear status flags
551 I2C0_S = I2C_S_IICIF | I2C_S_ARBL;
553 // Check to see if we already have control of the bus
554 if ( I2C0_C1 & I2C_C1_MST )
556 // Already the master (ah yeah), send a repeated start
557 I2C0_C1 = I2C_C1_IICEN | I2C_C1_MST | I2C_C1_RSTA | I2C_C1_TX;
559 // Otherwise, seize control
562 // Wait...till the master dies
563 while ( I2C0_S & I2C_S_BUSY );
565 // Now we're the master (ah yisss), get ready to send stuffs
566 I2C0_C1 = I2C_C1_IICEN | I2C_C1_MST | I2C_C1_TX;
569 // Enable I2C interrupt
570 I2C0_C1 = I2C_C1_IICEN | I2C_C1_IICIE | I2C_C1_MST | I2C_C1_TX;
572 // Depending on what type of transfer, the first byte is configured for R or W
573 I2C0_D = I2C_TxBufferPop();
578 // Dirty buffer, I2C already initialized
584 // LED State processing loop
585 inline uint8_t LED_scan()
597 // ----- CLI Command Functions -----
599 void cliFunc_i2cSend( char* args )
603 char* arg2Ptr = args;
605 // Buffer used after interpretting the args, will be sent to I2C functions
606 // NOTE: Limited to 8 bytes currently (can be increased if necessary
607 #define i2cSend_BuffLenMax 8
608 uint8_t buffer[ i2cSend_BuffLenMax ];
609 uint8_t bufferLen = 0;
611 // No \r\n by default after the command is entered
613 info_msg("Sending: ");
615 // Parse args until a \0 is found
616 while ( bufferLen < i2cSend_BuffLenMax )
618 curArgs = arg2Ptr; // Use the previous 2nd arg pointer to separate the next arg from the list
619 CLI_argumentIsolation( curArgs, &arg1Ptr, &arg2Ptr );
621 // Stop processing args if no more are found
622 if ( *arg1Ptr == '\0' )
625 // If | is found, end sequence and start new one
626 if ( *arg1Ptr == '|' )
629 I2C_Send( buffer, bufferLen, 0 );
634 // Interpret the argument
635 buffer[ bufferLen++ ] = (uint8_t)numToInt( arg1Ptr );
644 I2C_Send( buffer, bufferLen, 0 );
647 void cliFunc_i2cRecv( char* args )
651 char* arg2Ptr = args;
653 // Buffer used after interpretting the args, will be sent to I2C functions
654 // NOTE: Limited to 8 bytes currently (can be increased if necessary
655 #define i2cSend_BuffLenMax 8
656 uint8_t buffer[ i2cSend_BuffLenMax ];
657 uint8_t bufferLen = 0;
659 // No \r\n by default after the command is entered
661 info_msg("Sending: ");
663 // Parse args until a \0 is found
664 while ( bufferLen < i2cSend_BuffLenMax )
666 curArgs = arg2Ptr; // Use the previous 2nd arg pointer to separate the next arg from the list
667 CLI_argumentIsolation( curArgs, &arg1Ptr, &arg2Ptr );
669 // Stop processing args if no more are found
670 if ( *arg1Ptr == '\0' )
673 // If | is found, end sequence and start new one
674 if ( *arg1Ptr == '|' )
677 I2C_Send( buffer, bufferLen, 0 );
682 // Interpret the argument
683 buffer[ bufferLen++ ] = (uint8_t)numToInt( arg1Ptr );
692 I2C_Send( buffer, bufferLen, 1 ); // Only 1 byte is ever read at a time with the ISSI chip
695 void cliFunc_ledTest( char* args )
697 print( NL ); // No \r\n by default after the command is entered
698 LED_sendPage( (uint8_t*)examplePage, sizeof( examplePage ), 0 );
701 void cliFunc_ledZero( char* args )
703 print( NL ); // No \r\n by default after the command is entered
704 LED_zeroPages( 0x00, 8, 0x24, 0xB4 ); // Only PWMs