mmcdump.i

Simple AVR MMC dumper

/*****************************************************

Project : Fat filesystem and MMC-memeory card 
Version : 0.0
Date    : 1.11.2005
Author  : Ari Naukkarinen                 
Company : Metsys Oy          
             
Comments:          
Program does:
 - Read all files from MMC card (using FAT-16 filesystem)
 - Dump all sectors
 - Fill all files with 'Z'
 - Only FAT-16 compatible
 - Assume BlockSize = 512 bytes
 - Program is for educational use only (does nothing useful)
 - You have to create files using (for ex.) PC, and fill them with AVR
  
Limitations:
Program do not:
 - Create files
 - Update file size (or any other fields in DIR-entry)
 - Understand FAT-12 or FAT-32 or others (ONLY FAT-16)
               

Chip type           : ATmega32
Program type        : Application
Clock frequency     : 16,000000 MHz
Memory model        : Small
External SRAM size  : 0
Data Stack size     : 256
*****************************************************/
                                                  
// include files from CodevisionC
// CodeVisionAVR C Compiler
// (C) 1998-2004 Pavel Haiduc, HP InfoTech S.R.L.

// I/O registers definitions for the ATmega8


#pragma used+
sfrb TWBR=0;
sfrb TWSR=1;
sfrb TWAR=2;
sfrb TWDR=3;
sfrb ADCL=4;
sfrb ADCH=5;
sfrw ADCW=4;      // 16 bit access
sfrb ADCSRA=6;
sfrb ADMUX=7;
sfrb ACSR=8;
sfrb UBRRL=9;
sfrb UCSRB=0xa;
sfrb UCSRA=0xb;
sfrb UDR=0xc;
sfrb SPCR=0xd;
sfrb SPSR=0xe;
sfrb SPDR=0xf;
sfrb PIND=0x10;
sfrb DDRD=0x11;
sfrb PORTD=0x12;
sfrb PINC=0x13;
sfrb DDRC=0x14;
sfrb PORTC=0x15;
sfrb PINB=0x16;
sfrb DDRB=0x17;
sfrb PORTB=0x18;
sfrb EECR=0x1c;
sfrb EEDR=0x1d;
sfrb EEARL=0x1e;
sfrb EEARH=0x1f;
sfrw EEAR=0x1e;   // 16 bit access
sfrb UBRRH=0x20;
sfrb UCSRC=0X20;
sfrb WDTCR=0x21;
sfrb ASSR=0x22;
sfrb OCR2=0x23;
sfrb TCNT2=0x24;
sfrb TCCR2=0x25;
sfrb ICR1L=0x26;
sfrb ICR1H=0x27;
sfrw ICR1=0x26;   // 16 bit access
sfrb OCR1BL=0x28;
sfrb OCR1BH=0x29;
sfrw OCR1B=0x28;  // 16 bit access
sfrb OCR1AL=0x2a;
sfrb OCR1AH=0x2b;
sfrw OCR1A=0x2a;  // 16 bit access
sfrb TCNT1L=0x2c;
sfrb TCNT1H=0x2d;
sfrw TCNT1=0x2c;  // 16 bit access
sfrb TCCR1B=0x2e;
sfrb TCCR1A=0x2f;
sfrb SFIOR=0x30;
sfrb OSCCAL=0x31;
sfrb TCNT0=0x32;
sfrb TCCR0=0x33;
sfrb MCUCSR=0x34;
sfrb MCUCR=0x35;
sfrb TWCR=0x36;
sfrb SPMCR=0x37;
sfrb TIFR=0x38;
sfrb TIMSK=0x39;
sfrb GIFR=0x3a;
sfrb GICR=0x3b;
sfrb SPL=0x3d;
sfrb SPH=0x3e;
sfrb SREG=0x3f;
#pragma used-

// Interrupt vectors definitions



/*
  CodeVisionAVR C Compiler
  (C) 1998-2004 Pavel Haiduc, HP InfoTech S.R.L.

  Prototype for SPI access function */
  

#pragma used+
unsigned char spi(unsigned char data);
#pragma used-

#pragma library spi.lib

// CodeVisionAVR C Compiler
// (C) 1998-2006 Pavel Haiduc, HP InfoTech S.R.L.

// Prototypes for standard I/O functions


// CodeVisionAVR C Compiler
// (C) 1998-2002 Pavel Haiduc, HP InfoTech S.R.L.

// Variable length argument list macros



typedef char *va_list;





#pragma used+

char getchar(void);
void putchar(char c);
void puts(char *str);
void putsf(char flash *str);

char *gets(char *str,unsigned int len);

void printf(char flash *fmtstr,...);
void sprintf(char *str, char flash *fmtstr,...);
void snprintf(char *str, unsigned int size, char flash *fmtstr,...);
void vprintf (char flash * fmtstr, va_list argptr);
void vsprintf (char *str, char flash * fmtstr, va_list argptr);
void vsnprintf (char *str, unsigned int size, char flash * fmtstr, va_list argptr);
signed char scanf(char flash *fmtstr,...);
signed char sscanf(char *str, char flash *fmtstr,...);




                                   

            


#pragma used-

#pragma library stdio.lib


/* CodeVisionAVR C Compiler
   Prototypes for standard library functions

   (C) 1998-2003 Pavel Haiduc, HP InfoTech S.R.L.
*/




#pragma used+

int atoi(char *str);
long int atol(char *str);
float atof(char *str);
void itoa(int n,char *str);
void ltoa(long int n,char *str);
void ftoa(float n,unsigned char decimals,char *str);
void ftoe(float n,unsigned char decimals,char *str);
void srand(int seed);
int rand(void);
void *malloc(unsigned int size);
void *calloc(unsigned int num, unsigned int size);
void *realloc(void *ptr, unsigned int size); 
void free(void *ptr);

#pragma used-
#pragma library stdlib.lib


// CodeVisionAVR C Compiler
// (C) 1998-2000 Pavel Haiduc, HP InfoTech S.R.L.


#pragma used+

void delay_us(unsigned int n);
void delay_ms(unsigned int n);

#pragma used-

// CodeVisionAVR C Compiler
// (C) 1998-2005 Pavel Haiduc, HP InfoTech S.R.L.

// Prototypes for string functions



#pragma used+

char *strcat(char *str1,char *str2);
char *strcatf(char *str1,char flash *str2);
char *strchr(char *str,char c);
signed char strcmp(char *str1,char *str2);
signed char strcmpf(char *str1,char flash *str2);
char *strcpy(char *dest,char *src);
char *strcpyf(char *dest,char flash *src);
unsigned char strcspn(char *str,char *set);
unsigned char strcspnf(char *str,char flash *set);
unsigned int strlenf(char flash *str);
char *strncat(char *str1,char *str2,unsigned char n);
char *strncatf(char *str1,char flash *str2,unsigned char n);
signed char strncmp(char *str1,char *str2,unsigned char n);
signed char strncmpf(char *str1,char flash *str2,unsigned char n);
char *strncpy(char *dest,char *src,unsigned char n);
char *strncpyf(char *dest,char flash *src,unsigned char n);
char *strpbrk(char *str,char *set);
char *strpbrkf(char *str,char flash *set);
signed char strpos(char *str,char c);
char *strrchr(char *str,char c);
char *strrpbrk(char *str,char *set);
char *strrpbrkf(char *str,char flash *set);
signed char strrpos(char *str,char c);
char *strstr(char *str1,char *str2);
char *strstrf(char *str1,char flash *str2);
unsigned char strspn(char *str,char *set);
unsigned char strspnf(char *str,char flash *set);
char *strtok(char *str1,char flash *str2);
 

unsigned int strlen(char *str);
void *memccpy(void *dest,void *src,char c,unsigned n);
void *memchr(void *buf,unsigned char c,unsigned n);
signed char memcmp(void *buf1,void *buf2,unsigned n);
signed char memcmpf(void *buf1,void flash *buf2,unsigned n);
void *memcpy(void *dest,void *src,unsigned n);
void *memcpyf(void *dest,void flash *src,unsigned n);
void *memmove(void *dest,void *src,unsigned n);
void *memset(void *buf,unsigned char c,unsigned n);

#pragma used-
#pragma library string.lib




//#define MMC_DEBUG3      // show mmc_read, mmcWrite messages
//#define MMC_DEBUG2      // show FAT addresses





// Data tokens values
                                                          

struct BootSec 
{
	unsigned char  	        BPB_dummy1[11];         // 11 bytes OEM-name
	unsigned int   	        BPB_BytesPerSec;        // 2 bytes
	unsigned char		BPB_SecPerClus;         // 1 byte
	unsigned int		BPB_ResrvdSector;       // 2 bytes
	unsigned char		BPB_NumOfFat;           // 1 byte
	unsigned int		BPB_RootEntries;        // 2 bytes
	unsigned int		BPB_TotSec16;           // 2 bytes
	unsigned char		BPB_Media;              // 1 byte
	unsigned int		BPB_SectPerFat;         // 2 bytes
	unsigned int		BPB_SecPerTrk;          // 2 bytes
	unsigned int		BPB_NumHeads;           // 2 bytes
	unsigned long		BPB_HiddSec;            // 4 bytes
	unsigned long		BPB_TotSec32;           // 4 bytes
};

struct DirEntry {
	unsigned char		DIR_Name[11];           //8 chars filename
	unsigned char		DIR_Attr;               //file attributes RSHA, Longname, Drive Label, Directory
	unsigned char		DIR_NTRes;              //reserved to NT
	unsigned char		DIR_CrtTimems;          //creation time part in milliseconds
	unsigned int		DIR_CrtTime;            //creation time
	unsigned int		DIR_CrtDate;            //creation date
	unsigned int		DIR_LastAccDate;        //last access date
	unsigned int		DIR_FstClusHI;          //first cluster high word                 
	unsigned int		DIR_WrtTime;            //last write time
	unsigned int		DIR_WrtDate;            //last write date
	unsigned int		DIR_FirstCluster;       //first cluster low word                 
	unsigned long		DIR_FileSize;     
};




	
// Declare your global variables here
                     
unsigned int FatStart;                                                             
unsigned int ClustCnt;                                          // cluster counter
unsigned int SectPerCluster;
unsigned int ClusterOffset;                                                      
unsigned long   FileSize;    
unsigned int RootDirEntry;
char RxBuffer;
char TxBuff[24];
char block[512];



/* functions start */
void send_char(unsigned char sch)		                        // send data to serial port (not used)
{       char uart_stat;
        uart_stat = 0x20&UCSRA;
	{	while((uart_stat=(0x20&UCSRA)), uart_stat!=0x20);	// wait for TX complete
	       	        UDR = sch;
         }
}

void send_str()                                                         // send string to serial port (not used)
{       unsigned char i;
        i = 0;
        while(TxBuff[i] != 0)
        {       send_char(TxBuff[i]);
                i++;
        }
}

unsigned char mmc_command(unsigned char cmd, unsigned long arg) // Write command to MMC, returns R1 result code, leaves ENABLE ON
{
        unsigned char resp;
        unsigned char retry=0;
        PORTB.2 = 0;
        spi(cmd | 0x40);                                // note command is CMD-X + 0x40
        spi(arg>>24);
        spi(arg>>16);
        spi(arg>>8);
        spi(arg);
        spi(0x95);                                      // spi CRC = always 0xFF OR 0x95 for MMC_GO_IDLE_STATE command
        while((resp = spi(0xFF)) == 0xFF)
                if(retry++ > 8) break;                  // card has timed out
        return resp;                                    // Note! MMC enable is ON
}
                                                                   
unsigned char mmc_init(void) // Initialize mmc-card, returns zero if successful.
{
     unsigned char retry, i, resp=0;

     retry = 0;
     do                                                 // max 10 retries
     {
         // send 74+ (=80) dummy bits with CS high before accessing        
         for(i=0;i<10;i++)         
                spi(0xFF);
         // resetting card, go to SPI mode
         resp = mmc_command(0       , 0);             // command 0
                  printf("IDLE_STATE-status:%x\r\n", resp);
                  retry++;
         if(retry>10) return -1;
     } while(resp != 0x01);
 
     retry = 0;
     do                                                 // max 100 retries
     {  // send init cmd (1)
        resp = mmc_command(1       , 0);
                printf("INIT_CMD-status:%x\r\n", resp);
                retry++;
        if(retry>100) return -1;
     } while(resp);
         
     // turn off CRC checking (not actually needed CRC-off is default)
     resp = mmc_command(59      , 0);
          printf("CRC_OFF-status:%x\r\n", resp);
      
     // set block length to 512 bytes (not actually needed 512 bytes is default)
     resp = mmc_command(16      , 512);
          printf("SET_BLKLEN-status:%x\r\n", resp);
          return 0;