# HG changeset patch # User Mychaela Falconia # Date 1714949040 0 # Node ID 7bea058d0640f799038062a807c7c7bade54997a # Parent fb001496ca8c439303666b2c1fcae751be2f052b libtwamr: integrate dec_lag6.c diff -r fb001496ca8c -r 7bea058d0640 libtwamr/Makefile --- a/libtwamr/Makefile Sun May 05 22:29:09 2024 +0000 +++ b/libtwamr/Makefile Sun May 05 22:44:00 2024 +0000 @@ -5,10 +5,10 @@ c8_31pf.o c_g_aver.o calc_cor.o calc_en.o cbsearch.o convolve.o cor_h.o\ d1035pf.o d2_11pf.o d2_9pf.o d3_14pf.o d4_17pf.o d8_31pf.o d_gain_c.o \ d_gain_p.o d_plsf.o d_plsf_3.o d_plsf_5.o dec_gain.o dec_lag3.o \ - dhf_check.o dhf_tables.o gains_tab.o gc_pred.o gmed_n.o graytab.o \ - inv_sqrt.o log2.o lsp_lsf.o oper_32b.o pow2.o prmno.o q_plsf3_tab.o \ - q_plsf5_tab.o qua_gain_tab.o reorder.o s10_8pf.o set_sign.o sqrt_l.o \ - tls_flags.o window.o + dec_lag6.o dhf_check.o dhf_tables.o gains_tab.o gc_pred.o gmed_n.o \ + graytab.o inv_sqrt.o log2.o lsp_lsf.o oper_32b.o pow2.o prmno.o \ + q_plsf3_tab.o q_plsf5_tab.o qua_gain_tab.o reorder.o s10_8pf.o \ + set_sign.o sqrt_l.o tls_flags.o window.o HDRS= namespace.h LIB= libtwamr.a diff -r fb001496ca8c -r 7bea058d0640 libtwamr/dec_lag6.c --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/libtwamr/dec_lag6.c Sun May 05 22:44:00 2024 +0000 @@ -0,0 +1,117 @@ +/* +******************************************************************************** +* +* GSM AMR-NB speech codec R98 Version 7.6.0 December 12, 2001 +* R99 Version 3.3.0 +* REL-4 Version 4.1.0 +* +******************************************************************************** +* +* File : dec_lag6.c +* Purpose : Decoding of fractional pitch lag with 1/6 resolution. +* +******************************************************************************** +*/ + + +/* +******************************************************************************** +* MODULE INCLUDE FILE AND VERSION ID +******************************************************************************** +*/ +#include "namespace.h" +#include "dec_lag6.h" + +/* +******************************************************************************** +* INCLUDE FILES +******************************************************************************** +*/ +#include "typedef.h" +#include "basic_op.h" +#include "no_count.h" + +/* +******************************************************************************** +* PUBLIC PROGRAM CODE +******************************************************************************** +*/ +/* +************************************************************************ +* FUNCTION: Dec_lag6 +* +* PURPOSE: Decoding of fractional pitch lag with 1/6 resolution. +* Extract the integer and fraction parts of the pitch lag from +* the received adaptive codebook index. +* +* See "Enc_lag6.c" for more details about the encoding procedure. +* +* The fractional lag in 1st and 3rd subframes is encoded with 9 bits +* while that in 2nd and 4th subframes is relatively encoded with 6 bits. +* Note that in relative encoding only 61 values are used. If the +* decoder receives 61, 62, or 63 as the relative pitch index, it means +* that a transmission error occurred. In this case, the pitch lag from +* previous subframe (actually from previous frame) is used. +* +************************************************************************ +*/ +void Dec_lag6 ( + Word16 index, /* input : received pitch index */ + Word16 pit_min, /* input : minimum pitch lag */ + Word16 pit_max, /* input : maximum pitch lag */ + Word16 i_subfr, /* input : subframe flag */ + Word16 *T0, /* in/out: integer part of pitch lag */ + Word16 *T0_frac /* output: fractional part of pitch lag */ +) +{ + Word16 i; + Word16 T0_min, T0_max; + + test (); + if (i_subfr == 0) /* if 1st or 3rd subframe */ + { + test (); + if (sub (index, 463) < 0) + { + /* T0 = (index+5)/6 + 17 */ + *T0 = add (mult (add (index, 5), 5462), 17); + i = add (add (*T0, *T0), *T0); + /* *T0_frac = index - T0*6 + 105 */ + *T0_frac = add (sub (index, add (i, i)), 105); + move16 (); + } + else + { + *T0 = sub (index, 368); + *T0_frac = 0; move16 (); + } + } + else + /* second or fourth subframe */ + { + /* find T0_min and T0_max for 2nd (or 4th) subframe */ + + T0_min = sub (*T0, 5); + + test (); + if (sub (T0_min, pit_min) < 0) + { + T0_min = pit_min; move16 (); + } + T0_max = add (T0_min, 9); + + test (); + if (sub (T0_max, pit_max) > 0) + { + T0_max = pit_max; move16 (); + T0_min = sub (T0_max, 9); + } + + /* i = (index+5)/6 - 1 */ + i = sub (mult (add (index, 5), 5462), 1); + *T0 = add (i, T0_min); + i = add (add (i, i), i); + *T0_frac = sub (sub (index, 3), add (i, i)); + move16 (); + } +} diff -r fb001496ca8c -r 7bea058d0640 libtwamr/dec_lag6.h --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/libtwamr/dec_lag6.h Sun May 05 22:44:00 2024 +0000 @@ -0,0 +1,40 @@ +/* +******************************************************************************** +* +* GSM AMR-NB speech codec R98 Version 7.6.0 December 12, 2001 +* R99 Version 3.3.0 +* REL-4 Version 4.1.0 +* +******************************************************************************** +* +* File : dec_lag6.h +* Purpose : Decoding of fractional pitch lag with 1/6 resolution. +* +******************************************************************************** +*/ +#ifndef dec_lag6_h +#define dec_lag6_h "$Id $" + +/* +******************************************************************************** +* INCLUDE FILES +******************************************************************************** +*/ +#include "typedef.h" + +/* +******************************************************************************** +* DECLARATION OF PROTOTYPES +******************************************************************************** +*/ + +void Dec_lag6 ( + Word16 index, /* input : received pitch index */ + Word16 pit_min, /* input : minimum pitch lag */ + Word16 pit_max, /* input : maximum pitch lag */ + Word16 i_subfr, /* input : subframe flag */ + Word16 *T0, /* in/out: integer part of pitch lag */ + Word16 *T0_frac /* output: fractional part of pitch lag */ +); + +#endif diff -r fb001496ca8c -r 7bea058d0640 libtwamr/namespace.list --- a/libtwamr/namespace.list Sun May 05 22:29:09 2024 +0000 +++ b/libtwamr/namespace.list Sun May 05 22:44:00 2024 +0000 @@ -60,6 +60,7 @@ Convolve Dec_gain Dec_lag3 +Dec_lag6 D_plsf_reset D_plsf_5 D_plsf_3