/****************************************
**  Copyright  (C)  W.ch  1999-2004   **
**  Web:  http://www.winchiphead.com  **
****************************************
**  USB 1.1 Host Examples for CH375   **
**  KC7.0@MCS-51                      **
****************************************
*/
/* 用CH375操作HID設備，比如鍵盤，鼠標*/

#include <reg52.h>
#include <stdio.h>
#include "CH375INC.H"
#define	TEST_LOW_SPEED	1
unsigned char volatile xdata	CH375_CMD_PORT _at_ 0xBDF1;	/* CH375命令端口的I/O地址 */
unsigned char volatile xdata	CH375_DAT_PORT _at_ 0xBCF0;	/* CH375數據端口的I/O地址 */
sbit	CH375_INT_WIRE	=		0xB0^2;	/* P3.2, INT0, 連接CH375的INT#引腳,用于查詢中斷狀態 */
sbit	P1_0=P1^0;
sbit	P1_2=P1^2;
#define	TRUE	1
#define	FALSE	0
unsigned char endp_int;			//中斷端點號
unsigned char num_interfaces;	//接口數
unsigned char config_value;		//配置值
unsigned char report_descr_len=0;//REPORT描述符長度
bit flag_config_2=0;			//第二次獲取描述符標志位
bit flag_interface_2=0;			//多個接口標志位
unsigned char endp6_mode=0x80, endp7_mode=0x80;//同步標志位初值
unsigned char status=0xff;		//全局狀態
unsigned char idata data_buf[96];//描述符緩沖區可以適當減小
union _REQUEST					//請求包結構
{	struct
	{	unsigned char bmRequestType;
		unsigned char bRequest;
		unsigned int wValue;
		unsigned int wIndex;
		unsigned int wLength;
	}Req;
	unsigned char Req_buf[8];
}Request;
unsigned char report_cou=0;		//REPORT描述符長度計數
bit		   	  flag_output=0;	//串口輸出標志位
unsigned char xdata data_in[1000];//串口輸出緩沖區

void	delay2us( )
{
	unsigned char i;
#ifdef	TEST_LOW_SPEED
	for ( i = 20; i != 0; i -- );
#else 
	for ( i = 2; i != 0; i -- );
#endif
}
void	delay1us( )
{
	unsigned char i;
#ifdef	TEST_LOW_SPEED
	for ( i = 10; i != 0; i -- );
#else
	for ( i = 1; i != 0; i -- );
#endif
}
void delayms(unsigned char delay)
{	unsigned char i;
	do{	for(i=0;i!=250;i++){;}
		for(i=0;i!=250;i++){;}
		for(i=0;i!=150;i++){;}
	}while(--delay);
}
void	mInitSTDIO( )
{
	SCON = 0x50;
	PCON = 0x80;
	TMOD = 0x21;
	TH1 = 0xf3;  /* 22.1184MHz晶振, 115200bps */
	TR1 = 1;
	TI = 1;
	EX0=1;
	EA=0;
}

void CH375_WR_CMD_PORT( unsigned char cmd ) {  /* 向CH375的命令端口寫入命令,周期不小于4uS,如果單片機較快則延時 */
	delay2us();
	CH375_CMD_PORT=cmd;
	delay2us();
}

void CH375_WR_DAT_PORT( unsigned char dat ) {  /* 向CH375的數據端口寫入數據,周期不小于1.5uS,如果單片機較快則延時 */
	CH375_DAT_PORT=dat;
	delay1us();  /* 因為MCS51單片機較慢所以實際上無需延時 */
}

unsigned char CH375_RD_DAT_PORT() {  /* 從CH375的數據端口讀出數據,周期不小于1.5uS,如果單片機較快則延時 */
	delay1us();  /* 因為MCS51單片機較慢所以實際上無需延時 */
	return( CH375_DAT_PORT );
}


unsigned char set_usb_mode( unsigned char mode ) {  /* 設置CH37X的工作模式 */
	unsigned char i;
	CH375_WR_CMD_PORT( CMD_SET_USB_MODE );
	CH375_WR_DAT_PORT( mode );
	endp6_mode=endp7_mode=0x80;  /* 主機端復位USB數據同步標志 */
	for( i=0; i!=100; i++ ) {  /* 等待設置模式操作完成,不超過30uS */
		if ( CH375_RD_DAT_PORT()==CMD_RET_SUCCESS ) return( TRUE );  /* 成功 */
	}
	return( FALSE );  /* CH375出錯,例如芯片型號錯或者處于串口方式或者不支持 */
}

void set_freq(void)
{	
	CH375_WR_CMD_PORT(0x0b);    /* 切換使375B進入低速模式 */
	CH375_WR_DAT_PORT(0x17);
	CH375_WR_DAT_PORT(0xd8);
}

/* 數據同步 */
/* USB的數據同步通過切換DATA0和DATA1實現: 在設備端, CH372/CH375可以自動切換;
   在主機端, 必須由SET_ENDP6和SET_ENDP7命令控制CH375切換DATA0與DATA1.
   主機端的程序處理方法是為SET_ENDP6和SET_ENDP7分別提供一個全局變量,
   初始值均為80H, 每執行一次成功事務后將位6取反, 每執行一次失敗事務后將其復位為80H. */

void toggle_recv() {  /* 主機接收成功后,切換DATA0和DATA1實現數據同步 */
	CH375_WR_CMD_PORT( CMD_SET_ENDP6 );
	CH375_WR_DAT_PORT( endp6_mode );
	endp6_mode^=0x40;
	delay2us();
}

void toggle_send() {  /* 主機發送成功后,切換DATA0和DATA1實現數據同步 */
	CH375_WR_CMD_PORT( CMD_SET_ENDP7 );
	CH375_WR_DAT_PORT( endp7_mode );
	endp7_mode^=0x40;
	delay2us();
}

//void clr_stall6() {  /* 主機接收失敗后,復位設備端的數據同步到DATA0 */
//	CH375_WR_CMD_PORT( CMD_CLR_STALL );
//	CH375_WR_DAT_PORT( 2 | 0x80 );  /* 如果設備端不是CH37X芯片,那么需要修改端點號 */
//	endp6_mode=0x80;
//	status=0xff;
//}

//void clr_stall7() {  /* 主機發送失敗后,復位設備端的數據同步到DATA0 */
//	CH375_WR_CMD_PORT( CMD_CLR_STALL );
//	CH375_WR_DAT_PORT( 2 );  /* 如果設備端不是CH37X芯片,那么需要修改端點號 */
//	endp7_mode=0x80;
//	status=0xff;
//}

unsigned char rd_usb_data( unsigned char *buf ) {  /* 從CH37X讀出數據塊 */
	unsigned char i, len;
	CH375_WR_CMD_PORT( CMD_RD_USB_DATA );  /* 從CH375的端點緩沖區讀取接收到的數據 */
	len=CH375_RD_DAT_PORT();  /* 后續數據長度 */
	for ( i=0; i!=len; i++ ) *buf++=CH375_RD_DAT_PORT();
	return( len );
}

void wr_usb_data( unsigned char len, unsigned char *buf ) {  /* 向CH37X寫入數據塊 */
	CH375_WR_CMD_PORT( CMD_WR_USB_DATA7 );  /* 向CH375的端點緩沖區寫入準備發送的數據 */
	CH375_WR_DAT_PORT( len );  /* 后續數據長度, len不能大于64 */
	while( len-- ) CH375_WR_DAT_PORT( *buf++ );
}

void issue_token( unsigned char endp_and_pid ) {  /* 執行USB事務 */
	CH375_WR_CMD_PORT( CMD_ISSUE_TOKEN );
	CH375_WR_DAT_PORT( endp_and_pid );  /* 高4位目的端點號, 低4位令牌PID */
	status=0xff;
}

void intt0() interrupt 0
{	unsigned char len_temp,i;
	CH375_WR_CMD_PORT( CMD_GET_STATUS );  /* 產生操作完成中斷, 獲取中斷狀態 */
	status=CH375_RD_DAT_PORT();
	if(status!=USB_INT_SUCCESS)//&&((status&0xf0)==0x20))
	{	CH375_WR_CMD_PORT( CMD_CLR_STALL );
		CH375_WR_DAT_PORT(1);  /* 如果設備端不是CH37X芯片,那么需要修改端點號 */
		endp6_mode=0x80;
		endp7_mode=0x80;
		toggle_recv();
		issue_token(( endp_int << 4 ) | DEF_USB_PID_IN);//發送從中斷端點讀數據的令牌
	}
	else 
	{	len_temp=rd_usb_data(data_buf);					//鍵盤中斷端點數據長度一般為8字節，鼠標為4字節
		for(i=0;i!=len_temp;i++)data_in[i]=data_buf[i];
		flag_output=1;
		toggle_recv();
		issue_token(( endp_int << 4 ) | DEF_USB_PID_IN);//發送從中斷端點讀數據的令牌
	}
}
unsigned char wait_interrupt() {  /* 主機端等待操作完成, 返回操作狀態 */
	while( CH375_INT_WIRE );  /* 查詢等待CH375操作完成中斷(INT#低電平) */
	CH375_WR_CMD_PORT( CMD_GET_STATUS );  /* 產生操作完成中斷, 獲取中斷狀態 */
	return( CH375_RD_DAT_PORT() );
}

void set_retry(unsigned char num)
{	CH375_WR_CMD_PORT( CMD_SET_RETRY); 
	CH375_WR_DAT_PORT( 0x25);
	CH375_WR_DAT_PORT( num);
	delay2us();
}

unsigned char set_config_ex()
{	Request.Req.bmRequestType=0x00;
	Request.Req.bRequest=0x09;config_value=config_value;
	Request.Req.wValue=0x0000|((unsigned int)config_value<<8);
	Request.Req.wIndex=0x0000;
	Request.Req.wLength=0x0000;
	endp7_mode=0x80;
	toggle_send();
	wr_usb_data(8,Request.Req_buf);/* SETUP數據總是8字節 */
	issue_token(( 0 << 4 ) | DEF_USB_PID_SETUP);status=wait_interrupt();
	if(status==USB_INT_SUCCESS)/* SETUP階段操作成功 */
	{	endp6_mode=0xc0;
		toggle_recv();
		issue_token(( 0 << 4 ) | DEF_USB_PID_IN);status=wait_interrupt();
		if(status==USB_INT_SUCCESS)/* 狀態階段操作成功 */
		{	if(rd_usb_data(data_buf)!=0)
			return(0);
		}
		else return(0);
	}
	else return(0);
	return(1) ;	
}
unsigned char set_idle()
{	Request.Req.bmRequestType=0x21;
	Request.Req.bRequest=0x0a;
	Request.Req.wValue=0x0000;
	Request.Req.wIndex=0x0000;if(flag_interface_2==1)Request.Req.wIndex=0x0100;
	Request.Req.wLength=0x0000;
	endp7_mode=0x80;
	toggle_send();
	wr_usb_data(8,Request.Req_buf);/* SETUP數據總是8字節 */
	issue_token(( 0 << 4 ) | DEF_USB_PID_SETUP);status=wait_interrupt();
	if(status==USB_INT_SUCCESS)			/* SETUP階段操作成功 */
	{	endp6_mode=0xc0;
		toggle_recv();
		issue_token(( 0 << 4 ) | DEF_USB_PID_IN );status=wait_interrupt();
		if(status==USB_INT_SUCCESS)		/* 狀態階段操作成功 */
		{	if(rd_usb_data(data_buf)!=0)
			return(0);
		}
		else return(0);
	}
	else return(0);
	return(1);	
}
unsigned char set_report()
{	Request.Req.bmRequestType=0x21;
	Request.Req.bRequest=0x09;
	Request.Req.wValue=0x0002;
	Request.Req.wIndex=0x0000;
	Request.Req.wLength=0x0100;
	endp7_mode=0x80;
	toggle_send();
	wr_usb_data(8,Request.Req_buf);/* SETUP數據總是8字節 */