git.rot13.org Git - goodfet/blob - firmware/apps/spi/spi.c

   1 /*! \file spi.c
   2   \author Travis Goodspeed
   3   \brief SPI Master
   4 */
   5
   6 //Higher level left to client application.
   7
   8 #include "platform.h"
   9 #include "command.h"
  10
  11 #include <signal.h>
  12 #include <io.h>
  13 #include <iomacros.h>
  14
  15 #include "spi.h"
  16
  17 //This could be more accurate.
  18 //Does it ever need to be?
  19 #define SPISPEED 0
  20 #define SPIDELAY(x)
  21 //delay(x)
  22
  23
  24 //! Set up the pins for SPI mode.
  25 void spisetup(){
  26   SETSS;
  27   P5DIR|=MOSI+SCK+BIT0; //BIT0 might be SS
  28   P5DIR&=~MISO;
  29   DIRSS;
  30
  31   //Begin a new transaction.
  32   CLRSS;
  33   SETSS;
  34 }
  35
  36
  37 //! Read and write an SPI byte.
  38 unsigned char spitrans8(unsigned char byte){
  39   register unsigned int bit;
  40   //This function came from the SPI Wikipedia article.
  41   //Minor alterations.
  42
  43   for (bit = 0; bit < 8; bit++) {
  44     /* write MOSI on trailing edge of previous clock */
  45     if (byte & 0x80)
  46       SETMOSI;
  47     else
  48       CLRMOSI;
  49     byte <<= 1;
  50
  51     SETCLK;
  52
  53     /* read MISO on trailing edge */
  54     byte |= READMISO;
  55     CLRCLK;
  56   }
  57   return byte;
  58 }
  59
  60
  61 //! Enable SPI writing
  62 void spiflash_wrten(){
  63   SETSS;
  64   /*
  65   CLRSS; //Drop !SS to begin transaction.
  66   spitrans8(0x04);//Write Disable
  67   SETSS;  //Raise !SS to end transaction.
  68   */
  69   CLRSS; //Drop !SS to begin transaction.
  70   spitrans8(0x06);//Write Enable
  71   SETSS;  //Raise !SS to end transaction.
  72 }
  73
  74
  75 //! Grab the SPI flash status byte.
  76 unsigned char spiflash_status(){
  77   unsigned char c;
  78   SETSS;  //Raise !SS to end transaction.
  79   CLRSS; //Drop !SS to begin transaction.
  80   spitrans8(0x05);//GET STATUS
  81   c=spitrans8(0xFF);
  82   SETSS;  //Raise !SS to end transaction.
  83   return c;
  84 }
  85
  86
  87 //! Grab the SPI flash status byte.
  88 void spiflash_setstatus(unsigned char c){
  89   SETSS;
  90   CLRSS; //Drop !SS to begin transaction.
  91   spitrans8(0x01);//SET STATUS
  92   spitrans8(c);
  93   SETSS;  //Raise !SS to end transaction.
  94   //return c;
  95 }
  96
  97
  98 //! Read a block to a buffer.
  99 void spiflash_peekblock(unsigned long adr,
 100                         unsigned char *buf,
 101                         unsigned int len){
 102   unsigned char i;
 103
 104   SETSS;
 105   CLRSS; //Drop !SS to begin transaction.
 106   spitrans8(0x03);//Flash Read Command
 107
 108   //Send address
 109   spitrans8((adr&0xFF0000)>>16);
 110   spitrans8((adr&0xFF00)>>8);
 111   spitrans8(adr&0xFF);
 112
 113   for(i=0;i<len;i++)
 114     buf[i]=spitrans8(0);
 115   SETSS;  //Raise !SS to end transaction.
 116 }
 117
 118 //! Read a block to a buffer.
 119 void spiflash_pokeblock(unsigned long adr,
 120                         unsigned char *buf,
 121                         unsigned int len){
 122   unsigned int i;
 123
 124   SETSS;
 125
 126   //if(len!=0x100)
 127   //  debugstr("Non-standard block size.");
 128
 129   while(spiflash_status()&0x01);//minor performance impact
 130
 131   spiflash_setstatus(0x02);
 132   spiflash_wrten();
 133
 134   //Are these necessary?
 135   //spiflash_setstatus(0x02);
 136   //spiflash_wrten();
 137
 138   CLRSS; //Drop !SS to begin transaction.
 139   spitrans8(0x02); //Poke command.
 140
 141   //Send address
 142   spitrans8((adr&0xFF0000)>>16);
 143   spitrans8((adr&0xFF00)>>8);
 144   spitrans8(adr&0xFF);
 145
 146   for(i=0;i<len;i++)
 147     spitrans8(buf[i]);
 148   SETSS;  //Raise !SS to end transaction.
 149
 150   while(spiflash_status()&0x01);//minor performance impact
 151   return;
 152 }
 153
 154
 155 //! Write many blocks to the SPI Flash.
 156 void spiflash_pokeblocks(unsigned long adr,
 157                          unsigned char *buf,
 158                          unsigned int len){
 159   long off=0;//offset of this block
 160   int blen;//length of this block
 161   SETSS;
 162
 163   while(off<len){
 164     //calculate block length
 165     blen=(len-off>0x100?0x100:len-off);
 166     //write the block
 167     spiflash_pokeblock(adr+off,
 168                        buf+off,
 169                        blen);
 170     //add offset
 171     off+=blen;
 172   }
 173 }
 174
 175
 176
 177 //! Peek some blocks.
 178 void spiflash_peek(unsigned char app,
 179                    unsigned char verb,
 180                    unsigned long len){
 181   unsigned int i;
 182   CLRSS; //Drop !SS to begin transaction.
 183   spitrans8(0x03);//Flash Read Command
 184   len=3;//write 3 byte pointer
 185   for(i=0;i<len;i++)
 186     spitrans8(cmddata[i]);
 187
 188   //Send reply header
 189   len=0x1000;
 190   txhead(app,verb,len);
 191
 192   while(len--)
 193     serial_tx(spitrans8(0));
 194
 195   SETSS;  //Raise !SS to end transaction.
 196 }
 197
 198
 199 //! Erase a sector.
 200 void spiflash_erasesector(unsigned long adr){
 201   //debugstr("Erasing a 4kB sector.");
 202
 203   //Write enable.
 204   spiflash_wrten();
 205
 206   //Begin
 207   CLRSS;
 208
 209   //Second command.
 210   spitrans8(0x20);
 211   //Send address
 212   spitrans8((adr&0xFF0000)>>16);
 213   spitrans8((adr&0xFF00)>>8);
 214   spitrans8(adr&0xFF);
 215
 216   SETSS;
 217   while(spiflash_status()&0x01);//while busy
 218   //debugstr("Erased.");
 219 }
 220
 221
 222 //! Wake an EM260 Radio
 223 void em260_wake(){
 224   //debugstr("Waking EM260.");
 225   #define RST BIT6
 226   P2DIR|=RST;
 227   SETRST;
 228   delay(1024);
 229
 230   CLRRST;//Wake chip.
 231   while(P4IN&1);
 232   SETRST;//Woken.
 233   //debugstr("EM260 is now awake.");
 234   delay(1024);  //DO NOT REMOVE, fails without.
 235 }
 236
 237 //! Handles a monitor command.
 238 void spihandle(unsigned char app,
 239                unsigned char verb,
 240                unsigned long len){
 241   unsigned long i;
 242
 243   //Raise !SS to end transaction, just in case we forgot.
 244   SETSS;
 245   spisetup();
 246
 247   switch(verb){
 248     //PEEK and POKE might come later.
 249   case READ:
 250   case WRITE:
 251     CLRSS; //Drop !SS to begin transaction.
 252     for(i=0;i<len;i++)
 253       cmddata[i]=spitrans8(cmddata[i]);
 254     SETSS;  //Raise !SS to end transaction.
 255     txdata(app,verb,len);
 256     break;
 257
 258   case SPI_RW_EM260:  //SPI exchange with an EM260
 259     P4DIR=0; //TODO ASAP remove P4 references.
 260     P4OUT=0;
 261
 262     //See GoodFETEM260.py for details.
 263     //The EM260 requires that the host wait for the client.
 264
 265     em260_wake();
 266
 267     SETMOSI; //Autodetected SPI mode.
 268     CLRSS; //Drop !SS to begin transaction.
 269     //Host to slave.  Ignore data.
 270     for(i=0;i<len;i++)
 271       spitrans8(cmddata[i]);
 272     //debugstr("Finished transmission to EM260.");
 273
 274     //Could also wait for nHOST_INT to drop.
 275     i=0xffff;
 276     while((cmddata[0]=spitrans8(0xFF))==0xFF
 277           && --i);
 278     if(!i)
 279       debugstr("Gave up on host interrupt.");
 280
 281     len=64;
 282     for(i=0;i<len;i++)
 283       cmddata[i]=spitrans8(0xFF);
 284
 285
 286     SETSS;  //Raise !SS to end transaction.
 287     txdata(app,verb,len);
 288     break;
 289
 290
 291   case SPI_JEDEC://Grab 3-byte JEDEC ID.
 292     CLRSS; //Drop !SS to begin transaction.
 293     spitrans8(0x9f);
 294     len=3;  //Length is variable in some chips, 3 minimum.
 295     for(i=0;i<len;i++)
 296       cmddata[i]=spitrans8(cmddata[i]);
 297     txdata(app,verb,len);
 298     SETSS;  //Raise !SS to end transaction.
 299     break;
 300
 301   case PEEK://Grab 128 bytes from an SPI Flash ROM
 302     spiflash_peek(app,verb,len);
 303     break;
 304
 305
 306   case POKE://Poke up bytes from an SPI Flash ROM.
 307     spiflash_pokeblocks(cmddatalong[0],//adr
 308                         cmddata+4,//buf
 309                         len-4);//len
 310
 311     txdata(app,verb,0);
 312     break;
 313
 314
 315   case SPI_ERASE://Erase the SPI Flash ROM.
 316     spiflash_wrten();
 317     CLRSS; //Drop !SS to begin transaction.
 318     spitrans8(0xC7);//Chip Erase
 319     SETSS;  //Raise !SS to end transaction.
 320
 321
 322     while(spiflash_status()&0x01)//while busy
 323       PLEDOUT^=PLEDPIN;
 324     PLEDOUT&=~PLEDPIN;
 325
 326     txdata(app,verb,0);
 327     break;
 328
 329   case SETUP:
 330     spisetup();
 331     txdata(app,verb,0);
 332     break;
 333   }
 334
 335 }