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