main.c

这是一个rfid读卡器程序

/****************************************************************************
* File :  main.c                                                            *
* COPYRIGHT BY HUOYAN LTD.COMPANY                                           *
* Version:      V2.0                                       			        *
*                                                                           *
* Created:      07.Aug.2006                                                 *
* Last Change:  25.DEC.2006                                                 *
*                                                                           *
* Author:       sun ,nil                                                    *
*                                                                           *
* Compiler:     KEIL C51 V7.10                                              *
*                                                                           *
* Description:  AT89S52 Firmware for HY502  Serial Reader                   *
*   This project is designed for HY502XX                                    *
*   OSC use 11.0592MHz crystal.  										    *
****************************************************************************/

/*******************  www.ehuoyan.com *************************************/
/*-------------------------------------------------------------------------*/

#include "main.h"	 
#include "hy502.h"

#define uchar	unsigned char
#define uint    unsigned int		    

#define TIMER2           TRUE

bit ack;	//应答标志
uchar code cStatus1[]="Ok!";


uchar keytype=0x60;  //	 密钥标识：60为PICC_AUTHENT1A(61为PICC_AUTHENT1B)
uchar idata	  g_cBeeps=0x10;				

bit           g_bReceCommandOk;	//flag of command receive OK
bit           g_bReceAA;		//flag of last received byte is "0xaa", used in interrupt
bit           g_bCard;			//flag of card in		 



/////////////////////////////////////////////////////////////////////////////////////////////////////
// 延时函数
void delay(unsigned int x)
{
	while(x)
	{
		x--;
	}
}

///////////////////////////////////////////////////////////////////////
// Delay 50us
///////////////////////////////////////////////////////////////////////	  
void delay_50us(unsigned char _50us)
{
	uchar i;

    while(_50us--)
	{
		for(i=0;i<81;i--)
		{  _nop_();  }

    }
}

///////////////////////////////////////////////////////////////////////
// Delay 1ms
///////////////////////////////////////////////////////////////////////
void delay_1ms(unsigned char _1ms)
{
#ifndef TIMER2
    RCAP2LH = RCAP2_1ms;
    T2LH    = RCAP2_1ms;

    TR2 = TRUE;
    while (_1ms--)
    {
	    while (!TF2);
	    TF2 = FALSE;
    }
    TR2 = FALSE;
#else
    while (_1ms--)
    {
	    delay_50us(20);
    }
#endif
}

///////////////////////////////////////////////////////////////////////
// Delay 10ms
///////////////////////////////////////////////////////////////////////
void delay_10ms(unsigned int _10ms)
{

#ifndef TIMER2
    RCAP2LH = RCAP2_10ms;
    T2LH    = RCAP2_10ms;
    
    TR2 = TRUE;
    while (_10ms--)
    {
	    while (!TF2);
	    TF2 = FALSE;
    }
    TR2 = FALSE;
#else

    while (_10ms--)
    {
		delay_50us(200); 	
    }
#endif
}

/******************* SPI FUNCTION DEFINE ************************************/
/*****************************************************************************
*function: send a byte over SPI bus
 发送一个字节
*****************************************************************************/
unsigned char SPIRWByte(unsigned char cSendByte)
{
	unsigned char data i = 8;
	unsigned char cRecByte;
	while (i--)
	{
		cRecByte += cRecByte;
		SCL = 0;
		MOSI = (bit)(cSendByte & 0x80);
		cSendByte += cSendByte;
		cRecByte |= (unsigned char) MISO ;
		SCL = 1;
	}
	SCL = 1;
	return cRecByte;
}

// SPI 总线状态定义
#define SPI_RDY  0xF0;		  // 准备
#define spibusy  0xaa		  // 忙
#define spiread  0xbb		  // 读
#define spiwrite 0xcc		  // 写

/***** 查询SPI总线状态 *********/
unsigned char spi_cStatus(void)
{
	unsigned char cStatus;
	NSS=0;
	cStatus=SPIRWByte(spibusy);

	cStatus=SPIRWByte(0xFF);
	NSS=1;

        return cStatus;
}

/***** 读SPI总线数据 *********/
unsigned char SPI_Read(unsigned char *cP)
{
	unsigned char cCnt,cStatus;
	unsigned char cCheckSum = 0;

   	for (cCnt=0; cCnt<100; cCnt++)
   	{
		cStatus=spi_cStatus(); //查询SPI总线状态
		if(cStatus==0xF0)
		{
			cCnt=253;
		}
		delay(10);	  
	}

	if(cCnt==254)  //卡操作结束，可以回传数据
	{
		NSS=0;
		cCnt=SPIRWByte(spiread);
     	        cP[0]=2;
    	   for (cCnt=0; cCnt<cP[0]; cCnt++)
    	   {
    		cP[cCnt] = SPIRWByte(0xFF);
    		cCheckSum ^= cP[cCnt];
                if(cP[0]>32)
                {
                   NSS=1;
                   return  FAILURE;
                }
    	   }
    	   cP[cCnt] = SPIRWByte(0xFF);

    	   NSS=1;
    	   if (cCheckSum == cP[cCnt])
    	   {
                LED_YELLOW =0;
    		return SUCCESS;

    	   }
        }
	return FAILURE;
}

/***** 写SPI总线数据 *********/
unsigned char SPI_Write(unsigned char *cP)
{
	unsigned char i,cStatus;
	unsigned char cCheckSum = 0;

		NSS=0;
		cStatus=SPIRWByte(spiwrite);

		for(i=0; i<cP[0]; i++)	// cP[0] 表示数据包的长度
		{
			cCheckSum ^= cP[i];
			cStatus=SPIRWByte(cP[i]);
		}
		cStatus=SPIRWByte(cCheckSum);
		NSS=1;
	return cStatus;
}

/******************* serial function ****************************************/
/*****************************************************************************
*send command to Master over UART
*****************************************************************************/
void UartSend(unsigned char *cSendBuffer)
{
	unsigned char i;
	unsigned char cCheckSum;
	ES = 0;
	TI = 0;
	g_bReceCommandOk = 0;
	SBUF = 0xAA;
	while (!TI);
	TI = 0;
	SBUF = 0xBB;
	while (!TI);
	cCheckSum = 0;
	for (i=0; i<cSendBuffer[0]; i++)
	{
		cCheckSum ^= cSendBuffer[i];
		TI = 0;
		SBUF = cSendBuffer[i];
		while (!TI);
		if (cSendBuffer[i] == 0xAA)
//if there is a "0xAA" in the data serial but not the command header,
//add a "0x00" follow the "0xAA", CL (command length) will unchanged
		{
			TI = 0;
			SBUF = 0;
			while (!TI);
		}
	}
	TI = 0;
	SBUF = cCheckSum;
	while (!TI);
	TI = 0;
	ES = 1;
}
/*****************************************************************************
*serial interrupt routine
*****************************************************************************/
seri_int () interrupt 4 using 2
{
	static unsigned char i;
	static unsigned char cReceivedData;
	static unsigned char cCheckSum;
	if (RI)
	{
		cReceivedData = SBUF;
		RI = 0;
		if (g_bReceAA)
		{
			g_bReceAA = 0;
			if (0 != cReceivedData)
			{
				g_cReceNum = 0;
			}
		}
		else
		{
			if (0xAA == cReceivedData)
			{
				g_bReceAA = 1;
			}
			g_cReceBuf[g_cReceNum++] = cReceivedData;

			if (g_cReceNum > g_cReceBuf[0])
			{
				cCheckSum = 0;
				for (i=0; i <= g_cReceBuf[0]; i++)
				{
					cCheckSum ^= g_cReceBuf[i];
				}
				if (0 == cCheckSum)
				{
					g_bReceCommandOk = 1;
					ES = 0;
				}
				g_bReceAA = 0;
				g_cReceNum = 0;
			}
			if (g_cReceNum >= sizeof(g_cReceBuf))
			{
				g_cReceNum = 0;
				g_bReceAA = 0;
			}
		}
	}
	if (TI)
	{
		TI = 0;
	}
}

/*
uchar autocard(uchar *cardno)	 // 寻卡，防冲突，选择卡    返回状态，指针参数为返回的卡系列号(4 bytes)
{
	uchar cStatus1;
	uchar cnt,i;
	uchar cp1[10];

	for(cnt=0;cnt<3;cnt++)
	{
		 cStatus1 =SPI_Write(ComSearchCard);	  // 发送寻卡命令
		 delay_10ms(2);					          // 延时等待模块执行命令
		 cStatus1 =SPI_Read(cp1);		  // 读取卡号并存入到g_cReceBuf
		 if(cStatus1==SUCCESS)
		 {
		    if(cp1[1]==CARD_SN)       // 读卡号成功
		    {
		    	for(i=0;i<4;i++)	// 提取4字节卡号
		       {
		        	cardno[i]=cp1[i+2];
		       }  
		                       
		        cnt=5;   //exit loop	 
				cStatus1=0; 							
		    }
		  }
		  else cStatus1=1;

	}   	
	
	return cStatus1;
}
  */

// buzz freq

unsigned int g_cBeepDiv0;
unsigned char sp_freq=0xdc;
void timer0(void) interrupt 1 using 3	 //0.01s
{
	TH0=sp_freq;
	if(g_cBeepDiv0)   //beep
	{
		g_cBeepDiv0--;
		BUZ=(g_cBeepDiv0&0x0010);
	}
	 
}


///////////////////////////////////////////////////////////////////////
// 串口命令处理函数
///////////////////////////////////////////////////////////////////////
uchar uart_process(void)
{
	uchar cmd;		 
	uchar cStatus;
	uchar cnt;

	cmd = g_cReceBuf[1];
	switch(cmd)
	{  

		case 0x11:	  // 软件掉电模式 ,1字节数据，非0退出软件掉电模式，0x00进入软件掉电
		                //任何一条对卡的操作命令或自动寻卡被设置后都将终止掉电模式
			if(g_cReceBuf[2]==0x01)
			{
		    	for(cnt=0;cnt<3;cnt++)
	            {
		            cStatus =SPI_Write(AntOn);	  // 发送命令
		            delay_10ms(2);					          // 延时等待模块执行命令
		            cStatus =SPI_Read(cp);		  // 读取并存入到cP
			    	if((cStatus==SUCCESS)&&(cp[1]==SOFTDOWN))
					{
				    	SendBuffer[0]=0x02;
						SendBuffer[1]=cmd;
						cnt=5;
					}
				}
				cStatus=0;
			}
			else if(g_cReceBuf[2]==0)							  
			{
			    for(cnt=0;cnt<3;cnt++)
		            {
			            cStatus =SPI_Write(AntOff);	  // 发送命令
			            delay_10ms(2);					          // 延时等待模块执行命令
			            cStatus =SPI_Read(cp);		  // 读取并存入到cP
				    	if((cStatus==SUCCESS)&&(cp[1]==SOFTDOWN))
						{
					    	SendBuffer[0]=0x02;
							SendBuffer[1]=cmd;
							cnt=5;
						}
					}
				cStatus=0;
			}	  			
			else
			{
				SendBuffer[0]=0x02;