#include <msp430x14x.h>
#include "d12ci.h"
#include "mainloop.h"
#include "USB100.h"

void ep0_txdone(void);
void ep0_rxdone(void);
void dma_eot(void);
void ep1_txdone(void);
void ep1_rxdone(void);
void main_txdone(void);
void main_rxdone(void);

#pragma vector=PORT1_VECTOR
__interrupt void fn_usb_isr(void)
{
  unsigned int int_src;
  _DINT();
  bEPPflags.bits.in_isr = 1;
  int_src = D12_ReadInterruptRegister();
  
  if(int_src)
  {
    if(int_src & D12_INT_BUSRESET) 
      {
        bEPPflags.bits.bus_reset = 1;
        goto exit;
      }
    if(int_src & D12_INT_EOT)
      dma_eot();  
    if(int_src & D12_INT_SUSPENDCHANGE)
      bEPPflags.bits.suspend = 1;
    if(int_src & D12_INT_ENDP0IN)
      ep0_txdone();
    if(int_src & D12_INT_ENDP0OUT)
      ep0_rxdone();
    if(int_src & D12_INT_ENDP1IN)
      ep1_txdone();
    if(int_src & D12_INT_ENDP1OUT)
      ep1_rxdone();
    if(int_src & D12_INT_ENDP2IN)
      main_txdone();
    if(int_src & D12_INT_ENDP2OUT)
      main_rxdone();
    }
    exit:
    bEPPflags.bits.in_isr = 0;    
    P1IFG = 0;
    _EINT();  
  }
  
void ep0_txdone(void)
{
  int i = ControlData.wLength - ControlData.wCount;
  
  LastState_1[CNT_1++] = D12_ReadLastTransactionStatus(1);                     //Clear Endpoint Interrupt Flags
  
  if(bEPPflags.bits.control_state != USB_TRANSMIT)      //Non Transmit_state,return
    return;                                             
  if(i >= EP0_PACKET_SIZE)                              //Transmit 16B
  {
    D12_WriteEndpoint(1, EP0_PACKET_SIZE, ControlData.pData + ControlData.wCount);
    ControlData.wCount += EP0_PACKET_SIZE;
    bEPPflags.bits.control_state = USB_TRANSMIT;
  }   
  else if(i != 0)                                       //Transmit remains
  {
    D12_WriteEndpoint(1, i, ControlData.pData + ControlData.wCount);
    ControlData.wCount += i;
    bEPPflags.bits.control_state = USB_IDLE;
  }
  else if(i == 0)                                       //Transmission completed
  {
    D12_WriteEndpoint(1, 0, 0);
    bEPPflags.bits.control_state = USB_IDLE;
  }
}

/*------------Endpoint 0 OUT Interrupt-----------*/
void ep0_rxdone(void)
{
  unsigned char ep_last, i;
  ep_last = D12_ReadLastTransactionStatus(0);           //Clear Endpoint Interrupt Flags
  LastState_0[CNT] = ep_last;
  if(ep_last & D12_SETUPPACKET)                         //Received Setup Packet
  { 
    ControlData.wLength = 0;
    ControlData.wCount = 0;
    if(D12_ReadEndpoint(0, sizeof(ControlData.DeviceRequest),(unsigned char *)(&(ControlData.DeviceRequest))) != sizeof(DEVICE_REQUEST))
    {    
      D12_SetEndpointStatus(0,1);
      D12_SetEndpointStatus(1,1);
      bEPPflags.bits.control_state = USB_IDLE;
      return; 
    }
        
    //Acknowlege EndPoint0
    D12_AcknowledgeEndpoint(0);
    D12_AcknowledgeEndpoint(1);
    ControlData.wLength = ControlData.DeviceRequest.wLength;
    ControlData.wCount = 0;    
    if(ControlData.DeviceRequest.bmRequestType & (unsigned char)USB_ENDPOINT_DIRECTION_MASK)
    {
      //Device --> Host
      bEPPflags.bits.setup_packet = 1;
      bEPPflags.bits.control_state = USB_TRANSMIT;
    }
    else
    { 
      //Host --> Device
      if(ControlData.DeviceRequest.wLength == 0)
      {
        bEPPflags.bits.setup_packet = 1;
        bEPPflags.bits.control_state = USB_IDLE;
      }
      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 DATA
    }//ELSE SET COMMAND   
  }//IF SETUP PACKET
  else if(bEPPflags.bits.control_state == USB_RECEIVE)  
  {
    i = D12_ReadEndpoint(0, EP0_PACKET_SIZE, ControlData.dataBuffer + ControlData.wCount);
    ControlData.wCount += i;
    if(i != EP0_PACKET_SIZE || ControlData.wCount >= ControlData.wLength)               //Data Receiving completed
    {
      bEPPflags.bits.setup_packet = 1;
      bEPPflags.bits.control_state = USB_IDLE;
    }
  }
  else  bEPPflags.bits.control_state = USB_IDLE;
  
  //trace the request
  DeviceRequest[CNT].bmRequestType = ControlData.DeviceRequest.bmRequestType;
  DeviceRequest[CNT].bRequest = ControlData.DeviceRequest.bRequest;
  DeviceRequest[CNT].wValue = ControlData.DeviceRequest.wValue;
  DeviceRequest[CNT].wIndex = ControlData.DeviceRequest.wIndex;
  DeviceRequest[CNT].wLength = ControlData.DeviceRequest.wLength;
  CNT++;
}

void dma_eot(void)
{
}

void ep1_txdone(void)
{
  D12_ReadLastTransactionStatus(3);
}

void ep1_rxdone(void)
{
  unsigned char len;
  D12_ReadLastTransactionStatus(2);
  len = D12_ReadEndpoint(2, EP1_PACKET_SIZE, GenEpBuf);
  if(len != 0)
    bEPPflags.bits.ep1_rxdone = 1;
}

void main_txdone(void)
{
  D12_ReadLastTransactionStatus(5);
}

void main_rxdone(void)
{
  unsigned char len, epstatus;
  D12_ReadLastTransactionStatus(4);
  epstatus = D12_ReadEndpointStatus(4);
  epstatus &= 0X60;
  
  len = D12_ReadEndpoint(4, 64, EpBuf);
  if(epstatus == 0X60)
    len = D12_ReadEndpoint(4, 64, EpBuf);                 //Read From Double Buffer
}