51pro.c

笔者的《用M8L制作的89S51单片机 USB下载线》在无线电2007年第9期已刊登过

//////////////////////////////////////////////////////////////////////////////////////////////////
//E51Pro.c
//Easy 51Pro编程器主程序，负责通讯，管理编程操作
///////////////////////////////////////////////////////////////////////////////////////////////////

#include <iom8v.h>
#include <macros.h>
#include <e51pro.h>
#include <signal.h>
#define uchar unsigned char 
//BYTE ComBuf[18];//串口通讯数据缓存，发送和接收都使用
UINT nAddress;//ROM中地址计数
UINT nTimeOut;//超时计数
ProWork pw;//编程器一般操作
void Delay_us(BYTE  us)//微秒级延时<255us
{
char a=0;
char b=0;
for (a=0;a<7;a++)
for (b=0;b<us;b++)
;
}
void Delay_ms(UINT ms)//豪秒级的延时<65535ms
{
int a=0;
int b=0;
for (a=0;a<4000;a++)
for (b=0;b<ms;b++)
;
}


void uart_init(void)  //串口通信
{
UCSRB|=(TXEN)|(1<<RXEN);
UBRRL=7;  //设置波特率  57600
UBRRH=0x00;
UCSRC|=(1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0);
}
void uart_putchar(char x)//发送数据
{
while (!(UCSRA&0x20))
;
UDR=x; 
}

BOOL WaitComm()//等待上位机的命令,18字节
{
	BYTE n=0;
	while(!(UCSRA&0x80)){}//等待第一个字节
	ComBuf[n]=UDR;
	n++;
	for(n;n<=17;n++)
	{
		nTimeOut=0;
		while(!(UCSRA&0x80))
		{
			nTimeOut++;
			if(nTimeOut>10000)//后17个字节都有超时限制 
				return 0;
		}
		ComBuf[n]=UDR;
	
	}
	return 1;
}
BOOL WaitResp()//等待上位机回应,1字节,有超时限制 
{
	nTimeOut=0;
	while(!(UCSRA&0x80))
	{
		nTimeOut++;
		if(nTimeOut>50000) 
		{
			return 0;
		}
	}
	
	ComBuf[0]=UDR;
	return 1;
}

BOOL WaitData()//写器件时等待上位机数据，18字节，有超时限制 
{
	BYTE n;
	for(n=0;n<=17;n++)
	{
		nTimeOut=0;
		while(!(UCSRA&0x80))
		{
			nTimeOut++;
			if(nTimeOut>10000)
			{
				return 0;
			}
		}
		ComBuf[n]=UDR;
	}
	return 1;
}

void SendData()//发送数据或回应操作完成,18字节
{
	BYTE n=0;
	for(n;n<=17;n++)
	{
	uart_putchar(ComBuf[n]);
	}
}

void SendResp()//回应上位机1个字节,在写器件函数中使用
{
	uart_putchar(ComBuf[0]);
}

void RstPro()//编程器复位
{
	pw.fpProOver();//直接编程结束
	SendData();//通知上位机，表示编程器就绪，可以直接用此函数因为协议号（ComBuf[0]）还没被修改，下同
}

void ReadSign()//读特征字
{
	pw.fpReadSign();
	SendData();//通知上位机，送出读出器件特征字
}

void Erase()//擦除器件
{
	pw.fpErase();
	SendData();//通知上位机，擦除了器件
}

void Write()//写器件
{
	BYTE n;
	pw.fpInitPro();//编程前的准备工作
	SendData();//回应上位机表示进入写器件状态，可以发来数据
	while(1)
	{
		if(WaitData())//如果等待数据成功
		{
			if(ComBuf[0]==0x07)//判断是否继续写
			{
				for(n=2;n<=17;n++)//ComBuf[2~17]为待写入数据块
				{
					if(!pw.fpWrite(ComBuf[n]))//<<<<<<<<<<<<<<<<<<<调用写该器件一个单元的函数
					{
						pw.fpProOver();//出错了就结束编程
						ComBuf[0]=0xff;
						SendResp();//回应上位机一个字节，表示写数据出错了
						WaitData();//等待上位机的回应后就结束
						return;	
					}
					nAddress++;//下一个单元
				}
				ComBuf[0]=1;//回应上位机一个字节，表示数据块顺利完成，请求继续
				SendResp();
			}
			else if(ComBuf[0]==0x00)//写器件结束
				break;
			else//可能是通讯出错了
			{
				pw.fpProOver();
				return;
			}
		}
		else//等待数据失败
		{
			pw.fpProOver();
			return;
		}
	}
	pw.fpProOver();//编程结束后的工作
	Delay_ms(50);//延时等待上位机写线程结束
	ComBuf[0]=0;//通知上位机编程器进入就绪状态
	SendData();
}

void Read()//读器件
{
	BYTE n;
	pw.fpInitPro();//先设置成编程状态
	SendData();//回应上位机表示进入读状态
	while(1)
	{
		if(WaitResp())//等待上位机回应1个字节
		{
			if(ComBuf[0]==0)//ComBuf[0]==0表示读结束
			{
				break;
			}
			else if(ComBuf[0]==0xff)//0xff表示重发
			{
				nAddress=nAddress-0x0010;
			}
			for(n=2;n<=17;n++)//ComBuf[2~17]保存读出的数据块
			{
				ComBuf[n]=pw.fpRead();//<<<<<<<<<<<<<<<<<<<调用写该器件一个单元的函数
				nAddress++;//下一个单元
			}
			ComBuf[0]=6;//向上位机发送读出的数据块
			SendData();
		}
		else
			break;//等待回应失败	

	}
	pw.fpProOver();//操作结束设置为运行状态
	ComBuf[0]=0;//通知上位机编程器进入就绪状态
	SendData();
}

void Lock()//写锁定位
{
	pw.fpLock();
	SendData();
}

///////////////////////////////////////////////////////////////////////////////////////////////////
//所支持的FID,请在这里继续添加
///////////////////////////////////////////////////////////////////////////////////////////////////
extern void PreparePro00();//FID=00:AT89C51编程器
extern void PreparePro01();//FID=01:AT89C2051编程器
extern void PreparePro02();//FID=02:AT89S51编程器

void main()
{
 	DDRC=0xff;
	PORTC|=BIT(PB0);
	PORTC&=~BIT(PB1);
    uart_init();
	Delay_ms(500);//延时1秒后编程器自举
	ComBuf[0]=0;
	SendData();
 	while(1)//串口通讯采用查询方式
	{
		if(!WaitComm())//如果超时,通讯出错
		{
			Delay_ms(200);
			ComBuf[0]=0;//让编程器复位,使编程器就绪
		}
		switch(ComBuf[1])//根据FID设置(ProWork)pw中的函数指针
		{
			case 0://at89c51编程器
				//PreparePro00();
				break;
			case 1://at89c2051编程器
				//PreparePro01();
				break;
			case 2://at89s51编程器
				PreparePro02();
				break;
			//case 3:支持新器件时，请继续向下添加
			//	break;
			//case 4:
			//	break;
			default:
				ComBuf[0]=0xff;
				ComBuf[1]=0xff;//表示无效的操作
				break;
		}
		switch(ComBuf[0])//根据操作ID跳到不同的操作函数
		{
			case 0x00:
				RstPro();//编程器复位
				break;
			case 0x01:
				ReadSign();//读特征字
				break;
			case 0x02:
				Erase();//擦除器件
				break;
			case 0x03:
				Write();//写器件
				break;
			case 0x04:
				Read();//读器件
				break;
			case 0x05:
				Lock();//写锁定位
				break;
			default:
				SendData();
				break;
		}
	}
}