STC单片机ISP-Demo-使用Y-Modem协议源码与库函数分享 -

#define MAIN_Fosc 22118400L //定义主时钟
#define Baudrate0 115200UL //串口0波特率600~115200
#include "STC15Fxxxx.H"
#include "ymodem.h"
#define WDT_Enable 0 //1: 允许内部看门狗, 0: 禁止
#define D_BRT0_1T_8bit (256 - MAIN_Fosc / 32 / Baudrate0) //计算波特率 1T 8bit
#define ISP_ADDRESS 0xE400 //ISP开始地址, 高地址必须是偶数, 注意要预留ISP空间,本例程留3K
#define UserflashLenth (ISP_ADDRESS-3) //用户FLASH长度, 保留个字节存放用户地址程序的跳转地址
/************* 本地变量声明 **************/
typedef void (*pFunction)(void);
pFunction Jump_To_Application;
u16 JumpAddress;
u16 FileLength;
u16 Y_TimeOut,WaitTime;
u8 packets_received, session_begin;
u8 idata file_name[FILE_NAME_LENGTH];
u8 idata file_size[FILE_SIZE_LENGTH];
u8 StartCode[3];
u16 FlashDestination;
u16 RxCnt;
u8 HandCnt;
u8 xdata RxBuff[1024];
u8 idata RxBuff_10[10];
u32 DownCheckSum,FlashCheckSum;
/************* 本地函数声明 **************/
u8 Hex2Ascii(u8 dat);
u8 UART_Download(void);
u16 Str2Int(u8 *inputstr);
void ISP_WriteByte(u16 addr, u8 dat);
void ISP_EraseSector(u16 addr);
u8 ISP_ReadByte(u16 addr);
//========================================================================
// 函数: void TX1_write2buff(u8 dat)
// 描述: 串口发送一个字节.
// 参数: dat: 要发送的字节.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void TX1_write2buff(u8 dat)
{
TI = 0;
SBUF = dat;
while(!TI);
}
//========================================================================
// 函数: void PrintString1(u8 *p)
// 描述: 串口发送一个字符串.
// 参数: *p: 要发送的字符串指针.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void PrintString1(u8 *p)
{
for(; *p > 0; p++) TX1_write2buff(*p);
}
//========================================================================
// 函数: void Tx_DEC_U16(u16 j)
// 描述: 把一个16位整型数转成十进制送串口发送.
// 参数: j: 要处理的16位整型数.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void Tx_DEC_U16(u16 j)
{
u8 i;
u8 tmp[10];
for(i=4; i<5; i--) tmp[i] = j % 10 + '0', j = j / 10;
for(i=0; i<4; i++)
{
if(tmp[i] != '0') break;
tmp[i] = ' ';
}
for(i=0; i<5; i++) TX1_write2buff(tmp[i]);
}
//========================================================================
// 函数: void Tx_HEX_U32(u32 j)
// 描述: 把一个32位长整型数转成十进制送串口发送.
// 参数: j: 要处理的32位整型数.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void Tx_HEX_U32(u32 j)
{
u8 i,k;
u8 tmp[10];
for(i=8; i>0; i--)
{
k = ((u8)j) & 0x0f;
if(k <= 9) tmp[i] = k+'0';
else tmp[i] = k-10+'A';
j >>= 4;
}
for(i=1; i<9; i++) TX1_write2buff(tmp[i]);
}
//========================================================================
// 函数: void ReturnNameAndLength(void)
// 描述: 返回程序的文件名和长度, 和累加校验和.
// 参数: none.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void ReturnNameAndLength(void)
{
u16 i;
PrintString1("================================\r\n File name: ");
for(i=0; i<FILE_NAME_LENGTH; i++)
{
if(file_name[i] == 0) break;
TX1_write2buff(file_name[i]);
}
PrintString1("\r\n File length: ");
Tx_DEC_U16(FileLength);
PrintString1(" Bytes\r\n DownChexkSum: ");
Tx_HEX_U32(DownCheckSum);
PrintString1("\r\n ISP Versiom: 2013-4-30 by Coody");
PrintString1("\r\n================================\r\n\r\n");
}
//========================================================================
// 函数: void UART1_RxPackage(void)
// 描述: 串口接收一个数据块.
// 参数: none.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void UART1_RxPackage(void)
{
u16 j; //5ms超时
// RI = 0;
RxCnt = 0;
for(j = 0; j < 5000; j++) //最后收到一个字节5ms后,超时退出
{
if(RI)
{
RI = 0;
if(RxCnt < 1024) RxBuff[RxCnt] = SBUF;
else
{
RxBuff_10[RxCnt-1024] = SBUF;
}
if(++RxCnt >= 1034) RxCnt = 1033;
j = 0; //重新定时5ms
}
}
#if (WDT_Enable > 0)
WDT_reset(D_WDT_SCALE_256);
#endif
}
//========================================================================
// 函数: void main(void)
// 描述: 主函数.
// 参数: none.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void main(void)
{
u8 i;
EA = 0;
Timer0_Stop();
Timer1_Stop();
#if (WDT_Enable > 0)
WDT_reset(D_WDT_SCALE_256);
#endif
S1_8bit();
S1_RX_Enable();
S1_BRT_UseTimer1();
Timer1_AsTimer();
Timer1_1T();
Timer1_8bitAutoReload();
Timer1_InterruptDisable();
TH1 = D_BRT0_1T_8bit;
Timer1_Run();
// PrintString1("\r\n STC ISP Demo\r\n");
while(1)
{
// TX1_write2buff('A');
HandCnt = 0;
for(WaitTime = 0; WaitTime < 300; WaitTime++) //1.5秒超时
{
UART1_RxPackage();
if((RxCnt == 1) && (RxBuff[0] == 'd'))
{
if(++HandCnt >= 10)
{
i = UART_Download();
WaitTime = 250;
if(i == 1) PrintString1("\r\n User abort!\r\n");
else if(i == 2) PrintString1("\r\n PC Cancel!\r\n");
else if(i == 4) PrintString1("\r\n Programming Error!\r\n");
else if(i == 0)
{
PrintString1("\r\n\r\n Programming Completed Successfully!\r\n");
ReturnNameAndLength();
}
}
}
// else HandCnt = 0;
}
if(ISP_ReadByte(ISP_ADDRESS-3) == 0x02)
{
SCON = 0;
AUXR = 0;
TMOD = 0;
TL0 = 0;
TH0 = 0;
TH1 = 0;
TL1 = 0;
TCON = 0;
IAP_CMD = 0;
JumpAddress = ISP_ReadByte(ISP_ADDRESS-2);
JumpAddress = (JumpAddress << 8) | ISP_ReadByte(ISP_ADDRESS-1); //Jump to user application
Jump_To_Application = (pFunction) JumpAddress;
Jump_To_Application();
}
PrintString1(" No AP\r\n");
}
}
//========================================================================
// 函数: u16 Str2Int(u8 *inputstr)
// 描述: 字符串转整型.
// 参数: *inputstr: 字符串指针.
// 返回: 16位整型数.
// 版本: V1.0, 2013-4-29
//========================================================================
u16 Str2Int(u8 *inputstr)
{
u16 val;
u8 i;
val = 0;
for (i = 0; i < 5; i++)
{
if((inputstr[i] < '0') || (inputstr[i] > '9')) break;
val = val * 10 + inputstr[i] - '0';
}
return val;
}
//========================================================================
// 函数: void ISP_WriteByte(u16 addr, u8 dat)
// 描述: 对一个地址写FLASH一个字节.
// 参数: addr: 16位FLASH地址.
// dat: 要写入的一字节数据.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void ISP_WriteByte(u16 addr, u8 dat)
{
IAP_CONTR = ISP_CONTR = (ISP_EN + ISP_WAIT_FREQUENCY); //使能IAP功能
ISP_WRITE(); //编程命令
IAP_ADDRL = addr;
IAP_ADDRH = addr >> 8;
IAP_DATA = dat; //将当前数据送IAP数据寄存器
ISP_TRIG(); //触发ISP命令
}
//========================================================================
// 函数: u8 ISP_ReadByte(u16 addr)
// 描述: 从一个地址读FLASH一个字节.
// 参数: addr: 16位FLASH地址.
// 返回: 读出的一字节数据.
// 版本: V1.0, 2013-4-29
//========================================================================
u8 ISP_ReadByte(u16 addr)
{
IAP_CONTR = ISP_CONTR = (ISP_EN + ISP_WAIT_FREQUENCY); //使能IAP功能
ISP_READ(); //编程命令
IAP_ADDRL = addr;
IAP_ADDRH = addr >> 8;
ISP_TRIG(); //触发ISP命令
return(IAP_DATA);
}
//========================================================================
// 函数: void ISP_EraseSector(u16 addr)
// 描述: 对FLASH擦除一个扇区.
// 参数: addr: 16位FLASH地址.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
void ISP_EraseSector(u16 addr)
{
IAP_CONTR = ISP_CONTR = (ISP_EN + ISP_WAIT_FREQUENCY); //使能IAP功能
ISP_ERASE(); //擦除命令
IAP_ADDRL = addr;
IAP_ADDRH = addr >> 8;
ISP_TRIG(); //触发ISP命令
}
//========================================================================
// 函数: u8 UART_Download(void)
// 描述: 按Ymodem接收文件数据并写入用户FLASH.
// 参数: none.
// 返回: none.
// 版本: V1.0, 2013-4-29
//========================================================================
u8 UART_Download(void)
{
u16 i;
u8 j;
PrintString1("\r\n\r\n Waiting for the file to be sent ... (press 'a' to abort)\r\n");
Y_TimeOut = 0;
packets_received = 0;
session_begin = 0;
WaitTime = 40;
DownCheckSum = 0;
while(WaitTime > 0)
{
if(Y_TimeOut == 0)
{
TX1_write2buff(CRC16);
Y_TimeOut = 300;
if(WaitTime > 0) WaitTime--;
}
while(Y_TimeOut > 0)
{
UART1_RxPackage();
if(RxCnt == 0) Y_TimeOut--;
else
{
if(RxCnt == 1)
{
if(RxBuff[0] == EOT)
{
TX1_write2buff(ACK);
Y_TimeOut = 40;
}
else if((RxBuff[0] == ABORT1) || (RxBuff[0] == ABORT2))
{
return 1;
}
}
else if(RxCnt <= 5)
{
if((RxBuff[0] == CANCEL) && (RxBuff[1] == CANCEL))
{
return 2;
}
}
else if((RxCnt == 133) || (RxCnt == 1029))
{
if (RxBuff[PACKET_SEQNO_INDEX] != (RxBuff[PACKET_SEQNO_COMP_INDEX] ^ 0xff))
{
TX1_write2buff(NAK); //错误, 请求重发
Y_TimeOut = 300;
}
else
{
WaitTime = 5;
if (packets_received == 0) //发送序号为0, 为文件名数据包
{
if (RxBuff[PACKET_HEADER] != 0) //文件名不为空
{
for (i = 0; i < FILE_NAME_LENGTH; i++) file_name[i] = 0;
for (i = 0; i < FILE_SIZE_LENGTH; i++) file_size[i] = 0;
j = PACKET_HEADER;
for (i = 0; (i < FILE_NAME_LENGTH) && (RxBuff[j] != 0); i++)
file_name[i] = RxBuff[j++]; //保存文件名
for (i=0, j++; (RxBuff[j] != ' ') && (i < FILE_SIZE_LENGTH); i++)
file_size[i] = RxBuff[j++]; //保存文件长度
FileLength = Str2Int(file_size); //文件长度由字符串转成十六进制数据
if (FileLength >= UserflashLenth) //长度过长错误
{
TX1_write2buff(CANCEL); //错误返回2个 CA
TX1_write2buff(CANCEL);
return 3; //长度过长
}
StartCode[0] = ISP_ReadByte(0); //保存ISP跳转地址
StartCode[1] = ISP_ReadByte(1);
StartCode[2] = ISP_ReadByte(2);
ISP_EraseSector(0);
ISP_WriteByte(0,StartCode[0]); //回写ISP跳转地址
ISP_WriteByte(1,StartCode[1]);
ISP_WriteByte(2,StartCode[2]);
for(i=0x200; i < UserflashLenth; i+=0x200) //擦除N页
ISP_EraseSector(i);
TX1_write2buff(ACK); //擦除完成, 返回应答
Y_TimeOut = 40;
packets_received ++;
session_begin = 1;
FlashDestination = 0;
DownCheckSum = 0;
}
}
else if(session_begin == 1) //收过文件名
{
if(RxBuff[PACKET_SEQNO_INDEX] == 0) //全0数据帧
{
ISP_WriteByte(ISP_ADDRESS-3,StartCode[0]); //全部下载结束,最后写用户入口地址
ISP_WriteByte(ISP_ADDRESS-2,StartCode[1]);
ISP_WriteByte(ISP_ADDRESS-1,StartCode[2]);
TX1_write2buff(ACK);
FlashCheckSum = ISP_ReadByte(ISP_ADDRESS-3);
FlashCheckSum += ISP_ReadByte(ISP_ADDRESS-2);
FlashCheckSum += ISP_ReadByte(ISP_ADDRESS-1);
for(i = 3; i < FileLength; i++) FlashCheckSum += ISP_ReadByte(i); //计算FLASH累加和
if(FlashCheckSum == DownCheckSum) return 0; //正确
else
{
ISP_EraseSector(ISP_ADDRESS-0x200);
return 4; //写入错误
}
}
else //数据帧
{
for(i=0; i<1024; i++) RxBuff[i] = RxBuff[i+3];
RxBuff[1021] = RxBuff_10[0];
RxBuff[1022] = RxBuff_10[1];
RxBuff[1023] = RxBuff_10[2];
RxCnt -= 5;
for(i = 0; (i < RxCnt) && (FlashDestination < FileLength); i++)
{
if(FlashDestination == 0)
{
StartCode[0] = RxBuff[0];
StartCode[1] = RxBuff[1];
StartCode[2] = RxBuff[2];
FlashDestination = 3;
i += 3;
DownCheckSum += RxBuff[0]; DownCheckSum += RxBuff[1]; DownCheckSum += RxBuff[2];
}
ISP_WriteByte(FlashDestination,RxBuff[i]);
DownCheckSum += RxBuff[i];
FlashDestination ++;
}
TX1_write2buff(ACK); //保存完成, 返回应答
Y_TimeOut = 300;
packets_received ++;
}
}
}
}
}
}
}
return 100; //其他错误
}

复制代码