Subversion Repositories f9daq

#include <ansi_c.h>
#include <cvirte.h>
#include "ftd2xx.h"
#include <utility.h>

int __stdcall WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
                       LPSTR lpszCmdLine, int nCmdShow) {

  BYTE bufOut[1024],bufIn[1024];
  DWORD bToSend, bSent, bToReceive, bReceived;
  DWORD dwClockDivisor=29;//Value of clock divisor, SCL Frequency = 60/((1+29)*2) (MHz) = 1Mhz
  DWORD numDevs;
  DWORD Flags;
  DWORD ID;
  DWORD Type;
  DWORD LocId;
  char SerialNumber[16];
  char Description[64];
  FT_STATUS ftStatus;
  FT_HANDLE ftHandle,ftHandleTemp;
  FT_DEVICE_LIST_INFO_NODE *devInfo;
 
  if (InitCVIRTE (hInstance, 0, 0) == 0)
    return -1;    /* out of memory */
// create the device information list
  ftStatus = FT_CreateDeviceInfoList(&numDevs);
  if (ftStatus == FT_OK) {
    printf("Number of devices is %d\n",numDevs);
  }
  if (numDevs > 0) {
// allocate storage for list based on numDevs
    devInfo = (FT_DEVICE_LIST_INFO_NODE*)malloc(sizeof(FT_DEVICE_LIST_INFO_NODE)*numDevs);
// get the device information list
    ftStatus = FT_GetDeviceInfoList(devInfo,&numDevs);
    if (ftStatus == FT_OK) {
      for (int i = 0; i < numDevs; i++) {
        printf("Dev %d:\n",i);
        printf(" Flags=0x%x\n",devInfo[i].Flags);
        printf(" Type=0x%x\n",devInfo[i].Type);
        printf(" ID=0x%x\n",devInfo[i].ID);
        printf(" LocId=0x%x\n",devInfo[i].LocId);
        printf(" SerialNumber=%s\n",devInfo[i].SerialNumber);
        printf(" Description=%s\n",devInfo[i].Description);
        printf(" ftHandle=0x%x\n",devInfo[i].ftHandle);
      }
    }
// get information for device 0
/*
    ftStatus = FT_GetDeviceInfoDetail(0, &Flags, &Type, &ID, &LocId, SerialNumber, Description, &ftHandleTemp);
    if (ftStatus == FT_OK) {
      printf("Dev 0:\n");
      printf(" Flags=0x%x\n",Flags);
      printf(" Type=0x%x\n",Type);
      printf(" ID=0x%x\n",ID);
      printf(" LocId=0x%x\n",LocId);
      printf(" SerialNumber=%s\n",SerialNumber);
      printf(" Description=%s\n",Description);
      printf(" ftHandle=0x%x\n",ftHandleTemp);
    }
*/
  }
  ftStatus = FT_Open(0,&ftHandle);
  if (ftStatus != FT_OK) {
    printf("Can't open FT232H device! \n");
    return 1;
  } else // Port opened successfully
    printf("Successfully open FT2232H device! \n");

// reset device
  ftStatus = FT_ResetDevice(ftHandle);
//Purge USB receive buffer first by reading out all old data from FT232H receive buffer
  ftStatus |= FT_GetQueueStatus(ftHandle, &bToReceive); // Get the number of bytes in the FT232H receive buffer
  if ((ftStatus == FT_OK) && (bToReceive > 0))
    ftStatus |= FT_Read(ftHandle, bufIn, bToReceive, &bReceived); //Read out the data from FT232H receive buffer
  ftStatus |= FT_SetUSBParameters(ftHandle, 65535, 65535); //Set USB request transfer size
  ftStatus |= FT_SetChars(ftHandle, FALSE, 0, FALSE, 0); //Disable event and error characters
  ftStatus |= FT_SetTimeouts(ftHandle, 3000, 3000); //Sets the read and write timeouts in 3 sec for the FT232H
  ftStatus |= FT_SetLatencyTimer(ftHandle, 1); //Set the latency timer
  ftStatus |= FT_SetBitMode(ftHandle, 0x0, 0x00); //Reset controller
  ftStatus |= FT_SetBitMode(ftHandle, 0x0, 0x02); //Enable MPSSE mode
  if (ftStatus != FT_OK) {
    printf("fail on initialize FT2232H device ! \n");
    return FALSE;
  }
  Sleep(50); // Wait 50ms for all the USB stuff to complete and work
 
// test communication by sending bad command 0xAA
  bToSend=0;
  bufOut[bToSend++]=0xAA;
  ftStatus = FT_Write(ftHandle, bufOut, bToSend, &bSent);
  do{
    ftStatus = FT_GetQueueStatus(ftHandle, &bToReceive); // Get the number of bytes in the device input buffer
  }while ((bToReceive == 0) && (ftStatus == FT_OK)); //or Timeout
  ftStatus = FT_Read(ftHandle, bufIn, bToReceive, &bReceived); //Read out the data from input buffer
  printf("Received byts: %d",bReceived);
  if (bReceived > 1) printf(": 0x%02X, 0x%02X",bufIn[bReceived-2],bufIn[bReceived-1]);
  printf("\n");      

  bToSend=0;
  bufOut[bToSend++]=0xAB;
  ftStatus = FT_Write(ftHandle, bufOut, bToSend, &bSent);
  do{
    ftStatus = FT_GetQueueStatus(ftHandle, &bToReceive); // Get the number of bytes in the device input buffer
  }while ((bToReceive == 0) && (ftStatus == FT_OK)); //or Timeout
  ftStatus = FT_Read(ftHandle, bufIn, bToReceive, &bReceived); //Read out the data from input buffer
  printf("Received bytes: %d",bReceived);
  if (bReceived > 1) printf(": 0x%02X, 0x%02X",bufIn[bReceived-2],bufIn[bReceived-1]);
  printf("\n");      

  bToSend=0;
  bufOut[bToSend++]=0x8A;//Ensure disable clock divide by 5 for 60Mhz master clock
  bufOut[bToSend++]=0x97;//Ensure turn off adaptive clocking
  bufOut[bToSend++]=0x8D;//disable 3 phase data clock
  ftStatus = FT_Write(ftHandle, bufOut, bToSend, &bSent);
 
  bToSend = 0;
  bufOut[bToSend++]=0x80; //Command to set directions of lower 8 pins and force value on bits set as output
  bufOut[bToSend++]=0x00; //Set SDA, SCL high, WP disabled by SK, DO at bit &*, GPIOL0 at bit &*
  bufOut[bToSend++]=0x0B; //Set SK,DO,GPIOL0 pins as output with bit **, other pins as input with bit &*
// The SK clock frequency can be worked out by below algorithm with divide by 5 set as off
// SK frequency = 60MHz /((1 + [(1 +0xValueH*256) OR 0xValueL])*2)
  bufOut[bToSend++]=0x86; //Command to set clock divisor
  bufOut[bToSend++]=dwClockDivisor & 0xFF; //Set 0xValueL of clock divisor
  bufOut[bToSend++]=dwClockDivisor >> 8; //Set 0xValueH of clock divisor
  ftStatus = FT_Write(ftHandle, bufOut, bToSend, &bSent); // Send out the commands
  Sleep(20); //Delay for a while
//Turn off loop back in case
  bToSend = 0;
  bufOut[bToSend++]=0x85; //Command to turn off loop back of TDI/TDO connection
  ftStatus = FT_Write(ftHandle, bufOut, bToSend, &bSent); // Send out the commands
  Sleep(30); //Delay for a while
  printf("SPI initialized successfuly\n");
 
  bToSend=0;
  bufOut[bToSend++]=0x82;// set ACBUS 0-7
  bufOut[bToSend++]=0x00;// value
  bufOut[bToSend++]=0x00;// direction 0-input  
  bufOut[bToSend++]=0x80;// set ADBUS 0-7  
  bufOut[bToSend++]=0xF0;  
  bufOut[bToSend++]=0xFF;  
  bufOut[bToSend++]=0x81;// read ADBUS
  bufOut[bToSend++]=0x83;// read ACBUS  
  bufOut[bToSend++]=0x80;  
  bufOut[bToSend++]=0x00;  
  bufOut[bToSend++]=0xFF;  
  bufOut[bToSend++]=0x81;  
  bufOut[bToSend++]=0x83;  
  ftStatus = FT_Write(ftHandle, bufOut, bToSend, &bSent);
  do{
    ftStatus = FT_GetQueueStatus(ftHandle, &bToReceive); // Get the number of bytes in the device input buffer
  }while ((bToReceive == 0) && (ftStatus == FT_OK)); //or Timeout
  ftStatus = FT_Read(ftHandle, bufIn, bToReceive, &bReceived); //Read out the data from input buffer
  printf("Received bytes: 0x%02X, 0x%02X, 0x%02X, 0x%02X\n",bufIn[0],bufIn[1],bufIn[2],bufIn[3]);
 
  getchar();
//  Delay(10);
  FT_Close(ftHandle);
  return 0;
}