-//GoodFET SPI Application
-//Handles basic I/O
+/*! \file spi.c
+ \author Travis Goodspeed
+ \brief SPI Master
+*/
//Higher level left to client application.
-#include "platform.h"
+
#include "command.h"
+#ifdef __MSPGCC__
+#include <msp430.h>
+#else
#include <signal.h>
#include <io.h>
#include <iomacros.h>
+#endif
+
+#include "spi.h"
+
+#define SPIAPPLICATION
+
+#include "platform.h"
+//! Handles a monitor command.
+void spi_handle_fn( uint8_t const app,
+ uint8_t const verb,
+ uint32_t const len);
+
+// define the spi app's app_t
+app_t const spi_app = {
+
+ /* app number */
+ SPI,
-//Pins and I/O
-#define SS BIT0
-#define MOSI BIT1
-#define MISO BIT2
-#define SCK BIT3
+ /* handle fn */
+ spi_handle_fn,
+
+ /* name */
+ "SPI",
+
+ /* desc */
+ "\tThe SPI app handles the SPI bus protocol, turning\n"
+ "\tyour GoodFET into a USB-to-SPI adapter.\n"
+};
//This could be more accurate.
//Does it ever need to be?
#define SPISPEED 0
#define SPIDELAY(x) delay(x)
-#define SETMOSI P5OUT|=MOSI
-#define CLRMOSI P5OUT&=~MOSI
-#define SETCLK P5OUT|=SCK
-#define CLRCLK P5OUT&=~SCK
-#define READMISO (P5IN&MISO?1:0)
-
-
//! Set up the pins for SPI mode.
void spisetup(){
- P5OUT|=SS;
- P5DIR|=MOSI+SCK+SS;
- P5DIR&=~MISO;
-
+ SETSS;
+ SPIDIR|=MOSI+SCK+BIT0; //BIT0 might be SS
+ SPIDIR&=~MISO;
+ DIRSS;
+
//Begin a new transaction.
- P5OUT&=~SS;
- P5OUT|=SS;
+
+ CLRSS;
+ SETSS;
}
-//! Read and write an SPI bit.
+
+//! Read and write an SPI byte.
unsigned char spitrans8(unsigned char byte){
- unsigned int bit;
+ register unsigned int bit;
//This function came from the SPI Wikipedia article.
//Minor alterations.
-
+
for (bit = 0; bit < 8; bit++) {
/* write MOSI on trailing edge of previous clock */
if (byte & 0x80)
else
CLRMOSI;
byte <<= 1;
-
- /* half a clock cycle before leading/rising edge */
- SPIDELAY(SPISPEED/2);
+
+ //SPIDELAY(100);
SETCLK;
-
- /* half a clock cycle before trailing/falling edge */
- SPIDELAY(SPISPEED/2);
-
+ //SPIDELAY(100);
+
/* read MISO on trailing edge */
byte |= READMISO;
CLRCLK;
}
-
return byte;
}
+
//! Enable SPI writing
void spiflash_wrten(){
- P5OUT&=~SS; //Drop !SS to begin transaction.
+ SETSS;
+ /*
+ CLRSS; //Drop !SS to begin transaction.
spitrans8(0x04);//Write Disable
- P5OUT|=SS; //Raise !SS to end transaction.
- P5OUT&=~SS; //Drop !SS to begin transaction.
+ SETSS; //Raise !SS to end transaction.
+ */
+ CLRSS; //Drop !SS to begin transaction.
spitrans8(0x06);//Write Enable
- P5OUT|=SS; //Raise !SS to end transaction.
+ SETSS; //Raise !SS to end transaction.
}
+
//! Grab the SPI flash status byte.
unsigned char spiflash_status(){
unsigned char c;
- P5OUT|=SS; //Raise !SS to end transaction.
- P5OUT&=~SS; //Drop !SS to begin transaction.
+ SETSS; //Raise !SS to end transaction.
+ CLRSS; //Drop !SS to begin transaction.
spitrans8(0x05);//GET STATUS
c=spitrans8(0xFF);
- P5OUT|=SS; //Raise !SS to end transaction.
+ SETSS; //Raise !SS to end transaction.
return c;
}
+
+
//! Grab the SPI flash status byte.
void spiflash_setstatus(unsigned char c){
- P5OUT&=~SS; //Drop !SS to begin transaction.
+ SETSS;
+ CLRSS; //Drop !SS to begin transaction.
spitrans8(0x01);//SET STATUS
spitrans8(c);
- P5OUT|=SS; //Raise !SS to end transaction.
+ SETSS; //Raise !SS to end transaction.
//return c;
}
+
+//! Read a block to a buffer.
+void spiflash_peekblock(unsigned long adr,
+ unsigned char *buf,
+ unsigned int len){
+ unsigned char i;
+
+ SETSS;
+ CLRSS; //Drop !SS to begin transaction.
+ spitrans8(0x03);//Flash Read Command
+
+ //Send address
+ spitrans8((adr&0xFF0000)>>16);
+ spitrans8((adr&0xFF00)>>8);
+ spitrans8(adr&0xFF);
+
+ for(i=0;i<len;i++)
+ buf[i]=spitrans8(0);
+ SETSS; //Raise !SS to end transaction.
+}
+
+//! Read a block to a buffer.
+void spiflash_pokeblock(unsigned long adr,
+ unsigned char *buf,
+ unsigned int len){
+ unsigned int i;
+
+ SETSS;
+
+ //if(len!=0x100)
+ // debugstr("Non-standard block size.");
+
+ while(spiflash_status()&0x01);//minor performance impact
+
+ spiflash_setstatus(0x02);
+ spiflash_wrten();
+
+ //Are these necessary?
+ //spiflash_setstatus(0x02);
+ //spiflash_wrten();
+
+ CLRSS; //Drop !SS to begin transaction.
+ spitrans8(0x02); //Poke command.
+
+ //Send address
+ spitrans8((adr&0xFF0000)>>16);
+ spitrans8((adr&0xFF00)>>8);
+ spitrans8(adr&0xFF);
+
+ for(i=0;i<len;i++)
+ spitrans8(buf[i]);
+ SETSS; //Raise !SS to end transaction.
+
+ while(spiflash_status()&0x01);//minor performance impact
+ return;
+}
+
+
+//! Write many blocks to the SPI Flash.
+void spiflash_pokeblocks(unsigned long adr,
+ unsigned char *buf,
+ unsigned int len){
+ long off=0;//offset of this block
+ int blen;//length of this block
+ SETSS;
+
+ while(off<len){
+ //calculate block length
+ blen=(len-off>0x100?0x100:len-off);
+ //write the block
+ spiflash_pokeblock(adr+off,
+ buf+off,
+ blen);
+ //add offset
+ off+=blen;
+ }
+}
+
+
+
//! Peek some blocks.
void spiflash_peek(unsigned char app,
unsigned char verb,
- unsigned char len){
- register char blocks=(len>3?cmddata[3]:1);
- unsigned char i,j;
-
- P5OUT&=~SS; //Drop !SS to begin transaction.
+ unsigned long len){
+ unsigned int i;
+ CLRSS; //Drop !SS to begin transaction.
spitrans8(0x03);//Flash Read Command
len=3;//write 3 byte pointer
for(i=0;i<len;i++)
spitrans8(cmddata[i]);
-
+
//Send reply header
- len=0x80;//128 byte chunk, repeated for each block
- serial_tx(app);
- serial_tx(verb);
- serial_tx(len); //multiplied by block count.
-
- while(blocks--){
- for(i=0;i<len;i++)
- serial_tx(spitrans8(0));
-
- /* old fashioned
- for(i=0;i<len;i++)
- cmddata[i]=spitrans8(0);
- txdata(app,verb,len);
- */
+ len=0x1000;
+ txhead(app,verb,len);
+
+ while(len--)
+ serial_tx(spitrans8(0));
+
+ SETSS; //Raise !SS to end transaction.
+}
+
+
+//! Erase a sector.
+void spiflash_erasesector(unsigned long adr){
+ //debugstr("Erasing a 4kB sector.");
+
+ //Write enable.
+ spiflash_wrten();
+
+ //Begin
+ CLRSS;
+
+ //Second command.
+ spitrans8(0x20);
+ //Send address
+ spitrans8((adr&0xFF0000)>>16);
+ spitrans8((adr&0xFF00)>>8);
+ spitrans8(adr&0xFF);
+
+ SETSS;
+ while(spiflash_status()&0x01);//while busy
+ //debugstr("Erased.");
+}
+
+
+//! Wake an EM260 Radio
+void em260_wake(){
+ //debugstr("Waking EM260.");
+ #define RST BIT6
+ P2DIR|=RST;
+ SETRST;
+ delay(1024);
+
+ CLRRST;//Wake chip.
+ while(P4IN&1);
+ SETRST;//Woken.
+ //debugstr("EM260 is now awake.");
+ delay(1024); //DO NOT REMOVE, fails without.
+}
+//! Handle an EM260 exchange.
+void spi_rw_em260(u8 app, u8 verb, u32 len){
+ unsigned long i;
+ u8 lastin;
+
+ P4DIR=0; //TODO ASAP remove P4 references.
+ P4OUT=0xFF;
+ //P4REN=0xFF;
+
+ //See GoodFETEM260.py for details.
+ //The EM260 requires that the host wait for the client.
+
+ /*
+ if((~P4IN)&1)
+ debugstr("Detected HOST_INT.");
+ */
+
+ em260_wake();
+
+
+ SETMOSI; //Autodetected SPI mode.
+ CLRSS; //Drop !SS to begin transaction.
+ //Host to slave. Ignore data.
+ for(i=0;i<len;i++){
+ lastin=spitrans8(cmddata[i]);
+ if(lastin!=0xFF){
+ //debugstr("EM260 transmission interrupted.");
+ cmddata[0]=lastin;
+ goto response;
+ }
}
- P5OUT|=SS; //Raise !SS to end transaction.
+ //debugstr("Finished transmission to EM260.");
+
+ //Wait for nHOST_INT to drop.
+ i=0xffff;
+
+ /*
+ while(P4IN&1
+ && --i
+ )
+ spitrans8(0xFF);
+ */
+ while((cmddata[0]=spitrans8(0xFF))==0xFF
+ && --i);
+
+ if(!i)
+ debugstr("Gave up on host interrupt.");
+
+ response:
+ len=1;
+ while(
+ (cmddata[len++]=spitrans8(0xFF))!=0xA7
+ );
+ if(cmddata[0]==0xFE)
+ while(len<cmddata[1]+3)
+ cmddata[len++]=spitrans8(0xFF);
+ SETSS; //Raise !SS to end transaction.
+
+ txdata(app,verb,len);
+ return;
}
//! Handles a monitor command.
-void spihandle(unsigned char app,
- unsigned char verb,
- unsigned char len){
- unsigned char i;
-
-
- //Raise !SS to end transaction, just in case we forgot.
- P5OUT|=SS;
-
- switch(verb){
- //PEEK and POKE might come later.
- case READ:
- case WRITE:
- P5OUT&=~SS; //Drop !SS to begin transaction.
- for(i=0;i<len;i++)
- cmddata[i]=spitrans8(cmddata[i]);
- P5OUT|=SS; //Raise !SS to end transaction.
- txdata(app,verb,len);
- break;
- case SPI_JEDEC://Grab 3-byte JEDEC ID.
- P5OUT&=~SS; //Drop !SS to begin transaction.
- spitrans8(0x9f);
- len=3;
- for(i=0;i<len;i++)
- cmddata[i]=spitrans8(cmddata[i]);
- txdata(app,verb,len);
- P5OUT|=SS; //Raise !SS to end transaction.
- break;
- case PEEK://Grab 128 bytes from an SPI Flash ROM
-
- spiflash_peek(app,verb,len);
- break;
- case POKE://Poke up bytes from an SPI Flash ROM.
- spiflash_setstatus(0x02);
- spiflash_wrten();
-
- P5OUT&=~SS; //Drop !SS to begin transaction.
- spitrans8(0x02); //Poke command.
-
- //First three bytes are address, then data.
- for(i=0;i<len;i++)
- spitrans8(cmddata[i]);
- P5OUT|=SS; //Raise !SS to end transaction.
- while(spiflash_status()&0x01);//while busy
- txdata(app,verb,len);
- break;
- case SPI_ERASE://Erase the SPI Flash ROM.
- spiflash_wrten();
- P5OUT&=~SS; //Drop !SS to begin transaction.
- spitrans8(0xC7);//Chip Erase
- P5OUT|=SS; //Raise !SS to end transaction.
- txdata(app,verb,0);
- break;
- case SETUP:
- spisetup();
- txdata(app,verb,0);
- break;
- }
-
+void spi_handle_fn( uint8_t const app,
+ uint8_t const verb,
+ uint32_t const len)
+{
+ unsigned long i, l;
+
+ //Raise !SS to end transaction, just in case we forgot.
+ SETSS;
+ //spisetup();
+
+ switch(verb)
+ {
+ case READ:
+ case WRITE:
+ CLRSS; //Drop !SS to begin transaction.
+ for(i=0;i<len;i++)
+ cmddata[i]=spitrans8(cmddata[i]);
+ SETSS; //Raise !SS to end transaction.
+ txdata(app,verb,len);
+ break;
+
+ case SPI_RW_EM260: //SPI exchange with an EM260
+ spi_rw_em260(app,verb,len);
+ break;
+
+ case SPI_JEDEC://Grab 3-byte JEDEC ID.
+ CLRSS; //Drop !SS to begin transaction.
+ spitrans8(0x9f);
+ l=3; //Length is variable in some chips, 3 minimum.
+ for(i = 0; i < l; i++)
+ cmddata[i]=spitrans8(cmddata[i]);
+ txdata(app,verb,len);
+ SETSS; //Raise !SS to end transaction.
+ break;
+
+ case PEEK://Grab 128 bytes from an SPI Flash ROM
+ spiflash_peek(app,verb,len);
+ break;
+
+ case POKE://Poke up bytes from an SPI Flash ROM.
+ spiflash_pokeblocks(cmddatalong[0],//adr
+ cmddata+4,//buf
+ len-4);//len
+ txdata(app,verb,0);
+ break;
+
+ case SPI_ERASE://Erase the SPI Flash ROM.
+ spiflash_wrten();
+ CLRSS; //Drop !SS to begin transaction.
+ spitrans8(0xC7);//Chip Erase
+ SETSS; //Raise !SS to end transaction.
+
+ while(spiflash_status()&0x01)//while busy
+ led_toggle();
+ led_off();
+
+ txdata(app,verb,0);
+ break;
+
+ case SETUP:
+ spisetup();
+ txdata(app,verb,0);
+ break;
+ }
}