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

/*幀長度的設定*/
#define  FRAMLONGTH    0x104
#define  TESTCODEADDR  0x28100
#define  DataLongth   0x100

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

/*系統狀態緩沖區*/
#pragma DATA_SECTION(time_state,".time_buffer")
unsigned int time_state[32];

HANDLE uart_a = 0;
HANDLE uart_b = 0;
unsigned int audiodata =0;
unsigned int i= 0;
unsigned int k= 0;
int uart_s=0,uart_err=0,fifostatus=0;
unsigned long testaddr = 0;
PuartForDec5416 psend=0;
PuartForDec5416 precieve =0;
unsigned int datasendlong = 0;
unsigned int errorsend = 0;
unsigned int uart[0x104] ={0};
unsigned int uarts[0x104] = {0};

main()
{	
	/*初始化DEC5416板卡*/
	dec5416_init();
	/*設置系統的時鐘*/
	sys_clk(CLK160);
	for(i= 0; i<0x104;i++)
	{
		uart[i] = 0x5555;
		uarts[i] = 0x5555;
	}
	for(i = 0; i<32;i++)
	{
		time_state[i] = 0;
	}
	/*獲取有效的串口句柄*/
	uart_a = uart_open(UART_A);
	uart_b = uart_open(UART_B);
	/*初始化串口A*/
	uart_setup(uart_a,    /*串口A*/
			   buad_19k2,  /*串口的波特率設置*/
			   data_w8,   /*數據長度為8*/ 
			   data_s1,   /*數據停止位為1*/ 
			   //uart_parity,    /*設置奇較驗位*/	 
			   0,
			   (fifo_enable+fifo_txdip16+fifo_rxdip16),/*FIFO設置*/ 
			   0);       /*設置自閉環方式*/			   		   
	/*串口A中斷設置*/		   
	uart_interrupt_control( uart_a, uartint_rhr, uart_enable);
	/*設置接收長度*/
	uart_reclong_set(uart_a,FRAMLONGTH);
	time_start();
	/*打開系統的串口中斷*/
	sysint_enable(0xa);
	
	/*配置系統存儲器*/	
	memory_set(0x80);
	
	/*實驗主控程序*/
	psend =  (PuartForDec5416)(&uarts[0]);
	/*通知主機，系統準備好*/
	psend->Length = FRAMLONGTH;
	psend->Type = UARTCOMMAND;
	psend->Data[0] = INITOVER;
	psend->Mutul = UARTCONT;
	uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
	testaddr = TESTCODEADDR;

	for(;;)
	{	
		uart_recive(uart_a,&uart[0]);
		/*判斷串口的狀態*/
		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)
		{
			/*讀狀態寄存器*/
			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);
			
			continue;
		}
		/*數據較驗出錯*/
		if(uart_s == 3)
		{
			/*復位FIFO指針*/
			fifostatus = uart_read_reg(uart_a,fcr);
			uart_write_reg(uart_a,fcr,fifo_rreset);
			uart_write_reg(uart_a,fcr,fifostatus);
			/*通知主機程序通訊出錯,準備重發*/
			psend->Length = FRAMLONGTH;
			psend->Type = UARTCOMMAND;
			psend->Data[0] =  RECIEVEERROR;
			psend->Mutul = UARTCONT;
			uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
			continue;	
		}
		/*數據準備好*/
		if(uart_s == 0)
		{
			precieve = (PuartForDec5416)(&uart[0]);
			/*不是命令幀*/
			if((precieve->Type != UARTCOMMAND)&&(precieve->Type != UARTDATA))
			{
				/*無效命令*/
				psend->Length = 1;
				psend->Type = UARTCOMMAND;
				psend->Data[0] =  COMMANDNODO;
				psend->Mutul = UARTCONT;
				uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
				precieve->Data[0] = 0;
				precieve->Type = UARTCOMMAND;	
				continue;
			}
			
		}
		/*接收從主機的數據*/
		precieve = (PuartForDec5416)(&uart[0]);
		/*是命令*/
		if(precieve->Type == UARTCOMMAND)
		{
			if(precieve->Data[0] == SYSRESET)
			{
				/*系統復位*/
				sys_set(0x4);
			}
		}
		if(precieve->Type == UARTDATA)
		{
			precieve->Type = 0x5555;
			/*將本交的接收數據寫入相應的地址*/
			progm_writem(testaddr,precieve->Data,DataLongth);
			if(precieve->Mutul ==1)
			{
				/*設置下一次的地址*/
				testaddr = testaddr + DataLongth;
				/*通知主機進行下一次的數據通訊*/
				psend->Length = 0x1;
				psend->Type = UARTCOMMAND;
				psend->Mutul = UARTCONT;
				psend->Data[0] =  RECIEVEGOOD;
				uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);		
			}
			else
			{
				/*通知主機程序引導結束，準備實驗*/
				psend->Length = 0x4;
				psend->Type = UARTCOMMAND;
				psend->Data[0] =  RECIEVEEND;
				psend->Mutul = UARTCONT;
				uart_send(uart_a,FRAMLONGTH, (unsigned int *)psend);
				test_main();
			}
		}
		led_on();
	}	
}