view src/gpf3/ccd/break_cond.c @ 673:62a5285e014a

Lorekeeping: allow tpudrv-leonardo.lib on Leonardo/Tango Back in 2015 the Mother's idea was to produce a FreeCalypso development board that would be a clone of TI Leonardo, including the original quadband RFFE; one major additional stipulation was that this board needed to be able to run original unmodified TCS211-20070608 firmware with all blobs intact, with only minimal binary patches to main.lib and tpudrv.lib. The necessary patched libs were produced at that time in the tcs211-patches repository. That plan was changed and we produced FCDEV3B instead, with Openmoko's triband RFFE instead of Leonardo quadband, but when FC Magnetite started in 2016, a TPUDRV_blob= provision was still made, allowing the possibility of patching OM's tpudrv.lib for a restored Leonardo RFFE. Now in 2020 we have FC Tango which is essentially a verbatim clone of Leonardo core, including the original quadband RFFE. We have also deblobbed our firmware so much that we have absolutely no real need for a blob version of tpudrv.lib - but I thought it would be neat to put the ancient TPUDRV_blob= mechanism (classic config) to its originally intended use, just for the heck of it.
author Mychaela Falconia <falcon@freecalypso.org>
date Fri, 29 May 2020 03:55:36 +0000
parents c41a534f33c6
children
line wrap: on
line source

/* 
+----------------------------------------------------------------------------- 
|  Project :  
|  Modul   : break_cond.c
+----------------------------------------------------------------------------- 
|  Copyright 2004 Texas Instruments Deutschland GmbH
|                 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 :  Definition of encoding and decoding functions for BREAK_COND
|             elements 
+----------------------------------------------------------------------------- 
*/ 


/*
 * standard definitions like GLOBAL, UCHAR, ERROR etc.
 */
#include "typedefs.h"
#include "header.h"

/*
 * Prototypes of ccd (USE_DRIVER EQ undef) for prototypes only
 * look at ccdapi.h
 */
#undef USE_DRIVER
#include "ccdapi.h"

/*
 * Types and functions for bit access and manipulation
 */
#include "ccd_globs.h"
#include "bitfun.h"

/*
 * Prototypes of ccd internal functions
 */
#include "ccd.h"

/*
 * Declaration of coder/decoder tables
 */
#include "ccdtable.h"
#include "ccddata.h"

#ifndef RUN_INT_RAM
/*
+-----------------------------------------------------------------------------+
| PROJECT : CCD (6144)                 MODULE  : CDC_GSM                      |
| STATE   : code                       ROUTINE : cdc_break_cond_decode        |
+-----------------------------------------------------------------------------+

  PURPOSE : Decoding of the BREAK_COND element. This element consists of a V 
            component with a variable bit length and must be connected with a 
            special condition. This condition has to be a simple value, which 
            matches to the value range of BREAK_COND element itself.
            This function performs a standard decoding for a given elem table
            entry. This means for non structured elements that 1-n bits are
            read from the bitstream and write to a C-Variable in a machine
            dependent format.
            After decoding of the requested number of bits the resulting value
            will be compared with the constant given by the condition. In case
            of equality the global variable globs->continue_array is set to 
            FALSE. This breaks decoding of the current superior composition 
            and finishes the array. 
*/
SHORT cdc_break_cond_decode (const ULONG c_ref, const ULONG e_ref, T_CCD_Globs *globs)
{
  U8     break_ind = FALSE;
  ULONG  cix_ref, num_prolog_steps, prolog_step_ref;

#ifdef DEBUG_CCD
  #ifndef CCD_SYMBOLS
  TRACE_CCD (globs, "cdc_break_cond_decode()");
  #else
  TRACE_CCD (globs, "cdc_break_cond_decode() %s", ccddata_get_alias((USHORT) e_ref, 1));
  #endif
#endif

  cix_ref = melem[e_ref].calcIdxRef;
  num_prolog_steps = calcidx[cix_ref].numPrologSteps;
  prolog_step_ref  = calcidx[cix_ref].prologStepRef;

  /*
   * if this element is conditional, check the condition
   */
  if (calcidx[cix_ref].numCondCalcs NEQ 0
  AND ! ccd_conditionOK (e_ref, globs))
    return 1;

  /*
   * if this element has a defined prologue
   * we have to process it before decoding the bitstream
   * If there are some epilogue expressions to be processed for this element
   * (rare cases) the result here will be a reading of 0 to an internal
   * register. The valid processing of expression takes place after the 
   * decoding of the element. 
   */
  if (num_prolog_steps)
  {
    if (calc[prolog_step_ref].operation EQ 'P')
    {
      break_ind = TRUE;
    }
    
    ccd_performOperations (num_prolog_steps, prolog_step_ref, globs);
  }

  globs->pstructOffs = melem[e_ref].structOffs;


  if (globs->bitpos < globs->maxBitpos)
  {
 
    if (mvar[melem[e_ref].elemRef].cType EQ 'X')
      bf_readBitChunk (mvar[melem[e_ref].elemRef].bSize, globs);
    else
      bf_readBits (mvar[melem[e_ref].elemRef].bSize, globs);
    
    if ( ( break_ind == TRUE ) && (num_prolog_steps > 0))
    {
      if ( calc[prolog_step_ref].operand == 
           (U16) *(globs->pstruct + globs->pstructOffs) )
      {
        globs->continue_array = FALSE;
      }
    }

    globs->pstructOffs += mvar[melem[e_ref].elemRef].cSize;
  }
  else
    ccd_recordFault ( globs, 
                      ERR_ELEM_LEN, 
                      BREAK, 
                      (USHORT) e_ref, 
                      globs->pstruct + globs->pstructOffs);

  /*
   * process the epilogue expression for this element if there is any 
   */
  if (num_prolog_steps)
  {
    if (  (calc[prolog_step_ref+1].operation EQ 'K')
       || (calc[prolog_step_ref+1].operation EQ 'C')
       || (calc[prolog_step_ref+1].operation EQ 's'))
    {
      ccd_performOperations (num_prolog_steps, prolog_step_ref, globs);
    }
  }

  return 1;
}
#endif /* !RUN_INT_RAM */

#ifndef RUN_INT_RAM
/*
+-----------------------------------------------------------------------------+
| PROJECT : CCD (6144)                 MODULE  : CDC_GSM                      |
| STATE   : code                       ROUTINE : cdc_break_cond_encode        |
+-----------------------------------------------------------------------------+

  PURPOSE : encoding of the BREAK_COND element. This element consists of a V 
            component with a variable bit length and must be connected with a 
            special condition. This condition has to be a simple value, which 
            matches to the value range of BREAK_COND element itself.

*/

SHORT cdc_break_cond_encode (const ULONG c_ref, const ULONG e_ref, T_CCD_Globs *globs)
{
  U8     break_ind = FALSE;
  ULONG  cix_ref, num_prolog_steps, prolog_step_ref;

#ifdef DEBUG_CCD
  #ifndef CCD_SYMBOLS
  TRACE_CCD (globs, "cdc_break_cond_encode()");
  #else
  TRACE_CCD (globs, "cdc_break_cond_encode() %s", ccddata_get_alias((USHORT) e_ref, 1));
  #endif
#endif

  cix_ref = melem[e_ref].calcIdxRef;
  num_prolog_steps = calcidx[cix_ref].numPrologSteps;
  prolog_step_ref  = calcidx[cix_ref].prologStepRef;

  /*
   * if this element is conditional, check the condition
   */
  if (calcidx[cix_ref].numCondCalcs NEQ 0
  AND ! ccd_conditionOK (e_ref, globs))
    return 1;

  /*
   * if this element have a defined Prolog
   * we have to process it before decoding the bitstream
   */
  if (num_prolog_steps)
  {
    if (calc[prolog_step_ref].operation EQ 'P')
    {
      break_ind = TRUE;
    }
    
    ccd_performOperations (num_prolog_steps, prolog_step_ref, globs);
  }

  /*
   * Element is not a SPARE.
   * Setup the readpointer into the C-structure for this element
   */
  globs->pstructOffs = melem[e_ref].structOffs;

  if (mvar[melem[e_ref].elemRef].cType EQ 'X')
    bf_writeBitChunk (mvar[melem[e_ref].elemRef].bSize, globs);
  else
    bf_writeBits (mvar[melem[e_ref].elemRef].bSize, globs);

  if ( ( break_ind == TRUE ) && (num_prolog_steps > 0))
  {
    if ( calc[prolog_step_ref].operand == 
         (U16) *(globs->pstruct + globs->pstructOffs) )
    {
      globs->continue_array = FALSE;
    }
  }

  globs->pstructOffs += mvar[melem[e_ref].elemRef].cSize;

  return 1;
}
#endif /* !RUN_INT_RAM */