/* ========================================================================= */
/* The information contained herein is the exclusive property of */
/* Sunplus Technology Co. And shall not be distributed, reproduced, */
/* or disclosed in whole in part without prior written permission. */
/* (C) COPYRIGHT 2004 SUNPLUS TECHNOLOGY CO. */
/* ALL RIGHTS RESERVED */
/* The entire notice above must be reproduced on all authorized copies. */
/* ========================================================================= */
/* */
/* ========================================================================= */
/* Project Name : AN_SPMC75_0109 */
/* File Name : Xmodem.c */
/* Description : Xmodem����������� */
/* */
/* Processor : SPMC75F2413A */
/* Tools : u'nSP IDE tools v1.18.1A or later version */
/* ========================================================================= */
/* Revision */
/* ========================================================================= */
/* Version : 1.00 */
/* Date : 2005.9.2 */
/* Modified by : ����������ļ�ͷ�����µ�ͷ�ļ� */
/* Description : */
/* ========================================================================= */
#include "AN_SPMC75_0109.H"
/* ----------------------------------------------------------------------------------------
Xmodem transmit in 16-Bit CRC mode ,receiving buffer define:
+--------------------------------------------------------------------------------------+
| Byte0 | Byte1 | Byte2 | Byte 3--130 | Byte 131--132 |
+--------------------------------------------------------------------------------------+
| Start of header | Packet Number | ~(Packet Number) | Packet Data | CRC Hi | CRC Lo |
+--------------------------------------------------------------------------------------+ */
/* ----------------------------------------------------------------------------------------
Xmodem transmit in Check Sum mode ,receiving buffer define:
+-------------------------------------------------------------------------------------------+
| Byte0 | Byte1 | Byte2 | Byte 3--130 | Byte 131 | Byte 132 |
+-------------------------------------------------------------------------------------------+
| Start of header | Packet Number | ~(Packet Number) | Packet Data | CheckSum | NOP |
+-------------------------------------------------------------------------------------------+ */
UInt8 rxdbuf[133] = {0};
// --------------------------------------------------------------- //
TYPESTATUS xmodemstatus;
static UInt8 *rxdptr = rxdbuf;
static UInt16 XmodemTimeOut;
//===========================================================================
extern UInt16 Calc_CRC16(UInt8 *cptr, Int16 count);
extern UInt16 Calc_Cksum(UInt8 *cptr, Int16 count);
/*
//=============================================================
// ----Function: Calc_CRC16A();
// ------Syntax: UInt16 Calc_CRC16A(UInt8 *cptr, Int16 count)
// -Description: CRC 16 calculate
// -------Notes:
// --parameters: cptr: data Cursor count: data length
// -----returns: CRC16
//=============================================================
static UInt16 Calc_CRC16A(UInt8 *cptr, Int16 count)
{
UInt16 crc = 0,i;
while(--count >= 0)
{
crc = crc ^ (UInt16)(*cptr++) << 8;
for(i=0;i<8;i++)
{
if(crc & 0x8000) crc = crc << 1 ^ 0x1021;
else crc = crc << 1;
}
}
return(crc);
}*/
/*
//=============================================================
// ----Function: Calc_Cksum();
// ------Syntax: UInt16 Calc_Cksum(UInt8 *cptr, Int16 count);
// -Description: Check sum calculate
// -------Notes:
// --parameters: cptr: data Cursor count: data length
// -----returns: Checksum
//=============================================================
static UInt16 Calc_Cksum(UInt8 *cptr, Int16 count)
{
UInt16 sum = 0,i;
for(i=0;i<count;i++,cptr++) sum += *cptr;
return(sum&0xff);
}*/
//=============================================================
// ----Function: Spmc75_XmodemPurge();
// ------Syntax: void Spmc75_XmodemPurge(void);
// -Description: Purge
// -------Notes: Wait 1 second
// --parameters: none
// -----returns: none
//=============================================================
static void Spmc75_XmodemPurge(void)
{
UInt8 flush;
xmodemstatus.B._timeout = FALSE;
XmodemTimeOut = TIMEOUT_1S; // 1 second timeout
P_CMT_Start->B.ST0 = 1;
P_UART_Ctrl->W = CW_UART_RXEN|CW_UART_TXEN;
while(!xmodemstatus.B._timeout) // read uart until done
{
flush = P_UART_Data->W;
}
P_UART_Ctrl->W = CW_UART_RXIE|CW_UART_RXEN|CW_UART_TXEN;
P_CMT_Start->B.ST0 = 0; // disable timer/counter
}
//=============================================================
// ----Function: Spmc75_XmodemRecvwait();
// ------Syntax: void Spmc75_XmodemRecvwait(void);
// -Description: Recv wait buffer full or time out
// -------Notes:
// --parameters: none
// -----returns: none
//=============================================================
static void Spmc75_XmodemRecvwait(void)
{
xmodemstatus.B._timeout = FALSE; // set in timer counter 0 overflow interrupt routine
XmodemTimeOut = TIMEOUT_1S; // 1 second timeout
P_CMT_Start->B.ST0 = 1;
while(!xmodemstatus.B._bufmark && !xmodemstatus.B._timeout);
// turn off timer - no more time outs needed
P_CMT_Start->B.ST0 = 0; // disable timer/counter 1 clock
}
//=============================================================
// ----Function: Spmc75_XmodemRespond();
// ------Syntax: void Spmc75_XmodemRespond(UInt8 packet)
// -Description: Respond
// -------Notes:
// --parameters: packet: packet status
// -----returns: none
//=============================================================
static void Spmc75_XmodemRespond(UInt8 packet)
{
// clear buffer flag here ... when acking or nacking sender may respond
// very quickly.
xmodemstatus.B._bufmark = EMPTY;
xmodemstatus.B._recverr = FALSE; // framing and over run detection
if((packet == GOOD) || (packet == DUP) || (packet == END))
{
while(P_UART_Status->B.BY); // wait till transmit register is empty
P_UART_Data->W = ACK; // now for the next packet
}
else
{
while(P_UART_Status->B.BY); // wait till transmit register is empty
Spmc75_XmodemPurge(); // let transmitter empty its buffer
P_UART_Data->W = NAK; // tell sender error
}
}
//=============================================================
// ----Function: Spmc75_XmodemSendc();
// ------Syntax: void Spmc75_XmodemSendc(void);
// -Description: Send 'C'/NAK for request host transmitter
// -------Notes: 'C'->(wait 3s)->NAK->(wait 3s)->'C'->.....
// --parameters: none
// -----returns: none
//=============================================================
static void Spmc75_XmodemSendc(void)
{
XmodemTimeOut = TIMEOUT_3S; // 3 second timeout
xmodemstatus.B._bufmark = EMPTY;
xmodemstatus.B._recverr = FALSE; // checked in Spmc75_ValidatePacket for framing or overruns
// send character 'C'/NAK until we get a packet from the sender
while(!xmodemstatus.B._bufmark)
{
xmodemstatus.B._timeout = FALSE;
xmodemstatus.B._recvmod = 1; // tell sender CRC mode
while(P_UART_Status->B.BY); // wait till Data register is empty
P_UART_Data->W = CRCCHR; // signal transmitter that I'm ready in CRC mode ... 128 byte packets
P_CMT_Start->B.ST0 = 1; // Allow CMT0 timer start timing
// wait for timeout or recv buffer to fill
while(!xmodemstatus.B._timeout && !xmodemstatus.B._bufmark);
P_CMT_Start->B.ST0 = 0; // disable timer/counter 1 clock
if(xmodemstatus.B._timeout) // start wait loop again
{
xmodemstatus.B._timeout = FALSE;
xmodemstatus.B._recvmod = 0;// tell sender Checksum mode
while(P_UART_Status->B.BY); // wait till Data register is empty
P_UART_Data->W = NAK; // signal transmitter that I'm ready in Checksum mode ... 128 byte packets
P_CMT_Start->B.ST0 = 1; // Allow CMT0 timer start timing
while(!xmodemstatus.B._timeout && !xmodemstatus.B._bufmark);
P_CMT_Start->B.ST0 = 0; // disable timer/counter clock
}
}
}
//=============================================================
// ----Function: Spmc75_ValidatePacket();
// ------Syntax: UInt8 Spmc75_ValidatePacket(UInt8 *bufptr);
// -Description: Validate Packet status.
// -------Notes: Validate Packet is OK will apply 'break' Interrupt
// --parameters: bufptr: should Validate Packet data Cursor
// -----returns: result
//=============================================================
static UInt8 Spmc75_ValidatePacket(UInt8 *bufptr)
{
UInt8 packet = BAD;
if(!xmodemstatus.B._timeout)
{
if(!xmodemstatus.B._recverr)
{
if(bufptr[0] == SOH)
{ // valid start
if(bufptr[1] == xmodemstatus.B._number+1)
{ // sequential block number ?
if((bufptr[1] + bufptr[2]) == 0xff)
{ // block number and block number checksum are ok
// compute CRC and validate it
if(xmodemstatus.B._recvmod)
{
if(Calc_CRC16(&bufptr[3],128) == ((bufptr[131]<<8) | bufptr[132]))
{
xmodemstatus.B._number = bufptr[1]; // good packet ... ok to increment
if(xmodemstatus.B._number == 0xFF) xmodemstatus.B._number = 0;
packet = GOOD;
BREAK();
}
}
else if(Calc_Cksum(&bufptr[3],128) == bufptr[131])
{
xmodemstatus.B._number = bufptr[1]; // good packet ... ok to increment
if(xmodemstatus.B._number == 0xFF) xmodemstatus.B._number = 0;
packet = GOOD;
BREAK();
}
} // block number checksum
} // bad block number or same block number
else if(bufptr[1] == xmodemstatus.B._number)
{ // same block number ... ack got glitched
packet = DUP; // packet is previous packet don't inc packet number
}
} // check for the end
else if(bufptr[0] == EOT)
{
packet = END;
xmodemstatus.B._recvrdy = 1;
}
}
else packet = ERR;
}
else packet = OUT;
return(packet);
}
//=============================================================
// ----Function: Xmodem_Rxd_ISR();
// ------Syntax: void Xmodem_Rxd_ISR(void);
// -Description: Xmodem receive interrupt service.
// -------Notes: Used in UART Rxd ISR.
// --parameters: none
// -----returns: none
//=============================================================
void Xmodem_Rxd_ISR(void)
{
UInt8 *localptr = rxdptr;
*localptr++ = P_UART_Data->W; // get char
// Framing or over run error check for errors
if(P_UART_RXStatus->W & (CW_UART_Clear_FE|CW_UART_Clear_PE|CW_UART_Clear_OE))
{
xmodemstatus.B._recverr = TRUE;
P_UART_RXStatus->W = CW_UART_Clear_FE|CW_UART_Clear_PE|CW_UART_Clear_OE;
} // read status register after reading data register
switch(rxdbuf[0]) // determine if buffer full
{
case(SOH):
if(xmodemstatus.B._recvmod) // receive CRC16 mode
{
if(localptr > &rxdbuf[132])
{
xmodemstatus.B._bufmark = FULL;
localptr = &rxdbuf[0];
}
}
else // receive Checksum mode
{
if(localptr > &rxdbuf[131])
{
xmodemstatus.B._bufmark = FULL;
localptr = &rxdbuf[0];
}
}
break;
default:
xmodemstatus.B._bufmark = FULL; // first char unknown
localptr = &rxdbuf[0];
break;
}
rxdptr = localptr; // restore global pointer
}
//=============================================================
// ----Function: Spmc75_XmodemReceive();
// ------Syntax: void Spmc75_XmodemReceive(void);
// -Description: Receive data from PC in Xmodem Protocol
// -------Notes: First send 'C'/NAK, then receive data and responsion
// --parameters: none
// -----returns: none
//=============================================================
void Spmc75_XmodemReceive(void)
{
UInt8 packet; // status flag
rxdptr = rxdbuf; // point to recv buffer
Spmc75_XmodemSendc(); // send a 'c' until the buffer gets full
packet = Spmc75_ValidatePacket(rxdbuf); // validate packet 1
rxdptr = rxdbuf; // re-initialize buffer pointer before acknowledging
Spmc75_XmodemRespond(packet); // ack or nak
while(packet != GOOD) // if we nak'ed above wait for packet 1 again
{
Spmc75_XmodemRecvwait();
packet = Spmc75_ValidatePacket(rxdbuf); // validate packet 1
rxdptr = rxdbuf; // re-initialize buffer pointer before acknowledging
Spmc75_XmodemRespond(packet); // ack or nak
}
while(packet != END) // get remainder of file
{
Spmc75_XmodemRecvwait(); // wait for error or buffer full
packet = Spmc75_ValidatePacket(rxdbuf); // validate the packet
rxdptr = rxdbuf; // re-initialize buffer pointer before acknowledging
Spmc75_XmodemRespond(packet); // ack or nak
}// end of file transmission
}
//=============================================================
// ----Function: Spmc75_XmodemInitial();
// ------Syntax: void Spmc75_XmodemInitial(void);
// -Description: Initialization
// -------Notes: Initial UART and CMT0, CMT0->8Hz
// --parameters: none
// -----returns: none
//=============================================================
void Spmc75_XmodemInitial(void)
{
Spmc75_UART_Init();
Spmc75_CMT0_Init();
xmodemstatus.W = 0;
}
//=============================================================
// ----Function: Spmc75_TimeOut_ISR();
// ------Syntax: void Spmc75_TimeOut_ISR(void);
// -Description: Time out service.
// -------Notes: Used in CMT0 ISR.
// --parameters: none.
// -----returns: none.
//=============================================================
void Spmc75_TimeOut_ISR(void)
{
static UInt16 clock = 0;
if(++clock > XmodemTimeOut)
{
clock = 0;
xmodemstatus.B._timeout = TRUE;
}
}
//=============================================================
// *END*
//=============================================================
| 
楼主
哪个大神有新唐的M0或者M4的Xmodem协议例程，当然最好有完整的串口升级例程，那就棒棒哒了
标题置顶
标题高亮
这种貌似比较古老了吧
