#include <stdio.h>
#include <string.h>

#include <reg52.h>                


//#include "myusb100.h"
#include "hard.h"
#include "D12.h"
#include "main.h"
#include "USB.h"

extern void bus_reset(void);

extern void ep0_txdone(void);
extern void ep0_rxdone(void);

extern void ep1_txdone(void);
extern void ep1_rxdone(void);

extern void main_txdone(void);
extern void main_rxdone(void);

extern void dma_eot(void);

/*
//*************************************************************************
//  Public static data
//*************************************************************************
*/

EPPFLAGS bEPPflags;

/* Control endpoint TX/RX buffers */
extern CONTROL_XFER ControlData;

/* ISR static vars */
unsigned char idata GenEpBuf[EP1_PACKET_SIZE];

IO_REQUEST idata ioRequest;

unsigned long ClockTicks = 0;

int iEp1InLength = 0;

/*void timer_isr() interrupt 1
{
	DISABLE;
	ClockTicks++;
	bEPPflags.bits.timer = 1;
	ENABLE;
}*/
/*void usb_isr() interrupt 0 
{
	DISABLE;
	fn_usb_isr();
	ENABLE;
}
 */
 /*
void serial(void) interrupt 4 
{
	if(RI)
	{	DISABLE;
		RI=0;
		fa=SBUF;
		while(TI==0);
		TI=0;
	}
	
	return;	
}*/
void fn_usb_isr()
{
	unsigned int i_st;

	bEPPflags.bits.in_isr = 1;

	i_st = D12_ReadInterruptRegister();

	if(i_st != 0) 
		{
			if(i_st & D12_INT_BUSRESET) 
				{
					bus_reset();
					bEPPflags.bits.bus_reset = 1;
				}
			else 
				{
					if(i_st & D12_INT_EOT)
						dma_eot();
		
					if(i_st & D12_INT_SUSPENDCHANGE)
						bEPPflags.bits.suspend = 1;
		
					if(i_st & D12_INT_ENDP0IN)
						ep0_txdone();
					if(i_st & D12_INT_ENDP0OUT)
						ep0_rxdone();
					if(i_st & D12_INT_ENDP1IN)
						ep1_txdone();
					if(i_st & D12_INT_ENDP1OUT)
						ep1_rxdone();
					if(i_st & D12_INT_ENDP2IN)
						main_txdone();
					if(i_st & D12_INT_ENDP2OUT)
						main_rxdone();
				}
		}

	bEPPflags.bits.in_isr = 0;
}

void bus_reset(void)
{
}
//端點0 OUT中斷
void ep0_rxdone(void)
{
	unsigned char ep_last, i;

	ep_last = D12_ReadLastTransactionStatus(0); // Clear interrupt flag

	if (ep_last & D12_SETUPPACKET) 
		{

			ControlData.wLength = 0;
			ControlData.wCount = 0;
	
			if( D12_ReadEndpoint(0, (unsigned char *)(&(ControlData.DeviceRequest)),
				sizeof(ControlData.DeviceRequest)) != sizeof(DEVICE_REQUEST) ) 
				{
	
					D12_SetEndpointStatus(0, 1);
					D12_SetEndpointStatus(1, 1);
					bEPPflags.bits.control_state = USB_IDLE;
					
					return;
				}
			//數據字節交換
			ControlData.DeviceRequest.wValue = SWAP(ControlData.DeviceRequest.wValue);
			ControlData.DeviceRequest.wIndex = SWAP(ControlData.DeviceRequest.wIndex);
			ControlData.DeviceRequest.wLength = SWAP(ControlData.DeviceRequest.wLength);
	
	
			// 對控制端點的輸入輸出進行應答
			D12_AcknowledgeEndpoint(0);
			D12_AcknowledgeEndpoint(1);
	
			ControlData.wLength = ControlData.DeviceRequest.wLength;
			ControlData.wCount = 0;
	
			if (ControlData.DeviceRequest.bmRequestType & (unsigned char)USB_ENDPOINT_DIRECTION_MASK) 
				{
					//從主機傳輸數據
					bEPPflags.bits.setup_packet = 1;
					bEPPflags.bits.control_state = USB_IDLE;		/* get command */
				}
			else 
				{
					if (ControlData.DeviceRequest.wLength == 0) 
						{
							bEPPflags.bits.setup_packet = 1;
							bEPPflags.bits.control_state = USB_IDLE;		/* set command */
						}
					else 
						{
							if(ControlData.DeviceRequest.wLength > MAX_CONTROLDATA_SIZE) 
								{
									bEPPflags.bits.control_state = USB_IDLE;
									D12_SetEndpointStatus(0, 1);
									D12_SetEndpointStatus(1, 1);
								}
							else 
								{
									bEPPflags.bits.control_state = USB_RECEIVE;	/* set command with OUT token */
								}
						} // set command with data
				} // else set command
			} // if setup packet

	else if (bEPPflags.bits.control_state == USB_RECEIVE) 
		{
			i =	D12_ReadEndpoint(0, ControlData.dataBuffer + ControlData.wCount,
				EP0_PACKET_SIZE);
	
			ControlData.wCount += i;
			if( i != EP0_PACKET_SIZE || ControlData.wCount >= ControlData.wLength) 
				{
					bEPPflags.bits.setup_packet = 1;
					bEPPflags.bits.control_state = USB_IDLE;
				}
		}

	else 
		{	
			bEPPflags.bits.control_state = USB_IDLE;
		}
}
//端點0 IN處理
void ep0_txdone(void)
{
	short i = ControlData.wLength - ControlData.wCount;

	D12_ReadLastTransactionStatus(1); // Clear interrupt flag

	if (bEPPflags.bits.control_state != USB_TRANSMIT) 
		return;

	if( i >= EP0_PACKET_SIZE) 
		{
			D12_WriteEndpoint(1, ControlData.pData + ControlData.wCount, EP0_PACKET_SIZE);
			ControlData.wCount += EP0_PACKET_SIZE;
	
			bEPPflags.bits.control_state = USB_TRANSMIT;
		}
	else if( i != 0) 
		{
			D12_WriteEndpoint(1, ControlData.pData + ControlData.wCount, i);
			ControlData.wCount += i;
	
			bEPPflags.bits.control_state = USB_IDLE;
		}
	else if (i == 0)
		{
			D12_WriteEndpoint(1, 0, 0); // Send zero packet at the end ???
	
			bEPPflags.bits.control_state = USB_IDLE;
		}
}
//DMA結束處理
void dma_eot(void)
{
	if(bEPPflags.bits.dma_state == DMA_PENDING)
		bEPPflags.bits.setup_dma = 1;
	else
		bEPPflags.bits.dma_state = DMA_IDLE;
}
//端點1 IN處理
void ep1_txdone(void)
{
	D12_ReadLastTransactionStatus(3); /* Clear interrupt flag */
}
//端點1	OUT處理
void ep1_rxdone(void)
{
	unsigned char len;

	D12_ReadLastTransactionStatus(2); /* Clear interrupt flag */

	len = D12_ReadEndpoint(2, GenEpBuf, sizeof(GenEpBuf));

	iEp1InLength = len;

	if(len != 0)
		bEPPflags.bits.ep1_rxdone = 1;
}
//主端點IN控制
void main_txdone(void)
{
	D12_ReadLastTransactionStatus(5); /* Clear interrupt flag */
}
//主端點OUT控制
void main_rxdone(void)
{
	D12_ReadLastTransactionStatus(4); /* Clear interrupt flag */
}