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#include "BIQUAD.h"
192c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent#include "BQ_2I_D16F32Css_TRC_WRA_01_Private.h"
202c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent#include "LVM_Macros.h"
212c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
222c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
232c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent/**************************************************************************
242c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent ASSUMPTIONS:
252c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent COEFS-
262c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[0] is A2, pBiquadState->coefs[1] is A1
272c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[2] is A0, pBiquadState->coefs[3] is -B2
282c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[4] is -B1, these are in Q13 format
292c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
302c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent DELAYS-
312c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[0] is x(n-1)L in Q0 format
322c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[1] is x(n-1)R in Q0 format
332c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[2] is x(n-2)L in Q0 format
342c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[3] is x(n-2)R in Q0 format
352c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[4] is y(n-1)L in Q16 format
362c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[5] is y(n-1)R in Q16 format
372c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[6] is y(n-2)L in Q16 format
382c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[7] is y(n-2)R in Q16 format
392c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent***************************************************************************/
402c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
412c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurentvoid BQ_2I_D16F32C13_TRC_WRA_01 (           Biquad_Instance_t       *pInstance,
422c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                            LVM_INT16                    *pDataIn,
432c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                            LVM_INT16                    *pDataOut,
442c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                            LVM_INT16                    NrSamples)
452c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent    {
462c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        LVM_INT32  ynL,ynR,templ;
472c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        LVM_INT16 ii;
482c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        PFilter_State pBiquadState = (PFilter_State) pInstance;
492c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
502c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent         for (ii = NrSamples; ii != 0; ii--)
512c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent         {
522c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
532c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
542c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
552c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            PROCESSING OF THE LEFT CHANNEL
562c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
572c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL=A2 (Q13) * x(n-2)L (Q0) in Q13*/
582c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL=(LVM_INT32)pBiquadState->coefs[0]* pBiquadState->pDelays[2];
592c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
602c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+=A1 (Q13) * x(n-1)L (Q0) in Q13*/
612c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=(LVM_INT32)pBiquadState->coefs[1]* pBiquadState->pDelays[0];
622c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
632c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+=A0 (Q13) * x(n)L (Q0) in Q13*/
642c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=(LVM_INT32)pBiquadState->coefs[2]* (*pDataIn);
652c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
662c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+= ( (-B2 (Q13) * y(n-2)L (Q16) )>>16) in Q13 */
672c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[6],pBiquadState->coefs[3],templ,16)
682c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
692c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
702c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+=( (-B1 (Q13) * y(n-1)L (Q16) )>>16) in Q13 */
712c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[4],pBiquadState->coefs[4],templ,16)
722c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
732c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
742c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
752c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            PROCESSING OF THE RIGHT CHANNEL
762c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
772c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR=A2 (Q13) * x(n-2)R (Q0) in Q13*/
782c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR=(LVM_INT32)pBiquadState->coefs[0]*pBiquadState->pDelays[3];
792c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
802c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+=A1 (Q13) * x(n-1)R (Q0) in Q13*/
812c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=(LVM_INT32)pBiquadState->coefs[1]*pBiquadState->pDelays[1];
822c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
832c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+=A0 (Q13) * x(n)R (Q0) in Q13*/
842c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=(LVM_INT32)pBiquadState->coefs[2]*(*(pDataIn+1));
852c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
862c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= ( (-B2 (Q13) * y(n-2)R (Q16) )>>16) in Q13*/
872c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[7],pBiquadState->coefs[3],templ,16)
882c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
892c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
902c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+=( (-B1 (Q13) * y(n-1)R (Q16) )>>16) in Q13 */
912c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[5],pBiquadState->coefs[4],templ,16)
922c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
932c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
942c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
952c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            UPDATING THE DELAYS
962c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
972c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[7]=pBiquadState->pDelays[5];  /* y(n-2)R=y(n-1)R*/
982c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[6]=pBiquadState->pDelays[4];  /* y(n-2)L=y(n-1)L*/
992c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[3]=pBiquadState->pDelays[1];  /* x(n-2)R=x(n-1)R*/
1002c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[2]=pBiquadState->pDelays[0];  /* x(n-2)L=x(n-1)L*/
1012c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[5]=ynR<<3;                    /* Update y(n-1)R in Q16*/
1022c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[4]=ynL<<3;                    /* Update y(n-1)L in Q16*/
1032c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[0]=(*pDataIn);                /* Update x(n-1)L in Q0*/
1042c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataIn++;
1052c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[1]=(*pDataIn);                /* Update x(n-1)R in Q0*/
1062c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataIn++;
1072c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1082c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
1092c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            WRITING THE OUTPUT
1102c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
1112c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            *pDataOut=(LVM_INT16)(ynL>>13); /* Write Left output in Q0*/
1122c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataOut++;
1132c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            *pDataOut=(LVM_INT16)(ynR>>13); /* Write Right ouput in Q0*/
1142c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataOut++;
1152c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        }
1162c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1172c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent    }
1182c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
119