dpxenc.c 9.84 KB
Newer Older
Peter Ross's avatar
Peter Ross committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
/*
 * DPX (.dpx) image encoder
 * Copyright (c) 2011 Peter Ross <pross@xvid.org>
 *
 * 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
 */

22
#include "libavutil/common.h"
Peter Ross's avatar
Peter Ross committed
23 24 25
#include "libavutil/intreadwrite.h"
#include "libavutil/imgutils.h"
#include "avcodec.h"
26
#include "internal.h"
Peter Ross's avatar
Peter Ross committed
27 28 29 30

typedef struct DPXContext {
    int big_endian;
    int bits_per_component;
31
    int num_components;
Peter Ross's avatar
Peter Ross committed
32
    int descriptor;
33
    int planar;
Peter Ross's avatar
Peter Ross committed
34 35 36 37 38
} DPXContext;

static av_cold int encode_init(AVCodecContext *avctx)
{
    DPXContext *s = avctx->priv_data;
39
    const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(avctx->pix_fmt);
Peter Ross's avatar
Peter Ross committed
40

41
    s->big_endian         = !!(desc->flags & AV_PIX_FMT_FLAG_BE);
42
    s->bits_per_component = desc->comp[0].depth;
43
    s->num_components     = desc->nb_components;
44 45
    s->descriptor         = (desc->flags & AV_PIX_FMT_FLAG_ALPHA) ? 51 : 50;
    s->planar             = !!(desc->flags & AV_PIX_FMT_FLAG_PLANAR);
Peter Ross's avatar
Peter Ross committed
46 47

    switch (avctx->pix_fmt) {
Paul B Mahol's avatar
Paul B Mahol committed
48 49 50
    case AV_PIX_FMT_ABGR:
        s->descriptor = 52;
        break;
51 52 53 54 55
    case AV_PIX_FMT_GRAY16BE:
    case AV_PIX_FMT_GRAY16LE:
    case AV_PIX_FMT_GRAY8:
        s->descriptor = 6;
        break;
56 57 58 59
    case AV_PIX_FMT_GBRP10BE:
    case AV_PIX_FMT_GBRP10LE:
    case AV_PIX_FMT_GBRP12BE:
    case AV_PIX_FMT_GBRP12LE:
60
    case AV_PIX_FMT_RGB24:
61 62
    case AV_PIX_FMT_RGBA64BE:
    case AV_PIX_FMT_RGBA64LE:
63
    case AV_PIX_FMT_RGBA:
Peter Ross's avatar
Peter Ross committed
64
        break;
65 66
    case AV_PIX_FMT_RGB48LE:
    case AV_PIX_FMT_RGB48BE:
67 68
        if (avctx->bits_per_raw_sample)
            s->bits_per_component = avctx->bits_per_raw_sample;
69
        break;
Peter Ross's avatar
Peter Ross committed
70 71 72 73 74 75 76 77
    default:
        av_log(avctx, AV_LOG_INFO, "unsupported pixel format\n");
        return -1;
    }

    return 0;
}

78 79 80 81 82 83 84 85 86 87 88
static av_always_inline void write16_internal(int big_endian, void *p, int value)
{
    if (big_endian) AV_WB16(p, value);
    else            AV_WL16(p, value);
}

static av_always_inline void write32_internal(int big_endian, void *p, int value)
{
    if (big_endian) AV_WB32(p, value);
    else            AV_WL32(p, value);
}
Peter Ross's avatar
Peter Ross committed
89

90 91
#define write16(p, value) write16_internal(s->big_endian, p, value)
#define write32(p, value) write32_internal(s->big_endian, p, value)
Peter Ross's avatar
Peter Ross committed
92

93
static void encode_rgb48_10bit(AVCodecContext *avctx, const AVFrame *pic,
Peter Ross's avatar
Peter Ross committed
94
                               uint8_t *dst)
95 96 97 98 99 100 101 102
{
    DPXContext *s = avctx->priv_data;
    const uint8_t *src = pic->data[0];
    int x, y;

    for (y = 0; y < avctx->height; y++) {
        for (x = 0; x < avctx->width; x++) {
            int value;
Georg Lippitsch's avatar
Georg Lippitsch committed
103
            if (s->big_endian) {
104 105 106
                value = ((AV_RB16(src + 6*x + 4) & 0xFFC0U) >> 4)
                      | ((AV_RB16(src + 6*x + 2) & 0xFFC0U) << 6)
                      | ((AV_RB16(src + 6*x + 0) & 0xFFC0U) << 16);
107
            } else {
108 109 110
                value = ((AV_RL16(src + 6*x + 4) & 0xFFC0U) >> 4)
                      | ((AV_RL16(src + 6*x + 2) & 0xFFC0U) << 6)
                      | ((AV_RL16(src + 6*x + 0) & 0xFFC0U) << 16);
111 112 113 114 115 116 117 118
            }
            write32(dst, value);
            dst += 4;
        }
        src += pic->linesize[0];
    }
}

119
static void encode_gbrp10(AVCodecContext *avctx, const AVFrame *pic, uint8_t *dst)
120 121 122 123 124 125 126 127
{
    DPXContext *s = avctx->priv_data;
    const uint8_t *src[3] = {pic->data[0], pic->data[1], pic->data[2]};
    int x, y, i;

    for (y = 0; y < avctx->height; y++) {
        for (x = 0; x < avctx->width; x++) {
            int value;
Georg Lippitsch's avatar
Georg Lippitsch committed
128
            if (s->big_endian) {
129 130
                value = (AV_RB16(src[0] + 2*x) << 12)
                      | (AV_RB16(src[1] + 2*x) << 2)
131
                      | ((unsigned)AV_RB16(src[2] + 2*x) << 22);
132 133 134
            } else {
                value = (AV_RL16(src[0] + 2*x) << 12)
                      | (AV_RL16(src[1] + 2*x) << 2)
135
                      | ((unsigned)AV_RL16(src[2] + 2*x) << 22);
136 137 138 139 140 141 142 143 144
            }
            write32(dst, value);
            dst += 4;
        }
        for (i = 0; i < 3; i++)
            src[i] += pic->linesize[i];
    }
}

145
static void encode_gbrp12(AVCodecContext *avctx, const AVFrame *pic, uint16_t *dst)
146
{
Georg Lippitsch's avatar
Georg Lippitsch committed
147
    DPXContext *s = avctx->priv_data;
148 149 150
    const uint16_t *src[3] = {(uint16_t*)pic->data[0],
                              (uint16_t*)pic->data[1],
                              (uint16_t*)pic->data[2]};
151 152 153
    int x, y, i, pad;
    pad = avctx->width*6;
    pad = (FFALIGN(pad, 4) - pad) >> 1;
154 155
    for (y = 0; y < avctx->height; y++) {
        for (x = 0; x < avctx->width; x++) {
Georg Lippitsch's avatar
Georg Lippitsch committed
156 157 158 159 160 161 162 163 164 165
            uint16_t value[3];
            if (s->big_endian) {
                value[1] = AV_RB16(src[0] + x) << 4;
                value[2] = AV_RB16(src[1] + x) << 4;
                value[0] = AV_RB16(src[2] + x) << 4;
            } else {
                value[1] = AV_RL16(src[0] + x) << 4;
                value[2] = AV_RL16(src[1] + x) << 4;
                value[0] = AV_RL16(src[2] + x) << 4;
            }
166
            for (i = 0; i < 3; i++)
Georg Lippitsch's avatar
Georg Lippitsch committed
167
                write16(dst++, value[i]);
168
        }
169 170
        for (i = 0; i < pad; i++)
            *dst++ = 0;
171 172 173 174 175
        for (i = 0; i < 3; i++)
            src[i] += pic->linesize[i]/2;
    }
}

176 177
static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
                        const AVFrame *frame, int *got_packet)
Peter Ross's avatar
Peter Ross committed
178 179
{
    DPXContext *s = avctx->priv_data;
180
    int size, ret, need_align, len;
181
    uint8_t *buf;
Peter Ross's avatar
Peter Ross committed
182 183

#define HEADER_SIZE 1664  /* DPX Generic header */
184 185
    if (s->bits_per_component == 10)
        size = avctx->height * avctx->width * 4;
186 187 188 189 190 191 192 193 194 195 196 197 198
    else if (s->bits_per_component == 12) {
        // 3 components, 12 bits put on 16 bits
        len  = avctx->width*6;
        size = FFALIGN(len, 4);
        need_align = size - len;
        size *= avctx->height;
    } else {
        // N components, M bits
        len = avctx->width * s->num_components * s->bits_per_component >> 3;
        size = FFALIGN(len, 4);
        need_align = size - len;
        size *= avctx->height;
    }
199
    if ((ret = ff_alloc_packet2(avctx, pkt, size + HEADER_SIZE, 0)) < 0)
200 201
        return ret;
    buf = pkt->data;
Peter Ross's avatar
Peter Ross committed
202 203 204 205 206 207 208 209 210

    memset(buf, 0, HEADER_SIZE);

    /* File information header */
    write32(buf,       MKBETAG('S','D','P','X'));
    write32(buf +   4, HEADER_SIZE);
    memcpy (buf +   8, "V1.0", 4);
    write32(buf +  20, 1); /* new image */
    write32(buf +  24, HEADER_SIZE);
211
    if (!(avctx->flags & AV_CODEC_FLAG_BITEXACT))
212
        memcpy (buf + 160, LIBAVCODEC_IDENT, FFMIN(sizeof(LIBAVCODEC_IDENT), 100));
Peter Ross's avatar
Peter Ross committed
213 214 215 216 217 218 219 220 221 222 223
    write32(buf + 660, 0xFFFFFFFF); /* unencrypted */

    /* Image information header */
    write16(buf + 768, 0); /* orientation; left to right, top to bottom */
    write16(buf + 770, 1); /* number of elements */
    write32(buf + 772, avctx->width);
    write32(buf + 776, avctx->height);
    buf[800] = s->descriptor;
    buf[801] = 2; /* linear transfer */
    buf[802] = 2; /* linear colorimetric */
    buf[803] = s->bits_per_component;
224 225
    write16(buf + 804, (s->bits_per_component == 10 || s->bits_per_component == 12) ?
                       1 : 0); /* packing method */
ArnoB's avatar
ArnoB committed
226
    write32(buf + 808, HEADER_SIZE); /* data offset */
Peter Ross's avatar
Peter Ross committed
227 228 229 230 231

    /* Image source information header */
    write32(buf + 1628, avctx->sample_aspect_ratio.num);
    write32(buf + 1632, avctx->sample_aspect_ratio.den);

232 233 234
    switch(s->bits_per_component) {
    case 8:
    case 16:
235 236 237 238 239 240 241 242 243 244 245 246
        if (need_align) {
            int j;
            const uint8_t *src = frame->data[0];
            uint8_t *dst = pkt->data + HEADER_SIZE;
            size = (len + need_align) * avctx->height;
            for (j=0; j<avctx->height; j++) {
                memcpy(dst, src, len);
                memset(dst + len, 0, need_align);
                dst += len + need_align;
                src += frame->linesize[0];
            }
        } else {
247
            size = av_image_copy_to_buffer(buf + HEADER_SIZE, pkt->size - HEADER_SIZE,
248
                                           (const uint8_t**)frame->data, frame->linesize,
249 250
                                           avctx->pix_fmt,
                                           avctx->width, avctx->height, 1);
251
        }
Peter Ross's avatar
Peter Ross committed
252 253
        if (size < 0)
            return size;
254 255
        break;
    case 10:
256
        if (s->planar)
257
            encode_gbrp10(avctx, frame, buf + HEADER_SIZE);
258
        else
259
            encode_rgb48_10bit(avctx, frame, buf + HEADER_SIZE);
260 261
        break;
    case 12:
262
        encode_gbrp12(avctx, frame, (uint16_t*)(buf + HEADER_SIZE));
263 264
        break;
    default:
Michael Niedermayer's avatar
Michael Niedermayer committed
265
        av_log(avctx, AV_LOG_ERROR, "Unsupported bit depth: %d\n", s->bits_per_component);
266 267
        return -1;
    }
Peter Ross's avatar
Peter Ross committed
268 269 270 271

    size += HEADER_SIZE;

    write32(buf + 16, size); /* file size */
272 273 274 275 276

    pkt->flags |= AV_PKT_FLAG_KEY;
    *got_packet = 1;

    return 0;
Peter Ross's avatar
Peter Ross committed
277 278 279
}

AVCodec ff_dpx_encoder = {
280
    .name           = "dpx",
281
    .long_name      = NULL_IF_CONFIG_SMALL("DPX (Digital Picture Exchange) image"),
282 283
    .type           = AVMEDIA_TYPE_VIDEO,
    .id             = AV_CODEC_ID_DPX,
Peter Ross's avatar
Peter Ross committed
284
    .priv_data_size = sizeof(DPXContext),
285 286 287
    .init           = encode_init,
    .encode2        = encode_frame,
    .pix_fmts       = (const enum AVPixelFormat[]){
288
        AV_PIX_FMT_GRAY8,
Paul B Mahol's avatar
Paul B Mahol committed
289
        AV_PIX_FMT_RGB24,    AV_PIX_FMT_RGBA, AV_PIX_FMT_ABGR,
290
        AV_PIX_FMT_GRAY16LE, AV_PIX_FMT_GRAY16BE,
291 292 293 294
        AV_PIX_FMT_RGB48LE,  AV_PIX_FMT_RGB48BE,
        AV_PIX_FMT_RGBA64LE, AV_PIX_FMT_RGBA64BE,
        AV_PIX_FMT_GBRP10LE, AV_PIX_FMT_GBRP10BE,
        AV_PIX_FMT_GBRP12LE, AV_PIX_FMT_GBRP12BE,
295
        AV_PIX_FMT_NONE},
Peter Ross's avatar
Peter Ross committed
296
};