sd_card.c

s3c2410 SD卡驱动原代码.

/****************************************************************************
【文  件  名  称】SD_Card.c
【功  能  描  述】FS2410XP教学平台实验程序
【程  序  版  本】3.0
【创建及创建日期】优龙公司/2005-XX-XX
【修改及修改日期】2005-5-23
****************************************************************************/
//头文件定义
#include "def.h"
#include "2410addr.h"
#include "config.h"
#include "board.h"
#include "SD_Card.h"

#define INICLK	400000//400000//300000
#define NORCLK	20000000

#define POL	0
#define INT	1
#define DMA	2

int CMD13(void);    // Send card status
int CMD9(void);
// Global variables
int *Tx_buffer;	//128[word]*16[blk]=8192[byte]
int *Rx_buffer;	//128[word]*16[blk]=8192[byte]
volatile unsigned int rd_cnt;
volatile unsigned int wt_cnt;
volatile unsigned int block;

int Wide=0; // 0:1bit, 1:4bit
int MMC=0;  // 0:SD  , 1:MMC

int  Maker_ID;
char Product_Name[7]; 
int  Serial_Num;



volatile int RCA;
static int blk_offset;

/***************************************************************************
Function name: SDI_test
Parameter    : void
Description  : SD Card实验函数
Return	     : void
Argument     : 
Autor & date :
****************************************************************************/
void SDI_test(void)
{
    int m,n;
    int data[128];
    RCA=0;
    MMC=0;

    rGPEUP  = 0xf83f;     // The pull up
    rGPECON = 0xaaaaaaaa;
    rSDICSTA = 0xffff;
    rSDIDSTA = 0xffff;

    printf("\n[SDI test]\n");
    
    if(!SD_card_init())
	return;
	block=1;   
	printf("Blocks = %d\n", block);  
	blk_offset = 0x2000;
	
    for(m=0;m<128;m++)data[m]=m;
   	Tx_buffer=data;
   	Wt_Block();					//写SD卡的块数据
   	for( m = 0; m < 2; m++ )
    {
		for( n = 0; n < 16; n++ )
		    printf( "%04x ",data[m*16+n] ) ;	    
		printf("\n");
   	 }					     //打印写入的数据
   	 
   	 
   	for(m=0;m<128;m++)data[m]=0;//清数组
   	Rx_buffer=data;
    Rd_Block();					//读SD卡的块数据
    printf("read data\n");		
    for( m = 0; m < 2; m++ )
   	{
		for( n = 0; n < 16; n++ )
		    printf( "%04x ", data[m*16+n] ) ;
		    
		printf("\n");
   	 }						//打印读出的数据
   	 
	Card_sel_desel(0);	// Card deselect
    
    rSDICARG = RCA<<16;
	rSDICCON = (0x1<<10)|(0x1<<9)|(0x1<<8)|0x4a;
	if(Chk_CMDend(10, 1));
		//printf("CID = %x,%x,%x,%x\n", rSDIRSP0, rSDIRSP1, rSDIRSP2, rSDIRSP3);
	else
		puts("Get cid fail!\n");

    if(!CMD9())
		printf("Get CSD fail!!!\n");
    rSDIDCON=0;//tark???
    rSDICSTA=0xffff;
}


/***************************************************************************
Function name: SD_card_init
Parameter    : void
Description  : SD卡初始化
Return	     : void
Argument     : 
Autor & date :
****************************************************************************/
int SD_card_init(void)
{
//-- SD controller & card initialize 
    int i;
//    char key;

    /* Important notice for MMC test condition */
    /* Cmd & Data lines must be enabled pull up resister */
	U32 PCLK =  GetMasterClock()/4;

    rSDIPRE = PCLK/(2*INICLK)-1;	// 400KHz
    rSDICON=(1<<4)|(1<<1)|1;	// Type B, FIFO reset, clk enable
    rSDIBSIZE=0x200;		// 512byte(128word)
    rSDIDTIMER=0xffff;		// Set timeout count

    for(i=0;i<0x1000;i++);  // Wait 74SDCLK for MMC card

    //printf("rSDIRSP0=0x%x\n",rSDIRSP0);
    CMD0();
    printf("In idle\n");

    if(Chk_SD_OCR()) 
        printf("In SD ready\n");
    else
    {
		printf("Initialize fail\nNo Card assertion\n");
        return 0;
    }    	

RECMD2:
    //-- Check attaced cards, it makes card identification state
    rSDICARG=0x0;   // CMD2(stuff bit)
    rSDICCON=(0x1<<10)|(0x1<<9)|(0x1<<8)|0x42; //lng_resp, wait_resp, start, CMD2

    //-- Check end of CMD2
    if(!Chk_CMDend(2, 1)) 
		goto RECMD2;
    //rSDICSTA=0xa00;	// Clear cmd_end(with rsp)

  //  printf("End id\n");

RECMD3:
    //--Send RCA
    rSDICARG=MMC<<16;	    // CMD3(MMC:Set RCA, SD:Ask RCA-->SBZ)
    rSDICCON=(0x1<<9)|(0x1<<8)|0x43;	// sht_resp, wait_resp, start, CMD3

    //-- Check end of CMD3
    if(!Chk_CMDend(3, 1)) 
		goto RECMD3;
    //rSDICSTA=0xa00;	// Clear cmd_end(with rsp)

    //--Publish RCA
    if(MMC) 
		RCA=1;
    else 
		RCA=( rSDIRSP0 & 0xffff0000 )>>16;
   // printf("RCA=0x%x\n",RCA);    	

    //--State(stand-by) check
    if( rSDIRSP0 & 0x1e00!=0x600 )  // CURRENT_STATE check, modified by hzh???
		goto RECMD3;
		
	//	printf("rSDIRSP0=%x, %x, %x\n", rSDIRSP0, rSDIRSP0 & 0x1e00, rSDIRSP0 & 0x1e00!=0x600);
    
    printf("\nIn stand-by\n");    	
    
    rSDIPRE=PCLK/(2*NORCLK)-1;	// Normal clock=25MHz

    Card_sel_desel(1);	// Select

    if(!MMC)
		Set_4bit_bus();
    else
		Set_1bit_bus();							

    return 1;
}

/***************************************************************************
Function name: Card_sel_desel
Parameter    : sel_desel:
Description  : SD select
Return	     : void
Argument     : 
Autor & date :
****************************************************************************/
void Card_sel_desel(char sel_desel)
{
    //-- Card select or deselect
    if(sel_desel)
    {
RECMDS7:	
	rSDICARG=RCA<<16;	// CMD7(RCA,stuff bit)
	rSDICCON= (0x1<<9)|(0x1<<8)|0x47;   // sht_resp, wait_resp, start, CMD7

	//-- Check end of CMD7
	if(!Chk_CMDend(7, 1))
	    goto RECMDS7;
	//rSDICSTA=0xa00;	// Clear cmd_end(with rsp)

	//--State(transfer) check
	if( rSDIRSP0 & 0x1e00!=0x800 )	//???
	    goto RECMDS7;
    }
    else
    {
RECMDD7:	
	rSDICARG=0<<16;		//CMD7(RCA,stuff bit)
	rSDICCON=(0x1<<8)|0x47;	//no_resp, start, CMD7

	//-- Check end of CMD7
	if(!Chk_CMDend(7, 0))
	    goto RECMDD7;
	//rSDICSTA=0x800;	// Clear cmd_end(no rsp)
    }
}

/***************************************************************************
Function name: Rd_Block
Parameter    : void
Description  : SD卡读块操作
Return	     : void
Argument     : 
Autor & date :
****************************************************************************/
void Rd_Block(void)
{
    U32 mode;
    int status;
rd_blk_agn:
    rd_cnt=0;    
    printf("[Block read test : Poll read]\n");

RE0:
    mode = 0;
   // printf("Mode : %d\n", mode);

    rSDICON |= rSDICON|(1<<1);	// FIFO reset

   // Delay(10);
    if(mode!=2)
	rSDIDCON=(1<<19)|(1<<17)|(Wide<<16)|(2<<12)|(block<<0);
		// Rx after cmd, blk, 4bit bus, Rx start, blk num
	//Delay(12);

    rSDICARG=blk_offset*0x200;	// CMD17/18(addr)	 

RERDCMD:
    switch(mode)
    {
		case POL:
		//puts("Poll read\n");			
	    if(block<2)	// SINGLE_READ
	    {
		rSDICCON=(0x1<<9)|(0x1<<8)|0x51;    // sht_resp, wait_resp, dat, start, CMD17
		if(!Chk_CMDend(17, 1))	//-- Check end of CMD17
		    goto RERDCMD;	    
	    }
	    else	// MULTI_READ
	    {
		rSDICCON=(0x1<<9)|(0x1<<8)|0x52;    // sht_resp, wait_resp, dat, start, CMD18
		if(!Chk_CMDend(18, 1))	//-- Check end of CMD18 
		    goto RERDCMD;
	    }

	    //rSDICSTA=0xa00;	// Clear cmd_end(with rsp)	    

	    while(rd_cnt<128*block)	// 512*block bytes
	    {
		if((rSDIDSTA&0x20)==0x20) // Check timeout 
		{
		    rSDIDSTA=0x1<<0x5;  // Clear timeout flag
		    break;
		}
		status=rSDIFSTA;			
		if((status&0x1000)==0x1000)	// Is Rx data?
		{
		    *Rx_buffer++=rSDIDAT;
		    rd_cnt++;
		}
	    }
	    break;
	default:
	    break;
    }
	printf("chk data end\n");    
	if(!Chk_DATend()) 
		{
			printf("error\n");
			//goto rd_blk_agn;
		}
	rSDIDSTA=0x10;	// Clear data Tx/Rx end    

    if(block>1)
    {
RERCMD12:    
	//--Stop cmd(CMD12)
	rSDICARG=0x0;	    //CMD12(stuff bit)
	rSDICCON=(0x1<<9)|(0x1<<8)|0x4c;//sht_resp, wait_resp, start, CMD12

	//-- Check end of CMD12
	if(!Chk_CMDend(12, 1)) 
	    goto RERCMD12;
	//rSDICSTA=0xa00;	// Clear cmd_end(with rsp)
    }
    
  //  goto rd_blk_agn;
}


/***************************************************************************
Function name: Wt_Block
Parameter    : void:
Description  : SD卡写块操作
Return	     : void
Argument     :