pcm-bluray.c 11.8 KB
Newer Older
1
/*
2
 * LPCM codecs for PCM format found in Blu-ray PCM streams
3
 * Copyright (c) 2009, 2013 Christian Schmidt
4
 *
5
 * This file is part of Libav.
6
 *
7
 * Libav is free software; you can redistribute it and/or
8 9 10 11
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
12
 * Libav is distributed in the hope that it will be useful,
13 14 15 16 17
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * 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 20 21 22
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

/**
23
 * @file
24
 * PCM codec for Blu-ray PCM audio tracks
25 26
 */

27
#include "libavutil/channel_layout.h"
28 29
#include "avcodec.h"
#include "bytestream.h"
30
#include "internal.h"
31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48

/*
 * Channel Mapping according to
 * Blu-ray Disc Read-Only Format Version 1
 * Part 3: Audio Visual Basic Specifications
 * mono     M1    X
 * stereo   L     R
 * 3/0      L     R    C    X
 * 2/1      L     R    S    X
 * 3/1      L     R    C    S
 * 2/2      L     R    LS   RS
 * 3/2      L     R    C    LS    RS    X
 * 3/2+lfe  L     R    C    LS    RS    lfe
 * 3/4      L     R    C    LS    Rls   Rrs  RS   X
 * 3/4+lfe  L     R    C    LS    Rls   Rrs  RS   lfe
 */

/**
49
 * Parse the header of a LPCM frame read from a Blu-ray MPEG-TS stream
50 51 52 53 54 55 56 57
 * @param avctx the codec context
 * @param header pointer to the first four bytes of the data packet
 */
static int pcm_bluray_parse_header(AVCodecContext *avctx,
                                   const uint8_t *header)
{
    static const uint8_t bits_per_samples[4] = { 0, 16, 20, 24 };
    static const uint32_t channel_layouts[16] = {
58
        0, AV_CH_LAYOUT_MONO, 0, AV_CH_LAYOUT_STEREO, AV_CH_LAYOUT_SURROUND,
59 60 61
        AV_CH_LAYOUT_2_1, AV_CH_LAYOUT_4POINT0, AV_CH_LAYOUT_2_2,
        AV_CH_LAYOUT_5POINT0, AV_CH_LAYOUT_5POINT1, AV_CH_LAYOUT_7POINT0,
        AV_CH_LAYOUT_7POINT1, 0, 0, 0, 0
62 63 64 65 66 67 68
    };
    static const uint8_t channels[16] = {
        0, 1, 0, 2, 3, 3, 4, 4, 5, 6, 7, 8, 0, 0, 0, 0
    };
    uint8_t channel_layout = header[2] >> 4;

    if (avctx->debug & FF_DEBUG_PICT_INFO)
69
        ff_dlog(avctx, "pcm_bluray_parse_header: header = %02x%02x%02x%02x\n",
70 71 72 73 74
                header[0], header[1], header[2], header[3]);

    /* get the sample depth and derive the sample format from it */
    avctx->bits_per_coded_sample = bits_per_samples[header[3] >> 6];
    if (!avctx->bits_per_coded_sample) {
75
        av_log(avctx, AV_LOG_ERROR, "reserved sample depth (0)\n");
76
        return AVERROR_INVALIDDATA;
77
    }
78 79
    avctx->sample_fmt = avctx->bits_per_coded_sample == 16 ? AV_SAMPLE_FMT_S16
                                                           : AV_SAMPLE_FMT_S32;
80
    avctx->bits_per_raw_sample = avctx->bits_per_coded_sample;
81

82
    /* get the sample rate. Not all values are used. */
83 84 85 86 87 88 89 90 91 92 93 94
    switch (header[2] & 0x0f) {
    case 1:
        avctx->sample_rate = 48000;
        break;
    case 4:
        avctx->sample_rate = 96000;
        break;
    case 5:
        avctx->sample_rate = 192000;
        break;
    default:
        avctx->sample_rate = 0;
95
        av_log(avctx, AV_LOG_ERROR, "reserved sample rate (%d)\n",
96
               header[2] & 0x0f);
97
        return AVERROR_INVALIDDATA;
98 99 100
    }

    /*
101
     * get the channel number (and mapping). Not all values are used.
102 103 104 105 106 107 108
     * It must be noted that the number of channels in the MPEG stream can
     * differ from the actual meaningful number, e.g. mono audio still has two
     * channels, one being empty.
     */
    avctx->channel_layout  = channel_layouts[channel_layout];
    avctx->channels        =        channels[channel_layout];
    if (!avctx->channels) {
109
        av_log(avctx, AV_LOG_ERROR, "reserved channel configuration (%d)\n",
110
               channel_layout);
111
        return AVERROR_INVALIDDATA;
112 113
    }

114
    avctx->bit_rate = FFALIGN(avctx->channels, 2) * avctx->sample_rate *
115 116 117
                      avctx->bits_per_coded_sample;

    if (avctx->debug & FF_DEBUG_PICT_INFO)
118
        ff_dlog(avctx,
119
                "pcm_bluray_parse_header: %d channels, %d bits per sample, %d Hz, %d bit/s\n",
120 121 122 123 124
                avctx->channels, avctx->bits_per_coded_sample,
                avctx->sample_rate, avctx->bit_rate);
    return 0;
}

125 126
static int pcm_bluray_decode_frame(AVCodecContext *avctx, void *data,
                                   int *got_frame_ptr, AVPacket *avpkt)
127
{
128
    AVFrame *frame     = data;
129 130
    const uint8_t *src = avpkt->data;
    int buf_size = avpkt->size;
131
    GetByteContext gb;
132
    int num_source_channels, channel, retval;
133 134 135
    int sample_size, samples;
    int16_t *dst16;
    int32_t *dst32;
136 137 138

    if (buf_size < 4) {
        av_log(avctx, AV_LOG_ERROR, "PCM packet too small\n");
139
        return AVERROR_INVALIDDATA;
140 141
    }

142 143
    if ((retval = pcm_bluray_parse_header(avctx, src)))
        return retval;
144 145 146
    src += 4;
    buf_size -= 4;

147 148
    bytestream2_init(&gb, src, buf_size);

149 150
    /* There's always an even number of channels in the source */
    num_source_channels = FFALIGN(avctx->channels, 2);
151 152
    sample_size = (num_source_channels *
                   (avctx->sample_fmt == AV_SAMPLE_FMT_S16 ? 16 : 24)) >> 3;
153 154
    samples = buf_size / sample_size;

155
    /* get output buffer */
156
    frame->nb_samples = samples;
157
    if ((retval = ff_get_buffer(avctx, frame, 0)) < 0) {
158 159
        av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
        return retval;
160
    }
161 162
    dst16 = (int16_t *)frame->data[0];
    dst32 = (int32_t *)frame->data[0];
163 164 165 166

    if (samples) {
        switch (avctx->channel_layout) {
            /* cases with same number of source and coded channels */
167 168 169
        case AV_CH_LAYOUT_STEREO:
        case AV_CH_LAYOUT_4POINT0:
        case AV_CH_LAYOUT_2_2:
170
            samples *= num_source_channels;
171
            if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
172
#if HAVE_BIGENDIAN
173
                bytestream2_get_buffer(&gb, dst16, buf_size);
174 175
#else
                do {
176
                    *dst16++ = bytestream2_get_be16u(&gb);
177 178 179 180
                } while (--samples);
#endif
            } else {
                do {
181
                    *dst32++ = bytestream2_get_be24u(&gb) << 8;
182 183 184 185
                } while (--samples);
            }
            break;
        /* cases where number of source channels = coded channels + 1 */
186 187 188 189
        case AV_CH_LAYOUT_MONO:
        case AV_CH_LAYOUT_SURROUND:
        case AV_CH_LAYOUT_2_1:
        case AV_CH_LAYOUT_5POINT0:
190
            if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
191 192
                do {
#if HAVE_BIGENDIAN
193
                    bytestream2_get_buffer(&gb, dst16, avctx->channels * 2);
194 195 196 197
                    dst16 += avctx->channels;
#else
                    channel = avctx->channels;
                    do {
198
                        *dst16++ = bytestream2_get_be16u(&gb);
199 200
                    } while (--channel);
#endif
201
                    bytestream2_skip(&gb, 2);
202 203 204 205 206
                } while (--samples);
            } else {
                do {
                    channel = avctx->channels;
                    do {
207
                        *dst32++ = bytestream2_get_be24u(&gb) << 8;
208
                    } while (--channel);
209
                    bytestream2_skip(&gb, 3);
210 211 212 213
                } while (--samples);
            }
            break;
            /* remapping: L, R, C, LBack, RBack, LF */
214
        case AV_CH_LAYOUT_5POINT1:
215
            if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
216
                do {
217 218 219 220 221 222
                    dst16[0] = bytestream2_get_be16u(&gb);
                    dst16[1] = bytestream2_get_be16u(&gb);
                    dst16[2] = bytestream2_get_be16u(&gb);
                    dst16[4] = bytestream2_get_be16u(&gb);
                    dst16[5] = bytestream2_get_be16u(&gb);
                    dst16[3] = bytestream2_get_be16u(&gb);
223 224 225 226
                    dst16 += 6;
                } while (--samples);
            } else {
                do {
227 228 229 230 231 232
                    dst32[0] = bytestream2_get_be24u(&gb) << 8;
                    dst32[1] = bytestream2_get_be24u(&gb) << 8;
                    dst32[2] = bytestream2_get_be24u(&gb) << 8;
                    dst32[4] = bytestream2_get_be24u(&gb) << 8;
                    dst32[5] = bytestream2_get_be24u(&gb) << 8;
                    dst32[3] = bytestream2_get_be24u(&gb) << 8;
233 234 235 236 237
                    dst32 += 6;
                } while (--samples);
            }
            break;
            /* remapping: L, R, C, LSide, LBack, RBack, RSide, <unused> */
238
        case AV_CH_LAYOUT_7POINT0:
239
            if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
240
                do {
241 242 243 244 245 246 247
                    dst16[0] = bytestream2_get_be16u(&gb);
                    dst16[1] = bytestream2_get_be16u(&gb);
                    dst16[2] = bytestream2_get_be16u(&gb);
                    dst16[5] = bytestream2_get_be16u(&gb);
                    dst16[3] = bytestream2_get_be16u(&gb);
                    dst16[4] = bytestream2_get_be16u(&gb);
                    dst16[6] = bytestream2_get_be16u(&gb);
248
                    dst16 += 7;
249
                    bytestream2_skip(&gb, 2);
250 251 252
                } while (--samples);
            } else {
                do {
253 254 255 256 257 258 259
                    dst32[0] = bytestream2_get_be24u(&gb) << 8;
                    dst32[1] = bytestream2_get_be24u(&gb) << 8;
                    dst32[2] = bytestream2_get_be24u(&gb) << 8;
                    dst32[5] = bytestream2_get_be24u(&gb) << 8;
                    dst32[3] = bytestream2_get_be24u(&gb) << 8;
                    dst32[4] = bytestream2_get_be24u(&gb) << 8;
                    dst32[6] = bytestream2_get_be24u(&gb) << 8;
260
                    dst32 += 7;
261
                    bytestream2_skip(&gb, 3);
262 263 264 265
                } while (--samples);
            }
            break;
            /* remapping: L, R, C, LSide, LBack, RBack, RSide, LF */
266
        case AV_CH_LAYOUT_7POINT1:
267
            if (AV_SAMPLE_FMT_S16 == avctx->sample_fmt) {
268
                do {
269 270 271 272 273 274 275 276
                    dst16[0] = bytestream2_get_be16u(&gb);
                    dst16[1] = bytestream2_get_be16u(&gb);
                    dst16[2] = bytestream2_get_be16u(&gb);
                    dst16[6] = bytestream2_get_be16u(&gb);
                    dst16[4] = bytestream2_get_be16u(&gb);
                    dst16[5] = bytestream2_get_be16u(&gb);
                    dst16[7] = bytestream2_get_be16u(&gb);
                    dst16[3] = bytestream2_get_be16u(&gb);
277 278 279 280
                    dst16 += 8;
                } while (--samples);
            } else {
                do {
281 282 283 284 285 286 287 288
                    dst32[0] = bytestream2_get_be24u(&gb) << 8;
                    dst32[1] = bytestream2_get_be24u(&gb) << 8;
                    dst32[2] = bytestream2_get_be24u(&gb) << 8;
                    dst32[6] = bytestream2_get_be24u(&gb) << 8;
                    dst32[4] = bytestream2_get_be24u(&gb) << 8;
                    dst32[5] = bytestream2_get_be24u(&gb) << 8;
                    dst32[7] = bytestream2_get_be24u(&gb) << 8;
                    dst32[3] = bytestream2_get_be24u(&gb) << 8;
289 290 291 292 293 294 295
                    dst32 += 8;
                } while (--samples);
            }
            break;
        }
    }

296
    *got_frame_ptr = 1;
297

298
    retval = bytestream2_tell(&gb);
299
    if (avctx->debug & FF_DEBUG_BITSTREAM)
300
        ff_dlog(avctx, "pcm_bluray_decode_frame: decoded %d -> %d bytes\n",
301
                retval, buf_size);
302
    return retval + 4;
303 304
}

305
AVCodec ff_pcm_bluray_decoder = {
306
    .name           = "pcm_bluray",
307
    .long_name      = NULL_IF_CONFIG_SMALL("PCM signed 16|20|24-bit big-endian for Blu-ray media"),
308
    .type           = AVMEDIA_TYPE_AUDIO,
309
    .id             = AV_CODEC_ID_PCM_BLURAY,
310
    .decode         = pcm_bluray_decode_frame,
311
    .capabilities   = AV_CODEC_CAP_DR1,
312 313 314
    .sample_fmts    = (const enum AVSampleFormat[]){
        AV_SAMPLE_FMT_S16, AV_SAMPLE_FMT_S32, AV_SAMPLE_FMT_NONE
    },
315
};