annotate mpegaudio.c @ 1080:a150aba978de libavcodec

huffyuv v1 tables, as they are essential and the only possible way for decding of v1 files they very likely cant be copyrighted ...
author michaelni
date Mon, 24 Feb 2003 09:49:37 +0000
parents b32afefe7d33
children 1e39f273ecd6
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
1 /*
986e461dc072 Initial revision
glantau
parents:
diff changeset
2 * The simplest mpeg audio layer 2 encoder
429
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
3 * Copyright (c) 2000, 2001 Fabrice Bellard.
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
4 *
429
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
5 * This library is free software; you can redistribute it and/or
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
6 * modify it under the terms of the GNU Lesser General Public
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
7 * License as published by the Free Software Foundation; either
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
8 * version 2 of the License, or (at your option) any later version.
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
9 *
429
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
10 * This library is distributed in the hope that it will be useful,
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
429
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
13 * Lesser General Public License for more details.
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
14 *
429
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
15 * You should have received a copy of the GNU Lesser General Public
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
16 * License along with this library; if not, write to the Free Software
718a22dc121f license/copyright change
glantau
parents: 396
diff changeset
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
18 */
64
5aa6292a1660 win32 fixes
glantau
parents: 0
diff changeset
19 #include "avcodec.h"
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
20 #include "mpegaudio.h"
986e461dc072 Initial revision
glantau
parents:
diff changeset
21
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
22 /* currently, cannot change these constants (need to modify
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
23 quantization stage) */
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
24 #define FRAC_BITS 15
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
25 #define WFRAC_BITS 14
1064
b32afefe7d33 * UINTX -> uintx_t INTX -> intx_t
kabi
parents: 1057
diff changeset
26 #define MUL(a,b) (((int64_t)(a) * (int64_t)(b)) >> FRAC_BITS)
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
27 #define FIX(a) ((int)((a) * (1 << FRAC_BITS)))
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
28
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
29 #define SAMPLES_BUF_SIZE 4096
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
30
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
31 typedef struct MpegAudioContext {
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
32 PutBitContext pb;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
33 int nb_channels;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
34 int freq, bit_rate;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
35 int lsf; /* 1 if mpeg2 low bitrate selected */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
36 int bitrate_index; /* bit rate */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
37 int freq_index;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
38 int frame_size; /* frame size, in bits, without padding */
1064
b32afefe7d33 * UINTX -> uintx_t INTX -> intx_t
kabi
parents: 1057
diff changeset
39 int64_t nb_samples; /* total number of samples encoded */
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
40 /* padding computation */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
41 int frame_frac, frame_frac_incr, do_padding;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
42 short samples_buf[MPA_MAX_CHANNELS][SAMPLES_BUF_SIZE]; /* buffer for filter */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
43 int samples_offset[MPA_MAX_CHANNELS]; /* offset in samples_buf */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
44 int sb_samples[MPA_MAX_CHANNELS][3][12][SBLIMIT];
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
45 unsigned char scale_factors[MPA_MAX_CHANNELS][SBLIMIT][3]; /* scale factors */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
46 /* code to group 3 scale factors */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
47 unsigned char scale_code[MPA_MAX_CHANNELS][SBLIMIT];
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
48 int sblimit; /* number of used subbands */
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
49 const unsigned char *alloc_table;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
50 } MpegAudioContext;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
51
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
52 /* define it to use floats in quantization (I don't like floats !) */
986e461dc072 Initial revision
glantau
parents:
diff changeset
53 //#define USE_FLOATS
986e461dc072 Initial revision
glantau
parents:
diff changeset
54
986e461dc072 Initial revision
glantau
parents:
diff changeset
55 #include "mpegaudiotab.h"
986e461dc072 Initial revision
glantau
parents:
diff changeset
56
1057
bb5de8a59da8 * static,const,compiler warning cleanup
kabi
parents: 1031
diff changeset
57 static int MPA_encode_init(AVCodecContext *avctx)
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
58 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
59 MpegAudioContext *s = avctx->priv_data;
986e461dc072 Initial revision
glantau
parents:
diff changeset
60 int freq = avctx->sample_rate;
986e461dc072 Initial revision
glantau
parents:
diff changeset
61 int bitrate = avctx->bit_rate;
986e461dc072 Initial revision
glantau
parents:
diff changeset
62 int channels = avctx->channels;
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
63 int i, v, table;
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
64 float a;
986e461dc072 Initial revision
glantau
parents:
diff changeset
65
986e461dc072 Initial revision
glantau
parents:
diff changeset
66 if (channels > 2)
986e461dc072 Initial revision
glantau
parents:
diff changeset
67 return -1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
68 bitrate = bitrate / 1000;
986e461dc072 Initial revision
glantau
parents:
diff changeset
69 s->nb_channels = channels;
986e461dc072 Initial revision
glantau
parents:
diff changeset
70 s->freq = freq;
986e461dc072 Initial revision
glantau
parents:
diff changeset
71 s->bit_rate = bitrate * 1000;
986e461dc072 Initial revision
glantau
parents:
diff changeset
72 avctx->frame_size = MPA_FRAME_SIZE;
986e461dc072 Initial revision
glantau
parents:
diff changeset
73
986e461dc072 Initial revision
glantau
parents:
diff changeset
74 /* encoding freq */
986e461dc072 Initial revision
glantau
parents:
diff changeset
75 s->lsf = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
76 for(i=0;i<3;i++) {
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
77 if (mpa_freq_tab[i] == freq)
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
78 break;
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
79 if ((mpa_freq_tab[i] / 2) == freq) {
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
80 s->lsf = 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
81 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
82 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
83 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
84 if (i == 3)
986e461dc072 Initial revision
glantau
parents:
diff changeset
85 return -1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
86 s->freq_index = i;
986e461dc072 Initial revision
glantau
parents:
diff changeset
87
986e461dc072 Initial revision
glantau
parents:
diff changeset
88 /* encoding bitrate & frequency */
986e461dc072 Initial revision
glantau
parents:
diff changeset
89 for(i=0;i<15;i++) {
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
90 if (mpa_bitrate_tab[s->lsf][1][i] == bitrate)
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
91 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
92 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
93 if (i == 15)
986e461dc072 Initial revision
glantau
parents:
diff changeset
94 return -1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
95 s->bitrate_index = i;
986e461dc072 Initial revision
glantau
parents:
diff changeset
96
986e461dc072 Initial revision
glantau
parents:
diff changeset
97 /* compute total header size & pad bit */
986e461dc072 Initial revision
glantau
parents:
diff changeset
98
986e461dc072 Initial revision
glantau
parents:
diff changeset
99 a = (float)(bitrate * 1000 * MPA_FRAME_SIZE) / (freq * 8.0);
986e461dc072 Initial revision
glantau
parents:
diff changeset
100 s->frame_size = ((int)a) * 8;
986e461dc072 Initial revision
glantau
parents:
diff changeset
101
986e461dc072 Initial revision
glantau
parents:
diff changeset
102 /* frame fractional size to compute padding */
986e461dc072 Initial revision
glantau
parents:
diff changeset
103 s->frame_frac = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
104 s->frame_frac_incr = (int)((a - floor(a)) * 65536.0);
986e461dc072 Initial revision
glantau
parents:
diff changeset
105
986e461dc072 Initial revision
glantau
parents:
diff changeset
106 /* select the right allocation table */
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
107 table = l2_select_table(bitrate, s->nb_channels, freq, s->lsf);
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
108
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
109 /* number of used subbands */
986e461dc072 Initial revision
glantau
parents:
diff changeset
110 s->sblimit = sblimit_table[table];
986e461dc072 Initial revision
glantau
parents:
diff changeset
111 s->alloc_table = alloc_tables[table];
986e461dc072 Initial revision
glantau
parents:
diff changeset
112
986e461dc072 Initial revision
glantau
parents:
diff changeset
113 #ifdef DEBUG
986e461dc072 Initial revision
glantau
parents:
diff changeset
114 printf("%d kb/s, %d Hz, frame_size=%d bits, table=%d, padincr=%x\n",
986e461dc072 Initial revision
glantau
parents:
diff changeset
115 bitrate, freq, s->frame_size, table, s->frame_frac_incr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
116 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
117
986e461dc072 Initial revision
glantau
parents:
diff changeset
118 for(i=0;i<s->nb_channels;i++)
986e461dc072 Initial revision
glantau
parents:
diff changeset
119 s->samples_offset[i] = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
120
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
121 for(i=0;i<257;i++) {
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
122 int v;
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
123 v = mpa_enwindow[i];
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
124 #if WFRAC_BITS != 16
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
125 v = (v + (1 << (16 - WFRAC_BITS - 1))) >> (16 - WFRAC_BITS);
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
126 #endif
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
127 filter_bank[i] = v;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
128 if ((i & 63) != 0)
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
129 v = -v;
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
130 if (i != 0)
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
131 filter_bank[512 - i] = v;
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
132 }
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
133
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
134 for(i=0;i<64;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
135 v = (int)(pow(2.0, (3 - i) / 3.0) * (1 << 20));
986e461dc072 Initial revision
glantau
parents:
diff changeset
136 if (v <= 0)
986e461dc072 Initial revision
glantau
parents:
diff changeset
137 v = 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
138 scale_factor_table[i] = v;
986e461dc072 Initial revision
glantau
parents:
diff changeset
139 #ifdef USE_FLOATS
986e461dc072 Initial revision
glantau
parents:
diff changeset
140 scale_factor_inv_table[i] = pow(2.0, -(3 - i) / 3.0) / (float)(1 << 20);
986e461dc072 Initial revision
glantau
parents:
diff changeset
141 #else
986e461dc072 Initial revision
glantau
parents:
diff changeset
142 #define P 15
986e461dc072 Initial revision
glantau
parents:
diff changeset
143 scale_factor_shift[i] = 21 - P - (i / 3);
986e461dc072 Initial revision
glantau
parents:
diff changeset
144 scale_factor_mult[i] = (1 << P) * pow(2.0, (i % 3) / 3.0);
986e461dc072 Initial revision
glantau
parents:
diff changeset
145 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
146 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
147 for(i=0;i<128;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
148 v = i - 64;
986e461dc072 Initial revision
glantau
parents:
diff changeset
149 if (v <= -3)
986e461dc072 Initial revision
glantau
parents:
diff changeset
150 v = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
151 else if (v < 0)
986e461dc072 Initial revision
glantau
parents:
diff changeset
152 v = 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
153 else if (v == 0)
986e461dc072 Initial revision
glantau
parents:
diff changeset
154 v = 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
155 else if (v < 3)
986e461dc072 Initial revision
glantau
parents:
diff changeset
156 v = 3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
157 else
986e461dc072 Initial revision
glantau
parents:
diff changeset
158 v = 4;
986e461dc072 Initial revision
glantau
parents:
diff changeset
159 scale_diff_table[i] = v;
986e461dc072 Initial revision
glantau
parents:
diff changeset
160 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
161
986e461dc072 Initial revision
glantau
parents:
diff changeset
162 for(i=0;i<17;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
163 v = quant_bits[i];
986e461dc072 Initial revision
glantau
parents:
diff changeset
164 if (v < 0)
986e461dc072 Initial revision
glantau
parents:
diff changeset
165 v = -v;
986e461dc072 Initial revision
glantau
parents:
diff changeset
166 else
986e461dc072 Initial revision
glantau
parents:
diff changeset
167 v = v * 3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
168 total_quant_bits[i] = 12 * v;
986e461dc072 Initial revision
glantau
parents:
diff changeset
169 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
170
925
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
171 avctx->coded_frame= avcodec_alloc_frame();
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
172 avctx->coded_frame->key_frame= 1;
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
173
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
174 return 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
175 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
176
84
608c7f964bca merged code and tables between encoder and decoder
glantau
parents: 70
diff changeset
177 /* 32 point floating point IDCT without 1/sqrt(2) coef zero scaling */
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
178 static void idct32(int *out, int *tab)
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
179 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
180 int i, j;
986e461dc072 Initial revision
glantau
parents:
diff changeset
181 int *t, *t1, xr;
986e461dc072 Initial revision
glantau
parents:
diff changeset
182 const int *xp = costab32;
986e461dc072 Initial revision
glantau
parents:
diff changeset
183
986e461dc072 Initial revision
glantau
parents:
diff changeset
184 for(j=31;j>=3;j-=2) tab[j] += tab[j - 2];
986e461dc072 Initial revision
glantau
parents:
diff changeset
185
986e461dc072 Initial revision
glantau
parents:
diff changeset
186 t = tab + 30;
986e461dc072 Initial revision
glantau
parents:
diff changeset
187 t1 = tab + 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
188 do {
986e461dc072 Initial revision
glantau
parents:
diff changeset
189 t[0] += t[-4];
986e461dc072 Initial revision
glantau
parents:
diff changeset
190 t[1] += t[1 - 4];
986e461dc072 Initial revision
glantau
parents:
diff changeset
191 t -= 4;
986e461dc072 Initial revision
glantau
parents:
diff changeset
192 } while (t != t1);
986e461dc072 Initial revision
glantau
parents:
diff changeset
193
986e461dc072 Initial revision
glantau
parents:
diff changeset
194 t = tab + 28;
986e461dc072 Initial revision
glantau
parents:
diff changeset
195 t1 = tab + 4;
986e461dc072 Initial revision
glantau
parents:
diff changeset
196 do {
986e461dc072 Initial revision
glantau
parents:
diff changeset
197 t[0] += t[-8];
986e461dc072 Initial revision
glantau
parents:
diff changeset
198 t[1] += t[1-8];
986e461dc072 Initial revision
glantau
parents:
diff changeset
199 t[2] += t[2-8];
986e461dc072 Initial revision
glantau
parents:
diff changeset
200 t[3] += t[3-8];
986e461dc072 Initial revision
glantau
parents:
diff changeset
201 t -= 8;
986e461dc072 Initial revision
glantau
parents:
diff changeset
202 } while (t != t1);
986e461dc072 Initial revision
glantau
parents:
diff changeset
203
986e461dc072 Initial revision
glantau
parents:
diff changeset
204 t = tab;
986e461dc072 Initial revision
glantau
parents:
diff changeset
205 t1 = tab + 32;
986e461dc072 Initial revision
glantau
parents:
diff changeset
206 do {
986e461dc072 Initial revision
glantau
parents:
diff changeset
207 t[ 3] = -t[ 3];
986e461dc072 Initial revision
glantau
parents:
diff changeset
208 t[ 6] = -t[ 6];
986e461dc072 Initial revision
glantau
parents:
diff changeset
209
986e461dc072 Initial revision
glantau
parents:
diff changeset
210 t[11] = -t[11];
986e461dc072 Initial revision
glantau
parents:
diff changeset
211 t[12] = -t[12];
986e461dc072 Initial revision
glantau
parents:
diff changeset
212 t[13] = -t[13];
986e461dc072 Initial revision
glantau
parents:
diff changeset
213 t[15] = -t[15];
986e461dc072 Initial revision
glantau
parents:
diff changeset
214 t += 16;
986e461dc072 Initial revision
glantau
parents:
diff changeset
215 } while (t != t1);
986e461dc072 Initial revision
glantau
parents:
diff changeset
216
986e461dc072 Initial revision
glantau
parents:
diff changeset
217
986e461dc072 Initial revision
glantau
parents:
diff changeset
218 t = tab;
986e461dc072 Initial revision
glantau
parents:
diff changeset
219 t1 = tab + 8;
986e461dc072 Initial revision
glantau
parents:
diff changeset
220 do {
986e461dc072 Initial revision
glantau
parents:
diff changeset
221 int x1, x2, x3, x4;
986e461dc072 Initial revision
glantau
parents:
diff changeset
222
986e461dc072 Initial revision
glantau
parents:
diff changeset
223 x3 = MUL(t[16], FIX(SQRT2*0.5));
986e461dc072 Initial revision
glantau
parents:
diff changeset
224 x4 = t[0] - x3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
225 x3 = t[0] + x3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
226
986e461dc072 Initial revision
glantau
parents:
diff changeset
227 x2 = MUL(-(t[24] + t[8]), FIX(SQRT2*0.5));
986e461dc072 Initial revision
glantau
parents:
diff changeset
228 x1 = MUL((t[8] - x2), xp[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
229 x2 = MUL((t[8] + x2), xp[1]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
230
986e461dc072 Initial revision
glantau
parents:
diff changeset
231 t[ 0] = x3 + x1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
232 t[ 8] = x4 - x2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
233 t[16] = x4 + x2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
234 t[24] = x3 - x1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
235 t++;
986e461dc072 Initial revision
glantau
parents:
diff changeset
236 } while (t != t1);
986e461dc072 Initial revision
glantau
parents:
diff changeset
237
986e461dc072 Initial revision
glantau
parents:
diff changeset
238 xp += 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
239 t = tab;
986e461dc072 Initial revision
glantau
parents:
diff changeset
240 t1 = tab + 4;
986e461dc072 Initial revision
glantau
parents:
diff changeset
241 do {
986e461dc072 Initial revision
glantau
parents:
diff changeset
242 xr = MUL(t[28],xp[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
243 t[28] = (t[0] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
244 t[0] = (t[0] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
245
986e461dc072 Initial revision
glantau
parents:
diff changeset
246 xr = MUL(t[4],xp[1]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
247 t[ 4] = (t[24] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
248 t[24] = (t[24] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
249
986e461dc072 Initial revision
glantau
parents:
diff changeset
250 xr = MUL(t[20],xp[2]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
251 t[20] = (t[8] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
252 t[ 8] = (t[8] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
253
986e461dc072 Initial revision
glantau
parents:
diff changeset
254 xr = MUL(t[12],xp[3]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
255 t[12] = (t[16] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
256 t[16] = (t[16] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
257 t++;
986e461dc072 Initial revision
glantau
parents:
diff changeset
258 } while (t != t1);
986e461dc072 Initial revision
glantau
parents:
diff changeset
259 xp += 4;
986e461dc072 Initial revision
glantau
parents:
diff changeset
260
986e461dc072 Initial revision
glantau
parents:
diff changeset
261 for (i = 0; i < 4; i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
262 xr = MUL(tab[30-i*4],xp[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
263 tab[30-i*4] = (tab[i*4] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
264 tab[ i*4] = (tab[i*4] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
265
986e461dc072 Initial revision
glantau
parents:
diff changeset
266 xr = MUL(tab[ 2+i*4],xp[1]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
267 tab[ 2+i*4] = (tab[28-i*4] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
268 tab[28-i*4] = (tab[28-i*4] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
269
986e461dc072 Initial revision
glantau
parents:
diff changeset
270 xr = MUL(tab[31-i*4],xp[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
271 tab[31-i*4] = (tab[1+i*4] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
272 tab[ 1+i*4] = (tab[1+i*4] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
273
986e461dc072 Initial revision
glantau
parents:
diff changeset
274 xr = MUL(tab[ 3+i*4],xp[1]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
275 tab[ 3+i*4] = (tab[29-i*4] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
276 tab[29-i*4] = (tab[29-i*4] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
277
986e461dc072 Initial revision
glantau
parents:
diff changeset
278 xp += 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
279 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
280
986e461dc072 Initial revision
glantau
parents:
diff changeset
281 t = tab + 30;
986e461dc072 Initial revision
glantau
parents:
diff changeset
282 t1 = tab + 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
283 do {
986e461dc072 Initial revision
glantau
parents:
diff changeset
284 xr = MUL(t1[0], *xp);
986e461dc072 Initial revision
glantau
parents:
diff changeset
285 t1[0] = (t[0] - xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
286 t[0] = (t[0] + xr);
986e461dc072 Initial revision
glantau
parents:
diff changeset
287 t -= 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
288 t1 += 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
289 xp++;
986e461dc072 Initial revision
glantau
parents:
diff changeset
290 } while (t >= tab);
986e461dc072 Initial revision
glantau
parents:
diff changeset
291
986e461dc072 Initial revision
glantau
parents:
diff changeset
292 for(i=0;i<32;i++) {
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
293 out[i] = tab[bitinv32[i]];
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
294 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
295 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
296
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
297 #define WSHIFT (WFRAC_BITS + 15 - FRAC_BITS)
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
298
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
299 static void filter(MpegAudioContext *s, int ch, short *samples, int incr)
986e461dc072 Initial revision
glantau
parents:
diff changeset
300 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
301 short *p, *q;
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
302 int sum, offset, i, j;
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
303 int tmp[64];
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
304 int tmp1[32];
986e461dc072 Initial revision
glantau
parents:
diff changeset
305 int *out;
986e461dc072 Initial revision
glantau
parents:
diff changeset
306
986e461dc072 Initial revision
glantau
parents:
diff changeset
307 // print_pow1(samples, 1152);
986e461dc072 Initial revision
glantau
parents:
diff changeset
308
986e461dc072 Initial revision
glantau
parents:
diff changeset
309 offset = s->samples_offset[ch];
986e461dc072 Initial revision
glantau
parents:
diff changeset
310 out = &s->sb_samples[ch][0][0][0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
311 for(j=0;j<36;j++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
312 /* 32 samples at once */
986e461dc072 Initial revision
glantau
parents:
diff changeset
313 for(i=0;i<32;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
314 s->samples_buf[ch][offset + (31 - i)] = samples[0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
315 samples += incr;
986e461dc072 Initial revision
glantau
parents:
diff changeset
316 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
317
986e461dc072 Initial revision
glantau
parents:
diff changeset
318 /* filter */
986e461dc072 Initial revision
glantau
parents:
diff changeset
319 p = s->samples_buf[ch] + offset;
986e461dc072 Initial revision
glantau
parents:
diff changeset
320 q = filter_bank;
986e461dc072 Initial revision
glantau
parents:
diff changeset
321 /* maxsum = 23169 */
986e461dc072 Initial revision
glantau
parents:
diff changeset
322 for(i=0;i<64;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
323 sum = p[0*64] * q[0*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
324 sum += p[1*64] * q[1*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
325 sum += p[2*64] * q[2*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
326 sum += p[3*64] * q[3*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
327 sum += p[4*64] * q[4*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
328 sum += p[5*64] * q[5*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
329 sum += p[6*64] * q[6*64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
330 sum += p[7*64] * q[7*64];
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
331 tmp[i] = sum;
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
332 p++;
986e461dc072 Initial revision
glantau
parents:
diff changeset
333 q++;
986e461dc072 Initial revision
glantau
parents:
diff changeset
334 }
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
335 tmp1[0] = tmp[16] >> WSHIFT;
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
336 for( i=1; i<=16; i++ ) tmp1[i] = (tmp[i+16]+tmp[16-i]) >> WSHIFT;
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
337 for( i=17; i<=31; i++ ) tmp1[i] = (tmp[i+16]-tmp[80-i]) >> WSHIFT;
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
338
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
339 idct32(out, tmp1);
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
340
986e461dc072 Initial revision
glantau
parents:
diff changeset
341 /* advance of 32 samples */
986e461dc072 Initial revision
glantau
parents:
diff changeset
342 offset -= 32;
986e461dc072 Initial revision
glantau
parents:
diff changeset
343 out += 32;
986e461dc072 Initial revision
glantau
parents:
diff changeset
344 /* handle the wrap around */
986e461dc072 Initial revision
glantau
parents:
diff changeset
345 if (offset < 0) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
346 memmove(s->samples_buf[ch] + SAMPLES_BUF_SIZE - (512 - 32),
986e461dc072 Initial revision
glantau
parents:
diff changeset
347 s->samples_buf[ch], (512 - 32) * 2);
986e461dc072 Initial revision
glantau
parents:
diff changeset
348 offset = SAMPLES_BUF_SIZE - 512;
986e461dc072 Initial revision
glantau
parents:
diff changeset
349 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
350 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
351 s->samples_offset[ch] = offset;
986e461dc072 Initial revision
glantau
parents:
diff changeset
352
986e461dc072 Initial revision
glantau
parents:
diff changeset
353 // print_pow(s->sb_samples, 1152);
986e461dc072 Initial revision
glantau
parents:
diff changeset
354 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
355
986e461dc072 Initial revision
glantau
parents:
diff changeset
356 static void compute_scale_factors(unsigned char scale_code[SBLIMIT],
986e461dc072 Initial revision
glantau
parents:
diff changeset
357 unsigned char scale_factors[SBLIMIT][3],
986e461dc072 Initial revision
glantau
parents:
diff changeset
358 int sb_samples[3][12][SBLIMIT],
986e461dc072 Initial revision
glantau
parents:
diff changeset
359 int sblimit)
986e461dc072 Initial revision
glantau
parents:
diff changeset
360 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
361 int *p, vmax, v, n, i, j, k, code;
986e461dc072 Initial revision
glantau
parents:
diff changeset
362 int index, d1, d2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
363 unsigned char *sf = &scale_factors[0][0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
364
986e461dc072 Initial revision
glantau
parents:
diff changeset
365 for(j=0;j<sblimit;j++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
366 for(i=0;i<3;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
367 /* find the max absolute value */
986e461dc072 Initial revision
glantau
parents:
diff changeset
368 p = &sb_samples[i][0][j];
986e461dc072 Initial revision
glantau
parents:
diff changeset
369 vmax = abs(*p);
986e461dc072 Initial revision
glantau
parents:
diff changeset
370 for(k=1;k<12;k++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
371 p += SBLIMIT;
986e461dc072 Initial revision
glantau
parents:
diff changeset
372 v = abs(*p);
986e461dc072 Initial revision
glantau
parents:
diff changeset
373 if (v > vmax)
986e461dc072 Initial revision
glantau
parents:
diff changeset
374 vmax = v;
986e461dc072 Initial revision
glantau
parents:
diff changeset
375 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
376 /* compute the scale factor index using log 2 computations */
986e461dc072 Initial revision
glantau
parents:
diff changeset
377 if (vmax > 0) {
70
c7767df463f4 log2 to av_log2
glantau
parents: 64
diff changeset
378 n = av_log2(vmax);
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
379 /* n is the position of the MSB of vmax. now
986e461dc072 Initial revision
glantau
parents:
diff changeset
380 use at most 2 compares to find the index */
986e461dc072 Initial revision
glantau
parents:
diff changeset
381 index = (21 - n) * 3 - 3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
382 if (index >= 0) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
383 while (vmax <= scale_factor_table[index+1])
986e461dc072 Initial revision
glantau
parents:
diff changeset
384 index++;
986e461dc072 Initial revision
glantau
parents:
diff changeset
385 } else {
986e461dc072 Initial revision
glantau
parents:
diff changeset
386 index = 0; /* very unlikely case of overflow */
986e461dc072 Initial revision
glantau
parents:
diff changeset
387 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
388 } else {
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
389 index = 62; /* value 63 is not allowed */
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
390 }
89
2e88e3afecd0 corrected mpeg audio encoding overflows - now it should give correct quality even for very high volumes
glantau
parents: 84
diff changeset
391
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
392 #if 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
393 printf("%2d:%d in=%x %x %d\n",
986e461dc072 Initial revision
glantau
parents:
diff changeset
394 j, i, vmax, scale_factor_table[index], index);
986e461dc072 Initial revision
glantau
parents:
diff changeset
395 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
396 /* store the scale factor */
986e461dc072 Initial revision
glantau
parents:
diff changeset
397 assert(index >=0 && index <= 63);
986e461dc072 Initial revision
glantau
parents:
diff changeset
398 sf[i] = index;
986e461dc072 Initial revision
glantau
parents:
diff changeset
399 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
400
986e461dc072 Initial revision
glantau
parents:
diff changeset
401 /* compute the transmission factor : look if the scale factors
986e461dc072 Initial revision
glantau
parents:
diff changeset
402 are close enough to each other */
986e461dc072 Initial revision
glantau
parents:
diff changeset
403 d1 = scale_diff_table[sf[0] - sf[1] + 64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
404 d2 = scale_diff_table[sf[1] - sf[2] + 64];
986e461dc072 Initial revision
glantau
parents:
diff changeset
405
986e461dc072 Initial revision
glantau
parents:
diff changeset
406 /* handle the 25 cases */
986e461dc072 Initial revision
glantau
parents:
diff changeset
407 switch(d1 * 5 + d2) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
408 case 0*5+0:
986e461dc072 Initial revision
glantau
parents:
diff changeset
409 case 0*5+4:
986e461dc072 Initial revision
glantau
parents:
diff changeset
410 case 3*5+4:
986e461dc072 Initial revision
glantau
parents:
diff changeset
411 case 4*5+0:
986e461dc072 Initial revision
glantau
parents:
diff changeset
412 case 4*5+4:
986e461dc072 Initial revision
glantau
parents:
diff changeset
413 code = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
414 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
415 case 0*5+1:
986e461dc072 Initial revision
glantau
parents:
diff changeset
416 case 0*5+2:
986e461dc072 Initial revision
glantau
parents:
diff changeset
417 case 4*5+1:
986e461dc072 Initial revision
glantau
parents:
diff changeset
418 case 4*5+2:
986e461dc072 Initial revision
glantau
parents:
diff changeset
419 code = 3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
420 sf[2] = sf[1];
986e461dc072 Initial revision
glantau
parents:
diff changeset
421 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
422 case 0*5+3:
986e461dc072 Initial revision
glantau
parents:
diff changeset
423 case 4*5+3:
986e461dc072 Initial revision
glantau
parents:
diff changeset
424 code = 3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
425 sf[1] = sf[2];
986e461dc072 Initial revision
glantau
parents:
diff changeset
426 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
427 case 1*5+0:
986e461dc072 Initial revision
glantau
parents:
diff changeset
428 case 1*5+4:
986e461dc072 Initial revision
glantau
parents:
diff changeset
429 case 2*5+4:
986e461dc072 Initial revision
glantau
parents:
diff changeset
430 code = 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
431 sf[1] = sf[0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
432 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
433 case 1*5+1:
986e461dc072 Initial revision
glantau
parents:
diff changeset
434 case 1*5+2:
986e461dc072 Initial revision
glantau
parents:
diff changeset
435 case 2*5+0:
986e461dc072 Initial revision
glantau
parents:
diff changeset
436 case 2*5+1:
986e461dc072 Initial revision
glantau
parents:
diff changeset
437 case 2*5+2:
986e461dc072 Initial revision
glantau
parents:
diff changeset
438 code = 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
439 sf[1] = sf[2] = sf[0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
440 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
441 case 2*5+3:
986e461dc072 Initial revision
glantau
parents:
diff changeset
442 case 3*5+3:
986e461dc072 Initial revision
glantau
parents:
diff changeset
443 code = 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
444 sf[0] = sf[1] = sf[2];
986e461dc072 Initial revision
glantau
parents:
diff changeset
445 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
446 case 3*5+0:
986e461dc072 Initial revision
glantau
parents:
diff changeset
447 case 3*5+1:
986e461dc072 Initial revision
glantau
parents:
diff changeset
448 case 3*5+2:
986e461dc072 Initial revision
glantau
parents:
diff changeset
449 code = 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
450 sf[0] = sf[2] = sf[1];
986e461dc072 Initial revision
glantau
parents:
diff changeset
451 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
452 case 1*5+3:
986e461dc072 Initial revision
glantau
parents:
diff changeset
453 code = 2;
986e461dc072 Initial revision
glantau
parents:
diff changeset
454 if (sf[0] > sf[2])
986e461dc072 Initial revision
glantau
parents:
diff changeset
455 sf[0] = sf[2];
986e461dc072 Initial revision
glantau
parents:
diff changeset
456 sf[1] = sf[2] = sf[0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
457 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
458 default:
653
714795876872 Change abort() calls to av_abort() calls.
philipjsg
parents: 440
diff changeset
459 av_abort();
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
460 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
461
986e461dc072 Initial revision
glantau
parents:
diff changeset
462 #if 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
463 printf("%d: %2d %2d %2d %d %d -> %d\n", j,
986e461dc072 Initial revision
glantau
parents:
diff changeset
464 sf[0], sf[1], sf[2], d1, d2, code);
986e461dc072 Initial revision
glantau
parents:
diff changeset
465 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
466 scale_code[j] = code;
986e461dc072 Initial revision
glantau
parents:
diff changeset
467 sf += 3;
986e461dc072 Initial revision
glantau
parents:
diff changeset
468 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
469 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
470
986e461dc072 Initial revision
glantau
parents:
diff changeset
471 /* The most important function : psycho acoustic module. In this
986e461dc072 Initial revision
glantau
parents:
diff changeset
472 encoder there is basically none, so this is the worst you can do,
986e461dc072 Initial revision
glantau
parents:
diff changeset
473 but also this is the simpler. */
986e461dc072 Initial revision
glantau
parents:
diff changeset
474 static void psycho_acoustic_model(MpegAudioContext *s, short smr[SBLIMIT])
986e461dc072 Initial revision
glantau
parents:
diff changeset
475 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
476 int i;
986e461dc072 Initial revision
glantau
parents:
diff changeset
477
986e461dc072 Initial revision
glantau
parents:
diff changeset
478 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
479 smr[i] = (int)(fixed_smr[i] * 10);
986e461dc072 Initial revision
glantau
parents:
diff changeset
480 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
481 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
482
986e461dc072 Initial revision
glantau
parents:
diff changeset
483
986e461dc072 Initial revision
glantau
parents:
diff changeset
484 #define SB_NOTALLOCATED 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
485 #define SB_ALLOCATED 1
986e461dc072 Initial revision
glantau
parents:
diff changeset
486 #define SB_NOMORE 2
986e461dc072 Initial revision
glantau
parents:
diff changeset
487
986e461dc072 Initial revision
glantau
parents:
diff changeset
488 /* Try to maximize the smr while using a number of bits inferior to
986e461dc072 Initial revision
glantau
parents:
diff changeset
489 the frame size. I tried to make the code simpler, faster and
986e461dc072 Initial revision
glantau
parents:
diff changeset
490 smaller than other encoders :-) */
986e461dc072 Initial revision
glantau
parents:
diff changeset
491 static void compute_bit_allocation(MpegAudioContext *s,
986e461dc072 Initial revision
glantau
parents:
diff changeset
492 short smr1[MPA_MAX_CHANNELS][SBLIMIT],
986e461dc072 Initial revision
glantau
parents:
diff changeset
493 unsigned char bit_alloc[MPA_MAX_CHANNELS][SBLIMIT],
986e461dc072 Initial revision
glantau
parents:
diff changeset
494 int *padding)
986e461dc072 Initial revision
glantau
parents:
diff changeset
495 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
496 int i, ch, b, max_smr, max_ch, max_sb, current_frame_size, max_frame_size;
986e461dc072 Initial revision
glantau
parents:
diff changeset
497 int incr;
986e461dc072 Initial revision
glantau
parents:
diff changeset
498 short smr[MPA_MAX_CHANNELS][SBLIMIT];
986e461dc072 Initial revision
glantau
parents:
diff changeset
499 unsigned char subband_status[MPA_MAX_CHANNELS][SBLIMIT];
986e461dc072 Initial revision
glantau
parents:
diff changeset
500 const unsigned char *alloc;
986e461dc072 Initial revision
glantau
parents:
diff changeset
501
986e461dc072 Initial revision
glantau
parents:
diff changeset
502 memcpy(smr, smr1, s->nb_channels * sizeof(short) * SBLIMIT);
986e461dc072 Initial revision
glantau
parents:
diff changeset
503 memset(subband_status, SB_NOTALLOCATED, s->nb_channels * SBLIMIT);
986e461dc072 Initial revision
glantau
parents:
diff changeset
504 memset(bit_alloc, 0, s->nb_channels * SBLIMIT);
986e461dc072 Initial revision
glantau
parents:
diff changeset
505
986e461dc072 Initial revision
glantau
parents:
diff changeset
506 /* compute frame size and padding */
986e461dc072 Initial revision
glantau
parents:
diff changeset
507 max_frame_size = s->frame_size;
986e461dc072 Initial revision
glantau
parents:
diff changeset
508 s->frame_frac += s->frame_frac_incr;
986e461dc072 Initial revision
glantau
parents:
diff changeset
509 if (s->frame_frac >= 65536) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
510 s->frame_frac -= 65536;
986e461dc072 Initial revision
glantau
parents:
diff changeset
511 s->do_padding = 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
512 max_frame_size += 8;
986e461dc072 Initial revision
glantau
parents:
diff changeset
513 } else {
986e461dc072 Initial revision
glantau
parents:
diff changeset
514 s->do_padding = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
515 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
516
986e461dc072 Initial revision
glantau
parents:
diff changeset
517 /* compute the header + bit alloc size */
986e461dc072 Initial revision
glantau
parents:
diff changeset
518 current_frame_size = 32;
986e461dc072 Initial revision
glantau
parents:
diff changeset
519 alloc = s->alloc_table;
986e461dc072 Initial revision
glantau
parents:
diff changeset
520 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
521 incr = alloc[0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
522 current_frame_size += incr * s->nb_channels;
986e461dc072 Initial revision
glantau
parents:
diff changeset
523 alloc += 1 << incr;
986e461dc072 Initial revision
glantau
parents:
diff changeset
524 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
525 for(;;) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
526 /* look for the subband with the largest signal to mask ratio */
986e461dc072 Initial revision
glantau
parents:
diff changeset
527 max_sb = -1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
528 max_ch = -1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
529 max_smr = 0x80000000;
986e461dc072 Initial revision
glantau
parents:
diff changeset
530 for(ch=0;ch<s->nb_channels;ch++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
531 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
532 if (smr[ch][i] > max_smr && subband_status[ch][i] != SB_NOMORE) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
533 max_smr = smr[ch][i];
986e461dc072 Initial revision
glantau
parents:
diff changeset
534 max_sb = i;
986e461dc072 Initial revision
glantau
parents:
diff changeset
535 max_ch = ch;
986e461dc072 Initial revision
glantau
parents:
diff changeset
536 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
537 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
538 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
539 #if 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
540 printf("current=%d max=%d max_sb=%d alloc=%d\n",
986e461dc072 Initial revision
glantau
parents:
diff changeset
541 current_frame_size, max_frame_size, max_sb,
986e461dc072 Initial revision
glantau
parents:
diff changeset
542 bit_alloc[max_sb]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
543 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
544 if (max_sb < 0)
986e461dc072 Initial revision
glantau
parents:
diff changeset
545 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
546
986e461dc072 Initial revision
glantau
parents:
diff changeset
547 /* find alloc table entry (XXX: not optimal, should use
986e461dc072 Initial revision
glantau
parents:
diff changeset
548 pointer table) */
986e461dc072 Initial revision
glantau
parents:
diff changeset
549 alloc = s->alloc_table;
986e461dc072 Initial revision
glantau
parents:
diff changeset
550 for(i=0;i<max_sb;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
551 alloc += 1 << alloc[0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
552 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
553
986e461dc072 Initial revision
glantau
parents:
diff changeset
554 if (subband_status[max_ch][max_sb] == SB_NOTALLOCATED) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
555 /* nothing was coded for this band: add the necessary bits */
986e461dc072 Initial revision
glantau
parents:
diff changeset
556 incr = 2 + nb_scale_factors[s->scale_code[max_ch][max_sb]] * 6;
986e461dc072 Initial revision
glantau
parents:
diff changeset
557 incr += total_quant_bits[alloc[1]];
986e461dc072 Initial revision
glantau
parents:
diff changeset
558 } else {
986e461dc072 Initial revision
glantau
parents:
diff changeset
559 /* increments bit allocation */
986e461dc072 Initial revision
glantau
parents:
diff changeset
560 b = bit_alloc[max_ch][max_sb];
986e461dc072 Initial revision
glantau
parents:
diff changeset
561 incr = total_quant_bits[alloc[b + 1]] -
986e461dc072 Initial revision
glantau
parents:
diff changeset
562 total_quant_bits[alloc[b]];
986e461dc072 Initial revision
glantau
parents:
diff changeset
563 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
564
986e461dc072 Initial revision
glantau
parents:
diff changeset
565 if (current_frame_size + incr <= max_frame_size) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
566 /* can increase size */
986e461dc072 Initial revision
glantau
parents:
diff changeset
567 b = ++bit_alloc[max_ch][max_sb];
986e461dc072 Initial revision
glantau
parents:
diff changeset
568 current_frame_size += incr;
986e461dc072 Initial revision
glantau
parents:
diff changeset
569 /* decrease smr by the resolution we added */
986e461dc072 Initial revision
glantau
parents:
diff changeset
570 smr[max_ch][max_sb] = smr1[max_ch][max_sb] - quant_snr[alloc[b]];
986e461dc072 Initial revision
glantau
parents:
diff changeset
571 /* max allocation size reached ? */
986e461dc072 Initial revision
glantau
parents:
diff changeset
572 if (b == ((1 << alloc[0]) - 1))
986e461dc072 Initial revision
glantau
parents:
diff changeset
573 subband_status[max_ch][max_sb] = SB_NOMORE;
986e461dc072 Initial revision
glantau
parents:
diff changeset
574 else
986e461dc072 Initial revision
glantau
parents:
diff changeset
575 subband_status[max_ch][max_sb] = SB_ALLOCATED;
986e461dc072 Initial revision
glantau
parents:
diff changeset
576 } else {
986e461dc072 Initial revision
glantau
parents:
diff changeset
577 /* cannot increase the size of this subband */
986e461dc072 Initial revision
glantau
parents:
diff changeset
578 subband_status[max_ch][max_sb] = SB_NOMORE;
986e461dc072 Initial revision
glantau
parents:
diff changeset
579 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
580 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
581 *padding = max_frame_size - current_frame_size;
986e461dc072 Initial revision
glantau
parents:
diff changeset
582 assert(*padding >= 0);
986e461dc072 Initial revision
glantau
parents:
diff changeset
583
986e461dc072 Initial revision
glantau
parents:
diff changeset
584 #if 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
585 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
586 printf("%d ", bit_alloc[i]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
587 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
588 printf("\n");
986e461dc072 Initial revision
glantau
parents:
diff changeset
589 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
590 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
591
986e461dc072 Initial revision
glantau
parents:
diff changeset
592 /*
986e461dc072 Initial revision
glantau
parents:
diff changeset
593 * Output the mpeg audio layer 2 frame. Note how the code is small
986e461dc072 Initial revision
glantau
parents:
diff changeset
594 * compared to other encoders :-)
986e461dc072 Initial revision
glantau
parents:
diff changeset
595 */
986e461dc072 Initial revision
glantau
parents:
diff changeset
596 static void encode_frame(MpegAudioContext *s,
986e461dc072 Initial revision
glantau
parents:
diff changeset
597 unsigned char bit_alloc[MPA_MAX_CHANNELS][SBLIMIT],
986e461dc072 Initial revision
glantau
parents:
diff changeset
598 int padding)
986e461dc072 Initial revision
glantau
parents:
diff changeset
599 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
600 int i, j, k, l, bit_alloc_bits, b, ch;
986e461dc072 Initial revision
glantau
parents:
diff changeset
601 unsigned char *sf;
986e461dc072 Initial revision
glantau
parents:
diff changeset
602 int q[3];
986e461dc072 Initial revision
glantau
parents:
diff changeset
603 PutBitContext *p = &s->pb;
986e461dc072 Initial revision
glantau
parents:
diff changeset
604
986e461dc072 Initial revision
glantau
parents:
diff changeset
605 /* header */
986e461dc072 Initial revision
glantau
parents:
diff changeset
606
986e461dc072 Initial revision
glantau
parents:
diff changeset
607 put_bits(p, 12, 0xfff);
986e461dc072 Initial revision
glantau
parents:
diff changeset
608 put_bits(p, 1, 1 - s->lsf); /* 1 = mpeg1 ID, 0 = mpeg2 lsf ID */
986e461dc072 Initial revision
glantau
parents:
diff changeset
609 put_bits(p, 2, 4-2); /* layer 2 */
986e461dc072 Initial revision
glantau
parents:
diff changeset
610 put_bits(p, 1, 1); /* no error protection */
986e461dc072 Initial revision
glantau
parents:
diff changeset
611 put_bits(p, 4, s->bitrate_index);
986e461dc072 Initial revision
glantau
parents:
diff changeset
612 put_bits(p, 2, s->freq_index);
986e461dc072 Initial revision
glantau
parents:
diff changeset
613 put_bits(p, 1, s->do_padding); /* use padding */
986e461dc072 Initial revision
glantau
parents:
diff changeset
614 put_bits(p, 1, 0); /* private_bit */
986e461dc072 Initial revision
glantau
parents:
diff changeset
615 put_bits(p, 2, s->nb_channels == 2 ? MPA_STEREO : MPA_MONO);
986e461dc072 Initial revision
glantau
parents:
diff changeset
616 put_bits(p, 2, 0); /* mode_ext */
986e461dc072 Initial revision
glantau
parents:
diff changeset
617 put_bits(p, 1, 0); /* no copyright */
986e461dc072 Initial revision
glantau
parents:
diff changeset
618 put_bits(p, 1, 1); /* original */
986e461dc072 Initial revision
glantau
parents:
diff changeset
619 put_bits(p, 2, 0); /* no emphasis */
986e461dc072 Initial revision
glantau
parents:
diff changeset
620
986e461dc072 Initial revision
glantau
parents:
diff changeset
621 /* bit allocation */
986e461dc072 Initial revision
glantau
parents:
diff changeset
622 j = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
623 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
624 bit_alloc_bits = s->alloc_table[j];
986e461dc072 Initial revision
glantau
parents:
diff changeset
625 for(ch=0;ch<s->nb_channels;ch++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
626 put_bits(p, bit_alloc_bits, bit_alloc[ch][i]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
627 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
628 j += 1 << bit_alloc_bits;
986e461dc072 Initial revision
glantau
parents:
diff changeset
629 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
630
986e461dc072 Initial revision
glantau
parents:
diff changeset
631 /* scale codes */
986e461dc072 Initial revision
glantau
parents:
diff changeset
632 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
633 for(ch=0;ch<s->nb_channels;ch++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
634 if (bit_alloc[ch][i])
986e461dc072 Initial revision
glantau
parents:
diff changeset
635 put_bits(p, 2, s->scale_code[ch][i]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
636 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
637 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
638
986e461dc072 Initial revision
glantau
parents:
diff changeset
639 /* scale factors */
986e461dc072 Initial revision
glantau
parents:
diff changeset
640 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
641 for(ch=0;ch<s->nb_channels;ch++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
642 if (bit_alloc[ch][i]) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
643 sf = &s->scale_factors[ch][i][0];
986e461dc072 Initial revision
glantau
parents:
diff changeset
644 switch(s->scale_code[ch][i]) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
645 case 0:
986e461dc072 Initial revision
glantau
parents:
diff changeset
646 put_bits(p, 6, sf[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
647 put_bits(p, 6, sf[1]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
648 put_bits(p, 6, sf[2]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
649 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
650 case 3:
986e461dc072 Initial revision
glantau
parents:
diff changeset
651 case 1:
986e461dc072 Initial revision
glantau
parents:
diff changeset
652 put_bits(p, 6, sf[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
653 put_bits(p, 6, sf[2]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
654 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
655 case 2:
986e461dc072 Initial revision
glantau
parents:
diff changeset
656 put_bits(p, 6, sf[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
657 break;
986e461dc072 Initial revision
glantau
parents:
diff changeset
658 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
659 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
660 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
661 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
662
986e461dc072 Initial revision
glantau
parents:
diff changeset
663 /* quantization & write sub band samples */
986e461dc072 Initial revision
glantau
parents:
diff changeset
664
986e461dc072 Initial revision
glantau
parents:
diff changeset
665 for(k=0;k<3;k++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
666 for(l=0;l<12;l+=3) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
667 j = 0;
986e461dc072 Initial revision
glantau
parents:
diff changeset
668 for(i=0;i<s->sblimit;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
669 bit_alloc_bits = s->alloc_table[j];
986e461dc072 Initial revision
glantau
parents:
diff changeset
670 for(ch=0;ch<s->nb_channels;ch++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
671 b = bit_alloc[ch][i];
986e461dc072 Initial revision
glantau
parents:
diff changeset
672 if (b) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
673 int qindex, steps, m, sample, bits;
986e461dc072 Initial revision
glantau
parents:
diff changeset
674 /* we encode 3 sub band samples of the same sub band at a time */
986e461dc072 Initial revision
glantau
parents:
diff changeset
675 qindex = s->alloc_table[j+b];
986e461dc072 Initial revision
glantau
parents:
diff changeset
676 steps = quant_steps[qindex];
986e461dc072 Initial revision
glantau
parents:
diff changeset
677 for(m=0;m<3;m++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
678 sample = s->sb_samples[ch][k][l + m][i];
986e461dc072 Initial revision
glantau
parents:
diff changeset
679 /* divide by scale factor */
986e461dc072 Initial revision
glantau
parents:
diff changeset
680 #ifdef USE_FLOATS
986e461dc072 Initial revision
glantau
parents:
diff changeset
681 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
682 float a;
986e461dc072 Initial revision
glantau
parents:
diff changeset
683 a = (float)sample * scale_factor_inv_table[s->scale_factors[ch][i][k]];
986e461dc072 Initial revision
glantau
parents:
diff changeset
684 q[m] = (int)((a + 1.0) * steps * 0.5);
986e461dc072 Initial revision
glantau
parents:
diff changeset
685 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
686 #else
986e461dc072 Initial revision
glantau
parents:
diff changeset
687 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
688 int q1, e, shift, mult;
986e461dc072 Initial revision
glantau
parents:
diff changeset
689 e = s->scale_factors[ch][i][k];
986e461dc072 Initial revision
glantau
parents:
diff changeset
690 shift = scale_factor_shift[e];
986e461dc072 Initial revision
glantau
parents:
diff changeset
691 mult = scale_factor_mult[e];
986e461dc072 Initial revision
glantau
parents:
diff changeset
692
986e461dc072 Initial revision
glantau
parents:
diff changeset
693 /* normalize to P bits */
986e461dc072 Initial revision
glantau
parents:
diff changeset
694 if (shift < 0)
986e461dc072 Initial revision
glantau
parents:
diff changeset
695 q1 = sample << (-shift);
986e461dc072 Initial revision
glantau
parents:
diff changeset
696 else
986e461dc072 Initial revision
glantau
parents:
diff changeset
697 q1 = sample >> shift;
986e461dc072 Initial revision
glantau
parents:
diff changeset
698 q1 = (q1 * mult) >> P;
986e461dc072 Initial revision
glantau
parents:
diff changeset
699 q[m] = ((q1 + (1 << P)) * steps) >> (P + 1);
986e461dc072 Initial revision
glantau
parents:
diff changeset
700 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
701 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
702 if (q[m] >= steps)
986e461dc072 Initial revision
glantau
parents:
diff changeset
703 q[m] = steps - 1;
986e461dc072 Initial revision
glantau
parents:
diff changeset
704 assert(q[m] >= 0 && q[m] < steps);
986e461dc072 Initial revision
glantau
parents:
diff changeset
705 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
706 bits = quant_bits[qindex];
986e461dc072 Initial revision
glantau
parents:
diff changeset
707 if (bits < 0) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
708 /* group the 3 values to save bits */
986e461dc072 Initial revision
glantau
parents:
diff changeset
709 put_bits(p, -bits,
986e461dc072 Initial revision
glantau
parents:
diff changeset
710 q[0] + steps * (q[1] + steps * q[2]));
986e461dc072 Initial revision
glantau
parents:
diff changeset
711 #if 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
712 printf("%d: gr1 %d\n",
986e461dc072 Initial revision
glantau
parents:
diff changeset
713 i, q[0] + steps * (q[1] + steps * q[2]));
986e461dc072 Initial revision
glantau
parents:
diff changeset
714 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
715 } else {
986e461dc072 Initial revision
glantau
parents:
diff changeset
716 #if 0
986e461dc072 Initial revision
glantau
parents:
diff changeset
717 printf("%d: gr3 %d %d %d\n",
986e461dc072 Initial revision
glantau
parents:
diff changeset
718 i, q[0], q[1], q[2]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
719 #endif
986e461dc072 Initial revision
glantau
parents:
diff changeset
720 put_bits(p, bits, q[0]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
721 put_bits(p, bits, q[1]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
722 put_bits(p, bits, q[2]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
723 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
724 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
725 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
726 /* next subband in alloc table */
986e461dc072 Initial revision
glantau
parents:
diff changeset
727 j += 1 << bit_alloc_bits;
986e461dc072 Initial revision
glantau
parents:
diff changeset
728 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
729 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
730 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
731
986e461dc072 Initial revision
glantau
parents:
diff changeset
732 /* padding */
986e461dc072 Initial revision
glantau
parents:
diff changeset
733 for(i=0;i<padding;i++)
986e461dc072 Initial revision
glantau
parents:
diff changeset
734 put_bits(p, 1, 0);
986e461dc072 Initial revision
glantau
parents:
diff changeset
735
986e461dc072 Initial revision
glantau
parents:
diff changeset
736 /* flush */
986e461dc072 Initial revision
glantau
parents:
diff changeset
737 flush_put_bits(p);
986e461dc072 Initial revision
glantau
parents:
diff changeset
738 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
739
1057
bb5de8a59da8 * static,const,compiler warning cleanup
kabi
parents: 1031
diff changeset
740 static int MPA_encode_frame(AVCodecContext *avctx,
bb5de8a59da8 * static,const,compiler warning cleanup
kabi
parents: 1031
diff changeset
741 unsigned char *frame, int buf_size, void *data)
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
742 {
986e461dc072 Initial revision
glantau
parents:
diff changeset
743 MpegAudioContext *s = avctx->priv_data;
986e461dc072 Initial revision
glantau
parents:
diff changeset
744 short *samples = data;
986e461dc072 Initial revision
glantau
parents:
diff changeset
745 short smr[MPA_MAX_CHANNELS][SBLIMIT];
986e461dc072 Initial revision
glantau
parents:
diff changeset
746 unsigned char bit_alloc[MPA_MAX_CHANNELS][SBLIMIT];
986e461dc072 Initial revision
glantau
parents:
diff changeset
747 int padding, i;
986e461dc072 Initial revision
glantau
parents:
diff changeset
748
986e461dc072 Initial revision
glantau
parents:
diff changeset
749 for(i=0;i<s->nb_channels;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
750 filter(s, i, samples + i, s->nb_channels);
986e461dc072 Initial revision
glantau
parents:
diff changeset
751 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
752
986e461dc072 Initial revision
glantau
parents:
diff changeset
753 for(i=0;i<s->nb_channels;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
754 compute_scale_factors(s->scale_code[i], s->scale_factors[i],
986e461dc072 Initial revision
glantau
parents:
diff changeset
755 s->sb_samples[i], s->sblimit);
986e461dc072 Initial revision
glantau
parents:
diff changeset
756 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
757 for(i=0;i<s->nb_channels;i++) {
986e461dc072 Initial revision
glantau
parents:
diff changeset
758 psycho_acoustic_model(s, smr[i]);
986e461dc072 Initial revision
glantau
parents:
diff changeset
759 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
760 compute_bit_allocation(s, smr, bit_alloc, &padding);
986e461dc072 Initial revision
glantau
parents:
diff changeset
761
986e461dc072 Initial revision
glantau
parents:
diff changeset
762 init_put_bits(&s->pb, frame, MPA_MAX_CODED_FRAME_SIZE, NULL, NULL);
986e461dc072 Initial revision
glantau
parents:
diff changeset
763
986e461dc072 Initial revision
glantau
parents:
diff changeset
764 encode_frame(s, bit_alloc, padding);
986e461dc072 Initial revision
glantau
parents:
diff changeset
765
986e461dc072 Initial revision
glantau
parents:
diff changeset
766 s->nb_samples += MPA_FRAME_SIZE;
234
5fc0c3af3fe4 alternative bitstream writer (disabled by default, uncomment #define ALT_BISTREAM_WRITER in common.h if u want to try it)
michaelni
parents: 89
diff changeset
767 return pbBufPtr(&s->pb) - s->pb.buf;
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
768 }
986e461dc072 Initial revision
glantau
parents:
diff changeset
769
925
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
770 static int MPA_encode_close(AVCodecContext *avctx)
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
771 {
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
772 av_freep(&avctx->coded_frame);
1031
19de1445beb2 use av_malloc() functions - added av_strdup and av_realloc()
bellard
parents: 925
diff changeset
773 return 0;
925
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
774 }
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
775
986e461dc072 Initial revision
glantau
parents:
diff changeset
776 AVCodec mp2_encoder = {
986e461dc072 Initial revision
glantau
parents:
diff changeset
777 "mp2",
986e461dc072 Initial revision
glantau
parents:
diff changeset
778 CODEC_TYPE_AUDIO,
986e461dc072 Initial revision
glantau
parents:
diff changeset
779 CODEC_ID_MP2,
986e461dc072 Initial revision
glantau
parents:
diff changeset
780 sizeof(MpegAudioContext),
986e461dc072 Initial revision
glantau
parents:
diff changeset
781 MPA_encode_init,
986e461dc072 Initial revision
glantau
parents:
diff changeset
782 MPA_encode_frame,
925
7fccaa0d699d AVVideoFrame -> AVFrame
michaelni
parents: 653
diff changeset
783 MPA_encode_close,
0
986e461dc072 Initial revision
glantau
parents:
diff changeset
784 NULL,
986e461dc072 Initial revision
glantau
parents:
diff changeset
785 };
440
000aeeac27a2 * started to cleanup name clashes for onetime compilation
kabi
parents: 429
diff changeset
786
000aeeac27a2 * started to cleanup name clashes for onetime compilation
kabi
parents: 429
diff changeset
787 #undef FIX