BQ_2I_D32F32C30_TRC_WRA_01.c revision 2c8e5cab3faa6d360e222b7a6c40a80083d021ac
12c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*
22c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * Copyright (C) 2004-2010 NXP Software
32c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * Copyright (C) 2010 The Android Open Source Project
42c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent *
52c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * Licensed under the Apache License, Version 2.0 (the "License");
62c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * you may not use this file except in compliance with the License.
72c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * You may obtain a copy of the License at
82c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent *
92c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent *      http://www.apache.org/licenses/LICENSE-2.0
102c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent *
112c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * Unless required by applicable law or agreed to in writing, software
122c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * distributed under the License is distributed on an "AS IS" BASIS,
132c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
142c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * See the License for the specific language governing permissions and
152c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent * limitations under the License.
162c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent */
172c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
182c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/************************************************************************/
192c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*                                                                      */
202c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*     Project::                                                        */
212c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*     $Author: beq07716 $*/
222c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*     $Revision: 1000 $*/
232c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*     $Date: 2010-06-28 13:08:20 +0200 (Mon, 28 Jun 2010) $*/
242c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/*                                                                      */
252c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/************************************************************************/
262c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
272c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent#include "BIQUAD.h"
282c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent#include "BQ_2I_D32F32Cll_TRC_WRA_01_Private.h"
292c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent#include "LVM_Macros.h"
302c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
312c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/**************************************************************************
322c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent ASSUMPTIONS:
332c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent COEFS-
342c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[0] is A2, pBiquadState->coefs[1] is A1
352c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[2] is A0, pBiquadState->coefs[3] is -B2
362c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[4] is -B1, these are in Q30 format
372c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
382c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent DELAYS-
392c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[0] is x(n-1)L in Q0 format
402c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[1] is x(n-1)R in Q0 format
412c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[2] is x(n-2)L in Q0 format
422c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[3] is x(n-2)R in Q0 format
432c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[4] is y(n-1)L in Q0 format
442c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[5] is y(n-1)R in Q0 format
452c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[6] is y(n-2)L in Q0 format
462c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[7] is y(n-2)R in Q0 format
472c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent***************************************************************************/
482c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
492c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurentvoid BQ_2I_D32F32C30_TRC_WRA_01 (           Biquad_Instance_t       *pInstance,
502c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                            LVM_INT32                    *pDataIn,
512c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                            LVM_INT32                    *pDataOut,
522c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                            LVM_INT16                    NrSamples)
532c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
542c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
552c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent    {
562c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        LVM_INT32 ynL,ynR,templ,tempd;
572c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        LVM_INT16 ii;
582c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        PFilter_State pBiquadState = (PFilter_State) pInstance;
592c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
602c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent         for (ii = NrSamples; ii != 0; ii--)
612c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent         {
622c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
632c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
642c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
652c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            PROCESSING OF THE LEFT CHANNEL
662c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
672c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL= ( A2 (Q30) * x(n-2)L (Q0) ) >>30 in Q0*/
682c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[0],pBiquadState->pDelays[2],ynL,30)
692c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
702c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+= ( A1 (Q30) * x(n-1)L (Q0) ) >> 30 in Q0*/
712c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[1],pBiquadState->pDelays[0],templ,30)
722c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
732c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
742c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+= ( A0 (Q30) * x(n)L (Q0) ) >> 30 in Q0*/
752c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[2],*pDataIn,templ,30)
762c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
772c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
782c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent             /* ynL+= (-B2 (Q30) * y(n-2)L (Q0) ) >> 30 in Q0*/
792c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[3],pBiquadState->pDelays[6],templ,30)
802c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
812c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
822c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+= (-B1 (Q30) * y(n-1)L (Q0) ) >> 30 in Q0 */
832c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[4],pBiquadState->pDelays[4],templ,30)
842c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
852c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
862c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
872c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            PROCESSING OF THE RIGHT CHANNEL
882c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
892c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR= ( A2 (Q30) * x(n-2)R (Q0) ) >> 30 in Q0*/
902c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[0],pBiquadState->pDelays[3],ynR,30)
912c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
922c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= ( A1 (Q30) * x(n-1)R (Q0) ) >> 30  in Q0*/
932c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[1],pBiquadState->pDelays[1],templ,30)
942c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
952c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
962c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= ( A0 (Q30) * x(n)R (Q0) ) >> 30 in Q0*/
972c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            tempd=*(pDataIn+1);
982c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[2],tempd,templ,30)
992c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
1002c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1012c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= (-B2 (Q30) * y(n-2)R (Q0) ) >> 30 in Q0*/
1022c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[3],pBiquadState->pDelays[7],templ,30)
1032c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
1042c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1052c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= (-B1 (Q30) * y(n-1)R (Q0) ) >> 30 in Q0 */
1062c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x32INTO32(pBiquadState->coefs[4],pBiquadState->pDelays[5],templ,30)
1072c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
1082c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1092c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
1102c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            UPDATING THE DELAYS
1112c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
1122c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[7]=pBiquadState->pDelays[5]; /* y(n-2)R=y(n-1)R*/
1132c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[6]=pBiquadState->pDelays[4]; /* y(n-2)L=y(n-1)L*/
1142c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[3]=pBiquadState->pDelays[1]; /* x(n-2)R=x(n-1)R*/
1152c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[2]=pBiquadState->pDelays[0]; /* x(n-2)L=x(n-1)L*/
1162c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[5]=(LVM_INT32)ynR; /* Update y(n-1)R in Q0*/
1172c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[4]=(LVM_INT32)ynL; /* Update y(n-1)L in Q0*/
1182c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[0]=(*pDataIn); /* Update x(n-1)L in Q0*/
1192c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataIn++;
1202c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[1]=(*pDataIn); /* Update x(n-1)R in Q0*/
1212c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataIn++;
1222c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1232c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
1242c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            WRITING THE OUTPUT
1252c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
1262c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            *pDataOut=(LVM_INT32)ynL; /* Write Left output in Q0*/
1272c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataOut++;
1282c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            *pDataOut=(LVM_INT32)ynR; /* Write Right ouput in Q0*/
1292c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataOut++;
1302c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1312c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1322c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        }
1332c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1342c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent    }
1352c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
136