297 lines
9.8 KiB
C
297 lines
9.8 KiB
C
|
/*
|
||
|
* 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
|
||
|
*/
|
||
|
|
||
|
#include "libavutil/common.h"
|
||
|
#include "libavutil/intreadwrite.h"
|
||
|
#include "libavutil/imgutils.h"
|
||
|
#include "avcodec.h"
|
||
|
#include "internal.h"
|
||
|
|
||
|
typedef struct DPXContext {
|
||
|
int big_endian;
|
||
|
int bits_per_component;
|
||
|
int num_components;
|
||
|
int descriptor;
|
||
|
int planar;
|
||
|
} DPXContext;
|
||
|
|
||
|
static av_cold int encode_init(AVCodecContext *avctx)
|
||
|
{
|
||
|
DPXContext *s = avctx->priv_data;
|
||
|
const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(avctx->pix_fmt);
|
||
|
|
||
|
s->big_endian = !!(desc->flags & AV_PIX_FMT_FLAG_BE);
|
||
|
s->bits_per_component = desc->comp[0].depth;
|
||
|
s->num_components = desc->nb_components;
|
||
|
s->descriptor = (desc->flags & AV_PIX_FMT_FLAG_ALPHA) ? 51 : 50;
|
||
|
s->planar = !!(desc->flags & AV_PIX_FMT_FLAG_PLANAR);
|
||
|
|
||
|
switch (avctx->pix_fmt) {
|
||
|
case AV_PIX_FMT_ABGR:
|
||
|
s->descriptor = 52;
|
||
|
break;
|
||
|
case AV_PIX_FMT_GRAY16BE:
|
||
|
case AV_PIX_FMT_GRAY16LE:
|
||
|
case AV_PIX_FMT_GRAY8:
|
||
|
s->descriptor = 6;
|
||
|
break;
|
||
|
case AV_PIX_FMT_GBRP10BE:
|
||
|
case AV_PIX_FMT_GBRP10LE:
|
||
|
case AV_PIX_FMT_GBRP12BE:
|
||
|
case AV_PIX_FMT_GBRP12LE:
|
||
|
case AV_PIX_FMT_RGB24:
|
||
|
case AV_PIX_FMT_RGBA64BE:
|
||
|
case AV_PIX_FMT_RGBA64LE:
|
||
|
case AV_PIX_FMT_RGBA:
|
||
|
break;
|
||
|
case AV_PIX_FMT_RGB48LE:
|
||
|
case AV_PIX_FMT_RGB48BE:
|
||
|
if (avctx->bits_per_raw_sample)
|
||
|
s->bits_per_component = avctx->bits_per_raw_sample;
|
||
|
break;
|
||
|
default:
|
||
|
av_log(avctx, AV_LOG_INFO, "unsupported pixel format\n");
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
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);
|
||
|
}
|
||
|
|
||
|
#define write16(p, value) write16_internal(s->big_endian, p, value)
|
||
|
#define write32(p, value) write32_internal(s->big_endian, p, value)
|
||
|
|
||
|
static void encode_rgb48_10bit(AVCodecContext *avctx, const AVFrame *pic,
|
||
|
uint8_t *dst)
|
||
|
{
|
||
|
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;
|
||
|
if (s->big_endian) {
|
||
|
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);
|
||
|
} else {
|
||
|
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);
|
||
|
}
|
||
|
write32(dst, value);
|
||
|
dst += 4;
|
||
|
}
|
||
|
src += pic->linesize[0];
|
||
|
}
|
||
|
}
|
||
|
|
||
|
static void encode_gbrp10(AVCodecContext *avctx, const AVFrame *pic, uint8_t *dst)
|
||
|
{
|
||
|
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;
|
||
|
if (s->big_endian) {
|
||
|
value = (AV_RB16(src[0] + 2*x) << 12)
|
||
|
| (AV_RB16(src[1] + 2*x) << 2)
|
||
|
| ((unsigned)AV_RB16(src[2] + 2*x) << 22);
|
||
|
} else {
|
||
|
value = (AV_RL16(src[0] + 2*x) << 12)
|
||
|
| (AV_RL16(src[1] + 2*x) << 2)
|
||
|
| ((unsigned)AV_RL16(src[2] + 2*x) << 22);
|
||
|
}
|
||
|
write32(dst, value);
|
||
|
dst += 4;
|
||
|
}
|
||
|
for (i = 0; i < 3; i++)
|
||
|
src[i] += pic->linesize[i];
|
||
|
}
|
||
|
}
|
||
|
|
||
|
static void encode_gbrp12(AVCodecContext *avctx, const AVFrame *pic, uint16_t *dst)
|
||
|
{
|
||
|
DPXContext *s = avctx->priv_data;
|
||
|
const uint16_t *src[3] = {(uint16_t*)pic->data[0],
|
||
|
(uint16_t*)pic->data[1],
|
||
|
(uint16_t*)pic->data[2]};
|
||
|
int x, y, i, pad;
|
||
|
pad = avctx->width*6;
|
||
|
pad = (FFALIGN(pad, 4) - pad) >> 1;
|
||
|
for (y = 0; y < avctx->height; y++) {
|
||
|
for (x = 0; x < avctx->width; x++) {
|
||
|
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;
|
||
|
}
|
||
|
for (i = 0; i < 3; i++)
|
||
|
write16(dst++, value[i]);
|
||
|
}
|
||
|
for (i = 0; i < pad; i++)
|
||
|
*dst++ = 0;
|
||
|
for (i = 0; i < 3; i++)
|
||
|
src[i] += pic->linesize[i]/2;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
|
||
|
const AVFrame *frame, int *got_packet)
|
||
|
{
|
||
|
DPXContext *s = avctx->priv_data;
|
||
|
int size, ret, need_align, len;
|
||
|
uint8_t *buf;
|
||
|
|
||
|
#define HEADER_SIZE 1664 /* DPX Generic header */
|
||
|
if (s->bits_per_component == 10)
|
||
|
size = avctx->height * avctx->width * 4;
|
||
|
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;
|
||
|
}
|
||
|
if ((ret = ff_alloc_packet2(avctx, pkt, size + HEADER_SIZE, 0)) < 0)
|
||
|
return ret;
|
||
|
buf = pkt->data;
|
||
|
|
||
|
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);
|
||
|
if (!(avctx->flags & AV_CODEC_FLAG_BITEXACT))
|
||
|
memcpy (buf + 160, LIBAVCODEC_IDENT, FFMIN(sizeof(LIBAVCODEC_IDENT), 100));
|
||
|
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;
|
||
|
write16(buf + 804, (s->bits_per_component == 10 || s->bits_per_component == 12) ?
|
||
|
1 : 0); /* packing method */
|
||
|
write32(buf + 808, HEADER_SIZE); /* data offset */
|
||
|
|
||
|
/* Image source information header */
|
||
|
write32(buf + 1628, avctx->sample_aspect_ratio.num);
|
||
|
write32(buf + 1632, avctx->sample_aspect_ratio.den);
|
||
|
|
||
|
switch(s->bits_per_component) {
|
||
|
case 8:
|
||
|
case 16:
|
||
|
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 {
|
||
|
size = av_image_copy_to_buffer(buf + HEADER_SIZE, pkt->size - HEADER_SIZE,
|
||
|
(const uint8_t**)frame->data, frame->linesize,
|
||
|
avctx->pix_fmt,
|
||
|
avctx->width, avctx->height, 1);
|
||
|
}
|
||
|
if (size < 0)
|
||
|
return size;
|
||
|
break;
|
||
|
case 10:
|
||
|
if (s->planar)
|
||
|
encode_gbrp10(avctx, frame, buf + HEADER_SIZE);
|
||
|
else
|
||
|
encode_rgb48_10bit(avctx, frame, buf + HEADER_SIZE);
|
||
|
break;
|
||
|
case 12:
|
||
|
encode_gbrp12(avctx, frame, (uint16_t*)(buf + HEADER_SIZE));
|
||
|
break;
|
||
|
default:
|
||
|
av_log(avctx, AV_LOG_ERROR, "Unsupported bit depth: %d\n", s->bits_per_component);
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
size += HEADER_SIZE;
|
||
|
|
||
|
write32(buf + 16, size); /* file size */
|
||
|
|
||
|
pkt->flags |= AV_PKT_FLAG_KEY;
|
||
|
*got_packet = 1;
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
AVCodec ff_dpx_encoder = {
|
||
|
.name = "dpx",
|
||
|
.long_name = NULL_IF_CONFIG_SMALL("DPX (Digital Picture Exchange) image"),
|
||
|
.type = AVMEDIA_TYPE_VIDEO,
|
||
|
.id = AV_CODEC_ID_DPX,
|
||
|
.priv_data_size = sizeof(DPXContext),
|
||
|
.init = encode_init,
|
||
|
.encode2 = encode_frame,
|
||
|
.pix_fmts = (const enum AVPixelFormat[]){
|
||
|
AV_PIX_FMT_GRAY8,
|
||
|
AV_PIX_FMT_RGB24, AV_PIX_FMT_RGBA, AV_PIX_FMT_ABGR,
|
||
|
AV_PIX_FMT_GRAY16LE, AV_PIX_FMT_GRAY16BE,
|
||
|
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,
|
||
|
AV_PIX_FMT_NONE},
|
||
|
};
|