ar708_tx_error_injection.c

/*****************************************************************************
//
//     File:
//        ar708_tx_error_injection.c
//
//       Copyright (c) MAX Technologies Inc. 1988-2015, All Rights Reserved.
//             CONFIDENTIAL AND PROPRIETARY INFORMATION WHICH IS THE 
//                         PROPERTY OF MAX TECHNOLOGIES INC. 
//
//      This example demonstrates the usage of ARINC 708 channel class
//      for transmission and reception with an error injection in transmission.
//
//       Hardware requirements:
//          - MAXT Flex with A708 option.
//          - Loopback between TX and RX channels if internal loopback is not used.
//
*****************************************************************************/

#include "example.h"

#define MAX_TX_RECORDS_TO_TRANSMIT     8

//#define LOCAL
//#define LOOPBACK

void DisplayDataArray(uint64 recNum, MXF_A708_DATAREC* rec);
void DisplaySampDataArray(uint64 recNum, MXF_A708_SAMPREC* rec);

int main(void)
{
uint32                  rc;
HMXF_SERVER             server=0;
HMXF_DEVICE             device=0;
HMXF_MODULE             module=0;
HMXF_CHANNEL            rxChannel=0;
HMXF_CHANNEL            txChannel=0;
HMXF_BUFFER             rxBuffer=0;
HMXF_BUFFER             txBuffer=0;
MXF_A708_DATAREC*       rec=0;
uint64                  moduleCount=0;
uint64                  channelCount=0;
size_t                  txBufferSize=0;
size_t                  rxBufferSize=0;
MXF_A708_SAMPREC*       rxHostBuffer=0;
MXF_A708_DATAREC*       txHostBuffer=0;
uint64 i, msgsCount, bytesCount;
uint64                  data;
uint64                  word, allocated_size_rx, allocated_size_tx;
HMXF_SCHED schedule=0;
HMXF_SCHED_MSG msg=0;

   // Connects to services and initialize environment
#ifdef LOCAL
   rc = mxfServerConnect("0.0.0.0", "", "", FALSE, &server);
#else
   rc = mxfServerConnect("192.168.0.1", "admin", "admin", FALSE, &server);
#endif

   // Initializes  MX Foundation library
   if (!rc)
   {
      printf("Starting ...\n");
      rc = mxfSystemInit(server);
   }

   // Gets the device handle 
   if (!rc)
      rc = mxfSystemDeviceGet(server, 0, &device);

   // Gets handle of first ARINC 708 module
   if (!rc)
      rc = mxfDeviceModuleAllGet(device, MXF_MODULE_A708_EH, 1, &moduleCount, &module);

   // If module not found, return an error
   if(!rc && !moduleCount)
      rc = MAXT_ERROR_NOT_FOUND;

   // Activates the ARINC 708 module (because the MIL-STD-1553 is by default activated, except on FM1553-2)
   if (!rc)
   {
      rc = mxfAttributeUint64Set(module, KMXF_A708_MODULE_ACTIVE, TRUE);
      if (rc == MAXT_ERROR_NOT_SUPPORTED) // Attribute not supported on FM1553-2, simply ignore
         rc = MAXT_SUCCESS;
   }

   // Gets handle of first ARINC 708 RX channel
   if(!rc)
      rc = mxfModuleChannelAllGet(module, MXF_CLASS_A708, MXF_SCLASS_RX_CHANNEL, 1, &channelCount, &rxChannel);

   // Gets handle of first ARINC 708 TX channel
   if (!rc)
      rc = mxfModuleChannelAllGet(module, MXF_CLASS_A708, MXF_SCLASS_TX_CHANNEL, 1, &channelCount, &txChannel);

   // Enables loopback
   #ifdef LOOPBACK
   if(!rc)
      rc = mxfAttributeUint64Set(rxChannel, KMXF_A708_TX_RX_TEST_LB , VMXF_ENABLE);
   #endif

   // Allocates 4 KB buffer for tx data
   if(!rc)
   {
      txBufferSize = 4*1024;

      // Allocate TX Periodic Update buffer
      rc=mxfTxPeriodicUpdateMsgBufferAlloc(txChannel, 0, txBufferSize, &txBuffer, &allocated_size_tx);

      // Host buffer allocation
      if(!rc)
      {
         txHostBuffer = (MXF_A708_DATAREC*) calloc(1, txBufferSize);
         if(!txHostBuffer)
            rc = MAXT_ERROR_MEM;
      }
   }

   // Allocates 4 KB buffer for RX data
   if(!rc)
   {
      rxBufferSize = 4*1024;

      // Allocates RX sampling buffer
      rc=mxfRxSamplingBufferAlloc(rxChannel, rxBufferSize, &rxBuffer,&allocated_size_rx);

      // Host buffer allocation
      if(!rc)
      {
         rxHostBuffer = (MXF_A708_SAMPREC*) calloc(1, rxBufferSize);
         if(!rxHostBuffer)
            rc = MAXT_ERROR_MEM;
      }
   }

   // Sets timebase to RTC nsec
   if(!rc)
      rc = mxfSystemTimeBaseSet(server, MXF_TIMEBASE_DEVICE_NSEC);

   // Starts acquisition
   if(!rc)
      rc = mxfRxSamplingStart(rxBuffer);

   // Create the periodic scheduler
   if(!rc)
      rc = mxfTxPeriodicScheduleNew(txChannel, &schedule);

   // Set scheduling values: Rate=5 ms, Phase=0 us
   if(!rc)
      rc = mxfTxPeriodicScheduleMsgAdd(schedule, 5000000, 0, &msg);

   // Define the number of buffer for the list and link to it
   if(!rc)
      rc = mxfTxPeriodicScheduleBufferListAdd(msg, 1, 0, &txBuffer);

   if(!rc)
   {
      rec = txHostBuffer;
      //Prepares records to send for basic transmission/reception test with an error injection in transmission for the 3rd and 7th record
      for(data=0; data<MAX_TX_RECORDS_TO_TRANSMIT; data++)
      {
         rec->timeTag = 0;
         if(data==2)
         {
            rec->control = MXF_A708_TX_REC_CTRL_MANCHESTERBIT_ERROR;    //The 3rd record contains manchester error at bit 1000
            rec->manchesterBitErr = 1000;
            rec->repeatCount  = 1;
         }
         else if(data==6)
         {
            rec->control = 0x1; // Send one bit less
            rec->manchesterBitErr = 0;
            rec->repeatCount  = 1;
         }
         else
         {
            rec->control = 0;
            rec->manchesterBitErr = 0;
            rec->repeatCount  = 100; // Repeat records 100 times
         }
         rec->dataSize     = 200;  //200 bytes corresponds to 1600 bits (see ARINC 708 specification)
         for(word=0; word < rec->dataSize/2; word++)
         {
            switch(word)
            {
            case 0:
               rec->data[word] = 055; // Label
               break;
            case 1:
            case 2:
            case 3:
               rec->data[word] = 0x0000;
               break;
            default:
              rec->data[word] = (uint16)(0x0101*data);
            }
         }
         rc = mxfA708NextDataRecordPtrGet(rec, &rec);
      }
   }

   //if (!rc)
      //DisplayDataArray(MAX_TX_RECORDS_TO_TRANSMIT, txHostBuffer);

   if(!rc)
      rc = mxfA708TxPeriodicUpdateMsgWrite(txBuffer, MAX_TX_RECORDS_TO_TRANSMIT, txHostBuffer);
   
   //  Run the scheduler, update records
   if(!rc)
   {
      printf("Running periodic transmission, please wait...\n\r");
   
      // Run the schedule now
      rc = mxfTxPeriodicScheduleRun(schedule);
   }

   // Read and display records for 5 seconds
   for(i=0; i<10 && !rc; i++)
   {
      rc = mxfA708RxSamplingRead(rxBuffer, MXF_RXSAMPLING_FLAG_DEFAULT, 0, rxBufferSize, &msgsCount, &bytesCount, rxHostBuffer);
      if(!rc)
      {
         printf("Read %llu messages\n\r", msgsCount);

         DisplaySampDataArray(msgsCount, rxHostBuffer);
      }
   
      if(rc)
         printf("Sampling read failed; rc=0x%08x\n", rc);
      else
         mxfSleep(500);
   }

   if(!rc)
      rc = mxfTxPeriodicScheduleFree(schedule);

   // Stops acquisition
   if(!rc)
      rc = mxfRxSamplingStop(rxBuffer);

   // Frees device and host buffers
   if (rxBuffer)
      mxfRxSamplingBufferFree(rxBuffer);
   if (txBuffer)
      mxfTxPeriodicUpdateMsgBufferFree(txBuffer);

   if(txHostBuffer)
      free(txHostBuffer);
   if(rxHostBuffer)
      free(rxHostBuffer);

   if(rc)
   {
   char errorString[200];

      if(mxfSystemErrorStringGet(server, rc, sizeof(errorString), errorString))
         sprintf (errorString,"ERROR # 0x%X", rc);

      printf("%s\n\r", errorString);
   }

   printf("Terminating ...\n");

   // Unloads MX Foundation library
   mxfSystemTerminate(server);

   // Disconnects from MX Foundation library
   mxfServerDisconnect(server);

   printf("\nPress a key to terminate\n");
   getchar();

   return rc;

}

void DisplayDataArray(uint64 recNum, MXF_A708_DATAREC* rec)
{
uint64 iRec,
       iData;
MXF_A708_DATAREC *p=rec;

   printf("\n");
   for(iRec=0; iRec < recNum; iRec++)
   {
      printf("%03llu %010llu 0x%08x %02u ",  iRec, p->timeTag, p->control, p->dataSize);
      for(iData=0; iData < p->dataSize/2; iData++)
      {
         printf("%04x ", p->data[iData]);

         if(!((iData+1)%8) && (iData+1 < p->dataSize/2))
            printf("\n                              ");
      }
      
      printf("\n");

      mxfA708NextDataRecordPtrGet(p, &p);
   }
}

void DisplaySampDataArray(uint64 recNum, MXF_A708_SAMPREC* rec)
{
uint64 iRec,
       iData;
MXF_A708_SAMPREC *p=rec;

   printf("\n");
   for(iRec=0; iRec < recNum; iRec++)
   {
      printf("%03llu %010llu 0x%08x %02u %02u ",  iRec, p->timeTag, p->control, p->errorCount, p->dataSize);
      for(iData=0; iData < p->dataSize/2; iData++)
      {
         printf("%04x ", p->data[iData]);

         if(!((iData+1)%8) && (iData+1 < p->dataSize/2))
            printf("\n                                 ");
      }
      
      printf("\n");

      mxfA708NextSamplingRecordPtrGet(p, &p);
   }
}