www.pudn.com > hello_led_0.rar > SD_Card.h
#include "system.h"
#include "altera_avalon_pio_regs.h"
#ifndef __SD_Card_H__
#define __SD_Card_H__
//-------------------------------------------------------------------------
// SD Card Set I/O Direction
#define SD_CMD_IN IOWR(SD_CMD_BASE, 1, 0)
#define SD_CMD_OUT IOWR(SD_CMD_BASE, 1, 1)
#define SD_DAT_IN IOWR(SD_DAT_BASE, 1, 0x0)
#define SD_DAT_OUT IOWR(SD_DAT_BASE, 1, 0x0f)
// SD Card Output High/Low
#define SD_CMD_LOW IOWR(SD_CMD_BASE, 0, 0)
#define SD_CMD_HIGH IOWR(SD_CMD_BASE, 0, 1)
#define SD_DAT_LOW IOWR(SD_DAT_BASE, 0, 0x0)
#define SD_DAT_HIGH IOWR(SD_DAT_BASE, 0, 0x0f)
#define SD_CLK_LOW IOWR(SD_CLK_BASE, 0, 0)
#define SD_CLK_HIGH IOWR(SD_CLK_BASE, 0, 1)
// SD Card Input Read
#define SD_TEST_CMD IORD(SD_CMD_BASE, 0)
#define SD_TEST_DAT IORD(SD_DAT_BASE, 0)
#define SDDAT0 (1<<0)
#define SDDAT1 (1<<1)
#define SDDAT2 (1<<2)
#define SDDAT3 (1<<3)
#define PIOSET(PIN) IOWR_ALTERA_AVALON_PIO_DATA(\
(SD_DAT_BASE),(PIN))//方便修改位置端口
//-------------------------------------------------------------------------
#define BYTE unsigned char
#define UINT16 unsigned int
#define UINT32 unsigned long
//-------------------------------------------------------------------------
void Ncr(void);
void Ncc(void);
BYTE response_R(BYTE);
BYTE send_cmd(BYTE *);
BYTE SD_read_lba(BYTE *,UINT32,UINT32);
BYTE SD_card_init(void);
UINT16 GetCRC16(BYTE *, UINT16);
BYTE exam_crc(void);
//unsigned int BlockCRC16Table(unsigned char *,int);
BYTE statshift(void);
BYTE disconnect(void);
//-------------------------------------------------------------------------
BYTE read_status;
BYTE response_buffer[20];
BYTE RCA[2];
BYTE cmd_buffer[5];
const BYTE cmd0[5] = {0x40,0x00,0x00,0x00,0x00};
const BYTE cmd55[5] = {0x77,0x00,0x00,0x00,0x00};
const BYTE cmd2[5] = {0x42,0x00,0x00,0x00,0x00};
const BYTE cmd3[5] = {0x43,0x00,0x00,0x00,0x00};
const BYTE cmd7[5] = {0x47,0x00,0x00,0x00,0x00};
const BYTE cmd9[5] = {0x49,0x00,0x00,0x00,0x00};
const BYTE cmd16[5] = {0x50,0x00,0x00,0x02,0x00};
const BYTE cmd17[5] = {0x51,0x00,0x00,0x00,0x00};
const BYTE cmd24[5] = {0x58,0x00,0x00,0x00,0x00}; //写命令
const BYTE acmd6[5] = {0x46,0x00,0x00,0x00,0x02};
const BYTE cmd32[5] = {0x60,0x00,0x00,0x00,0x00};//erase block start
const BYTE cmd33[5] = {0x61,0x00,0x00,0x00,0x00};//erase block end
const BYTE cmd38[5] = {0x66,0x00,0x00,0x00,0x00};
const BYTE acmd41[5] = {0x69,0x0f,0xf0,0x00,0x00};
const BYTE acmd42[5] = {0x6a,0x00,0x00,0x00,0x00};
const BYTE acmd51[5] = {0x73,0x00,0x00,0x00,0x00};
/////////////////////////////////////////////////////
void N_busy(void)
{
int i;
SD_CMD_IN;
for(i=0;i<6;i++)
{
SD_CLK_LOW;
SD_CLK_HIGH;
}
}
////////////////////////////////////////////////////////
//-------------------------------------------------------------------------
void Ncr(void)
{
SD_CMD_IN;
SD_CLK_LOW;
SD_CLK_HIGH;
SD_CLK_LOW;
SD_CLK_HIGH;
}
//-------------------------------------------------------------------------
void Ncc(void)
{
int i;
for(i=0;i<8;i++)
{
SD_CLK_LOW;
SD_CLK_HIGH;
}
}
//-------------------------------------------------------------------------
BYTE SD_card_init(void)
{
BYTE x,y;
SD_DAT_OUT;
//PIOSET(SDDAT3);
IOWR(SD_DAT_BASE, 1, 0x8); //设置SD_DAT[3]
IOWR(SD_DAT_BASE, 0, 0x8);
SD_CMD_OUT;
SD_DAT_IN;
SD_CLK_HIGH;
SD_CMD_HIGH;
SD_DAT_LOW;
read_status=0;
for(x=0;x<40;x++)
Ncr();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd0[x];
y = send_cmd(cmd_buffer);
do
{
for(x=0;x<40;x++);
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd55[x];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1) //response too long or crc error
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=acmd41[x];
y = send_cmd(cmd_buffer);
Ncr();
} while(response_R(3)==1);
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd2[x];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(2)>1)
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd3[x];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(6)>1)
return 1;
RCA[0]=response_buffer[1];
RCA[1]=response_buffer[2];
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd9[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(2)>1)
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd7[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd16[x];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
///////////////////////////////////
for(x=0;x<40;x++); // 1 to 4 line
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd55[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=acmd6[x];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
//////////////////////////////////
//sd card ready
for(x=0;x<40;x++); //
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd55[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=acmd42[x];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
read_status =1;
return 0;
}
//-------------------------------------------------------------------------
BYTE statshift(void)
{ BYTE x,y;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd7[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd7[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
}
BYTE disconnect(void)
{
BYTE x,y;
Ncc();
for(x=0;x<5;x++)
cmd_buffer[x]=cmd7[x];
cmd_buffer[1] = RCA[0];
cmd_buffer[2] = RCA[1];
y = send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
}
////////////////////////
//-------------------------------------------------------------
BYTE SD_EraseBlock(UINT32 startaddr, UINT32 num)
{
BYTE i;
startaddr+=97;
Ncc();
for(i=0;i<5;i++)
cmd_buffer[0]= cmd32[0];
cmd_buffer[1] = (startaddr>>15)&0xff;
cmd_buffer[2] = (startaddr>>7)&0xff;
cmd_buffer[3] = (startaddr<<1)&0xff;
cmd_buffer[4] = 0;
send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
Ncc();
for(i=0;i<5;i++)
cmd_buffer[0]= cmd33[0];
cmd_buffer[1] = ((startaddr+num-1)>>15)&0xff;
cmd_buffer[2] = ((startaddr+num-1)>>7)&0xff;
cmd_buffer[3] = ((startaddr+num-1)<<1)&0xff;
cmd_buffer[4] = 0;
send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
Ncc();
for(i=0;i<5;i++)
cmd_buffer[i]=cmd38[i];
send_cmd(cmd_buffer);
Ncr();
if(response_R(1)>1)
return 1;
while(1)
{
SD_CLK_LOW;
SD_CLK_HIGH;
if((IORD(SD_DAT_BASE, 0)&0x0f)!=0)////////////////////////////////////////
break;
}
}
//-------------------------------------------------------------------------
BYTE SD_read_lba(BYTE *buff,UINT32 lba,UINT32 seccnt)
{
BYTE c=0, x,y;
UINT32 i,j;
lba+=97;
//SD_CMD_OUT;
SD_DAT_IN;
for(j=0;j>15)&0xff;
cmd_buffer[2] = (lba>>7)&0xff;
cmd_buffer[3] = (lba<<1)&0xff;
cmd_buffer[4] = 0;
lba++;
send_cmd(cmd_buffer);
Ncr();
//if(response_R(1)>1)
// return 1;
}
while(1)
{
SD_CLK_LOW;
SD_CLK_HIGH;
if((IORD(SD_DAT_BASE, 0)&0x0f)==0)//检测到起始位值为0
break;
}
for(i=0;i<512;i++)
{
BYTE j;
c=0;
for(j=0;j<2;j++)
{
SD_CLK_LOW;
SD_CLK_HIGH;
c <<= 4;
c |= (IORD(SD_DAT_BASE, 0)&0x0f);
//if(SD_TEST_DAT)
// c |= 0x0f;
//SD_CLK_LOW;
//SD_CLK_HIGH;
}
*buff=c;
buff++;
}
for(i=0; i<16; i++)//16位CRC检验值不接收
{
SD_CLK_LOW;
SD_CLK_HIGH;
}
}
read_status = 1; //SD data next in
return 0;
}
//-------------------------------------------------------------------------
BYTE response_R(BYTE s)
{
BYTE a=0,b=0,c=0,r=0,crc=0;
BYTE i,j=6,k;
while(1)
{
SD_CLK_LOW;
SD_CLK_HIGH;
if(!(SD_TEST_CMD))
break;
if(crc++ >100)
return 2;
}
crc =0;
if(s == 2)
j = 17;
for(k=0; k 0) //for crc culcar
b = response_buffer[k-1];
for(i=0; i<8; i++)
{
SD_CLK_LOW;
if(a > 0)
c <<= 1;
else
i++;
a++;
SD_CLK_HIGH;
if(SD_TEST_CMD)
c |= 0x01;
if(k > 0)
{
crc <<= 1;
if((crc ^ b) & 0x80)
crc ^= 0x09;
b <<= 1;
crc &= 0x7f;
}
}
if(s==3)
{
if( k==1 &&(!(c&0x80)))
r=1;
}
response_buffer[k] = c;
}
if(s==1 || s==6)
{
if(c != ((crc<<1)+1))
r=2;
}
return r;
}
//-------------------------------------------------------------------------
BYTE send_cmd(BYTE *in)
{
int i,j;
BYTE b,crc=0;
SD_CMD_OUT;
for(i=0; i < 5; i++)
{
b = in[i];
for(j=0; j<8; j++)
{
SD_CLK_LOW;
if(b&0x80)
SD_CMD_HIGH;
else
SD_CMD_LOW;
crc <<= 1;
SD_CLK_HIGH;
if((crc ^ b) & 0x80)
crc ^= 0x09;
b<<=1;
}
crc &= 0x7f;
}
crc =((crc<<1)|0x01);
b = crc;
for(j=0; j<8; j++)
{
SD_CLK_LOW;
if(crc&0x80)
SD_CMD_HIGH;
else
SD_CMD_LOW;
SD_CLK_HIGH;
crc<<=1;
}
return b;
}
//-------------------------SD_write_lba----------------------------------------
BYTE SD_write_lba(UINT32 Unit,UINT32 Sector, BYTE *pBuffer)
{
BYTE b,c,d[8]={0};
BYTE pbufdat0[128]={0},pbufdat1[128]={0},pbufdat2[128]={0},pbufdat3[128]={0};
//UINT32 crc[4]={0};
// BYTE pbufdat00[128]={0},pbufdat11[128]={0},pbufdat22[128]={0},pbufdat33[128]={0};
UINT16 cr[4]={0},f;
UINT32 i,j,k,m,n;
SD_DAT_OUT ;
Sector+=97;
f=0x8000;
m=0; j=0;
for(i=0;i<128;i++)// 512字节
{
c=0x80;//修改
for(n=0;n<4;n++)
{
if((pBuffer[j]&0x10)!=0)//bit4
pbufdat0[m]|=c;
if((pBuffer[j]&0x20)!=0)
pbufdat1[m]|=c;
if((pBuffer[j]&0x40)!=0)
pbufdat2[m]|=c;
if((pBuffer[j]&0x80)!=0) //bit7
pbufdat3[m]|=c;
c>>=1;
/////////////////////
if((pBuffer[j]&0x01)!=0) //bit0
pbufdat0[m]|=c;
if((pBuffer[j]&0x02)!=0)
pbufdat1[m]|=c;
if((pBuffer[j]&0x04)!=0)
pbufdat2[m]|=c;
if((pBuffer[j]&0x08)!=0) //bit3
pbufdat3[m]|=c;
c>>=1;
j++;
}
m++;
}
/////////////////////////////////////////////////////////////////////////
/*
for(i=0;i<128;i++)
{
pbufdat00[i]=pbufdat0[127-i];
pbufdat11[i]=pbufdat1[127-i];
pbufdat22[i]=pbufdat2[127-i];
pbufdat33[i]=pbufdat3[127-i];
}
*/
/////////////////////////////////////////////////////////////////////
cr[0] = GetCRC16(pbufdat0, 128);
// cr[0] &= 0xffff ;
// crc[0] =((crc[0]<<1)|0x01);
cr[1] = GetCRC16(pbufdat1, 128);
// cr[1] &= 0xffff ;
// crc[1] =((crc[1]<<1)|0x01);
cr[2] = GetCRC16(pbufdat2, 128);
// cr[2] &= 0xffff ;
// crc[2] =((crc[2]<<1)|0x01);
cr[3] = GetCRC16(pbufdat3, 128);
// cr[3] &= 0xffff ;
//crc[3] =((crc[3]<<1)|0x01);
// d[8]={0};
// f=0x8000;
for(n=0;n<8;n++)
{
//f=0x8000;
if((cr[0]&f)!=0)
d[n]|=0x10;
if((cr[1]&f)!=0)
d[n]|=0x20;
if((cr[2]&f)!=0)
d[n]|=0x40;
if((cr[3]&f)!=0)
d[n]|=0x80;
f>>=1;
if((cr[0]&f)!=0)
d[n]|=0x01;
if((cr[1]&f)!=0)
d[n]|=0x02;
if((cr[2]&f)!=0)
d[n]|=0x04;
if((cr[3]&f)!=0)
d[n]|=0x08;
f>>=1;
}
Ncc();
cmd_buffer[0] = cmd24[0];
cmd_buffer[1] = (Sector>>15)&0xff;
cmd_buffer[2] = (Sector>>7)&0xff;
cmd_buffer[3] = (Sector<<1)&0xff;
cmd_buffer[4] = 0;
send_cmd(cmd_buffer);
//Sector++;
Ncr();
if(response_R(1)>1)
return 1;
Ncr();
SD_CLK_LOW;
SD_DAT_LOW;
SD_CLK_HIGH;
for(i=0; i <512; i++)
{
b = pBuffer[ i ];
for(k=0; k<2; k++)
{
SD_CLK_LOW;
// SD_CLK_HIGH;
IOWR(SD_DAT_BASE, 0, (b>>4)&0x0f);
// if(b&0x80)
// SD_DAT_HIGH;
// else
// SD_DAT_LOW;
SD_CLK_HIGH;
b<<=4;
}
}
// cr = GetCRC16(pBuffer, 512);
// crc = cr & 0xffff ;
// crc =((crc<<1)|0x01);
for(k=0; k<8; k++)
{
//d[k]>>4;
SD_CLK_LOW;
IOWR(SD_DAT_BASE, 0, (d[k]>>4)&0x0f);
SD_CLK_HIGH;
//d[k]>>=1;
SD_CLK_LOW;
IOWR(SD_DAT_BASE, 0, d[k]&0x0f);
SD_CLK_HIGH;
}
SD_CLK_LOW;
SD_DAT_HIGH;
SD_CLK_HIGH;
exam_crc ();
N_busy();
// N_busy();
// N_busy();
//N_busy();
return 0;
}
//-------------------------------------------------------------------------
BYTE exam_crc(void)
{
BYTE c = 0,i;
SD_DAT_IN;
while(1)
{
SD_CLK_LOW;
SD_CLK_HIGH;
if((SD_TEST_DAT&0x01)==0) //修改
break;
}
for(i=0;i<4;i++)
{
SD_CLK_LOW;
SD_CLK_HIGH;
c <<= 1;
if(SD_TEST_DAT&0x01)
c |= 0x01; //修改
}
if(c==9)
{
printf("transmisson error\n");
return 1;
}
else if(c==5)
{
printf("transmisson success\n");
}
else if(c==0xf)
{
printf("Card is busy \n");
}
while(1)
{
SD_CLK_LOW;
SD_CLK_HIGH;
if(SD_TEST_DAT&0x01) //修改
break;
}
return 0 ;
}
//-------------------------------------------------------------------------
///*
UINT16 GetCRC16(BYTE *pSource, UINT16 len)
{
static UINT16 crc16_table[256]={0x0000,0x1021,0x2042,0x3063,0x4084,0x50a5,0x60c6,0x70e7,
0x8108,0x9129,0xa14a,0xb16b,0xc18c,0xd1ad,0xe1ce,0xf1ef,
0x1231,0x0210,0x3273,0x2252,0x52b5,0x4294,0x72f7,0x62d6,
0x9339,0x8318,0xb37b,0xa35a,0xd3bd,0xc39c,0xf3ff,0xe3de,
0x2462,0x3443,0x0420,0x1401,0x64e6,0x74c7,0x44a4,0x5485,
0xa56a,0xb54b,0x8528,0x9509,0xe5ee,0xf5cf,0xc5ac,0xd58d,
0x3653,0x2672,0x1611,0x0630,0x76d7,0x66f6,0x5695,0x46b4,
0xb75b,0xa77a,0x9719,0x8738,0xf7df,0xe7fe,0xd79d,0xc7bc,
0x48c4,0x58e5,0x6886,0x78a7,0x0840,0x1861,0x2802,0x3823,
0xc9cc,0xd9ed,0xe98e,0xf9af,0x8948,0x9969,0xa90a,0xb92b,
0x5af5,0x4ad4,0x7ab7,0x6a96,0x1a71,0x0a50,0x3a33,0x2a12,
0xdbfd,0xcbdc,0xfbbf,0xeb9e,0x9b79,0x8b58,0xbb3b,0xab1a,
0x6ca6,0x7c87,0x4ce4,0x5cc5,0x2c22,0x3c03,0x0c60,0x1c41,
0xedae,0xfd8f,0xcdec,0xddcd,0xad2a,0xbd0b,0x8d68,0x9d49,
0x7e97,0x6eb6,0x5ed5,0x4ef4,0x3e13,0x2e32,0x1e51,0x0e70,
0xff9f,0xefbe,0xdfdd,0xcffc,0xbf1b,0xaf3a,0x9f59,0x8f78,
0x9188,0x81a9,0xb1ca,0xa1eb,0xd10c,0xc12d,0xf14e,0xe16f,
0x1080,0x00a1,0x30c2,0x20e3,0x5004,0x4025,0x7046,0x6067,
0x83b9,0x9398,0xa3fb,0xb3da,0xc33d,0xd31c,0xe37f,0xf35e,
0x02b1,0x1290,0x22f3,0x32d2,0x4235,0x5214,0x6277,0x7256,
0xb5ea,0xa5cb,0x95a8,0x8589,0xf56e,0xe54f,0xd52c,0xc50d,
0x34e2,0x24c3,0x14a0,0x0481,0x7466,0x6447,0x5424,0x4405,
0xa7db,0xb7fa,0x8799,0x97b8,0xe75f,0xf77e,0xc71d,0xd73c,
0x26d3,0x36f2,0x0691,0x16b0,0x6657,0x7676,0x4615,0x5634,
0xd94c,0xc96d,0xf90e,0xe92f,0x99c8,0x89e9,0xb98a,0xa9ab,
0x5844,0x4865,0x7806,0x6827,0x18c0,0x08e1,0x3882,0x28a3,
0xcb7d,0xdb5c,0xeb3f,0xfb1e,0x8bf9,0x9bd8,0xabbb,0xbb9a,
0x4a75,0x5a54,0x6a37,0x7a16,0x0af1,0x1ad0,0x2ab3,0x3a92,
0xfd2e,0xed0f,0xdd6c,0xcd4d,0xbdaa,0xad8b,0x9de8,0x8dc9,
0x7c26,0x6c07,0x5c64,0x4c45,0x3ca2,0x2c83,0x1ce0,0x0cc1,
0xef1f,0xff3e,0xcf5d,0xdf7c,0xaf9b,0xbfba,0x8fd9,0x9ff8,
0x6e17,0x7e36,0x4e55,0x5e74,0x2e93,0x3eb2,0x0ed1,0x1ef0 };
UINT32 crc,i;
void BuildCRC16Table(unsigned int genPoly)
{
unsigned int i, j, nData;
//unsigned long crc;
for(i=0; i<256; i++)
{
nData = i << 8;
crc = 0;
for( j = 0; j < 8; j++ )
{
if( ( nData ^ crc ) & 0x8000 )
crc = ( crc << 1 ) ^ genPoly;
else
crc <<= 1;
nData <<= 1;
}
crc16_table[i] = crc & 0xFFFF;
}
}
BuildCRC16Table(0x1021);
crc=0;
for(i=0; i>8)^ *pSource++];
/*
BYTE da;
while(len--!=0) {
da=(BYTE) (crc/256);
crc<<=8;
crc^=(UINT16)CRCTable[da^*pSource];
pSource++;
}
*/
return(crc);
}
//*/CRC =((CRC << 8) & 0xFFFF) ^ crc16_table[(CRC>>8)^ *Block++];
/*
unsigned int BlockCRC16Table(unsigned char *Block, int Len)
{
static unsigned int CRC = 0;
int i;
// void ByteCRC16Algorithm(static unsigned int CRC, unsigned char Ch)
// {
unsigned long int genPoly;
//genPoly = 0x8005; //CRC-16 Polynominal
genPoly = 0x11021; //CCITT CRC-16 Polynominal
for (i=0; i>8)^ *Block++];
return CRC;
}
*/
//-------------------------------------------------------------------------
//*/
#endif