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 "PK_2I_D32F32CssGss_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 A0,
262c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[1] is -B2,
272c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[2] is -B1, these are in Q14 format
282c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->coefs[3] is Gain, in Q11 format
292c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
302c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
312c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent DELAYS-
322c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[0] is x(n-1)L in Q0 format
332c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[1] is x(n-1)R in Q0 format
342c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[2] is x(n-2)L in Q0 format
352c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[3] is x(n-2)R in Q0 format
362c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[4] is y(n-1)L in Q0 format
372c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[5] is y(n-1)R in Q0 format
382c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[6] is y(n-2)L in Q0 format
392c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent pBiquadState->pDelays[7] is y(n-2)R in Q0 format
402c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent***************************************************************************/
412c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurentvoid PK_2I_D32F32C14G11_TRC_WRA_01 ( Biquad_Instance_t       *pInstance,
422c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                     LVM_INT32               *pDataIn,
432c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                     LVM_INT32               *pDataOut,
442c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                                     LVM_INT16               NrSamples)
452c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent    {
462c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        LVM_INT32 ynL,ynR,ynLO,ynRO,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= (A0 (Q14) * (x(n)L (Q0) - x(n-2)L (Q0) ) >>14)  in Q0*/
582c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            templ=(*pDataIn)-pBiquadState->pDelays[2];
592c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(templ,pBiquadState->coefs[0],ynL,14)
602c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
612c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+= ((-B2 (Q14) * y(n-2)L (Q0) ) >>14) in Q0*/
622c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[6],pBiquadState->coefs[1],templ,14)
632c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
642c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
652c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynL+= ((-B1 (Q14) * y(n-1)L (Q0) ) >>14) in Q0 */
662c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[4],pBiquadState->coefs[2],templ,14)
672c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynL+=templ;
682c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
692c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynLO= ((Gain (Q11) * ynL (Q0))>>11) in Q0*/
702c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(ynL,pBiquadState->coefs[3],ynLO,11)
712c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
722c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynLO=( ynLO(Q0) + x(n)L (Q0) ) in Q0*/
732c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynLO+= (*pDataIn);
742c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
752c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
762c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            PROCESSING OF THE RIGHT CHANNEL
772c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
782c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR= (A0 (Q14) * (x(n)R (Q0) - x(n-2)R (Q0) ) >>14)   in Q0*/
792c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            templ=(*(pDataIn+1))-pBiquadState->pDelays[3];
802c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(templ,pBiquadState->coefs[0],ynR,14)
812c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
822c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= ((-B2 (Q14) * y(n-2)R (Q0) ) >>14)  in Q0*/
832c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[7],pBiquadState->coefs[1],templ,14)
842c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
852c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
862c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynR+= ((-B1 (Q14) * y(n-1)R (Q0) ) >>14)  in Q0 */
872c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(pBiquadState->pDelays[5],pBiquadState->coefs[2],templ,14)
882c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynR+=templ;
892c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
902c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynRO= ((Gain (Q11) * ynR (Q0))>>11) in Q0*/
912c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            MUL32x16INTO32(ynR,pBiquadState->coefs[3],ynRO,11)
922c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
932c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /* ynRO=( ynRO(Q0) + x(n)R (Q0) ) in Q0*/
942c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ynRO+= (*(pDataIn+1));
952c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
962c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
972c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            UPDATING THE DELAYS
982c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
992c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[7]=pBiquadState->pDelays[5]; /* y(n-2)R=y(n-1)R*/
1002c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[6]=pBiquadState->pDelays[4]; /* y(n-2)L=y(n-1)L*/
1012c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[3]=pBiquadState->pDelays[1]; /* x(n-2)R=x(n-1)R*/
1022c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[2]=pBiquadState->pDelays[0]; /* x(n-2)L=x(n-1)L*/
1032c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[5]=ynR; /* Update y(n-1)R in Q0*/
1042c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[4]=ynL; /* Update y(n-1)L in Q0*/
1052c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[0]=(*pDataIn); /* Update x(n-1)L in Q0*/
1062c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataIn++;
1072c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pBiquadState->pDelays[1]=(*pDataIn); /* Update x(n-1)R in Q0*/
1082c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataIn++;
1092c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1102c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            /**************************************************************************
1112c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent                            WRITING THE OUTPUT
1122c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            ***************************************************************************/
1132c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            *pDataOut=ynLO; /* Write Left output in Q0*/
1142c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataOut++;
1152c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            *pDataOut=ynRO; /* Write Right ouput in Q0*/
1162c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent            pDataOut++;
1172c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1182c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent        }
1192c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
1202c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent    }
1212c8e5cab3faa6d360e222b7a6c40a80083d021acEric Laurent
122