libschroedingerdec.c 12.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
/*
 * Dirac decoder support via Schroedinger libraries
 * Copyright (c) 2008 BBC, Anuradha Suraparaju <asuraparaju at gmail dot com >
 *
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
 * 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.
 *
 * FFmpeg is distributed in the hope that it will be useful,
 * 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
 * License along with FFmpeg; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

/**
23
* @file
24 25 26 27 28 29
* Dirac decoder support via libschroedinger-1.0 libraries. More details about
* the Schroedinger project can be found at http://www.diracvideo.org/.
* The library implements Dirac Specification Version 2.2.
* (http://dirac.sourceforge.net/specification.html).
*/

30 31
#include <string.h>

32
#include "libavutil/imgutils.h"
33
#include "libavutil/internal.h"
34
#include "libavutil/intreadwrite.h"
35
#include "libavutil/mem.h"
36
#include "avcodec.h"
37
#include "internal.h"
38 39 40 41 42 43
#include "libschroedinger.h"

#include <schroedinger/schro.h>
#include <schroedinger/schrodebug.h>
#include <schroedinger/schrovideoformat.h>

44 45 46 47 48 49
/** SchroFrame and Pts relation */
typedef struct LibSchroFrameContext {
     SchroFrame *frame;
     int64_t pts;
} LibSchroFrameContext;

50
/** libschroedinger decoder private data */
51
typedef struct SchroDecoderParams {
52 53 54 55 56 57 58 59 60 61
    /** Schroedinger video format */
    SchroVideoFormat *format;

    /** Schroedinger frame format */
    SchroFrameFormat frame_format;

    /** decoder handle */
    SchroDecoder* decoder;

    /** queue storing decoded frames */
62
    FFSchroQueue dec_frame_queue;
63 64 65 66 67 68

    /** end of sequence signalled */
    int eos_signalled;

    /** end of sequence pulled */
    int eos_pulled;
69
} SchroDecoderParams;
70

71
typedef struct SchroParseUnitContext {
72 73
    const uint8_t *buf;
    int           buf_size;
74
} SchroParseUnitContext;
75 76


77
static void libschroedinger_decode_buffer_free(SchroBuffer *schro_buf,
78 79 80 81
                                               void *priv)
{
    av_freep(&priv);
}
82

83 84
static void parse_context_init(SchroParseUnitContext *parse_ctx,
                               const uint8_t *buf, int buf_size)
85 86 87 88 89
{
    parse_ctx->buf           = buf;
    parse_ctx->buf_size      = buf_size;
}

90
static SchroBuffer *find_next_parse_unit(SchroParseUnitContext *parse_ctx)
91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115
{
    SchroBuffer *enc_buf = NULL;
    int next_pu_offset = 0;
    unsigned char *in_buf;

    if (parse_ctx->buf_size < 13 ||
        parse_ctx->buf[0] != 'B' ||
        parse_ctx->buf[1] != 'B' ||
        parse_ctx->buf[2] != 'C' ||
        parse_ctx->buf[3] != 'D')
        return NULL;

    next_pu_offset = (parse_ctx->buf[5] << 24) +
                     (parse_ctx->buf[6] << 16) +
                     (parse_ctx->buf[7] <<  8) +
                      parse_ctx->buf[8];

    if (next_pu_offset == 0 &&
        SCHRO_PARSE_CODE_IS_END_OF_SEQUENCE(parse_ctx->buf[4]))
        next_pu_offset = 13;

    if (next_pu_offset <= 0 || parse_ctx->buf_size < next_pu_offset)
        return NULL;

    in_buf = av_malloc(next_pu_offset);
116 117 118 119 120
    if (!in_buf) {
        av_log(parse_ctx, AV_LOG_ERROR, "Unable to allocate input buffer\n");
        return NULL;
    }

121 122
    memcpy(in_buf, parse_ctx->buf, next_pu_offset);
    enc_buf       = schro_buffer_new_with_data(in_buf, next_pu_offset);
123 124 125
    enc_buf->free = libschroedinger_decode_buffer_free;
    enc_buf->priv = in_buf;

126
    parse_ctx->buf      += next_pu_offset;
127 128 129 130 131
    parse_ctx->buf_size -= next_pu_offset;

    return enc_buf;
}

132
/**
133
* Returns FFmpeg chroma format.
134
*/
135
static enum AVPixelFormat get_chroma_format(SchroChromaFormat schro_pix_fmt)
136
{
137 138
    int num_formats = sizeof(schro_pixel_format_map) /
                      sizeof(schro_pixel_format_map[0]);
139 140
    int idx;

141
    for (idx = 0; idx < num_formats; ++idx)
142 143
        if (schro_pixel_format_map[idx].schro_pix_fmt == schro_pix_fmt)
            return schro_pixel_format_map[idx].ff_pix_fmt;
144
    return AV_PIX_FMT_NONE;
145 146
}

147
static av_cold int libschroedinger_decode_init(AVCodecContext *avctx)
148 149
{

150
    SchroDecoderParams *p_schro_params = avctx->priv_data;
151 152 153
    /* First of all, initialize our supporting libraries. */
    schro_init();

154
    schro_debug_set_level(avctx->debug);
155
    p_schro_params->decoder = schro_decoder_new();
156 157 158 159 160 161
    schro_decoder_set_skip_ratio(p_schro_params->decoder, 1);

    if (!p_schro_params->decoder)
        return -1;

    /* Initialize the decoded frame queue. */
162
    ff_schro_queue_init(&p_schro_params->dec_frame_queue);
163
    return 0;
164 165
}

166
static void libschroedinger_decode_frame_free(void *frame)
167 168 169 170
{
    schro_frame_unref(frame);
}

171
static void libschroedinger_handle_first_access_unit(AVCodecContext *avctx)
172
{
173
    SchroDecoderParams *p_schro_params = avctx->priv_data;
174 175
    SchroDecoder *decoder = p_schro_params->decoder;

176
    p_schro_params->format = schro_decoder_get_video_format(decoder);
177

178
    /* Tell FFmpeg about sequence details. */
179
    if (av_image_check_size(p_schro_params->format->width,
180 181
                            p_schro_params->format->height, 0, avctx) < 0) {
        av_log(avctx, AV_LOG_ERROR, "invalid dimensions (%dx%d)\n",
182
               p_schro_params->format->width, p_schro_params->format->height);
183
        avctx->height = avctx->width = 0;
184
        return;
185
    }
186 187 188
    avctx->height  = p_schro_params->format->height;
    avctx->width   = p_schro_params->format->width;
    avctx->pix_fmt = get_chroma_format(p_schro_params->format->chroma_format);
189 190 191

    if (ff_get_schro_frame_format(p_schro_params->format->chroma_format,
                                  &p_schro_params->frame_format) == -1) {
192
        av_log(avctx, AV_LOG_ERROR,
193 194
               "This codec currently only supports planar YUV 4:2:0, 4:2:2 "
               "and 4:4:4 formats.\n");
195
        return;
196 197
    }

198 199
    avctx->time_base.den = p_schro_params->format->frame_rate_numerator;
    avctx->time_base.num = p_schro_params->format->frame_rate_denominator;
200 201
}

202
static int libschroedinger_decode_frame(AVCodecContext *avctx,
203
                                        void *data, int *got_frame,
204
                                        AVPacket *avpkt)
205
{
206 207
    const uint8_t *buf = avpkt->data;
    int buf_size = avpkt->size;
208 209
    int64_t pts  = avpkt->pts;
    SchroTag *tag;
210

211
    SchroDecoderParams *p_schro_params = avctx->priv_data;
212 213 214
    SchroDecoder *decoder = p_schro_params->decoder;
    SchroBuffer *enc_buf;
    SchroFrame* frame;
215
    AVFrame *avframe = data;
216 217
    int state;
    int go = 1;
218
    int outer = 1;
219
    SchroParseUnitContext parse_ctx;
220
    LibSchroFrameContext *framewithpts = NULL;
221

222
    *got_frame = 0;
223

224
    parse_context_init(&parse_ctx, buf, buf_size);
225
    if (!buf_size) {
226 227 228 229 230 231
        if (!p_schro_params->eos_signalled) {
            state = schro_decoder_push_end_of_stream(decoder);
            p_schro_params->eos_signalled = 1;
        }
    }

232 233
    /* Loop through all the individual parse units in the input buffer */
    do {
234
        if ((enc_buf = find_next_parse_unit(&parse_ctx))) {
235 236 237
            /* Set Schrotag with the pts to be recovered after decoding*/
            enc_buf->tag = schro_tag_new(av_malloc(sizeof(int64_t)), av_free);
            if (!enc_buf->tag->value) {
238
                av_log(avctx, AV_LOG_ERROR, "Unable to allocate SchroTag\n");
239 240 241
                return AVERROR(ENOMEM);
            }
            AV_WN(64, enc_buf->tag->value, pts);
242
            /* Push buffer into decoder. */
243 244
            if (SCHRO_PARSE_CODE_IS_PICTURE(enc_buf->data[4]) &&
                SCHRO_PARSE_CODE_NUM_REFS(enc_buf->data[4]) > 0)
245
                avctx->has_b_frames = 1;
246
            state = schro_decoder_push(decoder, enc_buf);
247
            if (state == SCHRO_DECODER_FIRST_ACCESS_UNIT)
248
                libschroedinger_handle_first_access_unit(avctx);
249
            go = 1;
250
        } else
251
            outer = 0;
252 253 254 255 256 257

        while (go) {
            /* Parse data and process result. */
            state = schro_decoder_wait(decoder);
            switch (state) {
            case SCHRO_DECODER_FIRST_ACCESS_UNIT:
258
                libschroedinger_handle_first_access_unit(avctx);
259 260 261 262 263 264 265 266 267
                break;

            case SCHRO_DECODER_NEED_BITS:
                /* Need more input data - stop iterating over what we have. */
                go = 0;
                break;

            case SCHRO_DECODER_NEED_FRAME:
                /* Decoder needs a frame - create one and push it in. */
268
                frame = ff_create_schro_frame(avctx,
269
                                              p_schro_params->frame_format);
270 271 272 273 274
                schro_decoder_add_output_picture(decoder, frame);
                break;

            case SCHRO_DECODER_OK:
                /* Pull a frame out of the decoder. */
275
                tag   = schro_decoder_get_picture_tag(decoder);
276 277
                frame = schro_decoder_pull(decoder);

278 279 280 281
                if (frame) {
                    /* Add relation between schroframe and pts. */
                    framewithpts = av_malloc(sizeof(LibSchroFrameContext));
                    if (!framewithpts) {
282
                        av_log(avctx, AV_LOG_ERROR, "Unable to allocate FrameWithPts\n");
283 284 285 286
                        return AVERROR(ENOMEM);
                    }
                    framewithpts->frame = frame;
                    framewithpts->pts   = AV_RN64(tag->value);
287
                    ff_schro_queue_push_back(&p_schro_params->dec_frame_queue,
288 289
                                             framewithpts);
                }
290 291 292 293 294 295 296 297 298 299 300 301
                break;
            case SCHRO_DECODER_EOS:
                go = 0;
                p_schro_params->eos_pulled = 1;
                schro_decoder_reset(decoder);
                outer = 0;
                break;

            case SCHRO_DECODER_ERROR:
                return -1;
                break;
            }
302
        }
303
    } while (outer);
304 305

    /* Grab next frame to be returned from the top of the queue. */
306 307 308
    framewithpts = ff_schro_queue_pop(&p_schro_params->dec_frame_queue);

    if (framewithpts && framewithpts->frame) {
309 310 311 312
        int ret;

        if ((ret = ff_get_buffer(avctx, avframe, 0)) < 0)
            return ret;
313

314
        memcpy(avframe->data[0],
315 316
               framewithpts->frame->components[0].data,
               framewithpts->frame->components[0].length);
317

318
        memcpy(avframe->data[1],
319 320
               framewithpts->frame->components[1].data,
               framewithpts->frame->components[1].length);
321

322
        memcpy(avframe->data[2],
323 324
               framewithpts->frame->components[2].data,
               framewithpts->frame->components[2].length);
325

326
        /* Fill frame with current buffer data from Schroedinger. */
327 328 329 330 331
        avframe->pkt_pts = framewithpts->pts;
        avframe->linesize[0] = framewithpts->frame->components[0].stride;
        avframe->linesize[1] = framewithpts->frame->components[1].stride;
        avframe->linesize[2] = framewithpts->frame->components[2].stride;

332
        *got_frame      = 1;
333 334

        /* Now free the frame resources. */
335 336 337 338
        libschroedinger_decode_frame_free(framewithpts->frame);
        av_free(framewithpts);
    } else {
        data       = NULL;
339
        *got_frame = 0;
340 341 342 343 344
    }
    return buf_size;
}


345
static av_cold int libschroedinger_decode_close(AVCodecContext *avctx)
346
{
347
    SchroDecoderParams *p_schro_params = avctx->priv_data;
348
    /* Free the decoder. */
349
    schro_decoder_free(p_schro_params->decoder);
350 351 352
    av_freep(&p_schro_params->format);

    /* Free data in the output frame queue. */
353 354
    ff_schro_queue_free(&p_schro_params->dec_frame_queue,
                        libschroedinger_decode_frame_free);
355

356
    return 0;
357 358
}

359
static void libschroedinger_flush(AVCodecContext *avctx)
360 361 362
{
    /* Got a seek request. Free the decoded frames queue and then reset
     * the decoder */
363
    SchroDecoderParams *p_schro_params = avctx->priv_data;
364 365

    /* Free data in the output frame queue. */
366 367
    ff_schro_queue_free(&p_schro_params->dec_frame_queue,
                        libschroedinger_decode_frame_free);
368

369
    ff_schro_queue_init(&p_schro_params->dec_frame_queue);
370 371 372 373 374
    schro_decoder_reset(p_schro_params->decoder);
    p_schro_params->eos_pulled = 0;
    p_schro_params->eos_signalled = 0;
}

375
AVCodec ff_libschroedinger_decoder = {
376 377
    .name           = "libschroedinger",
    .type           = AVMEDIA_TYPE_VIDEO,
378
    .id             = AV_CODEC_ID_DIRAC,
379
    .priv_data_size = sizeof(SchroDecoderParams),
380 381 382 383
    .init           = libschroedinger_decode_init,
    .close          = libschroedinger_decode_close,
    .decode         = libschroedinger_decode_frame,
    .capabilities   = CODEC_CAP_DELAY,
384 385
    .flush          = libschroedinger_flush,
    .long_name      = NULL_IF_CONFIG_SMALL("libschroedinger Dirac 2.2"),
386
};