/*********************************************************************************
*  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

/*#define  EASTEWEST     0x321
#define  SOUTHNORTH    0x84c
#define  IOCHANGE      0x492
#define  ALLFORBIN     0x264*/
#define  EASTEWEST     0x861
#define  SOUTHNORTH    0x30c
#define  IOCHANGE      0x492
#define  ALLFORBIN     0x924

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

/*定義交通燈IO口的地址為0x8000*/
ioport unsigned port8000;
/*定義交通燈IO口的地址為0x8001*/
ioport unsigned port8002;
/****************************************************************************/
/* Function Prototypes   													*/
/****************************************************************************/

/* This delay routine does not conflict with DSP/BIOS.  It is used in this  */
/* example rather than brd_delay_msec which causes DSP/BIOS conflicts just  */
/* because of this.  If you are not using DSP/BIOS, you can change the code */
/* to use brd_delay_msec.                                                   */

void delay(int period);
 

HANDLE uart_a =0;
HANDLE codec_command =0;
HANDLE codec_data=0;
unsigned int audiodata =0;
	
unsigned int i= 0;
unsigned int k= 0;
int uart_s=0,uart_err=0,fifostatus=0;
PuartForDec5416 precieve =0;
PuartForDec5416 psend=0;
unsigned int iostatus=0;
unsigned int errorsend = 0;
unsigned int uart[0x104] ={0};
unsigned int uarts[0x104] = {0};
unsigned int mandoit = 1;

main()
{	
	/*設置系統時鐘*/
	sys_clk(CLK80);
	/*初始化DEC5416板卡*/
	dec5416_init();
	for(i= 0; i<0x104;i++)
	{
		uart[i] = 0;
	}
	/*獲取有效的串口句柄*/
	uart_a = uart_open(UART_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);
	/*打開系統的串口中斷*/
	sysint_enable(0x2);
	/*實驗主控程序*/
	psend =  (PuartForDec5416)(&uarts[0]);
	precieve = (PuartForDec5416)(&uart[0]);
	/*通知主機，系統準備好*/
	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]);
		/*判斷串口的狀態*/
		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);
			/*通知主機程序通訊出錯,準備重發*/
			psend->Length = FRAMLONGTH;
			psend->Type = UARTCOMMAND;
			psend->Data[0] =  RECIEVEERROR;
			psend->Mutul = UARTCONT;
			uart_send(uart_a,FRAMLONGTH-1, (unsigned int *)psend);
			continue;
		}
		/*數據較驗出錯*/
		if(uart_s == 3)
		{
			/*通知主機程序通訊出錯,準備重發*/
			psend->Length = FRAMLONGTH;
			psend->Type = UARTCOMMAND;
			psend->Data[0] =  RECIEVEERROR;
			psend->Mutul = UARTCONT;
			uart_send(uart_a,FRAMLONGTH-1, (unsigned int *)psend);
			continue;	
		}
		/*數據未準備好*/
		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-1, (unsigned int *)psend);
				precieve->Data[0] = 0;
				continue;	
			}
			
		}
		/*接收從主機的數據*/
		switch(precieve->Data[0])
		{	
			case TRAFFICAUTO:
				mandoit = 0;
				/*白天模式*/
				/*從東西到南北*/
				iostatus = EASTEWEST;
				port8000 = iostatus;
				delay(2000);
				iostatus = IOCHANGE;
				port8000 = iostatus;
				delay(1000);
				iostatus = SOUTHNORTH;
				port8000 = iostatus;
				delay(8000);
				/*從南北到東西*/
				iostatus = SOUTHNORTH;
				port8000 = iostatus;
				delay(2000);
				iostatus = IOCHANGE;
				port8000 = iostatus;
				delay(1000);
				iostatus = EASTEWEST;
				port8000 = iostatus;
				delay(8000);
				break;
			/*人工模式*/
			case TRAFFICMANNUL:
				mandoit = 1;
				iostatus = 0;
				port8000 = iostatus;
				delay(6000);
				precieve->Data[0] = 0;
				break;
			/*夜間模式*/	
			case TRAFFICNIGHT:
				iostatus = IOCHANGE;
				port8000 = iostatus;
				delay(6000);
				iostatus = 0;
				port8000 = iostatus;
				delay(6000);
				break;
			/*交通燈東西通*/
			case TRAFFICEAST:
				if(mandoit == 1)
				{
					iostatus = IOCHANGE;
					port8000 = iostatus;
					delay(1000);
					iostatus = EASTEWEST;
					port8000 = iostatus;
					delay(2000);
					precieve->Data[0] = 0;
				}
				break;
			/*交通燈南北通*/	
			case TRAFFICSOUTH:
				if(mandoit == 1)
				{
					iostatus = IOCHANGE;
					port8000 = iostatus;
					delay(1000);
					iostatus = SOUTHNORTH;
					port8000 = iostatus;
					delay(2000);
					precieve->Data[0] = 0;
				}	
				break;
			/*禁行*/	
			case TRAFFICFORBID:
				if(mandoit == 1)
				{
					iostatus = IOCHANGE;
					port8000 = iostatus;
					delay(1000);
					iostatus = ALLFORBIN;
					port8000 = iostatus;
					delay(2000);
					precieve->Data[0] = 0;
				}
				break;
				
					
			/*LED燈控制*/	
			case IOSET:         		
				port8002 = precieve->Data[1];
				delay(100);
				precieve->Data[0] = 0;
				break;
			/*系統復位*/
			case SYSRESET:
				sys_set(0x4);
				precieve->Data[0] = 0;
				break;
			
			default:
				break;
		} 		
	}							     
}


void delay(int period)
{
    int i, j;
    
    for(i=0; i<period; i++)
    {
        for(j=0; j<0x1000; j++);
    }
}