3 * Copyright (c) 2001 Fabrice Bellard.
5 * This file is part of FFmpeg.
7 * FFmpeg is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * FFmpeg is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with FFmpeg; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
28 #include "bitstream.h" // for ff_reverse
29 #include "bytestream.h"
31 #define MAX_CHANNELS 64
33 /* from g711.c by SUN microsystems (unrestricted use) */
35 #define SIGN_BIT (0x80) /* Sign bit for a A-law byte. */
36 #define QUANT_MASK (0xf) /* Quantization field mask. */
37 #define NSEGS (8) /* Number of A-law segments. */
38 #define SEG_SHIFT (4) /* Left shift for segment number. */
39 #define SEG_MASK (0x70) /* Segment field mask. */
41 #define BIAS (0x84) /* Bias for linear code. */
44 * alaw2linear() - Convert an A-law value to 16-bit linear PCM
47 static av_cold
int alaw2linear(unsigned char a_val
)
54 t
= a_val
& QUANT_MASK
;
55 seg
= ((unsigned)a_val
& SEG_MASK
) >> SEG_SHIFT
;
56 if(seg
) t
= (t
+ t
+ 1 + 32) << (seg
+ 2);
57 else t
= (t
+ t
+ 1 ) << 3;
59 return (a_val
& SIGN_BIT
) ? t
: -t
;
62 static av_cold
int ulaw2linear(unsigned char u_val
)
66 /* Complement to obtain normal u-law value. */
70 * Extract and bias the quantization bits. Then
71 * shift up by the segment number and subtract out the bias.
73 t
= ((u_val
& QUANT_MASK
) << 3) + BIAS
;
74 t
<<= ((unsigned)u_val
& SEG_MASK
) >> SEG_SHIFT
;
76 return (u_val
& SIGN_BIT
) ? (BIAS
- t
) : (t
- BIAS
);
79 /* 16384 entries per table */
80 static uint8_t linear_to_alaw
[16384];
81 static uint8_t linear_to_ulaw
[16384];
83 static av_cold
void build_xlaw_table(uint8_t *linear_to_xlaw
,
84 int (*xlaw2linear
)(unsigned char),
92 v1
= xlaw2linear(i
^ mask
);
93 v2
= xlaw2linear((i
+ 1) ^ mask
);
94 v
= (v1
+ v2
+ 4) >> 3;
99 linear_to_xlaw
[8192 + j
] = (i
^ mask
);
101 linear_to_xlaw
[8192 - j
] = (i
^ (mask
^ 0x80));
104 linear_to_xlaw
[0] = linear_to_xlaw
[1];
107 static av_cold
int pcm_encode_init(AVCodecContext
*avctx
)
109 avctx
->frame_size
= 1;
110 switch(avctx
->codec
->id
) {
111 case CODEC_ID_PCM_ALAW
:
112 build_xlaw_table(linear_to_alaw
, alaw2linear
, 0xd5);
114 case CODEC_ID_PCM_MULAW
:
115 build_xlaw_table(linear_to_ulaw
, ulaw2linear
, 0xff);
121 avctx
->bits_per_coded_sample
= av_get_bits_per_sample(avctx
->codec
->id
);
122 avctx
->block_align
= avctx
->channels
* avctx
->bits_per_coded_sample
/8;
123 avctx
->coded_frame
= avcodec_alloc_frame();
124 avctx
->coded_frame
->key_frame
= 1;
129 static av_cold
int pcm_encode_close(AVCodecContext
*avctx
)
131 av_freep(&avctx
->coded_frame
);
137 * Write PCM samples macro
138 * @param type Datatype of native machine format
139 * @param endian bytestream_put_xxx() suffix
140 * @param src Source pointer (variable name)
141 * @param dst Destination pointer (variable name)
142 * @param n Total number of samples (variable name)
143 * @param shift Bitshift (bits)
144 * @param offset Sample value offset
146 #define ENCODE(type, endian, src, dst, n, shift, offset) \
147 samples_##type = (type*)src; \
149 register type v = (*samples_##type++ >> shift) + offset; \
150 bytestream_put_##endian(&dst, v); \
153 static int pcm_encode_frame(AVCodecContext
*avctx
,
154 unsigned char *frame
, int buf_size
, void *data
)
156 int n
, sample_size
, v
;
160 int16_t *samples_int16_t
;
161 int32_t *samples_int32_t
;
162 int64_t *samples_int64_t
;
163 uint16_t *samples_uint16_t
;
164 uint32_t *samples_uint32_t
;
166 sample_size
= av_get_bits_per_sample(avctx
->codec
->id
)/8;
167 n
= buf_size
/ sample_size
;
171 if (avctx
->sample_fmt
!=avctx
->codec
->sample_fmts
[0]) {
172 av_log(avctx
, AV_LOG_ERROR
, "invalid sample_fmt\n");
176 switch(avctx
->codec
->id
) {
177 case CODEC_ID_PCM_U32LE
:
178 ENCODE(uint32_t, le32
, samples
, dst
, n
, 0, 0x80000000)
180 case CODEC_ID_PCM_U32BE
:
181 ENCODE(uint32_t, be32
, samples
, dst
, n
, 0, 0x80000000)
183 case CODEC_ID_PCM_S24LE
:
184 ENCODE(int32_t, le24
, samples
, dst
, n
, 8, 0)
186 case CODEC_ID_PCM_S24BE
:
187 ENCODE(int32_t, be24
, samples
, dst
, n
, 8, 0)
189 case CODEC_ID_PCM_U24LE
:
190 ENCODE(uint32_t, le24
, samples
, dst
, n
, 8, 0x800000)
192 case CODEC_ID_PCM_U24BE
:
193 ENCODE(uint32_t, be24
, samples
, dst
, n
, 8, 0x800000)
195 case CODEC_ID_PCM_S24DAUD
:
197 uint32_t tmp
= ff_reverse
[(*samples
>> 8) & 0xff] +
198 (ff_reverse
[*samples
& 0xff] << 8);
199 tmp
<<= 4; // sync flags would go here
200 bytestream_put_be24(&dst
, tmp
);
204 case CODEC_ID_PCM_U16LE
:
205 ENCODE(uint16_t, le16
, samples
, dst
, n
, 0, 0x8000)
207 case CODEC_ID_PCM_U16BE
:
208 ENCODE(uint16_t, be16
, samples
, dst
, n
, 0, 0x8000)
210 case CODEC_ID_PCM_S8
:
218 case CODEC_ID_PCM_F64LE
:
219 ENCODE(int64_t, le64
, samples
, dst
, n
, 0, 0)
221 case CODEC_ID_PCM_S32LE
:
222 case CODEC_ID_PCM_F32LE
:
223 ENCODE(int32_t, le32
, samples
, dst
, n
, 0, 0)
225 case CODEC_ID_PCM_S16LE
:
226 ENCODE(int16_t, le16
, samples
, dst
, n
, 0, 0)
228 case CODEC_ID_PCM_F64BE
:
229 case CODEC_ID_PCM_F32BE
:
230 case CODEC_ID_PCM_S32BE
:
231 case CODEC_ID_PCM_S16BE
:
233 case CODEC_ID_PCM_F64BE
:
234 ENCODE(int64_t, be64
, samples
, dst
, n
, 0, 0)
236 case CODEC_ID_PCM_F32BE
:
237 case CODEC_ID_PCM_S32BE
:
238 ENCODE(int32_t, be32
, samples
, dst
, n
, 0, 0)
240 case CODEC_ID_PCM_S16BE
:
241 ENCODE(int16_t, be16
, samples
, dst
, n
, 0, 0)
243 case CODEC_ID_PCM_F64LE
:
244 case CODEC_ID_PCM_F32LE
:
245 case CODEC_ID_PCM_S32LE
:
246 case CODEC_ID_PCM_S16LE
:
247 #endif /* WORDS_BIGENDIAN */
248 case CODEC_ID_PCM_U8
:
249 memcpy(dst
, samples
, n
*sample_size
);
250 dst
+= n
*sample_size
;
252 case CODEC_ID_PCM_ZORK
:
260 case CODEC_ID_PCM_ALAW
:
263 *dst
++ = linear_to_alaw
[(v
+ 32768) >> 2];
266 case CODEC_ID_PCM_MULAW
:
269 *dst
++ = linear_to_ulaw
[(v
+ 32768) >> 2];
275 //avctx->frame_size = (dst - frame) / (sample_size * avctx->channels);
280 typedef struct PCMDecode
{
284 static av_cold
int pcm_decode_init(AVCodecContext
* avctx
)
286 PCMDecode
*s
= avctx
->priv_data
;
289 switch(avctx
->codec
->id
) {
290 case CODEC_ID_PCM_ALAW
:
292 s
->table
[i
] = alaw2linear(i
);
294 case CODEC_ID_PCM_MULAW
:
296 s
->table
[i
] = ulaw2linear(i
);
302 avctx
->sample_fmt
= avctx
->codec
->sample_fmts
[0];
307 * Read PCM samples macro
308 * @param type Datatype of native machine format
309 * @param endian bytestream_get_xxx() endian suffix
310 * @param src Source pointer (variable name)
311 * @param dst Destination pointer (variable name)
312 * @param n Total number of samples (variable name)
313 * @param shift Bitshift (bits)
314 * @param offset Sample value offset
316 #define DECODE(type, endian, src, dst, n, shift, offset) \
317 dst_##type = (type*)dst; \
319 register type v = bytestream_get_##endian(&src); \
320 *dst_##type++ = (v - offset) << shift; \
322 dst = (short*)dst_##type;
324 static int pcm_decode_frame(AVCodecContext
*avctx
,
325 void *data
, int *data_size
,
326 const uint8_t *buf
, int buf_size
)
328 PCMDecode
*s
= avctx
->priv_data
;
329 int sample_size
, c
, n
;
331 const uint8_t *src
, *src8
, *src2
[MAX_CHANNELS
];
333 int16_t *dst_int16_t
;
334 int32_t *dst_int32_t
;
335 int64_t *dst_int64_t
;
336 uint16_t *dst_uint16_t
;
337 uint32_t *dst_uint32_t
;
342 if (avctx
->sample_fmt
!=avctx
->codec
->sample_fmts
[0]) {
343 av_log(avctx
, AV_LOG_ERROR
, "invalid sample_fmt\n");
347 if(avctx
->channels
<= 0 || avctx
->channels
> MAX_CHANNELS
){
348 av_log(avctx
, AV_LOG_ERROR
, "PCM channels out of bounds\n");
352 sample_size
= av_get_bits_per_sample(avctx
->codec_id
)/8;
354 /* av_get_bits_per_sample returns 0 for CODEC_ID_PCM_DVD */
355 if (CODEC_ID_PCM_DVD
== avctx
->codec_id
)
356 /* 2 samples are interleaved per block in PCM_DVD */
357 sample_size
= avctx
->bits_per_coded_sample
* 2 / 8;
359 n
= avctx
->channels
* sample_size
;
361 if(n
&& buf_size
% n
){
362 av_log(avctx
, AV_LOG_ERROR
, "invalid PCM packet\n");
366 buf_size
= FFMIN(buf_size
, *data_size
/2);
369 n
= buf_size
/sample_size
;
371 switch(avctx
->codec
->id
) {
372 case CODEC_ID_PCM_U32LE
:
373 DECODE(uint32_t, le32
, src
, samples
, n
, 0, 0x80000000)
375 case CODEC_ID_PCM_U32BE
:
376 DECODE(uint32_t, be32
, src
, samples
, n
, 0, 0x80000000)
378 case CODEC_ID_PCM_S24LE
:
379 DECODE(int32_t, le24
, src
, samples
, n
, 8, 0)
381 case CODEC_ID_PCM_S24BE
:
382 DECODE(int32_t, be24
, src
, samples
, n
, 8, 0)
384 case CODEC_ID_PCM_U24LE
:
385 DECODE(uint32_t, le24
, src
, samples
, n
, 8, 0x800000)
387 case CODEC_ID_PCM_U24BE
:
388 DECODE(uint32_t, be24
, src
, samples
, n
, 8, 0x800000)
390 case CODEC_ID_PCM_S24DAUD
:
392 uint32_t v
= bytestream_get_be24(&src
);
393 v
>>= 4; // sync flags are here
394 *samples
++ = ff_reverse
[(v
>> 8) & 0xff] +
395 (ff_reverse
[v
& 0xff] << 8);
398 case CODEC_ID_PCM_S16LE_PLANAR
:
399 n
/= avctx
->channels
;
400 for(c
=0;c
<avctx
->channels
;c
++)
401 src2
[c
] = &src
[c
*n
*2];
403 for(c
=0;c
<avctx
->channels
;c
++)
404 *samples
++ = bytestream_get_le16(&src2
[c
]);
405 src
= src2
[avctx
->channels
-1];
407 case CODEC_ID_PCM_U16LE
:
408 DECODE(uint16_t, le16
, src
, samples
, n
, 0, 0x8000)
410 case CODEC_ID_PCM_U16BE
:
411 DECODE(uint16_t, be16
, src
, samples
, n
, 0, 0x8000)
413 case CODEC_ID_PCM_S8
:
414 dstu8
= (uint8_t*)samples
;
416 *dstu8
++ = *src
++ + 128;
418 samples
= (short*)dstu8
;
421 case CODEC_ID_PCM_F64LE
:
422 DECODE(int64_t, le64
, src
, samples
, n
, 0, 0)
424 case CODEC_ID_PCM_S32LE
:
425 case CODEC_ID_PCM_F32LE
:
426 DECODE(int32_t, le32
, src
, samples
, n
, 0, 0)
428 case CODEC_ID_PCM_S16LE
:
429 DECODE(int16_t, le16
, src
, samples
, n
, 0, 0)
431 case CODEC_ID_PCM_F64BE
:
432 case CODEC_ID_PCM_F32BE
:
433 case CODEC_ID_PCM_S32BE
:
434 case CODEC_ID_PCM_S16BE
:
436 case CODEC_ID_PCM_F64BE
:
437 DECODE(int64_t, be64
, src
, samples
, n
, 0, 0)
439 case CODEC_ID_PCM_F32BE
:
440 case CODEC_ID_PCM_S32BE
:
441 DECODE(int32_t, be32
, src
, samples
, n
, 0, 0)
443 case CODEC_ID_PCM_S16BE
:
444 DECODE(int16_t, be16
, src
, samples
, n
, 0, 0)
446 case CODEC_ID_PCM_F64LE
:
447 case CODEC_ID_PCM_F32LE
:
448 case CODEC_ID_PCM_S32LE
:
449 case CODEC_ID_PCM_S16LE
:
450 #endif /* WORDS_BIGENDIAN */
451 case CODEC_ID_PCM_U8
:
452 memcpy(samples
, src
, n
*sample_size
);
453 src
+= n
*sample_size
;
454 samples
= (short*)((uint8_t*)data
+ n
*sample_size
);
456 case CODEC_ID_PCM_ZORK
:
464 case CODEC_ID_PCM_ALAW
:
465 case CODEC_ID_PCM_MULAW
:
467 *samples
++ = s
->table
[*src
++];
470 case CODEC_ID_PCM_DVD
:
472 n
/= avctx
->channels
;
473 switch (avctx
->bits_per_coded_sample
) {
479 *dst_int32_t
++ = (bytestream_get_be16(&src
) << 16) + ((*src8
&0xf0) << 8);
480 *dst_int32_t
++ = (bytestream_get_be16(&src
) << 16) + ((*src8
++ &0x0f) << 12);
490 *dst_int32_t
++ = (bytestream_get_be16(&src
) << 16) + ((*src8
++) << 8);
491 *dst_int32_t
++ = (bytestream_get_be16(&src
) << 16) + ((*src8
++) << 8);
497 av_log(avctx
, AV_LOG_ERROR
, "PCM DVD unsupported sample depth\n");
501 samples
= (short *) dst_int32_t
;
506 *data_size
= (uint8_t *)samples
- (uint8_t *)data
;
510 #ifdef CONFIG_ENCODERS
511 #define PCM_ENCODER(id,sample_fmt_,name,long_name_) \
512 AVCodec name ## _encoder = { \
521 .sample_fmts = (enum SampleFormat[]){sample_fmt_,SAMPLE_FMT_NONE}, \
522 .long_name = NULL_IF_CONFIG_SMALL(long_name_), \
525 #define PCM_ENCODER(id,sample_fmt_,name,long_name_)
528 #ifdef CONFIG_DECODERS
529 #define PCM_DECODER(id,sample_fmt_,name,long_name_) \
530 AVCodec name ## _decoder = { \
539 .sample_fmts = (enum SampleFormat[]){sample_fmt_,SAMPLE_FMT_NONE}, \
540 .long_name = NULL_IF_CONFIG_SMALL(long_name_), \
543 #define PCM_DECODER(id,sample_fmt_,name,long_name_)
546 #define PCM_CODEC(id, sample_fmt_, name, long_name_) \
547 PCM_ENCODER(id,sample_fmt_,name,long_name_) PCM_DECODER(id,sample_fmt_,name,long_name_)
549 /* Note: Do not forget to add new entries to the Makefile as well. */
550 PCM_CODEC (CODEC_ID_PCM_ALAW
, SAMPLE_FMT_S16
, pcm_alaw
, "A-law PCM");
551 PCM_CODEC (CODEC_ID_PCM_DVD
, SAMPLE_FMT_S32
, pcm_dvd
, "signed 20|24-bit big-endian PCM");
552 PCM_CODEC (CODEC_ID_PCM_F32BE
, SAMPLE_FMT_FLT
, pcm_f32be
, "32-bit floating point big-endian PCM");
553 PCM_CODEC (CODEC_ID_PCM_F32LE
, SAMPLE_FMT_FLT
, pcm_f32le
, "32-bit floating point little-endian PCM");
554 PCM_CODEC (CODEC_ID_PCM_F64BE
, SAMPLE_FMT_DBL
, pcm_f64be
, "64-bit floating point big-endian PCM");
555 PCM_CODEC (CODEC_ID_PCM_F64LE
, SAMPLE_FMT_DBL
, pcm_f64le
, "64-bit floating point little-endian PCM");
556 PCM_CODEC (CODEC_ID_PCM_MULAW
, SAMPLE_FMT_S16
, pcm_mulaw
, "mu-law PCM");
557 PCM_CODEC (CODEC_ID_PCM_S8
, SAMPLE_FMT_U8
, pcm_s8
, "signed 8-bit PCM");
558 PCM_CODEC (CODEC_ID_PCM_S16BE
, SAMPLE_FMT_S16
, pcm_s16be
, "signed 16-bit big-endian PCM");
559 PCM_CODEC (CODEC_ID_PCM_S16LE
, SAMPLE_FMT_S16
, pcm_s16le
, "signed 16-bit little-endian PCM");
560 PCM_DECODER(CODEC_ID_PCM_S16LE_PLANAR
, SAMPLE_FMT_S16
, pcm_s16le_planar
, "16-bit little-endian planar PCM");
561 PCM_CODEC (CODEC_ID_PCM_S24BE
, SAMPLE_FMT_S32
, pcm_s24be
, "signed 24-bit big-endian PCM");
562 PCM_CODEC (CODEC_ID_PCM_S24DAUD
, SAMPLE_FMT_S16
, pcm_s24daud
, "D-Cinema audio signed 24-bit PCM");
563 PCM_CODEC (CODEC_ID_PCM_S24LE
, SAMPLE_FMT_S32
, pcm_s24le
, "signed 24-bit little-endian PCM");
564 PCM_CODEC (CODEC_ID_PCM_S32BE
, SAMPLE_FMT_S32
, pcm_s32be
, "signed 32-bit big-endian PCM");
565 PCM_CODEC (CODEC_ID_PCM_S32LE
, SAMPLE_FMT_S32
, pcm_s32le
, "signed 32-bit little-endian PCM");
566 PCM_CODEC (CODEC_ID_PCM_U8
, SAMPLE_FMT_U8
, pcm_u8
, "unsigned 8-bit PCM");
567 PCM_CODEC (CODEC_ID_PCM_U16BE
, SAMPLE_FMT_S16
, pcm_u16be
, "unsigned 16-bit big-endian PCM");
568 PCM_CODEC (CODEC_ID_PCM_U16LE
, SAMPLE_FMT_S16
, pcm_u16le
, "unsigned 16-bit little-endian PCM");
569 PCM_CODEC (CODEC_ID_PCM_U24BE
, SAMPLE_FMT_S32
, pcm_u24be
, "unsigned 24-bit big-endian PCM");
570 PCM_CODEC (CODEC_ID_PCM_U24LE
, SAMPLE_FMT_S32
, pcm_u24le
, "unsigned 24-bit little-endian PCM");
571 PCM_CODEC (CODEC_ID_PCM_U32BE
, SAMPLE_FMT_S32
, pcm_u32be
, "unsigned 32-bit big-endian PCM");
572 PCM_CODEC (CODEC_ID_PCM_U32LE
, SAMPLE_FMT_S32
, pcm_u32le
, "unsigned 32-bit little-endian PCM");
573 PCM_CODEC (CODEC_ID_PCM_ZORK
, SAMPLE_FMT_S16
, pcm_zork
, "Zork PCM");