[deb_ffmpeg.git] / ffmpeg / libavcodec / sgienc.c

/*
 * SGI image encoder
 * Todd Kirby <doubleshot@pacbell.net>
 *
 * 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 "avcodec.h"
#include "bytestream.h"
#include "internal.h"
#include "sgi.h"
#include "rle.h"

#define SGI_SINGLE_CHAN 2
#define SGI_MULTI_CHAN 3

static av_cold int encode_init(AVCodecContext *avctx)
{
    if (avctx->width > 65535 || avctx->height > 65535) {
        av_log(avctx, AV_LOG_ERROR,
               "Unsupported resolution %dx%d.\n", avctx->width, avctx->height);
        av_log(avctx, AV_LOG_ERROR, "SGI does not support resolutions above 65535x65535\n");
        return AVERROR_INVALIDDATA;
    }

    avctx->coded_frame = av_frame_alloc();
    if (!avctx->coded_frame)
        return AVERROR(ENOMEM);

    return 0;
}

static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
                        const AVFrame *frame, int *got_packet)
{
    const AVFrame * const p = frame;
    uint8_t *offsettab, *lengthtab, *in_buf, *encode_buf, *buf;
    int x, y, z, length, tablesize, ret;
    unsigned int width, height, depth, dimension;
    unsigned int bytes_per_channel, pixmax, put_be;
    unsigned char *end_buf;

    avctx->coded_frame->pict_type = AV_PICTURE_TYPE_I;
    avctx->coded_frame->key_frame = 1;

    width  = avctx->width;
    height = avctx->height;
    bytes_per_channel = 1;
    pixmax = 0xFF;
    put_be = HAVE_BIGENDIAN;

    switch (avctx->pix_fmt) {
    case AV_PIX_FMT_GRAY8:
        dimension = SGI_SINGLE_CHAN;
        depth     = SGI_GRAYSCALE;
        break;
    case AV_PIX_FMT_RGB24:
        dimension = SGI_MULTI_CHAN;
        depth     = SGI_RGB;
        break;
    case AV_PIX_FMT_RGBA:
        dimension = SGI_MULTI_CHAN;
        depth     = SGI_RGBA;
        break;
    case AV_PIX_FMT_GRAY16LE:
        put_be = !HAVE_BIGENDIAN;
    case AV_PIX_FMT_GRAY16BE:
        avctx->coder_type = FF_CODER_TYPE_RAW;
        bytes_per_channel = 2;
        pixmax = 0xFFFF;
        dimension = SGI_SINGLE_CHAN;
        depth     = SGI_GRAYSCALE;
        break;
    case AV_PIX_FMT_RGB48LE:
        put_be = !HAVE_BIGENDIAN;
    case AV_PIX_FMT_RGB48BE:
        avctx->coder_type = FF_CODER_TYPE_RAW;
        bytes_per_channel = 2;
        pixmax = 0xFFFF;
        dimension = SGI_MULTI_CHAN;
        depth     = SGI_RGB;
        break;
    case AV_PIX_FMT_RGBA64LE:
        put_be = !HAVE_BIGENDIAN;
    case AV_PIX_FMT_RGBA64BE:
        avctx->coder_type = FF_CODER_TYPE_RAW;
        bytes_per_channel = 2;
        pixmax = 0xFFFF;
        dimension = SGI_MULTI_CHAN;
        depth     = SGI_RGBA;
        break;
    default:
        return AVERROR_INVALIDDATA;
    }

    tablesize = depth * height * 4;
    length = SGI_HEADER_SIZE;
    if (avctx->coder_type == FF_CODER_TYPE_RAW)
        length += depth * height * width;
    else // assume ff_rl_encode() produces at most 2x size of input
        length += tablesize * 2 + depth * height * (2 * width + 1);

    if ((ret = ff_alloc_packet2(avctx, pkt, bytes_per_channel * length)) < 0)
        return ret;
    buf     = pkt->data;
    end_buf = pkt->data + pkt->size;

    /* Encode header. */
    bytestream_put_be16(&buf, SGI_MAGIC);
    bytestream_put_byte(&buf, avctx->coder_type != FF_CODER_TYPE_RAW); /* RLE 1 - VERBATIM 0*/
    bytestream_put_byte(&buf, bytes_per_channel);
    bytestream_put_be16(&buf, dimension);
    bytestream_put_be16(&buf, width);
    bytestream_put_be16(&buf, height);
    bytestream_put_be16(&buf, depth);

    bytestream_put_be32(&buf, 0L); /* pixmin */
    bytestream_put_be32(&buf, pixmax);
    bytestream_put_be32(&buf, 0L); /* dummy */

    /* name */
    memset(buf, 0, SGI_HEADER_SIZE);
    buf += 80;

    /* colormap */
    bytestream_put_be32(&buf, 0L);

    /* The rest of the 512 byte header is unused. */
    buf += 404;
    offsettab = buf;

    if (avctx->coder_type != FF_CODER_TYPE_RAW) {
        /* Skip RLE offset table. */
        buf += tablesize;
        lengthtab = buf;

        /* Skip RLE length table. */
        buf += tablesize;

        /* Make an intermediate consecutive buffer. */
        if (!(encode_buf = av_malloc(width)))
            return -1;

        for (z = 0; z < depth; z++) {
            in_buf = p->data[0] + p->linesize[0] * (height - 1) + z;

            for (y = 0; y < height; y++) {
                bytestream_put_be32(&offsettab, buf - pkt->data);

                for (x = 0; x < width; x++)
                    encode_buf[x] = in_buf[depth * x];

                if ((length = ff_rle_encode(buf, end_buf - buf - 1, encode_buf, 1, width, 0, 0, 0x80, 0)) < 1) {
                    av_free(encode_buf);
                    return -1;
                }

                buf += length;
                bytestream_put_byte(&buf, 0);
                bytestream_put_be32(&lengthtab, length + 1);
                in_buf -= p->linesize[0];
            }
        }

        av_free(encode_buf);
    } else {
        for (z = 0; z < depth; z++) {
            in_buf = p->data[0] + p->linesize[0] * (height - 1) + z * bytes_per_channel;

            for (y = 0; y < height; y++) {
                for (x = 0; x < width * depth; x += depth)
                    if (bytes_per_channel == 1) {
                        bytestream_put_byte(&buf, in_buf[x]);
                    } else {
                        if (put_be) {
                            bytestream_put_be16(&buf, ((uint16_t *)in_buf)[x]);
                        } else {
                            bytestream_put_le16(&buf, ((uint16_t *)in_buf)[x]);
                        }
                    }

                in_buf -= p->linesize[0];
            }
        }
    }

    /* total length */
    pkt->size   = buf - pkt->data;
    pkt->flags |= AV_PKT_FLAG_KEY;
    *got_packet = 1;

    return 0;
}

static av_cold int encode_close(AVCodecContext *avctx)
{
    av_frame_free(&avctx->coded_frame);
    return 0;
}

AVCodec ff_sgi_encoder = {
    .name      = "sgi",
    .long_name = NULL_IF_CONFIG_SMALL("SGI image"),
    .type      = AVMEDIA_TYPE_VIDEO,
    .id        = AV_CODEC_ID_SGI,
    .init      = encode_init,
    .encode2   = encode_frame,
    .close     = encode_close,
    .pix_fmts  = (const enum AVPixelFormat[]) {
        AV_PIX_FMT_RGB24, AV_PIX_FMT_RGBA,
        AV_PIX_FMT_RGB48LE, AV_PIX_FMT_RGB48BE,
        AV_PIX_FMT_RGBA64LE, AV_PIX_FMT_RGBA64BE,
        AV_PIX_FMT_GRAY16LE, AV_PIX_FMT_GRAY16BE, AV_PIX_FMT_GRAY8,
        AV_PIX_FMT_NONE
    },
};
Commit	Line	Data
2ba45a60 DM	1	/*
	2	* SGI image encoder
	3	* Todd Kirby <doubleshot@pacbell.net>
	4	*
	5	* This file is part of FFmpeg.
	6	*
	7	* FFmpeg 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	* FFmpeg 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 FFmpeg; if not, write to the Free Software
	19	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
	20	*/
	21
	22	#include "avcodec.h"
	23	#include "bytestream.h"
	24	#include "internal.h"
	25	#include "sgi.h"
	26	#include "rle.h"
	27
	28	#define SGI_SINGLE_CHAN 2
	29	#define SGI_MULTI_CHAN 3
	30
	31	static av_cold int encode_init(AVCodecContext *avctx)
	32	{
	33	if (avctx->width > 65535 \|\| avctx->height > 65535) {
	34	av_log(avctx, AV_LOG_ERROR,
	35	"Unsupported resolution %dx%d.\n", avctx->width, avctx->height);
	36	av_log(avctx, AV_LOG_ERROR, "SGI does not support resolutions above 65535x65535\n");
	37	return AVERROR_INVALIDDATA;
	38	}
	39
	40	avctx->coded_frame = av_frame_alloc();
	41	if (!avctx->coded_frame)
	42	return AVERROR(ENOMEM);
	43
	44	return 0;
	45	}
	46
	47	static int encode_frame(AVCodecContext avctx, AVPacket pkt,
	48	const AVFrame frame, int got_packet)
	49	{
	50	const AVFrame * const p = frame;
	51	uint8_t offsettab, lengthtab, in_buf, encode_buf, *buf;
	52	int x, y, z, length, tablesize, ret;
	53	unsigned int width, height, depth, dimension;
	54	unsigned int bytes_per_channel, pixmax, put_be;
	55	unsigned char *end_buf;
	56
	57	avctx->coded_frame->pict_type = AV_PICTURE_TYPE_I;
	58	avctx->coded_frame->key_frame = 1;
	59
	60	width = avctx->width;
	61	height = avctx->height;
	62	bytes_per_channel = 1;
	63	pixmax = 0xFF;
	64	put_be = HAVE_BIGENDIAN;
65
66	switch (avctx->pix_fmt) {
67	case AV_PIX_FMT_GRAY8:
68	dimension = SGI_SINGLE_CHAN;
69	depth = SGI_GRAYSCALE;
70	break;
71	case AV_PIX_FMT_RGB24:
72	dimension = SGI_MULTI_CHAN;
73	depth = SGI_RGB;
74	break;
75	case AV_PIX_FMT_RGBA:
76	dimension = SGI_MULTI_CHAN;
77	depth = SGI_RGBA;
78	break;
79	case AV_PIX_FMT_GRAY16LE:
80	put_be = !HAVE_BIGENDIAN;
81	case AV_PIX_FMT_GRAY16BE:
82	avctx->coder_type = FF_CODER_TYPE_RAW;
83	bytes_per_channel = 2;
84	pixmax = 0xFFFF;
85	dimension = SGI_SINGLE_CHAN;
86	depth = SGI_GRAYSCALE;
87	break;
88	case AV_PIX_FMT_RGB48LE:
89	put_be = !HAVE_BIGENDIAN;
90	case AV_PIX_FMT_RGB48BE:
91	avctx->coder_type = FF_CODER_TYPE_RAW;
92	bytes_per_channel = 2;
93	pixmax = 0xFFFF;
94	dimension = SGI_MULTI_CHAN;
95	depth = SGI_RGB;
96	break;
97	case AV_PIX_FMT_RGBA64LE:
98	put_be = !HAVE_BIGENDIAN;
99	case AV_PIX_FMT_RGBA64BE:
100	avctx->coder_type = FF_CODER_TYPE_RAW;
101	bytes_per_channel = 2;
102	pixmax = 0xFFFF;
103	dimension = SGI_MULTI_CHAN;
104	depth = SGI_RGBA;
105	break;
106	default:
107	return AVERROR_INVALIDDATA;
108	}
109
110	tablesize = depth * height * 4;
111	length = SGI_HEADER_SIZE;
112	if (avctx->coder_type == FF_CODER_TYPE_RAW)
113	length += depth * height * width;
114	else // assume ff_rl_encode() produces at most 2x size of input
115	length += tablesize * 2 + depth * height * (2 * width + 1);
116
117	if ((ret = ff_alloc_packet2(avctx, pkt, bytes_per_channel * length)) < 0)
118	return ret;
119	buf = pkt->data;
120	end_buf = pkt->data + pkt->size;
121
122	/* Encode header. */
123	bytestream_put_be16(&buf, SGI_MAGIC);
124	bytestream_put_byte(&buf, avctx->coder_type != FF_CODER_TYPE_RAW); /* RLE 1 - VERBATIM 0*/
125	bytestream_put_byte(&buf, bytes_per_channel);
126	bytestream_put_be16(&buf, dimension);
127	bytestream_put_be16(&buf, width);
128	bytestream_put_be16(&buf, height);
129	bytestream_put_be16(&buf, depth);
130
131	bytestream_put_be32(&buf, 0L); /* pixmin */
132	bytestream_put_be32(&buf, pixmax);
133	bytestream_put_be32(&buf, 0L); /* dummy */
134
135	/* name */
136	memset(buf, 0, SGI_HEADER_SIZE);
137	buf += 80;
138
139	/* colormap */
140	bytestream_put_be32(&buf, 0L);
141
142	/* The rest of the 512 byte header is unused. */
143	buf += 404;
144	offsettab = buf;
145
146	if (avctx->coder_type != FF_CODER_TYPE_RAW) {
147	/* Skip RLE offset table. */
148	buf += tablesize;
149	lengthtab = buf;
150
151	/* Skip RLE length table. */
152	buf += tablesize;
153
154	/* Make an intermediate consecutive buffer. */
155	if (!(encode_buf = av_malloc(width)))
156	return -1;
157
158	for (z = 0; z < depth; z++) {
159	in_buf = p->data[0] + p->linesize[0] * (height - 1) + z;
160
161	for (y = 0; y < height; y++) {
162	bytestream_put_be32(&offsettab, buf - pkt->data);
163
164	for (x = 0; x < width; x++)
165	encode_buf[x] = in_buf[depth * x];
166
167	if ((length = ff_rle_encode(buf, end_buf - buf - 1, encode_buf, 1, width, 0, 0, 0x80, 0)) < 1) {
168	av_free(encode_buf);
169	return -1;
170	}
171
172	buf += length;
173	bytestream_put_byte(&buf, 0);
174	bytestream_put_be32(&lengthtab, length + 1);
175	in_buf -= p->linesize[0];
176	}
177	}
178
179	av_free(encode_buf);
180	} else {
181	for (z = 0; z < depth; z++) {
182	in_buf = p->data[0] + p->linesize[0] * (height - 1) + z * bytes_per_channel;
183
184	for (y = 0; y < height; y++) {
185	for (x = 0; x < width * depth; x += depth)
186	if (bytes_per_channel == 1) {
187	bytestream_put_byte(&buf, in_buf[x]);
188	} else {
189	if (put_be) {
190	bytestream_put_be16(&buf, ((uint16_t *)in_buf)[x]);
191	} else {
192	bytestream_put_le16(&buf, ((uint16_t *)in_buf)[x]);
193	}
194	}
195
196	in_buf -= p->linesize[0];
197	}
198	}
199	}
200
201	/* total length */
202	pkt->size = buf - pkt->data;
203	pkt->flags \|= AV_PKT_FLAG_KEY;
204	*got_packet = 1;
205
206	return 0;
207	}
208
209	static av_cold int encode_close(AVCodecContext *avctx)
210	{
211	av_frame_free(&avctx->coded_frame);
212	return 0;
213	}
214
215	AVCodec ff_sgi_encoder = {
216	.name = "sgi",
217	.long_name = NULL_IF_CONFIG_SMALL("SGI image"),
218	.type = AVMEDIA_TYPE_VIDEO,
219	.id = AV_CODEC_ID_SGI,
220	.init = encode_init,
221	.encode2 = encode_frame,
222	.close = encode_close,
223	.pix_fmts = (const enum AVPixelFormat[]) {
224	AV_PIX_FMT_RGB24, AV_PIX_FMT_RGBA,
225	AV_PIX_FMT_RGB48LE, AV_PIX_FMT_RGB48BE,
226	AV_PIX_FMT_RGBA64LE, AV_PIX_FMT_RGBA64BE,
227	AV_PIX_FMT_GRAY16LE, AV_PIX_FMT_GRAY16BE, AV_PIX_FMT_GRAY8,
228	AV_PIX_FMT_NONE
229	},
230	};