#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <ctype.h>

/* Common Sample Program include files */
#include "include/naiapp_boardaccess_menu.h"
#include "include/naiapp_boardaccess_query.h"
#include "include/naiapp_boardaccess_access.h"
#include "include/naiapp_boardaccess_display.h"
#include "include/naiapp_boardaccess_utils.h"

/* naibrd include files */
#include "nai.h"
#include "naibrd.h"
#include "functions/naibrd_ser.h"
#include "advanced/nai_ether_adv.h"

static const int8_t *CONFIG_FILE = (const int8_t *)"default_SER_BIT.txt";

/* Function prototypes */
void Run_SER_BIT(int32_t cardIndex, int32_t module, uint32_t moduleID);

/**************************************************************************************************************/
/** \defgroup SERBIT Serial Built-In-Test
The purpose of the Serial built-in-test sample application is to illustrate the methods to call in the
naibrd library to run the built-in-test on the serial module.
*/
/**************************************************************************************************************/
#if defined (__VXWORKS__)
int32_t SER_BIT_Sample(void)
#else
int32_t main(void)
#endif
{
   bool_t stop = FALSE;
   int32_t cardIndex;
   int32_t moduleCnt;
   int32_t module;
   uint32_t moduleID = 0;
   int8_t inputBuffer[80];
   int32_t inputResponseCnt;

   if (naiapp_RunBoardMenu(CONFIG_FILE) == TRUE)
   {
      while (stop != TRUE)
      {
         /* Query the user for the card index */
         stop = naiapp_query_CardIndex(naiapp_GetBoardCnt(), 0, &cardIndex);
         if (stop != TRUE)
         {
            check_status(naibrd_GetModuleCount(cardIndex, &moduleCnt));

            /* Query the user for the module number */
            stop = naiapp_query_ModuleNumber(moduleCnt, 1, &module);
            if (stop != TRUE)
            {
               moduleID = naibrd_GetModuleID(cardIndex, module);
               if ((moduleID != 0))
               {
                  Run_SER_BIT(cardIndex, module, moduleID);
               }
            }
         }

         printf("\nType Q to quit or Enter key to restart application:\n");
         stop = naiapp_query_ForQuitResponse(sizeof(inputBuffer), NAI_QUIT_CHAR, inputBuffer, &inputResponseCnt);
      }
   }

   printf("\nType the Enter key to exit the program: ");
   naiapp_query_ForQuitResponse(sizeof(inputBuffer), NAI_QUIT_CHAR, inputBuffer, &inputResponseCnt);
   naiapp_access_CloseAllOpenCards();

   return 0;
}

/**************************************************************************************************************/
/** \ingroup SERBIT
Configures a serial module, runs a built-in-test and checks the results.
\param cardIndex (Input) Logical Card Index assigned to connection with the NAI_BOARD (0 - NAI_MAX_CARDS-1).
\param module    (Input) Module Number of the module to access (1 - [max modules for board]).
\param moduleID  (Input) The ID of the module.
*/
/**************************************************************************************************************/
void Run_SER_BIT(int32_t cardIndex, int32_t module, uint32_t moduleID)
{
   int32_t chanNum, channelCount;
   bool_t bQuit = FALSE;
   int8_t inputBuffer[80];
   int32_t inputResponseCnt;

   channelCount = naibrd_SER_GetChannelCount(moduleID);
   check_status(naiapp_query_ChannelNumber(channelCount, 1, &chanNum));

   printf("\nSerial Channel # %d\n", chanNum);

   do
   {
      bool_t enable = 0;
      nai_status_t status;

      /* Get the state of the channel before BIT is executed.*/
      check_status(naibrd_SER_GetChannelEnable(cardIndex, module, chanNum, &enable));

      /* Disable the channel. Channels MUST be disabled for BIT to run. */
      check_status(naibrd_SER_SetChannelEnable(cardIndex, module, chanNum, 0));

      /* For BIT to run on the SC3 we need to make sure the channels are disabled in pairs (1 & 2, 2 & 3 etc.) */
	  /* The CMH Module only has five channels, so no need to disable its pair. */
      if ((moduleID == NAI_MODULE_ID_SC3) || (moduleID == NAI_MODULE_ID_CMH) && (chanNum != 5))
      {
         if ((chanNum % 2) == 0)   /* Even channel */
            check_status(naibrd_SER_SetChannelEnable(cardIndex, module, (chanNum - 1), 0));
         else
            check_status(naibrd_SER_SetChannelEnable(cardIndex, module, (chanNum + 1), 0));
      }

      /* Initiate BIT and wait for results */
      status = naibrd_SER_InitiateBIT(cardIndex, module, chanNum, NAI_SER_INITIATE_BIT_WAIT_RESULT);

      if (NAI_SUCCESS == status)
         printf("BIT Passed.\n");
      else
         check_status(status);

      /* Restore the channel's original state. */
      check_status(naibrd_SER_SetChannelEnable(cardIndex, module, chanNum, enable));

      printf("Press ENTER to run BIT again, or '%c' to exit program : ", NAI_QUIT_CHAR);
      bQuit = naiapp_query_ForQuitResponse(sizeof(inputBuffer), NAI_QUIT_CHAR, inputBuffer, &inputResponseCnt);

   } while (TRUE != bQuit);

   return;
}