yading@10
|
1 /*
|
yading@10
|
2 * G.722 ADPCM audio encoder/decoder
|
yading@10
|
3 *
|
yading@10
|
4 * Copyright (c) CMU 1993 Computer Science, Speech Group
|
yading@10
|
5 * Chengxiang Lu and Alex Hauptmann
|
yading@10
|
6 * Copyright (c) 2005 Steve Underwood <steveu at coppice.org>
|
yading@10
|
7 * Copyright (c) 2009 Kenan Gillet
|
yading@10
|
8 * Copyright (c) 2010 Martin Storsjo
|
yading@10
|
9 *
|
yading@10
|
10 * This file is part of FFmpeg.
|
yading@10
|
11 *
|
yading@10
|
12 * FFmpeg is free software; you can redistribute it and/or
|
yading@10
|
13 * modify it under the terms of the GNU Lesser General Public
|
yading@10
|
14 * License as published by the Free Software Foundation; either
|
yading@10
|
15 * version 2.1 of the License, or (at your option) any later version.
|
yading@10
|
16 *
|
yading@10
|
17 * FFmpeg is distributed in the hope that it will be useful,
|
yading@10
|
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
yading@10
|
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
yading@10
|
20 * Lesser General Public License for more details.
|
yading@10
|
21 *
|
yading@10
|
22 * You should have received a copy of the GNU Lesser General Public
|
yading@10
|
23 * License along with FFmpeg; if not, write to the Free Software
|
yading@10
|
24 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
yading@10
|
25 */
|
yading@10
|
26
|
yading@10
|
27 /**
|
yading@10
|
28 * @file
|
yading@10
|
29 * G.722 ADPCM audio codec
|
yading@10
|
30 *
|
yading@10
|
31 * This G.722 decoder is a bit-exact implementation of the ITU G.722
|
yading@10
|
32 * specification for all three specified bitrates - 64000bps, 56000bps
|
yading@10
|
33 * and 48000bps. It passes the ITU tests.
|
yading@10
|
34 *
|
yading@10
|
35 * @note For the 56000bps and 48000bps bitrates, the lowest 1 or 2 bits
|
yading@10
|
36 * respectively of each byte are ignored.
|
yading@10
|
37 */
|
yading@10
|
38
|
yading@10
|
39 #include "mathops.h"
|
yading@10
|
40 #include "g722.h"
|
yading@10
|
41
|
yading@10
|
42 static const int8_t sign_lookup[2] = { -1, 1 };
|
yading@10
|
43
|
yading@10
|
44 static const int16_t inv_log2_table[32] = {
|
yading@10
|
45 2048, 2093, 2139, 2186, 2233, 2282, 2332, 2383,
|
yading@10
|
46 2435, 2489, 2543, 2599, 2656, 2714, 2774, 2834,
|
yading@10
|
47 2896, 2960, 3025, 3091, 3158, 3228, 3298, 3371,
|
yading@10
|
48 3444, 3520, 3597, 3676, 3756, 3838, 3922, 4008
|
yading@10
|
49 };
|
yading@10
|
50 static const int16_t high_log_factor_step[2] = { 798, -214 };
|
yading@10
|
51 const int16_t ff_g722_high_inv_quant[4] = { -926, -202, 926, 202 };
|
yading@10
|
52 /**
|
yading@10
|
53 * low_log_factor_step[index] == wl[rl42[index]]
|
yading@10
|
54 */
|
yading@10
|
55 static const int16_t low_log_factor_step[16] = {
|
yading@10
|
56 -60, 3042, 1198, 538, 334, 172, 58, -30,
|
yading@10
|
57 3042, 1198, 538, 334, 172, 58, -30, -60
|
yading@10
|
58 };
|
yading@10
|
59 const int16_t ff_g722_low_inv_quant4[16] = {
|
yading@10
|
60 0, -2557, -1612, -1121, -786, -530, -323, -150,
|
yading@10
|
61 2557, 1612, 1121, 786, 530, 323, 150, 0
|
yading@10
|
62 };
|
yading@10
|
63 const int16_t ff_g722_low_inv_quant6[64] = {
|
yading@10
|
64 -17, -17, -17, -17, -3101, -2738, -2376, -2088,
|
yading@10
|
65 -1873, -1689, -1535, -1399, -1279, -1170, -1072, -982,
|
yading@10
|
66 -899, -822, -750, -682, -618, -558, -501, -447,
|
yading@10
|
67 -396, -347, -300, -254, -211, -170, -130, -91,
|
yading@10
|
68 3101, 2738, 2376, 2088, 1873, 1689, 1535, 1399,
|
yading@10
|
69 1279, 1170, 1072, 982, 899, 822, 750, 682,
|
yading@10
|
70 618, 558, 501, 447, 396, 347, 300, 254,
|
yading@10
|
71 211, 170, 130, 91, 54, 17, -54, -17
|
yading@10
|
72 };
|
yading@10
|
73
|
yading@10
|
74 /**
|
yading@10
|
75 * quadrature mirror filter (QMF) coefficients
|
yading@10
|
76 *
|
yading@10
|
77 * ITU-T G.722 Table 11
|
yading@10
|
78 */
|
yading@10
|
79 static const int16_t qmf_coeffs[12] = {
|
yading@10
|
80 3, -11, 12, 32, -210, 951, 3876, -805, 362, -156, 53, -11,
|
yading@10
|
81 };
|
yading@10
|
82
|
yading@10
|
83
|
yading@10
|
84 /**
|
yading@10
|
85 * adaptive predictor
|
yading@10
|
86 *
|
yading@10
|
87 * @param cur_diff the dequantized and scaled delta calculated from the
|
yading@10
|
88 * current codeword
|
yading@10
|
89 */
|
yading@10
|
90 static void do_adaptive_prediction(struct G722Band *band, const int cur_diff)
|
yading@10
|
91 {
|
yading@10
|
92 int sg[2], limit, i, cur_qtzd_reconst;
|
yading@10
|
93
|
yading@10
|
94 const int cur_part_reconst = band->s_zero + cur_diff < 0;
|
yading@10
|
95
|
yading@10
|
96 sg[0] = sign_lookup[cur_part_reconst != band->part_reconst_mem[0]];
|
yading@10
|
97 sg[1] = sign_lookup[cur_part_reconst == band->part_reconst_mem[1]];
|
yading@10
|
98 band->part_reconst_mem[1] = band->part_reconst_mem[0];
|
yading@10
|
99 band->part_reconst_mem[0] = cur_part_reconst;
|
yading@10
|
100
|
yading@10
|
101 band->pole_mem[1] = av_clip((sg[0] * av_clip(band->pole_mem[0], -8191, 8191) >> 5) +
|
yading@10
|
102 (sg[1] << 7) + (band->pole_mem[1] * 127 >> 7), -12288, 12288);
|
yading@10
|
103
|
yading@10
|
104 limit = 15360 - band->pole_mem[1];
|
yading@10
|
105 band->pole_mem[0] = av_clip(-192 * sg[0] + (band->pole_mem[0] * 255 >> 8), -limit, limit);
|
yading@10
|
106
|
yading@10
|
107
|
yading@10
|
108 if (cur_diff) {
|
yading@10
|
109 for (i = 0; i < 6; i++)
|
yading@10
|
110 band->zero_mem[i] = ((band->zero_mem[i]*255) >> 8) +
|
yading@10
|
111 ((band->diff_mem[i]^cur_diff) < 0 ? -128 : 128);
|
yading@10
|
112 } else
|
yading@10
|
113 for (i = 0; i < 6; i++)
|
yading@10
|
114 band->zero_mem[i] = (band->zero_mem[i]*255) >> 8;
|
yading@10
|
115
|
yading@10
|
116 for (i = 5; i > 0; i--)
|
yading@10
|
117 band->diff_mem[i] = band->diff_mem[i-1];
|
yading@10
|
118 band->diff_mem[0] = av_clip_int16(cur_diff << 1);
|
yading@10
|
119
|
yading@10
|
120 band->s_zero = 0;
|
yading@10
|
121 for (i = 5; i >= 0; i--)
|
yading@10
|
122 band->s_zero += (band->zero_mem[i]*band->diff_mem[i]) >> 15;
|
yading@10
|
123
|
yading@10
|
124
|
yading@10
|
125 cur_qtzd_reconst = av_clip_int16((band->s_predictor + cur_diff) << 1);
|
yading@10
|
126 band->s_predictor = av_clip_int16(band->s_zero +
|
yading@10
|
127 (band->pole_mem[0] * cur_qtzd_reconst >> 15) +
|
yading@10
|
128 (band->pole_mem[1] * band->prev_qtzd_reconst >> 15));
|
yading@10
|
129 band->prev_qtzd_reconst = cur_qtzd_reconst;
|
yading@10
|
130 }
|
yading@10
|
131
|
yading@10
|
132 static inline int linear_scale_factor(const int log_factor)
|
yading@10
|
133 {
|
yading@10
|
134 const int wd1 = inv_log2_table[(log_factor >> 6) & 31];
|
yading@10
|
135 const int shift = log_factor >> 11;
|
yading@10
|
136 return shift < 0 ? wd1 >> -shift : wd1 << shift;
|
yading@10
|
137 }
|
yading@10
|
138
|
yading@10
|
139 void ff_g722_update_low_predictor(struct G722Band *band, const int ilow)
|
yading@10
|
140 {
|
yading@10
|
141 do_adaptive_prediction(band,
|
yading@10
|
142 band->scale_factor * ff_g722_low_inv_quant4[ilow] >> 10);
|
yading@10
|
143
|
yading@10
|
144 // quantizer adaptation
|
yading@10
|
145 band->log_factor = av_clip((band->log_factor * 127 >> 7) +
|
yading@10
|
146 low_log_factor_step[ilow], 0, 18432);
|
yading@10
|
147 band->scale_factor = linear_scale_factor(band->log_factor - (8 << 11));
|
yading@10
|
148 }
|
yading@10
|
149
|
yading@10
|
150 void ff_g722_update_high_predictor(struct G722Band *band, const int dhigh,
|
yading@10
|
151 const int ihigh)
|
yading@10
|
152 {
|
yading@10
|
153 do_adaptive_prediction(band, dhigh);
|
yading@10
|
154
|
yading@10
|
155 // quantizer adaptation
|
yading@10
|
156 band->log_factor = av_clip((band->log_factor * 127 >> 7) +
|
yading@10
|
157 high_log_factor_step[ihigh&1], 0, 22528);
|
yading@10
|
158 band->scale_factor = linear_scale_factor(band->log_factor - (10 << 11));
|
yading@10
|
159 }
|
yading@10
|
160
|
yading@10
|
161 void ff_g722_apply_qmf(const int16_t *prev_samples, int *xout1, int *xout2)
|
yading@10
|
162 {
|
yading@10
|
163 int i;
|
yading@10
|
164
|
yading@10
|
165 *xout1 = 0;
|
yading@10
|
166 *xout2 = 0;
|
yading@10
|
167 for (i = 0; i < 12; i++) {
|
yading@10
|
168 MAC16(*xout2, prev_samples[2*i ], qmf_coeffs[i ]);
|
yading@10
|
169 MAC16(*xout1, prev_samples[2*i+1], qmf_coeffs[11-i]);
|
yading@10
|
170 }
|
yading@10
|
171 }
|