libavcodec/dpxenc.c

   1 /*
   2  * DPX (.dpx) image encoder
   3  * Copyright (c) 2011 Peter Ross <pross@xvid.org>
   4  *
   5  * This file is part of Libav.
   6  *
   7  * Libav is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * Libav is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * 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  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 #include "libavutil/intreadwrite.h"
  23 #include "libavutil/imgutils.h"
  24 #include "avcodec.h"
  25
  26 typedef struct DPXContext {
  27     AVFrame picture;
  28     int big_endian;
  29     int bits_per_component;
  30     int descriptor;
  31 } DPXContext;
  32
  33 static av_cold int encode_init(AVCodecContext *avctx)
  34 {
  35     DPXContext *s = avctx->priv_data;
  36
  37     avctx->coded_frame = &s->picture;
  38     avctx->coded_frame->pict_type = FF_I_TYPE;
  39     avctx->coded_frame->key_frame = 1;
  40
  41     s->big_endian         = 1;
  42     s->bits_per_component = 8;
  43     s->descriptor         = 50; /* RGB */
  44
  45     switch (avctx->pix_fmt) {
  46     case PIX_FMT_RGB24:
  47         break;
  48     case PIX_FMT_RGBA:
  49         s->descriptor = 51; /* RGBA */
  50         break;
  51     case PIX_FMT_RGB48LE:
  52         s->big_endian = 0;
  53     case PIX_FMT_RGB48BE:
  54         s->bits_per_component = avctx->bits_per_raw_sample ? avctx->bits_per_raw_sample : 16;
  55         break;
  56     default:
  57         av_log(avctx, AV_LOG_INFO, "unsupported pixel format\n");
  58         return -1;
  59     }
  60
  61     return 0;
  62 }
  63
  64 #define write16(p, value) \
  65 do { \
  66     if (s->big_endian) AV_WB16(p, value); \
  67     else               AV_WL16(p, value); \
  68 } while(0)
  69
  70 #define write32(p, value) \
  71 do { \
  72     if (s->big_endian) AV_WB32(p, value); \
  73     else               AV_WL32(p, value); \
  74 } while(0)
  75
  76 static void encode_rgb48_10bit(AVCodecContext *avctx, const AVPicture *pic,
  77                                uint8_t *dst)
  78 {
  79     DPXContext *s = avctx->priv_data;
  80     const uint8_t *src = pic->data[0];
  81     int x, y;
  82
  83     for (y = 0; y < avctx->height; y++) {
  84         for (x = 0; x < avctx->width; x++) {
  85             int value;
  86             if ((avctx->pix_fmt & 1)) {
  87                 value = ((AV_RB16(src + 6*x + 4) & 0xFFC0) >> 4)
  88                       | ((AV_RB16(src + 6*x + 2) & 0xFFC0) << 6)
  89                       | ((AV_RB16(src + 6*x + 0) & 0xFFC0) << 16);
  90             } else {
  91                 value = ((AV_RL16(src + 6*x + 4) & 0xFFC0) >> 4)
  92                       | ((AV_RL16(src + 6*x + 2) & 0xFFC0) << 6)
  93                       | ((AV_RL16(src + 6*x + 0) & 0xFFC0) << 16);
  94             }
  95             write32(dst, value);
  96             dst += 4;
  97         }
  98         src += pic->linesize[0];
  99     }
 100 }
 101
 102 static int encode_frame(AVCodecContext *avctx, unsigned char *buf,
 103                         int buf_size, void *data)
 104 {
 105     DPXContext *s = avctx->priv_data;
 106     int size;
 107
 108 #define HEADER_SIZE 1664  /* DPX Generic header */
 109     if (buf_size < HEADER_SIZE)
 110         return -1;
 111
 112     memset(buf, 0, HEADER_SIZE);
 113
 114     /* File information header */
 115     write32(buf,       MKBETAG('S','D','P','X'));
 116     write32(buf +   4, HEADER_SIZE);
 117     memcpy (buf +   8, "V1.0", 4);
 118     write32(buf +  20, 1); /* new image */
 119     write32(buf +  24, HEADER_SIZE);
 120     memcpy (buf + 160, LIBAVCODEC_IDENT, FFMIN(sizeof(LIBAVCODEC_IDENT), 100));
 121     write32(buf + 660, 0xFFFFFFFF); /* unencrypted */
 122
 123     /* Image information header */
 124     write16(buf + 768, 0); /* orientation; left to right, top to bottom */
 125     write16(buf + 770, 1); /* number of elements */
 126     write32(buf + 772, avctx->width);
 127     write32(buf + 776, avctx->height);
 128     buf[800] = s->descriptor;
 129     buf[801] = 2; /* linear transfer */
 130     buf[802] = 2; /* linear colorimetric */
 131     buf[803] = s->bits_per_component;
 132     write16(buf + 804, s->bits_per_component == 10 ? 1 : 0); /* packing method */
 133
 134     /* Image source information header */
 135     write32(buf + 1628, avctx->sample_aspect_ratio.num);
 136     write32(buf + 1632, avctx->sample_aspect_ratio.den);
 137
 138     switch (s->bits_per_component) {
 139     case 8:
 140     case 16:
 141         size = avpicture_layout(data, avctx->pix_fmt,
 142                                 avctx->width, avctx->height,
 143                                 buf + HEADER_SIZE, buf_size - HEADER_SIZE);
 144         if (size < 0)
 145             return size;
 146         break;
 147     case 10:
 148         size = avctx->height * avctx->width * 4;
 149         if (buf_size < HEADER_SIZE + size)
 150             return -1;
 151         encode_rgb48_10bit(avctx, data, buf + HEADER_SIZE);
 152         break;
 153     default:
 154         av_log(avctx, AV_LOG_ERROR, "Unsupported bit depth: %d\n", s->bits_per_component);
 155         return -1;
 156     }
 157
 158     size += HEADER_SIZE;
 159
 160     write32(buf + 16, size); /* file size */
 161     return size;
 162 }
 163
 164 AVCodec ff_dpx_encoder = {
 165     .name = "dpx",
 166     .type = AVMEDIA_TYPE_VIDEO,
 167     .id   = CODEC_ID_DPX,
 168     .priv_data_size = sizeof(DPXContext),
 169     .init   = encode_init,
 170     .encode = encode_frame,
 171     .pix_fmts = (const enum PixelFormat[]){
 172         PIX_FMT_RGB24,
 173         PIX_FMT_RGBA,
 174         PIX_FMT_RGB48LE,
 175         PIX_FMT_RGB48BE,
 176         PIX_FMT_NONE},
 177     .long_name = NULL_IF_CONFIG_SMALL("DPX image"),
 178 };