#include "Usart.h"
#include <string.h>
#include <stdio.h>
#include "modbus.h"
#include "Rcc_Nvic_Systick.h"

//Êý¾Ý·¢ËͶÓÁбäÁ¿
EUART_Frame m_EUART_TxFrames[EUART_TX_FRM_SIZE];	//Êý¾Ý·¢ËÍÖ¡¶ÓÁÐ	
volatile int8_t m_EUART_TxFrm_Tail = 0;					//Êý¾Ý·¢ËÍÖ¡¶ÓÁÐβָÕë
volatile int8_t m_EUART_TxFrm_Head = 0;					//Êý¾Ý·¢ËÍÖ¡¶ÓÁÐÍ·Ö¸Õë
volatile int8_t m_EUART_TxFrm_FreeFrmLen = 0;			//Êý¾Ý·¢ËÍÖ¡¶ÓÁÐÊ£ÓàÖ¡Êý
//DMAÊý¾Ý½ÓÊÕ»º´æ
uint8_t m_EUART_DMA_RXBuf[EUART_RX_BUF_SIZE];			//DMAÊý¾Ý½ÓÊÕ»º´æ
volatile int32_t m_EUART_DMA_RXPtr = 0;					//µ±Ç°Êý¾ÝµØÖ·
int16_t DMA_rxtemp = 0,DMA_rxtemp2 = 0;															//µ±Ç°Êý¾ÝµØÖ·»º´æ
uint16_t datadelaycount = 0;													//Ê£Óà1λÊý¾ÝÑÓʱµÈ´ý´¦Àí
//±êÖ¾±äÁ¿
volatile uint8_t m_bEUARTPushingFrms = 0;				//ÕýÔÚÍù·¢ËͶÓÁдæÊý¾Ý
volatile uint8_t m_bEUARTCheckingSend = 0;				//ÕýÔÚÈ·ÈÏÊý¾Ý·¢ËÍ
volatile uint8_t m_bEUARTCheckingRec = 0;				//ÕýÔÚÈ·ÈϽÓÊÕÊý¾Ý
volatile uint8_t m_bEUARTTxEn = 0;						//ʹÄÜ·¢ËÍ

void (*Usart1ParseDataCallback)(uint8_t);
void Usart1InitVariables(void)
{	
	m_EUART_TxFrm_FreeFrmLen = EUART_TX_FRM_SIZE-1;
}

//UART DMAµÄÅäÖÃ



uint8_t overrun_flag=0;
uint16_t t1,t2,t3,t4;
void UART_CheckReceive(void)
{
	int32_t DMACnt = 0;
	int32_t MaxDataLen = EUART_RX_BUF_SIZE;	
	
	//Èç¹ûÕýÔÚÍù·¢ËͶÓÁÐÖÐÌí¼ÓÊý¾Ý£¬Í˳ö
	if(m_bEUARTPushingFrms)
		return;
	//ÅжÏÊÇ·ñÕýÔÚCheck
	if(m_bEUARTCheckingRec)
		return;
	m_bEUARTCheckingRec = 1;
	if(EUART_RX_DMA_CH->CNDTR == 0)
	{
		m_bEUARTCheckingRec = 0;
		return;
	}
	DMACnt = EUART_RX_BUF_SIZE - (EUART_RX_DMA_CH->CNDTR);
	while( m_EUART_DMA_RXPtr != DMACnt && MaxDataLen > 0)
	{
		Usart1ParseDataCallback(m_EUART_DMA_RXBuf[m_EUART_DMA_RXPtr]);
		waitusart_timer = tag_frequency*USART_KEEPWAKE_TIME;
		//delay_us(10);
		m_EUART_DMA_RXPtr++;
		if( m_EUART_DMA_RXPtr >= EUART_RX_BUF_SIZE )
		{
			m_EUART_DMA_RXPtr = 0;
		}
		DMACnt = EUART_RX_BUF_SIZE - (EUART_RX_DMA_CH->CNDTR);
		MaxDataLen--;
	}
	m_bEUARTCheckingRec = 0;	
}

#ifndef EXUART_USE_TXDMA							
//²éѯ·½Ê½·¢ËÍÊý¾Ý
void UART_CheckSend(void)
{
	static int32_t s_count = 0;
//	uint32_t temp32 = 0;

	if(m_bEUARTPushingFrms || m_bEUARTCheckingSend)
		return;
	m_bEUARTCheckingSend = 1;

	//Åж϶ÓÁÐÊÇ·ñΪ¿ÕÒÔ¼°DMAÊÇ·ñ¿ÕÏÐ
	if ((EXT_UART->ISR & UART_FLAG_TXE) == (uint16_t)RESET)	//Éϴη¢ËÍδÍê³É
	{
		m_bEUARTCheckingSend = 0;
		return;
	}
	
	if(m_EUART_TxFrm_Head == m_EUART_TxFrm_Tail)					//¶ÓÁÐΪ¿Õ
	{
		if((EXT_UART->ISR & UART_FLAG_TC) != (uint16_t)RESET)	 	//·¢ËÍÍê±Ï
		{
			if(m_bEUARTTxEn)
			{
				m_bEUARTTxEn = 0;
				t3++;
//				temp32 = GPIOC->CRH;			//C10Ðü¿ÕÊäÈë
//				temp32 &= ~(0x00000000F<<8);		
//				temp32 |= (0x000000004<<8);
//				GPIOC->CRH = temp32;// */
			}
		}
		m_bEUARTCheckingSend = 0;
		return;
	}
	
	if(!m_bEUARTTxEn)
	{
		m_bEUARTTxEn = 1;
		#ifdef BAUDRATE_19200
		delay_us(500);
		#else
		delay_us(10);
		#endif
//		temp32 = GPIOC->CRH;			//C10¸´ÓÃÍÆÍìÊä³ö
//		temp32 &= ~(0x00000000F<<8);
//		temp32 |= (0x000000009<<8);
//		GPIOC->CRH = temp32;// */
	}
	
	//·¢ËÍÒ»¸ö×Ö½ÚÊý¾Ý
	EXT_UART->TDR = m_EUART_TxFrames[m_EUART_TxFrm_Tail].buf[s_count];		
	s_count++;
	if(s_count >= m_EUART_TxFrames[m_EUART_TxFrm_Tail].len)		//Ò»Ö¡Êý¾Ý·¢ËÍÍê±Ï
	{
		s_count = 0;
		m_EUART_TxFrm_Tail++;
		if(m_EUART_TxFrm_Tail == EUART_TX_FRM_SIZE)
			m_EUART_TxFrm_Tail = 0;
		m_EUART_TxFrm_FreeFrmLen++;
	}
	m_bEUARTCheckingSend = 0;
 }		   // */

#else
 /*
//¼ì²éÊÇ·ñÊý¾ÝÖ¡ÐèÒª·¢ËÍ
void UART_CheckSend(void)
{
	//ÅжÏÊÇ·ñÕýÔÚCheck
	if(m_bEUARTPushingFrms || m_bEUARTCheckingSend)
		return;
	m_bEUARTCheckingSend = 1;

	//ÅжÏDMAͨµÀÊÇ·ñÕýÔÚ¹¤×÷
	if((EUART_TX_DMA_CH->CCR & 0x01) != 0)	//ͨµÀÕýÔÚ¹¤×÷
	{
		if((EUART_DMA->ISR & EUART_TX_DMA_IT_TC) == (uint32_t)RESET) 	//´«ÊäδÍê³É
		{
			m_bEUARTCheckingSend = 0;
			return;
		}
		else
		{
			EUART_DMA->IFCR = EUART_TX_DMA_IT_TC;				//Çå³ý±êÖ¾£¨×¢Òâ¼Ä´æÆ÷ºÍ±êÖ¾Ãû³Æ£©
			EUART_TX_DMA_CH->CCR &= ~((uint32_t)0x01);	//½ûÓÃDMA
		}
	}
	
	//Åж϶ÓÁÐÊÇ·ñΪ¿Õ
	if(m_EUART_TxFrm_Head == m_EUART_TxFrm_Tail)
	{
		m_bEUARTCheckingSend = 0;
		return;
	}
	
	//¿ªÆôÒ»´ÎÊý¾Ý·¢ËÍ
	EUART_TX_DMA_CH->CMAR = (uint32_t)m_EUART_TxFrames[m_EUART_TxFrm_Tail].buf;	//Òª·¢Ë͵ÄÄÚ´æµØÖ· 
	EUART_TX_DMA_CH->CNDTR = m_EUART_TxFrames[m_EUART_TxFrm_Tail].len;		//Òª·¢Ë͵Ä×Ö½ÚÊý
	EUART_TX_DMA_CH->CCR |= 0x01;											//¿ªÆôÒ»´ÎDMA  
	m_EUART_TxFrm_Tail++;
	if(m_EUART_TxFrm_Tail == EUART_TX_FRM_SIZE)
		m_EUART_TxFrm_Tail = 0;	
	m_EUART_TxFrm_FreeFrmLen++;
	m_bEUARTCheckingSend = 0;	 
}					// */	
#endif


//½«Ò»Ö¡Êý¾ÝѹÈë·¢ËͶÓÁÐ
void UART_PushFrame(uint8_t* pdata, int32_t data_len)
{
//	uint8_t temp8 = 0;
	if(m_bEUARTPushingFrms || m_bEUARTCheckingSend)
		return;
	m_bEUARTPushingFrms = 1;
	
	if(data_len > EUART_TX_FRMBUF_SIZE || m_EUART_TxFrm_FreeFrmLen <= 0)		//Ö¡³¤¶È³¬·¶Î§»ò»º´æÒÑÂú
	{
		m_bEUARTPushingFrms = 0;
		return;
	}

	//½«Òª·¢Ë͵ÄÊý¾Ý֡ѹÈë¶ÓÁÐ
	m_EUART_TxFrames[m_EUART_TxFrm_Head].len = data_len;
	memcpy((uint8_t*)m_EUART_TxFrames[m_EUART_TxFrm_Head].buf, (uint8_t*)pdata, data_len);
	m_EUART_TxFrm_Head++;
	if(m_EUART_TxFrm_Head == EUART_TX_FRM_SIZE)
		m_EUART_TxFrm_Head = 0;
	m_EUART_TxFrm_FreeFrmLen--;
	m_bEUARTPushingFrms = 0;	
}

//½«×îÐÂÒ»Ö¡Êý¾ÝPop³ö¶ÓÁÐ
void UART_PopFrame(void)
{
	if(m_bEUARTPushingFrms || m_bEUARTCheckingSend)
		return;
	if(m_EUART_TxFrm_FreeFrmLen >= EUART_TX_FRM_SIZE-1)
		return;
	m_EUART_TxFrm_Head--;
	if(m_EUART_TxFrm_Head < 0)
		m_EUART_TxFrm_Head = EUART_TX_FRM_SIZE-1;
	m_EUART_TxFrm_FreeFrmLen++;
}
void USART_putc(char c)
{
	//while(!(USART2->SR & 0x00000040));
	//USART_SendData(USART2,c);
	/* e.g. write a character to the USART */
	HAL_UART_Transmit(&huart1,(uint8_t*)&c,1,1);

	/* Loop until the end of transmission */
	while ((USART1->ISR, UART_FLAG_TC) == RESET)	;
}
void USART_puts(uint8_t *s,uint8_t len)
{
	int i;
	for(i=0; i<len; i++)
	{
		USART_putc(s[i]);
	}
}
int fputc(int ch, FILE *f)
{
	
HAL_UART_Transmit(&huart1,(uint8_t*)&ch,1,1);
	return (ch);
}