DPX image encoder
[libav.git] / 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 .decode = 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 };