libschroedingerenc.c 15.3 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 encoder 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 30 31 32 33 34 35 36 37 38 39
* Dirac encoder 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).
*/

#undef NDEBUG
#include <assert.h>

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

#include "avcodec.h"
#include "libdirac_libschro.h"
#include "libschroedinger.h"
David Conrad's avatar
David Conrad committed
40
#include "bytestream.h"
41 42 43


/** libschroedinger encoder private data */
44
typedef struct SchroEncoderParams {
45 46 47 48 49 50 51 52 53 54 55 56 57 58 59
    /** Schroedinger video format */
    SchroVideoFormat *format;

    /** Schroedinger frame format */
    SchroFrameFormat frame_format;

    /** frame being encoded */
    AVFrame picture;

    /** frame size */
    int frame_size;

    /** Schroedinger encoder handle*/
    SchroEncoder* encoder;

60 61 62 63 64 65
    /** buffer to store encoder output before writing it to the frame queue*/
    unsigned char *enc_buf;

    /** Size of encoder buffer*/
    int enc_buf_size;

66
    /** queue storing encoded frames */
67
    DiracSchroQueue enc_frame_queue;
68 69 70 71 72 73

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

    /** end of sequence pulled */
    int eos_pulled;
74
} SchroEncoderParams;
75 76 77 78 79 80

/**
* Works out Schro-compatible chroma format.
*/
static int SetSchroChromaFormat(AVCodecContext *avccontext)
{
81 82
    int num_formats = sizeof(schro_pixel_format_map) /
                      sizeof(schro_pixel_format_map[0]);
83 84
    int idx;

85
    SchroEncoderParams *p_schro_params = avccontext->priv_data;
86 87

    for (idx = 0; idx < num_formats; ++idx) {
88
        if (schro_pixel_format_map[idx].ff_pix_fmt ==
89
            avccontext->pix_fmt) {
90
            p_schro_params->format->chroma_format =
91
                            schro_pixel_format_map[idx].schro_pix_fmt;
92 93 94 95
            return 0;
        }
    }

96 97 98
    av_log(avccontext, AV_LOG_ERROR,
           "This codec currently only supports planar YUV 4:2:0, 4:2:2"
           " and 4:4:4 formats.\n");
99 100 101 102 103 104

    return -1;
}

static int libschroedinger_encode_init(AVCodecContext *avccontext)
{
105
    SchroEncoderParams *p_schro_params = avccontext->priv_data;
106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123
    SchroVideoFormatEnum preset;

    /* Initialize the libraries that libschroedinger depends on. */
    schro_init();

    /* Create an encoder object. */
    p_schro_params->encoder = schro_encoder_new();

    if (!p_schro_params->encoder) {
        av_log(avccontext, AV_LOG_ERROR,
               "Unrecoverable Error: schro_encoder_new failed. ");
        return -1;
    }

    /* Initialize the format. */
    preset = ff_get_schro_video_format_preset(avccontext);
    p_schro_params->format =
                    schro_encoder_get_video_format(p_schro_params->encoder);
124 125
    schro_video_format_set_std_video_format(p_schro_params->format, preset);
    p_schro_params->format->width  = avccontext->width;
126 127 128 129 130
    p_schro_params->format->height = avccontext->height;

    if (SetSchroChromaFormat(avccontext) == -1)
        return -1;

131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148
    if (avccontext->color_primaries == AVCOL_PRI_BT709) {
        p_schro_params->format->colour_primaries = SCHRO_COLOUR_PRIMARY_HDTV;
    } else if (avccontext->color_primaries == AVCOL_PRI_BT470BG) {
        p_schro_params->format->colour_primaries = SCHRO_COLOUR_PRIMARY_SDTV_625;
    } else if (avccontext->color_primaries == AVCOL_PRI_SMPTE170M) {
        p_schro_params->format->colour_primaries = SCHRO_COLOUR_PRIMARY_SDTV_525;
    }

    if (avccontext->colorspace == AVCOL_SPC_BT709) {
        p_schro_params->format->colour_matrix = SCHRO_COLOUR_MATRIX_HDTV;
    } else if (avccontext->colorspace == AVCOL_SPC_BT470BG) {
        p_schro_params->format->colour_matrix = SCHRO_COLOUR_MATRIX_SDTV;
    }

    if (avccontext->color_trc == AVCOL_TRC_BT709) {
        p_schro_params->format->transfer_function = SCHRO_TRANSFER_CHAR_TV_GAMMA;
    }

149 150
    if (ff_get_schro_frame_format(p_schro_params->format->chroma_format,
                                  &p_schro_params->frame_format) == -1) {
151 152 153
        av_log(avccontext, AV_LOG_ERROR,
               "This codec currently supports only planar YUV 4:2:0, 4:2:2"
               " and 4:4:4 formats.\n");
154 155 156 157 158 159 160 161 162 163 164 165
        return -1;
    }

    p_schro_params->format->frame_rate_numerator   = avccontext->time_base.den;
    p_schro_params->format->frame_rate_denominator = avccontext->time_base.num;

    p_schro_params->frame_size = avpicture_get_size(avccontext->pix_fmt,
                                                    avccontext->width,
                                                    avccontext->height);

    avccontext->coded_frame = &p_schro_params->picture;

166
    if (!avccontext->gop_size) {
167 168 169
        schro_encoder_setting_set_double(p_schro_params->encoder,
                                         "gop_structure",
                                         SCHRO_ENCODER_GOP_INTRA_ONLY);
170

171
        if (avccontext->coder_type == FF_CODER_TYPE_VLC)
172 173 174
            schro_encoder_setting_set_double(p_schro_params->encoder,
                                             "enable_noarith", 1);
    } else {
175 176
        schro_encoder_setting_set_double(p_schro_params->encoder,
                                         "au_distance", avccontext->gop_size);
177 178 179 180 181
        avccontext->has_b_frames = 1;
    }

    /* FIXME - Need to handle SCHRO_ENCODER_RATE_CONTROL_LOW_DELAY. */
    if (avccontext->flags & CODEC_FLAG_QSCALE) {
182
        if (!avccontext->global_quality) {
183
            /* lossless coding */
184 185 186
            schro_encoder_setting_set_double(p_schro_params->encoder,
                                             "rate_control",
                                             SCHRO_ENCODER_RATE_CONTROL_LOSSLESS);
187
        } else {
188
            int quality;
189 190
            schro_encoder_setting_set_double(p_schro_params->encoder,
                                             "rate_control",
191
                                             SCHRO_ENCODER_RATE_CONTROL_CONSTANT_QUALITY);
192

193 194 195
            quality = avccontext->global_quality / FF_QP2LAMBDA;
            if (quality > 10)
                quality = 10;
196
            schro_encoder_setting_set_double(p_schro_params->encoder,
197
                                             "quality", quality);
198
        }
199 200 201 202
    } else {
        schro_encoder_setting_set_double(p_schro_params->encoder,
                                         "rate_control",
                                         SCHRO_ENCODER_RATE_CONTROL_CONSTANT_BITRATE);
203

204 205 206
        schro_encoder_setting_set_double(p_schro_params->encoder,
                                         "bitrate",
                                         avccontext->bit_rate);
207 208 209

    }

210
    if (avccontext->flags & CODEC_FLAG_INTERLACED_ME)
211 212
        /* All material can be coded as interlaced or progressive
           irrespective of the type of source material. */
213 214
        schro_encoder_setting_set_double(p_schro_params->encoder,
                                         "interlaced_coding", 1);
215

David Conrad's avatar
David Conrad committed
216 217 218
    schro_encoder_setting_set_double(p_schro_params->encoder, "open_gop",
                                     !(avccontext->flags & CODEC_FLAG_CLOSED_GOP));

219 220 221 222 223 224 225 226 227 228
    /* FIXME: Signal range hardcoded to 8-bit data until both libschroedinger
     * and libdirac support other bit-depth data. */
    schro_video_format_set_std_signal_range(p_schro_params->format,
                                            SCHRO_SIGNAL_RANGE_8BIT_VIDEO);

    /* Set the encoder format. */
    schro_encoder_set_video_format(p_schro_params->encoder,
                                   p_schro_params->format);

    /* Set the debug level. */
229
    schro_debug_set_level(avccontext->debug);
230

231
    schro_encoder_start(p_schro_params->encoder);
232 233

    /* Initialize the encoded frame queue. */
234 235
    ff_dirac_schro_queue_init(&p_schro_params->enc_frame_queue);
    return 0;
236 237
}

238 239
static SchroFrame *libschroedinger_frame_from_data(AVCodecContext *avccontext,
                                                   void *in_data)
240
{
241
    SchroEncoderParams *p_schro_params = avccontext->priv_data;
242 243 244 245
    SchroFrame *in_frame;
    /* Input line size may differ from what the codec supports. Especially
     * when transcoding from one format to another. So use avpicture_layout
     * to copy the frame. */
246 247 248 249 250 251 252
    in_frame = ff_create_schro_frame(avccontext, p_schro_params->frame_format);

    if (in_frame)
        avpicture_layout((AVPicture *)in_data, avccontext->pix_fmt,
                          avccontext->width, avccontext->height,
                          in_frame->components[0].data,
                          p_schro_params->frame_size);
253 254 255 256 257 258

    return in_frame;
}

static void SchroedingerFreeFrame(void *data)
{
259
    DiracSchroEncodedFrame *enc_frame = data;
260

261
    av_freep(&(enc_frame->p_encbuf));
262 263 264 265 266 267 268 269
    av_free(enc_frame);
}

static int libschroedinger_encode_frame(AVCodecContext *avccontext,
                                        unsigned char *frame,
                                        int buf_size, void *data)
{
    int enc_size = 0;
270
    SchroEncoderParams *p_schro_params = avccontext->priv_data;
271
    SchroEncoder *encoder = p_schro_params->encoder;
272
    struct DiracSchroEncodedFrame *p_frame_output = NULL;
273 274 275 276
    int go = 1;
    SchroBuffer *enc_buf;
    int presentation_frame;
    int parse_code;
277
    int last_frame_in_sequence = 0;
278

279
    if (!data) {
280 281 282 283 284 285 286
        /* Push end of sequence if not already signalled. */
        if (!p_schro_params->eos_signalled) {
            schro_encoder_end_of_stream(encoder);
            p_schro_params->eos_signalled = 1;
        }
    } else {
        /* Allocate frame data to schro input buffer. */
287 288
        SchroFrame *in_frame = libschroedinger_frame_from_data(avccontext,
                                                               data);
289 290 291 292 293 294 295 296 297
        /* Load next frame. */
        schro_encoder_push_frame(encoder, in_frame);
    }

    if (p_schro_params->eos_pulled)
        go = 0;

    /* Now check to see if we have any output from the encoder. */
    while (go) {
298
        SchroStateEnum state;
299
        state = schro_encoder_wait(encoder);
300
        switch (state) {
301 302
        case SCHRO_STATE_HAVE_BUFFER:
        case SCHRO_STATE_END_OF_STREAM:
303 304 305
            enc_buf = schro_encoder_pull(encoder, &presentation_frame);
            assert(enc_buf->length > 0);
            assert(enc_buf->length <= buf_size);
306 307 308 309 310 311
            parse_code = enc_buf->data[4];

            /* All non-frame data is prepended to actual frame data to
             * be able to set the pts correctly. So we don't write data
             * to the frame output queue until we actually have a frame
             */
312 313
            p_schro_params->enc_buf = av_realloc(p_schro_params->enc_buf,
                                                 p_schro_params->enc_buf_size + enc_buf->length);
314

315
            memcpy(p_schro_params->enc_buf + p_schro_params->enc_buf_size,
316 317 318 319 320 321 322 323 324 325
                   enc_buf->data, enc_buf->length);
            p_schro_params->enc_buf_size += enc_buf->length;


            if (state == SCHRO_STATE_END_OF_STREAM) {
                p_schro_params->eos_pulled = 1;
                go = 0;
            }

            if (!SCHRO_PARSE_CODE_IS_PICTURE(parse_code)) {
326
                schro_buffer_unref(enc_buf);
327 328
                break;
            }
329 330

            /* Create output frame. */
331
            p_frame_output = av_mallocz(sizeof(DiracSchroEncodedFrame));
332
            /* Set output data. */
333 334
            p_frame_output->size     = p_schro_params->enc_buf_size;
            p_frame_output->p_encbuf = p_schro_params->enc_buf;
335
            if (SCHRO_PARSE_CODE_IS_INTRA(parse_code) &&
336
                SCHRO_PARSE_CODE_IS_REFERENCE(parse_code))
337 338 339 340
                p_frame_output->key_frame = 1;

            /* Parse the coded frame number from the bitstream. Bytes 14
             * through 17 represesent the frame number. */
David Conrad's avatar
David Conrad committed
341
            p_frame_output->frame_num = AV_RB32(enc_buf->data + 13);
342

343 344
            ff_dirac_schro_queue_push_back(&p_schro_params->enc_frame_queue,
                                           p_frame_output);
345 346 347
            p_schro_params->enc_buf_size = 0;
            p_schro_params->enc_buf      = NULL;

348
            schro_buffer_unref(enc_buf);
349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365

            break;

        case SCHRO_STATE_NEED_FRAME:
            go = 0;
            break;

        case SCHRO_STATE_AGAIN:
            break;

        default:
            av_log(avccontext, AV_LOG_ERROR, "Unknown Schro Encoder state\n");
            return -1;
        }
    }

    /* Copy 'next' frame in queue. */
366 367 368 369 370

    if (p_schro_params->enc_frame_queue.size == 1 &&
        p_schro_params->eos_pulled)
        last_frame_in_sequence = 1;

371
    p_frame_output = ff_dirac_schro_queue_pop(&p_schro_params->enc_frame_queue);
372

373
    if (!p_frame_output)
374 375 376 377 378 379 380 381 382 383
        return 0;

    memcpy(frame, p_frame_output->p_encbuf, p_frame_output->size);
    avccontext->coded_frame->key_frame = p_frame_output->key_frame;
    /* Use the frame number of the encoded frame as the pts. It is OK to
     * do so since Dirac is a constant frame rate codec. It expects input
     * to be of constant frame rate. */
    avccontext->coded_frame->pts = p_frame_output->frame_num;
    enc_size = p_frame_output->size;

384 385
    /* Append the end of sequence information to the last frame in the
     * sequence. */
386 387 388
    if (last_frame_in_sequence && p_schro_params->enc_buf_size > 0) {
        memcpy(frame + enc_size, p_schro_params->enc_buf,
               p_schro_params->enc_buf_size);
389
        enc_size += p_schro_params->enc_buf_size;
390
        av_freep(&p_schro_params->enc_buf);
391 392 393
        p_schro_params->enc_buf_size = 0;
    }

394
    /* free frame */
395
    SchroedingerFreeFrame(p_frame_output);
396 397 398 399 400 401 402

    return enc_size;
}


static int libschroedinger_encode_close(AVCodecContext *avccontext)
{
403
    SchroEncoderParams *p_schro_params = avccontext->priv_data;
404

405
    /* Close the encoder. */
406 407 408
    schro_encoder_free(p_schro_params->encoder);

    /* Free data in the output frame queue. */
409 410
    ff_dirac_schro_queue_free(&p_schro_params->enc_frame_queue,
                              SchroedingerFreeFrame);
411

412 413 414 415 416

    /* Free the encoder buffer. */
    if (p_schro_params->enc_buf_size)
        av_freep(&p_schro_params->enc_buf);

417 418 419
    /* Free the video format structure. */
    av_freep(&p_schro_params->format);

420
    return 0;
421 422 423
}


424
AVCodec ff_libschroedinger_encoder = {
425 426 427
    .name           = "libschroedinger",
    .type           = AVMEDIA_TYPE_VIDEO,
    .id             = CODEC_ID_DIRAC,
428
    .priv_data_size = sizeof(SchroEncoderParams),
429 430 431
    .init           = libschroedinger_encode_init,
    .encode         = libschroedinger_encode_frame,
    .close          = libschroedinger_encode_close,
432
   .capabilities = CODEC_CAP_DELAY,
433
   .pix_fmts     = (const enum PixelFormat[]){PIX_FMT_YUV420P, PIX_FMT_YUV422P, PIX_FMT_YUV444P, PIX_FMT_NONE},
434
   .long_name    = NULL_IF_CONFIG_SMALL("libschroedinger Dirac 2.2"),
435
};