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