yading@10: /*
yading@10:  * LPCM codecs for PCM formats found in MPEG streams
yading@10:  * Copyright (c) 2009 Christian Schmidt
yading@10:  *
yading@10:  * This file is part of FFmpeg.
yading@10:  *
yading@10:  * FFmpeg is free software; you can redistribute it and/or
yading@10:  * modify it under the terms of the GNU Lesser General Public
yading@10:  * License as published by the Free Software Foundation; either
yading@10:  * version 2.1 of the License, or (at your option) any later version.
yading@10:  *
yading@10:  * FFmpeg is distributed in the hope that it will be useful,
yading@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@10:  * Lesser General Public License for more details.
yading@10:  *
yading@10:  * You should have received a copy of the GNU Lesser General Public
yading@10:  * License along with FFmpeg; if not, write to the Free Software
yading@10:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@10:  */
yading@10: 
yading@10: /**
yading@10:  * @file
yading@10:  * PCM codecs for encodings found in MPEG streams (DVD/Blu-ray)
yading@10:  */
yading@10: 
yading@10: #include "libavutil/channel_layout.h"
yading@10: #include "avcodec.h"
yading@10: #include "bytestream.h"
yading@10: #include "internal.h"
yading@10: 
yading@10: /*
yading@10:  * Channel Mapping according to
yading@10:  * Blu-ray Disc Read-Only Format Version 1
yading@10:  * Part 3: Audio Visual Basic Specifications
yading@10:  * mono     M1    X
yading@10:  * stereo   L     R
yading@10:  * 3/0      L     R    C    X
yading@10:  * 2/1      L     R    S    X
yading@10:  * 3/1      L     R    C    S
yading@10:  * 2/2      L     R    LS   RS
yading@10:  * 3/2      L     R    C    LS    RS    X
yading@10:  * 3/2+lfe  L     R    C    LS    RS    lfe
yading@10:  * 3/4      L     R    C    LS    Rls   Rrs  RS   X
yading@10:  * 3/4+lfe  L     R    C    LS    Rls   Rrs  RS   lfe
yading@10:  */
yading@10: 
yading@10: /**
yading@10:  * Parse the header of a LPCM frame read from a MPEG-TS stream
yading@10:  * @param avctx the codec context
yading@10:  * @param header pointer to the first four bytes of the data packet
yading@10:  */
yading@10: static int pcm_bluray_parse_header(AVCodecContext *avctx,
yading@10:                                    const uint8_t *header)
yading@10: {
yading@10:     static const uint8_t bits_per_samples[4] = { 0, 16, 20, 24 };
yading@10:     static const uint32_t channel_layouts[16] = {
yading@10:         0, AV_CH_LAYOUT_MONO, 0, AV_CH_LAYOUT_STEREO, AV_CH_LAYOUT_SURROUND,
yading@10:         AV_CH_LAYOUT_2_1, AV_CH_LAYOUT_4POINT0, AV_CH_LAYOUT_2_2, AV_CH_LAYOUT_5POINT0,
yading@10:         AV_CH_LAYOUT_5POINT1, AV_CH_LAYOUT_7POINT0, AV_CH_LAYOUT_7POINT1, 0, 0, 0, 0
yading@10:     };
yading@10:     static const uint8_t channels[16] = {
yading@10:         0, 1, 0, 2, 3, 3, 4, 4, 5, 6, 7, 8, 0, 0, 0, 0
yading@10:     };
yading@10:     uint8_t channel_layout = header[2] >> 4;
yading@10: 
yading@10:     if (avctx->debug & FF_DEBUG_PICT_INFO)
yading@10:         av_dlog(avctx, "pcm_bluray_parse_header: header = %02x%02x%02x%02x\n",
yading@10:                 header[0], header[1], header[2], header[3]);
yading@10: 
yading@10:     /* get the sample depth and derive the sample format from it */
yading@10:     avctx->bits_per_coded_sample = bits_per_samples[header[3] >> 6];
yading@10:     if (!(avctx->bits_per_coded_sample == 16 || avctx->bits_per_coded_sample == 24)) {
yading@10:         av_log(avctx, AV_LOG_ERROR, "unsupported sample depth (%d)\n", avctx->bits_per_coded_sample);
yading@10:         return -1;
yading@10:     }
yading@10:     avctx->sample_fmt = avctx->bits_per_coded_sample == 16 ? AV_SAMPLE_FMT_S16 :
yading@10:                                                              AV_SAMPLE_FMT_S32;
yading@10:     if (avctx->sample_fmt == AV_SAMPLE_FMT_S32)
yading@10:         avctx->bits_per_raw_sample = avctx->bits_per_coded_sample;
yading@10: 
yading@10:     /* get the sample rate. Not all values are used. */
yading@10:     switch (header[2] & 0x0f) {
yading@10:     case 1:
yading@10:         avctx->sample_rate = 48000;
yading@10:         break;
yading@10:     case 4:
yading@10:         avctx->sample_rate = 96000;
yading@10:         break;
yading@10:     case 5:
yading@10:         avctx->sample_rate = 192000;
yading@10:         break;
yading@10:     default:
yading@10:         avctx->sample_rate = 0;
yading@10:         av_log(avctx, AV_LOG_ERROR, "reserved sample rate (%d)\n",
yading@10:                header[2] & 0x0f);
yading@10:         return -1;
yading@10:     }
yading@10: 
yading@10:     /*
yading@10:      * get the channel number (and mapping). Not all values are used.
yading@10:      * It must be noted that the number of channels in the MPEG stream can
yading@10:      * differ from the actual meaningful number, e.g. mono audio still has two
yading@10:      * channels, one being empty.
yading@10:      */
yading@10:     avctx->channel_layout  = channel_layouts[channel_layout];
yading@10:     avctx->channels        =        channels[channel_layout];
yading@10:     if (!avctx->channels) {
yading@10:         av_log(avctx, AV_LOG_ERROR, "reserved channel configuration (%d)\n",
yading@10:                channel_layout);
yading@10:         return -1;
yading@10:     }
yading@10: 
yading@10:     avctx->bit_rate = FFALIGN(avctx->channels, 2) * avctx->sample_rate *
yading@10:                       avctx->bits_per_coded_sample;
yading@10: 
yading@10:     if (avctx->debug & FF_DEBUG_PICT_INFO)
yading@10:         av_dlog(avctx,
yading@10:                 "pcm_bluray_parse_header: %d channels, %d bits per sample, %d Hz, %d bit/s\n",
yading@10:                 avctx->channels, avctx->bits_per_coded_sample,
yading@10:                 avctx->sample_rate, avctx->bit_rate);
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static int pcm_bluray_decode_frame(AVCodecContext *avctx, void *data,
yading@10:                                    int *got_frame_ptr, AVPacket *avpkt)
yading@10: {
yading@10:     AVFrame *frame     = data;
yading@10:     const uint8_t *src = avpkt->data;
yading@10:     int buf_size = avpkt->size;
yading@10:     GetByteContext gb;
yading@10:     int num_source_channels, channel, retval;
yading@10:     int sample_size, samples;
yading@10:     int16_t *dst16;
yading@10:     int32_t *dst32;
yading@10: 
yading@10:     if (buf_size < 4) {
yading@10:         av_log(avctx, AV_LOG_ERROR, "PCM packet too small\n");
yading@10:         return -1;
yading@10:     }
yading@10: 
yading@10:     if (pcm_bluray_parse_header(avctx, src))
yading@10:         return -1;
yading@10:     src += 4;
yading@10:     buf_size -= 4;
yading@10: 
yading@10:     bytestream2_init(&gb, src, buf_size);
yading@10: 
yading@10:     /* There's always an even number of channels in the source */
yading@10:     num_source_channels = FFALIGN(avctx->channels, 2);
yading@10:     sample_size = (num_source_channels * (avctx->sample_fmt == AV_SAMPLE_FMT_S16 ? 16 : 24)) >> 3;
yading@10:     samples = buf_size / sample_size;
yading@10: 
yading@10:     /* get output buffer */
yading@10:     frame->nb_samples = samples;
yading@10:     if ((retval = ff_get_buffer(avctx, frame, 0)) < 0)
yading@10:         return retval;
yading@10:     dst16 = (int16_t *)frame->data[0];
yading@10:     dst32 = (int32_t *)frame->data[0];
yading@10: 
yading@10:     if (samples) {
yading@10:         switch (avctx->channel_layout) {
yading@10:             /* cases with same number of source and coded channels */
yading@10:         case AV_CH_LAYOUT_STEREO:
yading@10:         case AV_CH_LAYOUT_4POINT0:
yading@10:         case AV_CH_LAYOUT_2_2:
yading@10:             samples *= num_source_channels;
yading@10:             if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
yading@10: #if HAVE_BIGENDIAN
yading@10:                 bytestream2_get_buffer(&gb, dst16, buf_size);
yading@10: #else
yading@10:                 do {
yading@10:                     *dst16++ = bytestream2_get_be16u(&gb);
yading@10:                 } while (--samples);
yading@10: #endif
yading@10:             } else {
yading@10:                 do {
yading@10:                     *dst32++ = bytestream2_get_be24u(&gb) << 8;
yading@10:                 } while (--samples);
yading@10:             }
yading@10:             break;
yading@10:         /* cases where number of source channels = coded channels + 1 */
yading@10:         case AV_CH_LAYOUT_MONO:
yading@10:         case AV_CH_LAYOUT_SURROUND:
yading@10:         case AV_CH_LAYOUT_2_1:
yading@10:         case AV_CH_LAYOUT_5POINT0:
yading@10:             if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
yading@10:                 do {
yading@10: #if HAVE_BIGENDIAN
yading@10:                     bytestream2_get_buffer(&gb, dst16, avctx->channels * 2);
yading@10:                     dst16 += avctx->channels;
yading@10: #else
yading@10:                     channel = avctx->channels;
yading@10:                     do {
yading@10:                         *dst16++ = bytestream2_get_be16u(&gb);
yading@10:                     } while (--channel);
yading@10: #endif
yading@10:                     bytestream2_skip(&gb, 2);
yading@10:                 } while (--samples);
yading@10:             } else {
yading@10:                 do {
yading@10:                     channel = avctx->channels;
yading@10:                     do {
yading@10:                         *dst32++ = bytestream2_get_be24u(&gb) << 8;
yading@10:                     } while (--channel);
yading@10:                     bytestream2_skip(&gb, 3);
yading@10:                 } while (--samples);
yading@10:             }
yading@10:             break;
yading@10:             /* remapping: L, R, C, LBack, RBack, LF */
yading@10:         case AV_CH_LAYOUT_5POINT1:
yading@10:             if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
yading@10:                 do {
yading@10:                     dst16[0] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[1] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[2] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[4] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[5] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[3] = bytestream2_get_be16u(&gb);
yading@10:                     dst16 += 6;
yading@10:                 } while (--samples);
yading@10:             } else {
yading@10:                 do {
yading@10:                     dst32[0] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[1] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[2] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[4] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[5] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[3] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32 += 6;
yading@10:                 } while (--samples);
yading@10:             }
yading@10:             break;
yading@10:             /* remapping: L, R, C, LSide, LBack, RBack, RSide, <unused> */
yading@10:         case AV_CH_LAYOUT_7POINT0:
yading@10:             if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
yading@10:                 do {
yading@10:                     dst16[0] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[1] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[2] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[5] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[3] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[4] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[6] = bytestream2_get_be16u(&gb);
yading@10:                     dst16 += 7;
yading@10:                     bytestream2_skip(&gb, 2);
yading@10:                 } while (--samples);
yading@10:             } else {
yading@10:                 do {
yading@10:                     dst32[0] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[1] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[2] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[5] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[3] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[4] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[6] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32 += 7;
yading@10:                     bytestream2_skip(&gb, 3);
yading@10:                 } while (--samples);
yading@10:             }
yading@10:             break;
yading@10:             /* remapping: L, R, C, LSide, LBack, RBack, RSide, LF */
yading@10:         case AV_CH_LAYOUT_7POINT1:
yading@10:             if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
yading@10:                 do {
yading@10:                     dst16[0] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[1] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[2] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[6] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[4] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[5] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[7] = bytestream2_get_be16u(&gb);
yading@10:                     dst16[3] = bytestream2_get_be16u(&gb);
yading@10:                     dst16 += 8;
yading@10:                 } while (--samples);
yading@10:             } else {
yading@10:                 do {
yading@10:                     dst32[0] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[1] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[2] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[6] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[4] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[5] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[7] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32[3] = bytestream2_get_be24u(&gb) << 8;
yading@10:                     dst32 += 8;
yading@10:                 } while (--samples);
yading@10:             }
yading@10:             break;
yading@10:         }
yading@10:     }
yading@10: 
yading@10:     *got_frame_ptr = 1;
yading@10: 
yading@10:     retval = bytestream2_tell(&gb);
yading@10:     if (avctx->debug & FF_DEBUG_BITSTREAM)
yading@10:         av_dlog(avctx, "pcm_bluray_decode_frame: decoded %d -> %d bytes\n",
yading@10:                 retval, buf_size);
yading@10:     return retval + 4;
yading@10: }
yading@10: 
yading@10: AVCodec ff_pcm_bluray_decoder = {
yading@10:     .name           = "pcm_bluray",
yading@10:     .type           = AVMEDIA_TYPE_AUDIO,
yading@10:     .id             = AV_CODEC_ID_PCM_BLURAY,
yading@10:     .decode         = pcm_bluray_decode_frame,
yading@10:     .capabilities   = CODEC_CAP_DR1,
yading@10:     .sample_fmts    = (const enum AVSampleFormat[]){
yading@10:         AV_SAMPLE_FMT_S16, AV_SAMPLE_FMT_S32, AV_SAMPLE_FMT_NONE
yading@10:     },
yading@10:     .long_name      = NULL_IF_CONFIG_SMALL("PCM signed 16|20|24-bit big-endian for Blu-ray media"),
yading@10: };