pcm.c
Go to the documentation of this file.
1 /*
2  * PCM codecs
3  * Copyright (c) 2001 Fabrice Bellard
4  *
5  * This file is part of Libav.
6  *
7  * Libav 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.
11  *
12  * Libav 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.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21 
27 #include "avcodec.h"
28 #include "libavutil/common.h" /* for av_reverse */
29 #include "bytestream.h"
30 #include "internal.h"
31 #include "pcm_tablegen.h"
32 
33 #define MAX_CHANNELS 64
34 
36 {
37  avctx->frame_size = 0;
38  switch(avctx->codec->id) {
39  case CODEC_ID_PCM_ALAW:
41  break;
42  case CODEC_ID_PCM_MULAW:
44  break;
45  default:
46  break;
47  }
48 
50  avctx->block_align = avctx->channels * avctx->bits_per_coded_sample/8;
52  avctx->coded_frame->key_frame= 1;
53 
54  return 0;
55 }
56 
58 {
59  av_freep(&avctx->coded_frame);
60 
61  return 0;
62 }
63 
74 #define ENCODE(type, endian, src, dst, n, shift, offset) \
75  samples_##type = (const type*) src; \
76  for(;n>0;n--) { \
77  register type v = (*samples_##type++ >> shift) + offset; \
78  bytestream_put_##endian(&dst, v); \
79  }
80 
81 static int pcm_encode_frame(AVCodecContext *avctx, AVPacket *avpkt,
82  const AVFrame *frame, int *got_packet_ptr)
83 {
84  int n, sample_size, v, ret;
85  const short *samples;
86  unsigned char *dst;
87  const uint8_t *srcu8;
88  const int16_t *samples_int16_t;
89  const int32_t *samples_int32_t;
90  const int64_t *samples_int64_t;
91  const uint16_t *samples_uint16_t;
92  const uint32_t *samples_uint32_t;
93 
94  sample_size = av_get_bits_per_sample(avctx->codec->id)/8;
95  n = frame->nb_samples * avctx->channels;
96  samples = (const short *)frame->data[0];
97 
98  if ((ret = ff_alloc_packet(avpkt, n * sample_size))) {
99  av_log(avctx, AV_LOG_ERROR, "Error getting output packet\n");
100  return ret;
101  }
102  dst = avpkt->data;
103 
104  switch(avctx->codec->id) {
105  case CODEC_ID_PCM_U32LE:
106  ENCODE(uint32_t, le32, samples, dst, n, 0, 0x80000000)
107  break;
108  case CODEC_ID_PCM_U32BE:
109  ENCODE(uint32_t, be32, samples, dst, n, 0, 0x80000000)
110  break;
111  case CODEC_ID_PCM_S24LE:
112  ENCODE(int32_t, le24, samples, dst, n, 8, 0)
113  break;
114  case CODEC_ID_PCM_S24BE:
115  ENCODE(int32_t, be24, samples, dst, n, 8, 0)
116  break;
117  case CODEC_ID_PCM_U24LE:
118  ENCODE(uint32_t, le24, samples, dst, n, 8, 0x800000)
119  break;
120  case CODEC_ID_PCM_U24BE:
121  ENCODE(uint32_t, be24, samples, dst, n, 8, 0x800000)
122  break;
124  for(;n>0;n--) {
125  uint32_t tmp = av_reverse[(*samples >> 8) & 0xff] +
126  (av_reverse[*samples & 0xff] << 8);
127  tmp <<= 4; // sync flags would go here
128  bytestream_put_be24(&dst, tmp);
129  samples++;
130  }
131  break;
132  case CODEC_ID_PCM_U16LE:
133  ENCODE(uint16_t, le16, samples, dst, n, 0, 0x8000)
134  break;
135  case CODEC_ID_PCM_U16BE:
136  ENCODE(uint16_t, be16, samples, dst, n, 0, 0x8000)
137  break;
138  case CODEC_ID_PCM_S8:
139  srcu8 = frame->data[0];
140  for(;n>0;n--) {
141  v = *srcu8++;
142  *dst++ = v - 128;
143  }
144  break;
145 #if HAVE_BIGENDIAN
146  case CODEC_ID_PCM_F64LE:
147  ENCODE(int64_t, le64, samples, dst, n, 0, 0)
148  break;
149  case CODEC_ID_PCM_S32LE:
150  case CODEC_ID_PCM_F32LE:
151  ENCODE(int32_t, le32, samples, dst, n, 0, 0)
152  break;
153  case CODEC_ID_PCM_S16LE:
154  ENCODE(int16_t, le16, samples, dst, n, 0, 0)
155  break;
156  case CODEC_ID_PCM_F64BE:
157  case CODEC_ID_PCM_F32BE:
158  case CODEC_ID_PCM_S32BE:
159  case CODEC_ID_PCM_S16BE:
160 #else
161  case CODEC_ID_PCM_F64BE:
162  ENCODE(int64_t, be64, samples, dst, n, 0, 0)
163  break;
164  case CODEC_ID_PCM_F32BE:
165  case CODEC_ID_PCM_S32BE:
166  ENCODE(int32_t, be32, samples, dst, n, 0, 0)
167  break;
168  case CODEC_ID_PCM_S16BE:
169  ENCODE(int16_t, be16, samples, dst, n, 0, 0)
170  break;
171  case CODEC_ID_PCM_F64LE:
172  case CODEC_ID_PCM_F32LE:
173  case CODEC_ID_PCM_S32LE:
174  case CODEC_ID_PCM_S16LE:
175 #endif /* HAVE_BIGENDIAN */
176  case CODEC_ID_PCM_U8:
177  memcpy(dst, samples, n*sample_size);
178  dst += n*sample_size;
179  break;
180  case CODEC_ID_PCM_ALAW:
181  for(;n>0;n--) {
182  v = *samples++;
183  *dst++ = linear_to_alaw[(v + 32768) >> 2];
184  }
185  break;
186  case CODEC_ID_PCM_MULAW:
187  for(;n>0;n--) {
188  v = *samples++;
189  *dst++ = linear_to_ulaw[(v + 32768) >> 2];
190  }
191  break;
192  default:
193  return -1;
194  }
195 
196  avpkt->size = frame->nb_samples * avctx->channels * sample_size;
197  *got_packet_ptr = 1;
198  return 0;
199 }
200 
201 typedef struct PCMDecode {
203  short table[256];
204 } PCMDecode;
205 
207 {
208  PCMDecode *s = avctx->priv_data;
209  int i;
210 
211  if (avctx->channels <= 0 || avctx->channels > MAX_CHANNELS) {
212  av_log(avctx, AV_LOG_ERROR, "PCM channels out of bounds\n");
213  return AVERROR(EINVAL);
214  }
215 
216  switch(avctx->codec->id) {
217  case CODEC_ID_PCM_ALAW:
218  for(i=0;i<256;i++)
219  s->table[i] = alaw2linear(i);
220  break;
221  case CODEC_ID_PCM_MULAW:
222  for(i=0;i<256;i++)
223  s->table[i] = ulaw2linear(i);
224  break;
225  default:
226  break;
227  }
228 
229  avctx->sample_fmt = avctx->codec->sample_fmts[0];
230 
231  if (avctx->sample_fmt == AV_SAMPLE_FMT_S32)
233 
235  avctx->coded_frame = &s->frame;
236 
237  return 0;
238 }
239 
250 #define DECODE(size, endian, src, dst, n, shift, offset) \
251  for(;n>0;n--) { \
252  uint##size##_t v = bytestream_get_##endian(&src); \
253  AV_WN##size##A(dst, (v - offset) << shift); \
254  dst += size / 8; \
255  }
256 
257 static int pcm_decode_frame(AVCodecContext *avctx, void *data,
258  int *got_frame_ptr, AVPacket *avpkt)
259 {
260  const uint8_t *src = avpkt->data;
261  int buf_size = avpkt->size;
262  PCMDecode *s = avctx->priv_data;
263  int sample_size, c, n, ret, samples_per_block;
264  uint8_t *samples;
265  int32_t *dst_int32_t;
266 
267  sample_size = av_get_bits_per_sample(avctx->codec_id)/8;
268 
269  /* av_get_bits_per_sample returns 0 for CODEC_ID_PCM_DVD */
270  samples_per_block = 1;
271  if (avctx->codec->id == CODEC_ID_PCM_DVD) {
272  if (avctx->bits_per_coded_sample != 20 &&
273  avctx->bits_per_coded_sample != 24) {
274  av_log(avctx, AV_LOG_ERROR, "PCM DVD unsupported sample depth\n");
275  return AVERROR(EINVAL);
276  }
277  /* 2 samples are interleaved per block in PCM_DVD */
278  samples_per_block = 2;
279  sample_size = avctx->bits_per_coded_sample * 2 / 8;
280  } else if (avctx->codec_id == CODEC_ID_PCM_LXF) {
281  /* we process 40-bit blocks per channel for LXF */
282  samples_per_block = 2;
283  sample_size = 5;
284  }
285 
286  if (sample_size == 0) {
287  av_log(avctx, AV_LOG_ERROR, "Invalid sample_size\n");
288  return AVERROR(EINVAL);
289  }
290 
291  n = avctx->channels * sample_size;
292 
293  if(n && buf_size % n){
294  if (buf_size < n) {
295  av_log(avctx, AV_LOG_ERROR, "invalid PCM packet\n");
296  return -1;
297  }else
298  buf_size -= buf_size % n;
299  }
300 
301  n = buf_size/sample_size;
302 
303  /* get output buffer */
304  s->frame.nb_samples = n * samples_per_block / avctx->channels;
305  if ((ret = ff_get_buffer(avctx, &s->frame)) < 0) {
306  av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
307  return ret;
308  }
309  samples = s->frame.data[0];
310 
311  switch(avctx->codec->id) {
312  case CODEC_ID_PCM_U32LE:
313  DECODE(32, le32, src, samples, n, 0, 0x80000000)
314  break;
315  case CODEC_ID_PCM_U32BE:
316  DECODE(32, be32, src, samples, n, 0, 0x80000000)
317  break;
318  case CODEC_ID_PCM_S24LE:
319  DECODE(32, le24, src, samples, n, 8, 0)
320  break;
321  case CODEC_ID_PCM_S24BE:
322  DECODE(32, be24, src, samples, n, 8, 0)
323  break;
324  case CODEC_ID_PCM_U24LE:
325  DECODE(32, le24, src, samples, n, 8, 0x800000)
326  break;
327  case CODEC_ID_PCM_U24BE:
328  DECODE(32, be24, src, samples, n, 8, 0x800000)
329  break;
331  for(;n>0;n--) {
332  uint32_t v = bytestream_get_be24(&src);
333  v >>= 4; // sync flags are here
334  AV_WN16A(samples, av_reverse[(v >> 8) & 0xff] +
335  (av_reverse[v & 0xff] << 8));
336  samples += 2;
337  }
338  break;
340  {
341  const uint8_t *src2[MAX_CHANNELS];
342  n /= avctx->channels;
343  for(c=0;c<avctx->channels;c++)
344  src2[c] = &src[c*n*2];
345  for(;n>0;n--)
346  for(c=0;c<avctx->channels;c++) {
347  AV_WN16A(samples, bytestream_get_le16(&src2[c]));
348  samples += 2;
349  }
350  break;
351  }
352  case CODEC_ID_PCM_U16LE:
353  DECODE(16, le16, src, samples, n, 0, 0x8000)
354  break;
355  case CODEC_ID_PCM_U16BE:
356  DECODE(16, be16, src, samples, n, 0, 0x8000)
357  break;
358  case CODEC_ID_PCM_S8:
359  for(;n>0;n--) {
360  *samples++ = *src++ + 128;
361  }
362  break;
363 #if HAVE_BIGENDIAN
364  case CODEC_ID_PCM_F64LE:
365  DECODE(64, le64, src, samples, n, 0, 0)
366  break;
367  case CODEC_ID_PCM_S32LE:
368  case CODEC_ID_PCM_F32LE:
369  DECODE(32, le32, src, samples, n, 0, 0)
370  break;
371  case CODEC_ID_PCM_S16LE:
372  DECODE(16, le16, src, samples, n, 0, 0)
373  break;
374  case CODEC_ID_PCM_F64BE:
375  case CODEC_ID_PCM_F32BE:
376  case CODEC_ID_PCM_S32BE:
377  case CODEC_ID_PCM_S16BE:
378 #else
379  case CODEC_ID_PCM_F64BE:
380  DECODE(64, be64, src, samples, n, 0, 0)
381  break;
382  case CODEC_ID_PCM_F32BE:
383  case CODEC_ID_PCM_S32BE:
384  DECODE(32, be32, src, samples, n, 0, 0)
385  break;
386  case CODEC_ID_PCM_S16BE:
387  DECODE(16, be16, src, samples, n, 0, 0)
388  break;
389  case CODEC_ID_PCM_F64LE:
390  case CODEC_ID_PCM_F32LE:
391  case CODEC_ID_PCM_S32LE:
392  case CODEC_ID_PCM_S16LE:
393 #endif /* HAVE_BIGENDIAN */
394  case CODEC_ID_PCM_U8:
395  memcpy(samples, src, n*sample_size);
396  break;
397  case CODEC_ID_PCM_ZORK:
398  for (; n > 0; n--) {
399  int v = *src++;
400  if (v < 128)
401  v = 128 - v;
402  *samples++ = v;
403  }
404  break;
405  case CODEC_ID_PCM_ALAW:
406  case CODEC_ID_PCM_MULAW:
407  for(;n>0;n--) {
408  AV_WN16A(samples, s->table[*src++]);
409  samples += 2;
410  }
411  break;
412  case CODEC_ID_PCM_DVD:
413  {
414  const uint8_t *src8;
415  dst_int32_t = (int32_t *)s->frame.data[0];
416  n /= avctx->channels;
417  switch (avctx->bits_per_coded_sample) {
418  case 20:
419  while (n--) {
420  c = avctx->channels;
421  src8 = src + 4*c;
422  while (c--) {
423  *dst_int32_t++ = (bytestream_get_be16(&src) << 16) + ((*src8 &0xf0) << 8);
424  *dst_int32_t++ = (bytestream_get_be16(&src) << 16) + ((*src8++ &0x0f) << 12);
425  }
426  src = src8;
427  }
428  break;
429  case 24:
430  while (n--) {
431  c = avctx->channels;
432  src8 = src + 4*c;
433  while (c--) {
434  *dst_int32_t++ = (bytestream_get_be16(&src) << 16) + ((*src8++) << 8);
435  *dst_int32_t++ = (bytestream_get_be16(&src) << 16) + ((*src8++) << 8);
436  }
437  src = src8;
438  }
439  break;
440  }
441  break;
442  }
443  case CODEC_ID_PCM_LXF:
444  {
445  int i;
446  const uint8_t *src8;
447  dst_int32_t = (int32_t *)s->frame.data[0];
448  n /= avctx->channels;
449  //unpack and de-planerize
450  for (i = 0; i < n; i++) {
451  for (c = 0, src8 = src + i*5; c < avctx->channels; c++, src8 += n*5) {
452  //extract low 20 bits and expand to 32 bits
453  *dst_int32_t++ = (src8[2] << 28) | (src8[1] << 20) | (src8[0] << 12) |
454  ((src8[2] & 0xF) << 8) | src8[1];
455  }
456 
457  for (c = 0, src8 = src + i*5; c < avctx->channels; c++, src8 += n*5) {
458  //extract high 20 bits and expand to 32 bits
459  *dst_int32_t++ = (src8[4] << 24) | (src8[3] << 16) |
460  ((src8[2] & 0xF0) << 8) | (src8[4] << 4) | (src8[3] >> 4);
461  }
462  }
463  break;
464  }
465  default:
466  return -1;
467  }
468 
469  *got_frame_ptr = 1;
470  *(AVFrame *)data = s->frame;
471 
472  return buf_size;
473 }
474 
475 #if CONFIG_ENCODERS
476 #define PCM_ENCODER(id_,sample_fmt_,name_,long_name_) \
477 AVCodec ff_ ## name_ ## _encoder = { \
478  .name = #name_, \
479  .type = AVMEDIA_TYPE_AUDIO, \
480  .id = id_, \
481  .init = pcm_encode_init, \
482  .encode2 = pcm_encode_frame, \
483  .close = pcm_encode_close, \
484  .capabilities = CODEC_CAP_VARIABLE_FRAME_SIZE, \
485  .sample_fmts = (const enum AVSampleFormat[]){sample_fmt_,AV_SAMPLE_FMT_NONE}, \
486  .long_name = NULL_IF_CONFIG_SMALL(long_name_), \
487 }
488 #else
489 #define PCM_ENCODER(id,sample_fmt_,name,long_name_)
490 #endif
491 
492 #if CONFIG_DECODERS
493 #define PCM_DECODER(id_,sample_fmt_,name_,long_name_) \
494 AVCodec ff_ ## name_ ## _decoder = { \
495  .name = #name_, \
496  .type = AVMEDIA_TYPE_AUDIO, \
497  .id = id_, \
498  .priv_data_size = sizeof(PCMDecode), \
499  .init = pcm_decode_init, \
500  .decode = pcm_decode_frame, \
501  .capabilities = CODEC_CAP_DR1, \
502  .sample_fmts = (const enum AVSampleFormat[]){sample_fmt_,AV_SAMPLE_FMT_NONE}, \
503  .long_name = NULL_IF_CONFIG_SMALL(long_name_), \
504 }
505 #else
506 #define PCM_DECODER(id,sample_fmt_,name,long_name_)
507 #endif
508 
509 #define PCM_CODEC(id, sample_fmt_, name, long_name_) \
510  PCM_ENCODER(id,sample_fmt_,name,long_name_); PCM_DECODER(id,sample_fmt_,name,long_name_)
511 
512 /* Note: Do not forget to add new entries to the Makefile as well. */
513 PCM_CODEC (CODEC_ID_PCM_ALAW, AV_SAMPLE_FMT_S16, pcm_alaw, "PCM A-law");
514 PCM_DECODER(CODEC_ID_PCM_DVD, AV_SAMPLE_FMT_S32, pcm_dvd, "PCM signed 20|24-bit big-endian");
515 PCM_CODEC (CODEC_ID_PCM_F32BE, AV_SAMPLE_FMT_FLT, pcm_f32be, "PCM 32-bit floating point big-endian");
516 PCM_CODEC (CODEC_ID_PCM_F32LE, AV_SAMPLE_FMT_FLT, pcm_f32le, "PCM 32-bit floating point little-endian");
517 PCM_CODEC (CODEC_ID_PCM_F64BE, AV_SAMPLE_FMT_DBL, pcm_f64be, "PCM 64-bit floating point big-endian");
518 PCM_CODEC (CODEC_ID_PCM_F64LE, AV_SAMPLE_FMT_DBL, pcm_f64le, "PCM 64-bit floating point little-endian");
519 PCM_DECODER(CODEC_ID_PCM_LXF, AV_SAMPLE_FMT_S32, pcm_lxf, "PCM signed 20-bit little-endian planar");
520 PCM_CODEC (CODEC_ID_PCM_MULAW, AV_SAMPLE_FMT_S16, pcm_mulaw, "PCM mu-law");
521 PCM_CODEC (CODEC_ID_PCM_S8, AV_SAMPLE_FMT_U8, pcm_s8, "PCM signed 8-bit");
522 PCM_CODEC (CODEC_ID_PCM_S16BE, AV_SAMPLE_FMT_S16, pcm_s16be, "PCM signed 16-bit big-endian");
523 PCM_CODEC (CODEC_ID_PCM_S16LE, AV_SAMPLE_FMT_S16, pcm_s16le, "PCM signed 16-bit little-endian");
524 PCM_DECODER(CODEC_ID_PCM_S16LE_PLANAR, AV_SAMPLE_FMT_S16, pcm_s16le_planar, "PCM 16-bit little-endian planar");
525 PCM_CODEC (CODEC_ID_PCM_S24BE, AV_SAMPLE_FMT_S32, pcm_s24be, "PCM signed 24-bit big-endian");
526 PCM_CODEC (CODEC_ID_PCM_S24DAUD, AV_SAMPLE_FMT_S16, pcm_s24daud, "PCM D-Cinema audio signed 24-bit");
527 PCM_CODEC (CODEC_ID_PCM_S24LE, AV_SAMPLE_FMT_S32, pcm_s24le, "PCM signed 24-bit little-endian");
528 PCM_CODEC (CODEC_ID_PCM_S32BE, AV_SAMPLE_FMT_S32, pcm_s32be, "PCM signed 32-bit big-endian");
529 PCM_CODEC (CODEC_ID_PCM_S32LE, AV_SAMPLE_FMT_S32, pcm_s32le, "PCM signed 32-bit little-endian");
530 PCM_CODEC (CODEC_ID_PCM_U8, AV_SAMPLE_FMT_U8, pcm_u8, "PCM unsigned 8-bit");
531 PCM_CODEC (CODEC_ID_PCM_U16BE, AV_SAMPLE_FMT_S16, pcm_u16be, "PCM unsigned 16-bit big-endian");
532 PCM_CODEC (CODEC_ID_PCM_U16LE, AV_SAMPLE_FMT_S16, pcm_u16le, "PCM unsigned 16-bit little-endian");
533 PCM_CODEC (CODEC_ID_PCM_U24BE, AV_SAMPLE_FMT_S32, pcm_u24be, "PCM unsigned 24-bit big-endian");
534 PCM_CODEC (CODEC_ID_PCM_U24LE, AV_SAMPLE_FMT_S32, pcm_u24le, "PCM unsigned 24-bit little-endian");
535 PCM_CODEC (CODEC_ID_PCM_U32BE, AV_SAMPLE_FMT_S32, pcm_u32be, "PCM unsigned 32-bit big-endian");
536 PCM_CODEC (CODEC_ID_PCM_U32LE, AV_SAMPLE_FMT_S32, pcm_u32le, "PCM unsigned 32-bit little-endian");
537 PCM_DECODER(CODEC_ID_PCM_ZORK, AV_SAMPLE_FMT_U8, pcm_zork, "PCM Zork");