/*********************************************************************************
*  MCPSB.C	v1.00   測試MCBSP同步串口測試的主程序	                             *
*  版權(c) 	2003-		北京合眾達電子技術有限責任公司			                 *
*  設計者：	段立鋒								                                 *
**********************************************************************************/
#include "type.h"
#include "codec.h"
#include "uart.h"
#include "sysreg.h"
#include "mcbsp54.h"
#include "memory.h"
#include "comm.h"

/*幀長度的設定*/
#define  FRAMLONGTH    0x104

#define  DataLongth   0x100

typedef struct _UartForDec5416{
	unsigned int Length;
	unsigned int Type;
	unsigned int Mutul;
	unsigned int Data[DataLongth];
	unsigned int Check;
}UartForDec5416, *PuartForDec5416; 

HANDLE uart_a =0;
PuartForDec5416 precieve =0;	
unsigned int i= 0;
unsigned int k= 0;
int uart_s=0,uart_err=0,fifostatus=0;
unsigned long flashbaddr=0;
unsigned long flashaddr = 0;
PuartForDec5416 psend=0;
unsigned int datasendlong = 0;
unsigned int errorsend = 0;
unsigned int uartnull = 0;
unsigned int uartsdata = 0;
unsigned int uart[0x104] ={0};
unsigned int uarts[0x104] = {0};

main()
{	
	/*設置系統(tǒng)時鐘*/
	sys_clk(CLK160);
	/*初始化DEC5416板卡*/
	dec5416_init();
	for(i = 0 ; i<0x104;i++)
	{
		uart[i] = 0;
		uarts[i] = 0;
	}
	/*獲取有效的串口句柄*/
	uart_a = uart_open(UART_A);
	/*初始化串口*/
	uart_setup(uart_a,    /*串口A*/
			   buad_19k2,  /*串口的波特率設置*/
			   data_w8,   /*數(shù)據(jù)長度為8*/ 
			   data_s1,   /*數(shù)據(jù)停止位為1*/ 
			   //uart_parity,    /*設置奇較驗位*/	 
			   0,
			   (fifo_enable+fifo_txdip16+fifo_rxdip16),/*FIFO設置*/ 
			   0);       /*設置自閉環(huán)方式*/		   
	/*串口A中斷設置*/		   
	uart_interrupt_control( uart_a, uartint_rhr, uart_enable);
	/*設置接收長度*/
	uart_reclong_set(uart_a,FRAMLONGTH);
	/*打開系統(tǒng)的串口中斷*/
	sysint_enable(0x2);
	
	/*實驗主控程序*/
	psend =  (PuartForDec5416)(&uarts[0]);
	/*通知主機，系統(tǒng)準備好*/
	psend->Length = FRAMLONGTH;
	psend->Type = UARTCOMMAND;
	psend->Data[0] = INITOVER;
	psend->Mutul = UARTCONT;
	uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
	
	for(;;)
	{	
		uart_recive(uart_a,&uart[0]);
		/*判斷串口的狀態(tài)*/
		uart_s =uart_status(uart_a);
		if( uart_s == 2)
		{
			/*讀RHR清 RHR interrupt*/
			uart_read_reg(uart_a,rhr);
			/*復位FIFO指針*/
			fifostatus = uart_read_reg(uart_a,fcr);
			uart_write_reg(uart_a,fcr,fifo_rreset);
			uart_write_reg(uart_a,fcr,fifostatus);
			continue;	
		}
		/*串口出錯*/
		if(uart_s == ERROR)
		{
			/*讀狀態(tài)寄存器*/
			uart_err = uart_read_reg(uart_a,lsr);
			/*復位FIFO指針*/
			fifostatus = uart_read_reg(uart_a,fcr);
			uart_write_reg(uart_a,fcr,fifo_rreset);
			uart_write_reg(uart_a,fcr,fifostatus);
			/*通知主機程序通訊出錯,準備重發(fā)*/
			psend->Length = FRAMLONGTH;
			psend->Type = UARTCOMMAND;
			psend->Data[0] =  RECIEVEERROR;
			psend->Mutul = UARTCONT;
			uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
			continue;
		}
		/*數(shù)據(jù)較驗出錯*/
		if(uart_s == 3)
		{
			/*通知主機程序通訊出錯,準備重發(fā)*/
			psend->Length = FRAMLONGTH;
			psend->Type = UARTCOMMAND;
			psend->Data[0] =  RECIEVEERROR;
			psend->Mutul = UARTCONT;
			uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
			continue;	
		}
		/*數(shù)據(jù)未準備好*/
		if(uart_s == 0)
		{
			precieve = (PuartForDec5416)(&uart[0]);
			/*不是命令幀*/
			if(precieve->Type != UARTCOMMAND)
			{
				/*無效命令*/
				psend->Length = FRAMLONGTH;
				psend->Type = UARTCOMMAND;
				psend->Data[0] =  COMMANDNODO;
				psend->Mutul = UARTCONT;
				uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
				precieve->Data[0] = 0;	
			}
			continue;
		}
		/*接收從主機的數(shù)據(jù)*/
		precieve = (PuartForDec5416)(&uart[0]);
		switch(precieve->Data[0])
		{
			/*單個發(fā)送與接收*/
			case UARTSIGLE:
				/*關閉系統(tǒng)的串口中斷*/
				sysint_enable(0x0);
				/*清空fifo*/
				
					if(uartnull ==0)
					{
						if((uart_read_reg(uart_a,lsr) & 0x1) == 1)
						{
							uart_read_reg(uart_a,rhr);
						} 
						else
						{
							uartnull = 1;
						}
					}
				for(;;)
				{
					/*是否有數(shù)據(jù)*/
					if((uart_read_reg(uart_a,lsr) & 0x1) == 1)
					{
						for(i =0;i<400;i++)
						{}
						uartsdata = uart_read_reg(uart_a,rhr);
						for(i =0;i<400;i++)
						{}
						if((uartsdata & 0xff) == 0x5a)
						{
							/*打開系統(tǒng)的串口中斷*/
							sysint_enable(0x2);
							precieve->Data[0] = 0;
							break;
						}
						uartsdata = uartsdata & 0xff;
						uart_send_sigle(uart_a,uartsdata);
					}
				}
				break;
			/*采用幀模式發(fā)送與接收*/
			case UARTFRAME:
				psend->Length = precieve->Length;
				psend->Type = UARTCOMMAND;
				psend->Data[0] =  UARTFRAME;
				for(i = 1; i< precieve->Length ;i++)
				{
					psend->Data[i] = precieve->Data[i];
				}
				psend->Mutul = UARTCONT;
				uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
				precieve->Data[0] = 0;
				break;	
					 
			/*系統(tǒng)復位*/
			case SYSRESET:
				sys_set(0x4);
				precieve->Data[0] = 0;
				break;
			
			default:
				break;
		} 		
	}							     
}