arm_fir_sparse_q7.c

Go to the documentation of this file.

/* ----------------------------------------------------------------------      
* Copyright (C) 2011 ARM Limited. All rights reserved. 
*      
* $Date:        15. December 2011   
* $Revision:    V2.0.0  
*      
* Project:      Cortex-R DSP Library 
* Title:        arm_fir_sparse_q7.c      
*      
* Description:  Q7 sparse FIR filter processing function.     
*      
* Target Processor:          Cortex-R4/R5
*
* Version 1.0.0 2011/03/08
*     Alpha release.
*
* Version 1.0.1 2011/09/30
*     Beta release.
*
* Version 2.0.0 2011/12/15
*     Final release. 
* 
* ------------------------------------------------------------------- */     
#include "arm_math.h"    
     
     
void arm_fir_sparse_q7(     
  arm_fir_sparse_instance_q7 * S,     
  q7_t * pSrc,     
  q7_t * pDst,     
  q7_t * pScratchIn,     
  q31_t * pScratchOut,     
  uint32_t blockSize)     
{     
     
  q7_t *pState = S->pState;                      /* State pointer */     
  q7_t *pCoeffs = S->pCoeffs;                    /* Coefficient pointer */     
  q7_t *px;                                      /* Scratch buffer pointer */     
  q7_t *py = pState;                             /* Temporary pointers for state buffer */     
  q7_t *pb = pScratchIn;                         /* Temporary pointers for scratch buffer */     
  q7_t *pOut = pDst;                             /* Destination pointer */     
  int32_t *pTapDelay = S->pTapDelay;             /* Pointer to the array containing offset of the non-zero tap values. */     
  uint32_t delaySize = S->maxDelay + blockSize;  /* state length */     
  uint16_t numTaps = S->numTaps;                 /* Filter order */     
  int32_t readIndex;                             /* Read index of the state buffer */     
  uint32_t tapCnt, blkCnt;                       /* loop counters */     
  q7_t coeff = *pCoeffs++;                       /* Read the coefficient value */     
  q31_t *pScr2 = pScratchOut;                    /* Working pointer for scratch buffer of output values */     
  q31_t in;     
  q7_t in1, in2, in3, in4;     
  q7_t x0, x1;  
  q31_t y0, y1;  
    
     
  /* BlockSize of Input samples are copied into the state buffer */     
  /* StateIndex points to the starting position to write in the state buffer */     
  arm_circularWrite_q7(py, (int32_t) delaySize, &S->stateIndex, 1, pSrc, 1,     
                       blockSize);     
     
  /* Loop over the number of taps. */     
  tapCnt = numTaps;     
     
  /* Read Index, from where the state buffer should be read, is calculated. */     
  readIndex = ((int32_t) S->stateIndex - (int32_t) blockSize) - *pTapDelay++;     
     
  /* Wraparound of readIndex */     
  if(readIndex < 0)     
  {     
    readIndex += (int32_t) delaySize;     
  }     
     
  /* Working pointer for state buffer is updated */     
  py = pState;     
     
  /* blockSize samples are read from the state buffer */     
  arm_circularRead_q7(py, (int32_t) delaySize, &readIndex, 1, pb, pb,     
                      (int32_t) blockSize, 1, blockSize);     
     
  /* Working pointer for the scratch buffer of state values */     
  px = pb;     
     
  /* Working pointer for scratch buffer of output values */     
  pScratchOut = pScr2;     
     
  /* Loop over the blockSize. Unroll by a factor of 4.      
   * Compute 4 multiplications at a time. */     
  blkCnt = blockSize >> 2;     
     
  while(blkCnt > 0u)     
  {     
    /* Perform multiplication and store in the scratch buffer */  
    /* Read two values from state */  
    x0 = *px;  
    x1 = *(px + 1u);  
  
    /* multiply  */  
    y0 = (q31_t)x0 * coeff;  
    y1 = (q31_t)x1 * coeff;  
         
    /* Write two values into output buffer */     
    *pScratchOut++ =  y0;     
    *pScratchOut++ =  y1;     
  
    /* Read next two values from state */  
    x0 = *(px + 2u);  
    x1 = *(px + 3u);  
  
    /* multiply  */  
    y0 = (q31_t)x0 * coeff;  
    y1 = (q31_t)x1 * coeff;  
         
    /* Write next two values into output buffer */     
    *pScratchOut++ =  y0;  
    px += 4u;        
    *pScratchOut++ =  y1;    
         
     
    /* Decrement the loop counter */     
    blkCnt--;     
  }     
     
  /* If the blockSize is not a multiple of 4,      
   * compute the remaining samples */     
  blkCnt = blockSize % 0x4u;     
     
  while(blkCnt > 0u)     
  {     
    /* Perform multiplication and store in the scratch buffer */     
    *pScratchOut++ = ((q31_t) * px++ * coeff);     
     
    /* Decrement the loop counter */     
    blkCnt--;     
  }     
     
  /* Load the coefficient value and      
   * increment the coefficient buffer for the next set of state values */     
  coeff = *pCoeffs++;     
     
  /* Read Index, from where the state buffer should be read, is calculated. */     
  readIndex = ((int32_t) S->stateIndex - (int32_t) blockSize) - *pTapDelay++;     
     
  /* Wraparound of readIndex */     
  if(readIndex < 0)     
  {     
    readIndex += (int32_t) delaySize;     
  }     
     
  /* Loop over the number of taps. */     
  tapCnt = (uint32_t) numTaps - 1u;     
     
  while(tapCnt > 0u)     
  {     
    /* Working pointer for state buffer is updated */     
    py = pState;     
     
    /* blockSize samples are read from the state buffer */     
    arm_circularRead_q7(py, (int32_t) delaySize, &readIndex, 1, pb, pb,     
                        (int32_t) blockSize, 1, blockSize);     
     
    /* Working pointer for the scratch buffer of state values */     
    px = pb;     
     
    /* Working pointer for scratch buffer of output values */     
    pScratchOut = pScr2;     
     
    /* Loop over the blockSize. Unroll by a factor of 4.      
     * Compute 4 MACS at a time. */     
    blkCnt = blockSize >> 2;     
     
    while(blkCnt > 0u)     
    {  
        /* Read two values from scratch */  
        x0 = *px;  
        x1 = *(px + 1u);  
  
        /* Read two values from output buffer */  
        y0 = *pScratchOut;  
        y1 = *(pScratchOut + 1u);   
  
        /* Perform Multiply-Accumulate */  
        y0 = (q31_t)x0 * coeff + y0;  
        y1 = (q31_t)x1 * coeff + y1;  
  
        /* write multiply-Accumlate values into output buffer */          
        *pScratchOut = y0;  
        *(pScratchOut + 1u) = y1;  
  
        /* Read next two values from scratch */  
        x0 = *(px + 2u);  
        x1 = *(px + 3u);  
        /* Read two values from output buffer */  
        y0 = *(pScratchOut + 2u);  
        y1 = *(pScratchOut + 3u);  
  
        /* Perform Multiply-Accumulate */  
        y0 = (q31_t)x0 * coeff + y0;  
        y1 = (q31_t)x1 * coeff + y1;  
  
        /* write multiply-Accumlate values into output buffer */  
        *(pScratchOut + 2u) = y0;  
        *(pScratchOut + 3u) = y1;  
  
        /* update pointers */  
        px += 4u;  
        pScratchOut += 4u;  
          
     
      /* Decrement the loop counter */     
      blkCnt--;     
    }     
     
    /* If the blockSize is not a multiple of 4,      
     * compute the remaining samples */     
    blkCnt = blockSize % 0x4u;     
     
    while(blkCnt > 0u)     
    {     
      /* Perform Multiply-Accumulate */     
      in = *pScratchOut + ((q31_t) * px++ * coeff);     
      *pScratchOut++ = in;     
     
      /* Decrement the loop counter */     
      blkCnt--;     
    }     
     
    /* Load the coefficient value and      
     * increment the coefficient buffer for the next set of state values */     
    coeff = *pCoeffs++;     
     
    /* Read Index, from where the state buffer should be read, is calculated. */     
    readIndex = ((int32_t) S->stateIndex -     
                 (int32_t) blockSize) - *pTapDelay++;     
     
    /* Wraparound of readIndex */     
    if(readIndex < 0)     
    {     
      readIndex += (int32_t) delaySize;     
    }     
     
    /* Decrement the tap loop counter */     
    tapCnt--;     
  }     
     
  /* All the output values are in pScratchOut buffer.      
     Convert them into 1.15 format, saturate and store in the destination buffer. */     
  /* Loop over the blockSize. */     
  blkCnt = blockSize >> 2;     
     
  while(blkCnt > 0u)     
  {     
#ifdef CCS     
    in1 = (q7_t) __SSATA(*pScr2++, 7, 8);     
    in2 = (q7_t) __SSATA(*pScr2++, 7, 8);     
    in3 = (q7_t) __SSATA(*pScr2++, 7, 8);     
    in4 = (q7_t) __SSATA(*pScr2++, 7, 8);     
#else   
    in1 = (q7_t) __SSAT(*pScr2++ >> 7, 8);     
    in2 = (q7_t) __SSAT(*pScr2++ >> 7, 8);     
    in3 = (q7_t) __SSAT(*pScr2++ >> 7, 8);     
    in4 = (q7_t) __SSAT(*pScr2++ >> 7, 8);     
   
#endif   
    *__SIMD32(pOut)++ = __PACKq7(in1, in2, in3, in4);     
     
    /* Decrement the blockSize loop counter */     
    blkCnt--;     
  }     
     
  /* If the blockSize is not a multiple of 4,      
     remaining samples are processed in the below loop */     
  blkCnt = blockSize % 0x4u;     
     
  while(blkCnt > 0u)     
  {     
#ifdef CCS     
    *pOut++ = (q7_t) __SSATA(*pScr2++, 7, 8);     
#else   
    *pOut++ = (q7_t) __SSAT(*pScr2++ >> 7, 8);     
#endif     
     
    /* Decrement the blockSize loop counter */     
    blkCnt--;     
  }     
}