00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022 #include "libavutil/common.h"
00023 #include "libavutil/intreadwrite.h"
00024 #include "libavutil/imgutils.h"
00025 #include "avcodec.h"
00026 #include "internal.h"
00027
00028 typedef struct DPXContext {
00029 AVFrame picture;
00030 int big_endian;
00031 int bits_per_component;
00032 int descriptor;
00033 int planar;
00034 } DPXContext;
00035
00036 static av_cold int encode_init(AVCodecContext *avctx)
00037 {
00038 DPXContext *s = avctx->priv_data;
00039
00040 avctx->coded_frame = &s->picture;
00041 avctx->coded_frame->pict_type = AV_PICTURE_TYPE_I;
00042 avctx->coded_frame->key_frame = 1;
00043
00044 s->big_endian = 1;
00045 s->bits_per_component = 8;
00046 s->descriptor = 50;
00047 s->planar = 0;
00048
00049 switch (avctx->pix_fmt) {
00050 case AV_PIX_FMT_RGB24:
00051 break;
00052 case AV_PIX_FMT_RGBA:
00053 s->descriptor = 51;
00054 break;
00055 case AV_PIX_FMT_RGB48LE:
00056 s->big_endian = 0;
00057 case AV_PIX_FMT_RGB48BE:
00058 s->bits_per_component = avctx->bits_per_raw_sample ? avctx->bits_per_raw_sample : 16;
00059 break;
00060 case AV_PIX_FMT_RGBA64LE:
00061 s->big_endian = 0;
00062 case AV_PIX_FMT_RGBA64BE:
00063 s->descriptor = 51;
00064 s->bits_per_component = 16;
00065 break;
00066 case AV_PIX_FMT_GBRP10LE:
00067 s->big_endian = 0;
00068 case AV_PIX_FMT_GBRP10BE:
00069 s->bits_per_component = 10;
00070 s->planar = 1;
00071 break;
00072 case AV_PIX_FMT_GBRP12LE:
00073 s->big_endian = 0;
00074 case AV_PIX_FMT_GBRP12BE:
00075 s->bits_per_component = 12;
00076 s->planar = 1;
00077 break;
00078 default:
00079 av_log(avctx, AV_LOG_INFO, "unsupported pixel format\n");
00080 return -1;
00081 }
00082
00083 return 0;
00084 }
00085
00086 #define write16(p, value) \
00087 do { \
00088 if (s->big_endian) AV_WB16(p, value); \
00089 else AV_WL16(p, value); \
00090 } while(0)
00091
00092 #define write32(p, value) \
00093 do { \
00094 if (s->big_endian) AV_WB32(p, value); \
00095 else AV_WL32(p, value); \
00096 } while(0)
00097
00098 static void encode_rgb48_10bit(AVCodecContext *avctx, const AVPicture *pic, uint8_t *dst)
00099 {
00100 DPXContext *s = avctx->priv_data;
00101 const uint8_t *src = pic->data[0];
00102 int x, y;
00103
00104 for (y = 0; y < avctx->height; y++) {
00105 for (x = 0; x < avctx->width; x++) {
00106 int value;
00107 if (s->big_endian) {
00108 value = ((AV_RB16(src + 6*x + 4) & 0xFFC0U) >> 4)
00109 | ((AV_RB16(src + 6*x + 2) & 0xFFC0U) << 6)
00110 | ((AV_RB16(src + 6*x + 0) & 0xFFC0U) << 16);
00111 } else {
00112 value = ((AV_RL16(src + 6*x + 4) & 0xFFC0U) >> 4)
00113 | ((AV_RL16(src + 6*x + 2) & 0xFFC0U) << 6)
00114 | ((AV_RL16(src + 6*x + 0) & 0xFFC0U) << 16);
00115 }
00116 write32(dst, value);
00117 dst += 4;
00118 }
00119 src += pic->linesize[0];
00120 }
00121 }
00122
00123 static void encode_gbrp10(AVCodecContext *avctx, const AVPicture *pic, uint8_t *dst)
00124 {
00125 DPXContext *s = avctx->priv_data;
00126 const uint8_t *src[3] = {pic->data[0], pic->data[1], pic->data[2]};
00127 int x, y, i;
00128
00129 for (y = 0; y < avctx->height; y++) {
00130 for (x = 0; x < avctx->width; x++) {
00131 int value;
00132 if (s->big_endian) {
00133 value = (AV_RB16(src[0] + 2*x) << 12)
00134 | (AV_RB16(src[1] + 2*x) << 2)
00135 | (AV_RB16(src[2] + 2*x) << 22);
00136 } else {
00137 value = (AV_RL16(src[0] + 2*x) << 12)
00138 | (AV_RL16(src[1] + 2*x) << 2)
00139 | (AV_RL16(src[2] + 2*x) << 22);
00140 }
00141 write32(dst, value);
00142 dst += 4;
00143 }
00144 for (i = 0; i < 3; i++)
00145 src[i] += pic->linesize[i];
00146 }
00147 }
00148
00149 static void encode_gbrp12(AVCodecContext *avctx, const AVPicture *pic, uint16_t *dst)
00150 {
00151 DPXContext *s = avctx->priv_data;
00152 const uint16_t *src[3] = {(uint16_t*)pic->data[0],
00153 (uint16_t*)pic->data[1],
00154 (uint16_t*)pic->data[2]};
00155 int x, y, i;
00156 for (y = 0; y < avctx->height; y++) {
00157 for (x = 0; x < avctx->width; x++) {
00158 uint16_t value[3];
00159 if (s->big_endian) {
00160 value[1] = AV_RB16(src[0] + x) << 4;
00161 value[2] = AV_RB16(src[1] + x) << 4;
00162 value[0] = AV_RB16(src[2] + x) << 4;
00163 } else {
00164 value[1] = AV_RL16(src[0] + x) << 4;
00165 value[2] = AV_RL16(src[1] + x) << 4;
00166 value[0] = AV_RL16(src[2] + x) << 4;
00167 }
00168 for (i = 0; i < 3; i++)
00169 write16(dst++, value[i]);
00170 }
00171 for (i = 0; i < 3; i++)
00172 src[i] += pic->linesize[i]/2;
00173 }
00174 }
00175
00176 static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
00177 const AVFrame *frame, int *got_packet)
00178 {
00179 DPXContext *s = avctx->priv_data;
00180 int size, ret;
00181 uint8_t *buf;
00182
00183 #define HEADER_SIZE 1664
00184 if (s->bits_per_component == 10)
00185 size = avctx->height * avctx->width * 4;
00186 else
00187 size = avpicture_get_size(avctx->pix_fmt, avctx->width, avctx->height);
00188 if ((ret = ff_alloc_packet2(avctx, pkt, size + HEADER_SIZE)) < 0)
00189 return ret;
00190 buf = pkt->data;
00191
00192 memset(buf, 0, HEADER_SIZE);
00193
00194
00195 write32(buf, MKBETAG('S','D','P','X'));
00196 write32(buf + 4, HEADER_SIZE);
00197 memcpy (buf + 8, "V1.0", 4);
00198 write32(buf + 20, 1);
00199 write32(buf + 24, HEADER_SIZE);
00200 if (!(avctx->flags & CODEC_FLAG_BITEXACT))
00201 memcpy (buf + 160, LIBAVCODEC_IDENT, FFMIN(sizeof(LIBAVCODEC_IDENT), 100));
00202 write32(buf + 660, 0xFFFFFFFF);
00203
00204
00205 write16(buf + 768, 0);
00206 write16(buf + 770, 1);
00207 write32(buf + 772, avctx->width);
00208 write32(buf + 776, avctx->height);
00209 buf[800] = s->descriptor;
00210 buf[801] = 2;
00211 buf[802] = 2;
00212 buf[803] = s->bits_per_component;
00213 write16(buf + 804, (s->bits_per_component == 10 || s->bits_per_component == 12) ?
00214 1 : 0);
00215
00216
00217 write32(buf + 1628, avctx->sample_aspect_ratio.num);
00218 write32(buf + 1632, avctx->sample_aspect_ratio.den);
00219
00220 switch(s->bits_per_component) {
00221 case 8:
00222 case 16:
00223 size = avpicture_layout((const AVPicture*)frame, avctx->pix_fmt,
00224 avctx->width, avctx->height,
00225 buf + HEADER_SIZE, pkt->size - HEADER_SIZE);
00226 if (size < 0)
00227 return size;
00228 break;
00229 case 10:
00230 if (s->planar)
00231 encode_gbrp10(avctx, (const AVPicture*)frame, buf + HEADER_SIZE);
00232 else
00233 encode_rgb48_10bit(avctx, (const AVPicture*)frame, buf + HEADER_SIZE);
00234 break;
00235 case 12:
00236 encode_gbrp12(avctx, (const AVPicture*)frame, (uint16_t*)(buf + HEADER_SIZE));
00237 break;
00238 default:
00239 av_log(avctx, AV_LOG_ERROR, "Unsupported bit depth: %d\n", s->bits_per_component);
00240 return -1;
00241 }
00242
00243 size += HEADER_SIZE;
00244
00245 write32(buf + 16, size);
00246
00247 pkt->flags |= AV_PKT_FLAG_KEY;
00248 *got_packet = 1;
00249
00250 return 0;
00251 }
00252
00253 AVCodec ff_dpx_encoder = {
00254 .name = "dpx",
00255 .type = AVMEDIA_TYPE_VIDEO,
00256 .id = AV_CODEC_ID_DPX,
00257 .priv_data_size = sizeof(DPXContext),
00258 .init = encode_init,
00259 .encode2 = encode_frame,
00260 .pix_fmts = (const enum AVPixelFormat[]){
00261 AV_PIX_FMT_RGB24,
00262 AV_PIX_FMT_RGBA,
00263 AV_PIX_FMT_RGB48LE,
00264 AV_PIX_FMT_RGB48BE,
00265 AV_PIX_FMT_RGBA64LE,
00266 AV_PIX_FMT_RGBA64BE,
00267 AV_PIX_FMT_GBRP10LE,
00268 AV_PIX_FMT_GBRP10BE,
00269 AV_PIX_FMT_GBRP12LE,
00270 AV_PIX_FMT_GBRP12BE,
00271 AV_PIX_FMT_NONE},
00272 .long_name = NULL_IF_CONFIG_SMALL("DPX image"),
00273 };