00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023 #include "libavutil/mathematics.h"
00024 #include "avcodec.h"
00025 #include "dsputil.h"
00026 #include "acelp_pitch_delay.h"
00027 #include "celp_math.h"
00028
00029 int ff_acelp_decode_8bit_to_1st_delay3(int ac_index)
00030 {
00031 ac_index += 58;
00032 if(ac_index > 254)
00033 ac_index = 3 * ac_index - 510;
00034 return ac_index;
00035 }
00036
00037 int ff_acelp_decode_4bit_to_2nd_delay3(
00038 int ac_index,
00039 int pitch_delay_min)
00040 {
00041 if(ac_index < 4)
00042 return 3 * (ac_index + pitch_delay_min);
00043 else if(ac_index < 12)
00044 return 3 * pitch_delay_min + ac_index + 6;
00045 else
00046 return 3 * (ac_index + pitch_delay_min) - 18;
00047 }
00048
00049 int ff_acelp_decode_5_6_bit_to_2nd_delay3(
00050 int ac_index,
00051 int pitch_delay_min)
00052 {
00053 return 3 * pitch_delay_min + ac_index - 2;
00054 }
00055
00056 int ff_acelp_decode_9bit_to_1st_delay6(int ac_index)
00057 {
00058 if(ac_index < 463)
00059 return ac_index + 105;
00060 else
00061 return 6 * (ac_index - 368);
00062 }
00063 int ff_acelp_decode_6bit_to_2nd_delay6(
00064 int ac_index,
00065 int pitch_delay_min)
00066 {
00067 return 6 * pitch_delay_min + ac_index - 3;
00068 }
00069
00070 void ff_acelp_update_past_gain(
00071 int16_t* quant_energy,
00072 int gain_corr_factor,
00073 int log2_ma_pred_order,
00074 int erasure)
00075 {
00076 int i;
00077 int avg_gain=quant_energy[(1 << log2_ma_pred_order) - 1];
00078
00079 for(i=(1 << log2_ma_pred_order) - 1; i>0; i--)
00080 {
00081 avg_gain += quant_energy[i-1];
00082 quant_energy[i] = quant_energy[i-1];
00083 }
00084
00085 if(erasure)
00086 quant_energy[0] = FFMAX(avg_gain >> log2_ma_pred_order, -10240) - 4096;
00087 else
00088 quant_energy[0] = (6165 * ((ff_log2(gain_corr_factor) >> 2) - (13 << 13))) >> 13;
00089 }
00090
00091 int16_t ff_acelp_decode_gain_code(
00092 DSPContext *dsp,
00093 int gain_corr_factor,
00094 const int16_t* fc_v,
00095 int mr_energy,
00096 const int16_t* quant_energy,
00097 const int16_t* ma_prediction_coeff,
00098 int subframe_size,
00099 int ma_pred_order)
00100 {
00101 int i;
00102
00103 mr_energy <<= 10;
00104
00105 for(i=0; i<ma_pred_order; i++)
00106 mr_energy += quant_energy[i] * ma_prediction_coeff[i];
00107
00108 #ifdef G729_BITEXACT
00109 mr_energy += (((-6165LL * ff_log2(dsp->scalarproduct_int16(fc_v, fc_v, subframe_size, 0))) >> 3) & ~0x3ff);
00110
00111 mr_energy = (5439 * (mr_energy >> 15)) >> 8;
00112
00113 return bidir_sal(
00114 ((ff_exp2(mr_energy & 0x7fff) + 16) >> 5) * (gain_corr_factor >> 1),
00115 (mr_energy >> 15) - 25
00116 );
00117 #else
00118 mr_energy = gain_corr_factor * exp(M_LN10 / (20 << 23) * mr_energy) /
00119 sqrt(dsp->scalarproduct_int16(fc_v, fc_v, subframe_size, 0));
00120 return mr_energy >> 12;
00121 #endif
00122 }
00123
00124 float ff_amr_set_fixed_gain(float fixed_gain_factor, float fixed_mean_energy,
00125 float *prediction_error, float energy_mean,
00126 const float *pred_table)
00127 {
00128
00129
00130
00131 float val = fixed_gain_factor *
00132 exp2f(M_LOG2_10 * 0.05 *
00133 (ff_dot_productf(pred_table, prediction_error, 4) +
00134 energy_mean)) /
00135 sqrtf(fixed_mean_energy);
00136
00137
00138 memmove(&prediction_error[0], &prediction_error[1],
00139 3 * sizeof(prediction_error[0]));
00140 prediction_error[3] = 20.0 * log10f(fixed_gain_factor);
00141
00142 return val;
00143 }
00144
00145 void ff_decode_pitch_lag(int *lag_int, int *lag_frac, int pitch_index,
00146 const int prev_lag_int, const int subframe,
00147 int third_as_first, int resolution)
00148 {
00149
00150 if (subframe == 0 || (subframe == 2 && third_as_first)) {
00151
00152 if (pitch_index < 197)
00153 pitch_index += 59;
00154 else
00155 pitch_index = 3 * pitch_index - 335;
00156
00157 } else {
00158 if (resolution == 4) {
00159 int search_range_min = av_clip(prev_lag_int - 5, PITCH_DELAY_MIN,
00160 PITCH_DELAY_MAX - 9);
00161
00162
00163 if (pitch_index < 4) {
00164
00165 pitch_index = 3 * (pitch_index + search_range_min) + 1;
00166 } else if (pitch_index < 12) {
00167
00168 pitch_index += 3 * search_range_min + 7;
00169 } else {
00170
00171 pitch_index = 3 * (pitch_index + search_range_min - 6) + 1;
00172 }
00173 } else {
00174
00175 pitch_index--;
00176
00177 if (resolution == 5) {
00178 pitch_index += 3 * av_clip(prev_lag_int - 10, PITCH_DELAY_MIN,
00179 PITCH_DELAY_MAX - 19);
00180 } else
00181 pitch_index += 3 * av_clip(prev_lag_int - 5, PITCH_DELAY_MIN,
00182 PITCH_DELAY_MAX - 9);
00183 }
00184 }
00185 *lag_int = pitch_index * 10923 >> 15;
00186 *lag_frac = pitch_index - 3 * *lag_int - 1;
00187 }