view src/aci2/aci/ati_src_tst.c @ 686:59f07d67eb45

luna target split into luna1 and luna2 luna1 is FC Luna based on iWOW DSK v4.0 or v5.0 motherboard luna2 is FC Luna based on FC Caramel2 MB
author Mychaela Falconia <falcon@freecalypso.org>
date Mon, 12 Oct 2020 18:51:24 +0000
parents 93999a60b835
children
line wrap: on
line source

/*
+-----------------------------------------------------------------------------
|  Project :  GSM-PS (6147)
|  Modul   :  ATI_SRC_TST
+-----------------------------------------------------------------------------
|  Copyright 2002 Texas Instruments Berlin, AG
|                 All rights reserved.
|
|                 This file is confidential and a trade secret of Texas
|                 Instruments Berlin, AG
|                 The receipt of or possession of this file does not convey
|                 any rights to reproduce or disclose its contents or to
|                 manufacture, use, or sell anything it may describe, in
|                 whole, or in part, without the specific written consent of
|                 Texas Instruments Berlin, AG.
+-----------------------------------------------------------------------------
|  Purpose :  this source is used for W32 tests
+-----------------------------------------------------------------------------
*/

#ifdef DTI

#ifndef ATI_SRC_TST_C
#define ATI_SRC_TST_C
#endif

#include "aci_all.h"
/*==== INCLUDES ===================================================*/
#include "line_edit.h"
#include "aci_cmh.h"
#include "ati_cmd.h"
#include "aci_cmd.h"
#include "dti.h"      /* functionality of the dti library */

#include "aci_lst.h"
#include "dti_conn_mng.h"
#ifdef UART
#include "psa_uart.h"
#include "cmh_uart.h"
#endif
#ifdef FF_PSI
#include "psa_psi.h"
#include "cmh_psi.h"
#endif /*FF_PSI*/
#include "aci_io.h"
#include "aci_mem.h"
#include "aci.h"
#include "ati_io.h"

#define  ATI_SRC_TST_GLOBALS
#include "ati_src_tst.h"

#include "sap_dti.h"
#include "ati_int.h"
#ifdef UART
#include "ati_src_uart.h"
#endif
#ifdef FF_PSI
#include "ati_src_psi.h"
#endif /*FF_PSI*/
#ifdef FF_ATI_BAT
#include "ati_bat.h"
#endif /* FF_ATI_BAT */

/*==== CONSTANTS ==================================================*/

/*==== TYPES ======================================================*/

/*==== EXPORT =====================================================*/

/*==== VARIABLES ==================================================*/

/*==== FUNCTIONS ==================================================*/

EXTERN void uart_src_test_sendString (UBYTE *string, USHORT string_len,
                             T_ACI_DTI_PRC     *src_infos,
                             T_ATI_OUTPUT_TYPE output_type);


/*=================================================================*/

/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_result_cb   |
+-------------------------------------------------------------------+

  PURPOSE :
*/
GLOBAL void ati_src_tst_result_cb (UBYTE              src_id,
                                   T_ATI_OUTPUT_TYPE  output_type,
                                   UBYTE              *output,
                                   USHORT             output_len)
{
#ifdef UART
  T_ACI_DTI_PRC *src_infos = NULL;
#endif
#ifdef FF_PSI
  T_ACI_DTI_PRC_PSI *src_infos_psi = NULL;
#endif /*FF_PSI*/
  if( output_len EQ 0 )
  {
    /* if length is 0, then do not send (happens if some
     formatting characters, e.g CR or LF have been sent: they are irrelevant
     for this source...) */
    return;
  }

#ifdef RMV_01_04_03
#ifdef FF_TWO_UART_PORTS
  /* disable output to UART on data channel */
  if (src_id EQ UART_DATA_CHANNEL)
  {
    return;
  }
#endif
#endif

#ifdef UART
  src_infos = find_element (uart_src_params, (UBYTE)src_id, cmhUARTtest_srcId);
#endif

#ifdef FF_PSI
  src_infos_psi = find_element (psi_src_params, src_id, cmhPSItest_srcId);
#endif /*FF_PSI*/
#if 0
  if (src_infos EQ NULL)
  {
    TRACE_EVENT_P1("[ERR] uart_src_result_cb: src_id=%d not found", src_id) ;
    return;
  }
#endif

  if (IS_ECHO_OUTPUT (output_type) AND !IS_CONFIRM_OUTPUT (output_type))
  {
    return;
  }
  else
  {
    if(
#ifdef UART
        (src_infos EQ NULL)
#else
        TRUE
#endif
        AND
#ifdef FF_PSI
        (src_infos_psi EQ NULL)
#else
        TRUE
#endif
    )
    {
      PALLOC (aci_cmd_ind, ACI_CMD_IND);

      TRACE_FUNCTION ("ati_src_tst_result_cb ()");

/*    aci_cmd_ind->cmd_len = output_len; */
/*
 * SKA 2002-09-11 to make the TST source V.25 ter compatible, but don't change
 * existing test cases, remove the '\r' which we inserted in aci_aci_cmd_req
 * and reduce the length by one
 */
      if (*(output+output_len-1) EQ '\r')
      {
        *(output+output_len-1) = '\0'; /* remove the '\r' */
        --output_len;
      }

      aci_cmd_ind->cmd_len = output_len;
      strncpy ((CHAR*)aci_cmd_ind->cmd_seq, output, output_len);

      trace_cmd_line ("ATI TST Output", (char *)output, src_id, output_len);

      PSENDX (ACI, aci_cmd_ind);
    }
#ifdef UART
    else if (src_infos NEQ NULL)
    {
      uart_src_test_sendString(output, output_len, src_infos, output_type);
    }
#endif
#ifdef FF_PSI
    else /*PSI src*/
    {
      psi_src_test_sendString(output, output_len, src_infos_psi, output_type);
    }
#endif /*FF_PSI*/
  }
}

/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)       MODULE  : ati_src_tst               |
|                               ROUTINE : ati_src_tst_line_state_cb |
+-------------------------------------------------------------------+

  PURPOSE : register the test source for W32 tests at the ATI
*/
GLOBAL void ati_src_tst_line_state_cb (UBYTE                 src_id,
                                       T_ATI_LINE_STATE_TYPE line_state_type,
                                       ULONG                 line_state_param)
{
  TRACE_FUNCTION ("ati_src_tst_line_state_cb ()");

  switch (line_state_type)
  {
    case ATI_LINE_STATE_OUTPUT_TYPE:
      TRACE_EVENT_P1 ("[DBG] ati_src_tst_line_state_cb (): ATI_LINE_STATE_OUTPUT_TYPE = %d", line_state_param);
      break;

    case ATI_LINE_STATE_DCD:
      TRACE_EVENT_P1 ("[DBG] ati_src_tst_line_state_cb (): ATI_LINE_STATE_DCD = %d", line_state_param);
      break;

    case ATI_LINE_STATE_RNG:  /* TODO */
    {
      T_IO_RING_PARAMS rng_params;

      memcpy (&rng_params, (T_IO_RING_PARAMS*)line_state_param,
              sizeof(T_IO_RING_PARAMS));

      TRACE_EVENT_P1 ("[DBG] ati_src_tst_line_state_cb (): ATI_LINE_STATE_RNG = %d", rng_params.ring_stat);

      break;
    }

    default:
      TRACE_EVENT_P1 ("[WRN] ati_src_tst_line_state_cb (): UNKNOWN line_state_type = %d", line_state_type);
      break;
  }
}


/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_init        |
+-------------------------------------------------------------------+

  PURPOSE : register the test source for W32 tests at the ATI
*/

GLOBAL void ati_src_tst_init ( UBYTE cmd_src )
{
  int i;
  static BOOL initialzed = FALSE;
  TRACE_FUNCTION ("ati_src_tst_init ()");

  if (initialzed EQ FALSE)
  {
    for (i=0; i<MAX_TST_SRC; i++)
    {
      tst_src_id[i] = 0;
    }
    initialzed = TRUE;
  }

  tst_src_id[cmd_src - 1] = ati_init (ATI_SRC_TYPE_TST,
                                      ati_src_tst_result_cb,
                                      ati_src_tst_line_state_cb);

  TRACE_EVENT_P1 ("ati_src_tst_init: srcId=%d", tst_src_id[cmd_src - 1]);
#ifndef FF_ATI_BAT
  if (tst_src_id[cmd_src - 1]<CMD_SRC_MAX)
  {
    if (tst_src_id[cmd_src - 1]==CMD_SRC_LCL)
      aci_cmd_src_mode_set(tst_src_id[cmd_src - 1],CMD_MODE_ACI);
    else
      aci_cmd_src_mode_set(tst_src_id[cmd_src - 1],CMD_MODE_ATI);
  }
#endif
  ati_switch_mode(tst_src_id[cmd_src - 1], ATI_CMD_MODE);
}

/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_get_src_id  |
+-------------------------------------------------------------------+

  PURPOSE : get the test source for W32 tests at the ATI
*/

GLOBAL UBYTE ati_src_tst_get_src_id ( UBYTE cmd_src )
{

  TRACE_FUNCTION ("ati_src_tst_get_src_id ()");

  if ( cmd_src EQ CMD_SRC_UNKNOWN )
  {
    cmd_src = CMD_SRC_EXT;
    while ( cmd_src < MAX_TST_SRC && tst_src_id[cmd_src - 1] NEQ DTI_MNG_ID_NOTPRESENT )
    {
      cmd_src++;
    }

    if ( cmd_src > MAX_TST_SRC || cmd_src EQ CMD_SRC_UNKNOWN )
    {
      return DTI_MNG_ID_NOTPRESENT;
    }

    ati_src_tst_init( cmd_src );
  }

  return tst_src_id[cmd_src - 1];
}

/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_finit       |
+-------------------------------------------------------------------+

  PURPOSE : deregister the test source for W32 tests at the ATI
*/

GLOBAL void ati_src_tst_finit (void)
{
  SHORT i = 0;

  TRACE_FUNCTION ("ati_src_tst_finit ()");

  for ( i = 0; i < MAX_TST_SRC AND tst_src_id[i] NEQ DTI_MNG_ID_NOTPRESENT; i++)
  {
    ati_finit (tst_src_id[i]);
    tst_src_id[i] = DTI_MNG_ID_NOTPRESENT;
  }
}

/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_proc_cmd    |
+-------------------------------------------------------------------+

  PURPOSE : for W32 tests
*/

GLOBAL BOOL ati_src_tst_proc_cmd (T_ACI_CMD_REQ *aci_cmd_req)
{
  T_ATI_SRC_PARAMS *src_params = find_element (ati_src_list, tst_src_id[aci_cmd_req->cmd_src - 1], search_ati_src_id);

  if ( tst_src_id[aci_cmd_req->cmd_src - 1] NEQ DTI_MNG_ID_NOTPRESENT )
  {
    /*
     * SKA 2002-09-11 disable echoing, else no test case pass
     * the strange tst_src_id[aci_cmd_req->cmd_src - 1] has to be explained by BRZ
     */
    ati_user_output_cfg[tst_src_id[aci_cmd_req->cmd_src - 1]].atE = 0;

    if (src_params->text_mode EQ CMD_MODE)
    {
      TRACE_FUNCTION ("ati_src_tst_proc_cmd () CMD MODE");

      if (strchr (aci_cmd_req->cmd_seq, '\r'))
      {
        aci_cmd_req->cmd_seq[aci_cmd_req->cmd_len] = '\0';
      }
      else
      {
        aci_cmd_req->cmd_seq[aci_cmd_req->cmd_len] = '\r';     /* make it V.25 ter compatible */
        aci_cmd_req->cmd_seq[(aci_cmd_req->cmd_len) + 1] = '\0';
        aci_cmd_req->cmd_len++;
      }
    }
    else /* text has to be terminated by Ctrl-Z */
    {
      TRACE_FUNCTION ("ati_src_tst_proc_cmd () TEXT MODE");

      if (aci_cmd_req->cmd_seq[aci_cmd_req->cmd_len] NEQ 0x1a)  /* Ctrl-Z */
      {
        aci_cmd_req->cmd_seq[aci_cmd_req->cmd_len] = 0x1a;     /* make it V.25 ter compatible */
        aci_cmd_req->cmd_seq[(aci_cmd_req->cmd_len) + 1] = '\0';
        aci_cmd_req->cmd_len++;
      }
      else
      {
        aci_cmd_req->cmd_seq[aci_cmd_req->cmd_len] = '\0';
      }
    }

    return (ati_execute (tst_src_id[aci_cmd_req->cmd_src - 1],
                         aci_cmd_req->cmd_seq,
                         aci_cmd_req->cmd_len));
  }
  else
  {
    TRACE_EVENT("ATI TST Input: wrong src_id");
    return FALSE;
  }
}


/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_abort       |
+-------------------------------------------------------------------+

  PURPOSE : for W32 tests
*/
GLOBAL BOOL ati_src_tst_abort (UBYTE src_id)
{
  TRACE_FUNCTION ("ati_src_tst_abort ()");

  return (ati_abort(tst_src_id[src_id - 1]));
}


/*
+-------------------------------------------------------------------+
| PROJECT : GSM-PS (6147)         MODULE  : ati_src_tst             |
|                                 ROUTINE : ati_src_tst_sendString  |
+-------------------------------------------------------------------+

  PURPOSE : Provides the test-source output over ACI_CMD_IND.
            Removes the separator and generates one ACI_CMD_IND
            for every separated message.

*/
GLOBAL void ati_src_tst_sendString(T_desc2 *data, UBYTE src_id)
{
  CHAR *string, *pch_start, *pch_end;

  TRACE_FUNCTION ("ati_src_tst_sendString ()");

  ACI_MALLOC(string, data->len + 1);
  strncpy(string, data->buffer, data->len);
  string[data->len] = '\0';

  pch_start = string;

  while ( NULL NEQ (pch_end = strchr(pch_start, ATI_TEST_SRC_SEPARATOR)) )
  {
    *pch_end = '\0';

    /* send message to the test interface*/
    {
      PALLOC (aci_cmd_ind, ACI_CMD_IND);

      aci_cmd_ind->cmd_len = strlen(pch_start);
      strncpy ((CHAR*)aci_cmd_ind->cmd_seq, pch_start, aci_cmd_ind->cmd_len);

      trace_cmd_line ("ATI TST Output", pch_start, src_id, aci_cmd_ind->cmd_len);

      PSENDX (ACI, aci_cmd_ind);
    }

    pch_start = pch_end + 1;
  }
  ACI_MFREE(string);
}
#endif /* DTI */