pcm-mpeg.c 12.1 KB
Newer Older
1 2 3 4
/*
 * LPCM codecs for PCM formats found in MPEG streams
 * Copyright (c) 2009 Christian Schmidt
 *
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 25 26
 * PCM codecs for encodings found in MPEG streams (DVD/Blu-ray)
 */

27
#include "libavutil/audioconvert.h"
28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56
#include "avcodec.h"
#include "bytestream.h"

/*
 * 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
 */

/**
 * Parse the header of a LPCM frame read from a MPEG-TS stream
 * @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] = {
57 58 59
        0, AV_CH_LAYOUT_MONO, 0, AV_CH_LAYOUT_STEREO, AV_CH_LAYOUT_SURROUND,
        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
60 61 62 63 64 65 66
    };
    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)
67
        av_dlog(avctx, "pcm_bluray_parse_header: header = %02x%02x%02x%02x\n",
68 69 70 71 72
                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) {
73
        av_log(avctx, AV_LOG_ERROR, "reserved sample depth (0)\n");
74 75
        return -1;
    }
76 77
    avctx->sample_fmt = avctx->bits_per_coded_sample == 16 ? AV_SAMPLE_FMT_S16 :
                                                             AV_SAMPLE_FMT_S32;
78
    avctx->bits_per_raw_sample = avctx->bits_per_coded_sample;
79

80
    /* get the sample rate. Not all values are used. */
81 82 83 84 85 86 87 88 89 90 91 92
    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;
93
        av_log(avctx, AV_LOG_ERROR, "reserved sample rate (%d)\n",
94 95 96 97 98
               header[2] & 0x0f);
        return -1;
    }

    /*
99
     * get the channel number (and mapping). Not all values are used.
100 101 102 103 104 105 106
     * 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) {
107
        av_log(avctx, AV_LOG_ERROR, "reserved channel configuration (%d)\n",
108 109 110 111
               channel_layout);
        return -1;
    }

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

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

123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138
typedef struct PCMBRDecode {
    AVFrame frame;
} PCMBRDecode;

static av_cold int pcm_bluray_decode_init(AVCodecContext * avctx)
{
    PCMBRDecode *s = avctx->priv_data;

    avcodec_get_frame_defaults(&s->frame);
    avctx->coded_frame = &s->frame;

    return 0;
}

static int pcm_bluray_decode_frame(AVCodecContext *avctx, void *data,
                                   int *got_frame_ptr, AVPacket *avpkt)
139 140 141
{
    const uint8_t *src = avpkt->data;
    int buf_size = avpkt->size;
142
    PCMBRDecode *s = avctx->priv_data;
143
    GetByteContext gb;
144
    int num_source_channels, channel, retval;
145 146 147
    int sample_size, samples;
    int16_t *dst16;
    int32_t *dst32;
148 149 150 151 152 153 154 155 156 157 158

    if (buf_size < 4) {
        av_log(avctx, AV_LOG_ERROR, "PCM packet too small\n");
        return -1;
    }

    if (pcm_bluray_parse_header(avctx, src))
        return -1;
    src += 4;
    buf_size -= 4;

159 160
    bytestream2_init(&gb, src, buf_size);

161 162
    /* There's always an even number of channels in the source */
    num_source_channels = FFALIGN(avctx->channels, 2);
163
    sample_size = (num_source_channels * (avctx->sample_fmt == AV_SAMPLE_FMT_S16 ? 16 : 24)) >> 3;
164 165
    samples = buf_size / sample_size;

166 167 168 169 170
    /* get output buffer */
    s->frame.nb_samples = samples;
    if ((retval = avctx->get_buffer(avctx, &s->frame)) < 0) {
        av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
        return retval;
171
    }
172 173
    dst16 = (int16_t *)s->frame.data[0];
    dst32 = (int32_t *)s->frame.data[0];
174 175 176 177

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

307 308 309
    *got_frame_ptr   = 1;
    *(AVFrame *)data = s->frame;

310
    retval = bytestream2_tell(&gb);
311
    if (avctx->debug & FF_DEBUG_BITSTREAM)
312
        av_dlog(avctx, "pcm_bluray_decode_frame: decoded %d -> %d bytes\n",
313
                retval, buf_size);
314
    return retval + 4;
315 316
}

317
AVCodec ff_pcm_bluray_decoder = {
318 319
    .name           = "pcm_bluray",
    .type           = AVMEDIA_TYPE_AUDIO,
320
    .id             = AV_CODEC_ID_PCM_BLURAY,
321 322
    .priv_data_size = sizeof(PCMBRDecode),
    .init           = pcm_bluray_decode_init,
323
    .decode         = pcm_bluray_decode_frame,
324
    .capabilities   = CODEC_CAP_DR1,
325 326 327 328
    .sample_fmts    = (const enum AVSampleFormat[]){
        AV_SAMPLE_FMT_S16, AV_SAMPLE_FMT_S32, AV_SAMPLE_FMT_NONE
    },
    .long_name      = NULL_IF_CONFIG_SMALL("PCM signed 16|20|24-bit big-endian for Blu-ray media"),
329
};