cannam@154: /*********************************************************************** cannam@154: Copyright (c) 2006-2011, Skype Limited. All rights reserved. cannam@154: Redistribution and use in source and binary forms, with or without cannam@154: modification, are permitted provided that the following conditions cannam@154: are met: cannam@154: - Redistributions of source code must retain the above copyright notice, cannam@154: this list of conditions and the following disclaimer. cannam@154: - Redistributions in binary form must reproduce the above copyright cannam@154: notice, this list of conditions and the following disclaimer in the cannam@154: documentation and/or other materials provided with the distribution. cannam@154: - Neither the name of Internet Society, IETF or IETF Trust, nor the cannam@154: names of specific contributors, may be used to endorse or promote cannam@154: products derived from this software without specific prior written cannam@154: permission. cannam@154: THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" cannam@154: AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE cannam@154: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE cannam@154: ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE cannam@154: LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR cannam@154: CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF cannam@154: SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS cannam@154: INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN cannam@154: CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) cannam@154: ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE cannam@154: POSSIBILITY OF SUCH DAMAGE. cannam@154: ***********************************************************************/ cannam@154: cannam@154: #ifdef HAVE_CONFIG_H cannam@154: #include "config.h" cannam@154: #endif cannam@154: cannam@154: #include "SigProc_FIX.h" cannam@154: #include "resampler_private.h" cannam@154: #include "stack_alloc.h" cannam@154: cannam@154: static OPUS_INLINE opus_int16 *silk_resampler_private_down_FIR_INTERPOL( cannam@154: opus_int16 *out, cannam@154: opus_int32 *buf, cannam@154: const opus_int16 *FIR_Coefs, cannam@154: opus_int FIR_Order, cannam@154: opus_int FIR_Fracs, cannam@154: opus_int32 max_index_Q16, cannam@154: opus_int32 index_increment_Q16 cannam@154: ) cannam@154: { cannam@154: opus_int32 index_Q16, res_Q6; cannam@154: opus_int32 *buf_ptr; cannam@154: opus_int32 interpol_ind; cannam@154: const opus_int16 *interpol_ptr; cannam@154: cannam@154: switch( FIR_Order ) { cannam@154: case RESAMPLER_DOWN_ORDER_FIR0: cannam@154: for( index_Q16 = 0; index_Q16 < max_index_Q16; index_Q16 += index_increment_Q16 ) { cannam@154: /* Integer part gives pointer to buffered input */ cannam@154: buf_ptr = buf + silk_RSHIFT( index_Q16, 16 ); cannam@154: cannam@154: /* Fractional part gives interpolation coefficients */ cannam@154: interpol_ind = silk_SMULWB( index_Q16 & 0xFFFF, FIR_Fracs ); cannam@154: cannam@154: /* Inner product */ cannam@154: interpol_ptr = &FIR_Coefs[ RESAMPLER_DOWN_ORDER_FIR0 / 2 * interpol_ind ]; cannam@154: res_Q6 = silk_SMULWB( buf_ptr[ 0 ], interpol_ptr[ 0 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 1 ], interpol_ptr[ 1 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 2 ], interpol_ptr[ 2 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 3 ], interpol_ptr[ 3 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 4 ], interpol_ptr[ 4 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 5 ], interpol_ptr[ 5 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 6 ], interpol_ptr[ 6 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 7 ], interpol_ptr[ 7 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 8 ], interpol_ptr[ 8 ] ); cannam@154: interpol_ptr = &FIR_Coefs[ RESAMPLER_DOWN_ORDER_FIR0 / 2 * ( FIR_Fracs - 1 - interpol_ind ) ]; cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 17 ], interpol_ptr[ 0 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 16 ], interpol_ptr[ 1 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 15 ], interpol_ptr[ 2 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 14 ], interpol_ptr[ 3 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 13 ], interpol_ptr[ 4 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 12 ], interpol_ptr[ 5 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 11 ], interpol_ptr[ 6 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 10 ], interpol_ptr[ 7 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, buf_ptr[ 9 ], interpol_ptr[ 8 ] ); cannam@154: cannam@154: /* Scale down, saturate and store in output array */ cannam@154: *out++ = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND( res_Q6, 6 ) ); cannam@154: } cannam@154: break; cannam@154: case RESAMPLER_DOWN_ORDER_FIR1: cannam@154: for( index_Q16 = 0; index_Q16 < max_index_Q16; index_Q16 += index_increment_Q16 ) { cannam@154: /* Integer part gives pointer to buffered input */ cannam@154: buf_ptr = buf + silk_RSHIFT( index_Q16, 16 ); cannam@154: cannam@154: /* Inner product */ cannam@154: res_Q6 = silk_SMULWB( silk_ADD32( buf_ptr[ 0 ], buf_ptr[ 23 ] ), FIR_Coefs[ 0 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 1 ], buf_ptr[ 22 ] ), FIR_Coefs[ 1 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 2 ], buf_ptr[ 21 ] ), FIR_Coefs[ 2 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 3 ], buf_ptr[ 20 ] ), FIR_Coefs[ 3 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 4 ], buf_ptr[ 19 ] ), FIR_Coefs[ 4 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 5 ], buf_ptr[ 18 ] ), FIR_Coefs[ 5 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 6 ], buf_ptr[ 17 ] ), FIR_Coefs[ 6 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 7 ], buf_ptr[ 16 ] ), FIR_Coefs[ 7 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 8 ], buf_ptr[ 15 ] ), FIR_Coefs[ 8 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 9 ], buf_ptr[ 14 ] ), FIR_Coefs[ 9 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 10 ], buf_ptr[ 13 ] ), FIR_Coefs[ 10 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 11 ], buf_ptr[ 12 ] ), FIR_Coefs[ 11 ] ); cannam@154: cannam@154: /* Scale down, saturate and store in output array */ cannam@154: *out++ = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND( res_Q6, 6 ) ); cannam@154: } cannam@154: break; cannam@154: case RESAMPLER_DOWN_ORDER_FIR2: cannam@154: for( index_Q16 = 0; index_Q16 < max_index_Q16; index_Q16 += index_increment_Q16 ) { cannam@154: /* Integer part gives pointer to buffered input */ cannam@154: buf_ptr = buf + silk_RSHIFT( index_Q16, 16 ); cannam@154: cannam@154: /* Inner product */ cannam@154: res_Q6 = silk_SMULWB( silk_ADD32( buf_ptr[ 0 ], buf_ptr[ 35 ] ), FIR_Coefs[ 0 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 1 ], buf_ptr[ 34 ] ), FIR_Coefs[ 1 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 2 ], buf_ptr[ 33 ] ), FIR_Coefs[ 2 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 3 ], buf_ptr[ 32 ] ), FIR_Coefs[ 3 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 4 ], buf_ptr[ 31 ] ), FIR_Coefs[ 4 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 5 ], buf_ptr[ 30 ] ), FIR_Coefs[ 5 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 6 ], buf_ptr[ 29 ] ), FIR_Coefs[ 6 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 7 ], buf_ptr[ 28 ] ), FIR_Coefs[ 7 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 8 ], buf_ptr[ 27 ] ), FIR_Coefs[ 8 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 9 ], buf_ptr[ 26 ] ), FIR_Coefs[ 9 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 10 ], buf_ptr[ 25 ] ), FIR_Coefs[ 10 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 11 ], buf_ptr[ 24 ] ), FIR_Coefs[ 11 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 12 ], buf_ptr[ 23 ] ), FIR_Coefs[ 12 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 13 ], buf_ptr[ 22 ] ), FIR_Coefs[ 13 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 14 ], buf_ptr[ 21 ] ), FIR_Coefs[ 14 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 15 ], buf_ptr[ 20 ] ), FIR_Coefs[ 15 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 16 ], buf_ptr[ 19 ] ), FIR_Coefs[ 16 ] ); cannam@154: res_Q6 = silk_SMLAWB( res_Q6, silk_ADD32( buf_ptr[ 17 ], buf_ptr[ 18 ] ), FIR_Coefs[ 17 ] ); cannam@154: cannam@154: /* Scale down, saturate and store in output array */ cannam@154: *out++ = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND( res_Q6, 6 ) ); cannam@154: } cannam@154: break; cannam@154: default: cannam@154: celt_assert( 0 ); cannam@154: } cannam@154: return out; cannam@154: } cannam@154: cannam@154: /* Resample with a 2nd order AR filter followed by FIR interpolation */ cannam@154: void silk_resampler_private_down_FIR( cannam@154: void *SS, /* I/O Resampler state */ cannam@154: opus_int16 out[], /* O Output signal */ cannam@154: const opus_int16 in[], /* I Input signal */ cannam@154: opus_int32 inLen /* I Number of input samples */ cannam@154: ) cannam@154: { cannam@154: silk_resampler_state_struct *S = (silk_resampler_state_struct *)SS; cannam@154: opus_int32 nSamplesIn; cannam@154: opus_int32 max_index_Q16, index_increment_Q16; cannam@154: VARDECL( opus_int32, buf ); cannam@154: const opus_int16 *FIR_Coefs; cannam@154: SAVE_STACK; cannam@154: cannam@154: ALLOC( buf, S->batchSize + S->FIR_Order, opus_int32 ); cannam@154: cannam@154: /* Copy buffered samples to start of buffer */ cannam@154: silk_memcpy( buf, S->sFIR.i32, S->FIR_Order * sizeof( opus_int32 ) ); cannam@154: cannam@154: FIR_Coefs = &S->Coefs[ 2 ]; cannam@154: cannam@154: /* Iterate over blocks of frameSizeIn input samples */ cannam@154: index_increment_Q16 = S->invRatio_Q16; cannam@154: while( 1 ) { cannam@154: nSamplesIn = silk_min( inLen, S->batchSize ); cannam@154: cannam@154: /* Second-order AR filter (output in Q8) */ cannam@154: silk_resampler_private_AR2( S->sIIR, &buf[ S->FIR_Order ], in, S->Coefs, nSamplesIn ); cannam@154: cannam@154: max_index_Q16 = silk_LSHIFT32( nSamplesIn, 16 ); cannam@154: cannam@154: /* Interpolate filtered signal */ cannam@154: out = silk_resampler_private_down_FIR_INTERPOL( out, buf, FIR_Coefs, S->FIR_Order, cannam@154: S->FIR_Fracs, max_index_Q16, index_increment_Q16 ); cannam@154: cannam@154: in += nSamplesIn; cannam@154: inLen -= nSamplesIn; cannam@154: cannam@154: if( inLen > 1 ) { cannam@154: /* More iterations to do; copy last part of filtered signal to beginning of buffer */ cannam@154: silk_memcpy( buf, &buf[ nSamplesIn ], S->FIR_Order * sizeof( opus_int32 ) ); cannam@154: } else { cannam@154: break; cannam@154: } cannam@154: } cannam@154: cannam@154: /* Copy last part of filtered signal to the state for the next call */ cannam@154: silk_memcpy( S->sFIR.i32, &buf[ nSamplesIn ], S->FIR_Order * sizeof( opus_int32 ) ); cannam@154: RESTORE_STACK; cannam@154: }