003f6be484b7021e57eee3b9e40bb91752d9fcdc
[ffmpeg.git] / libavcodec / sgienc.c
1 /*
2  * SGI image encoder
3  * Todd Kirby <doubleshot@pacbell.net>
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 "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         return AVERROR_INVALIDDATA;
37     }
38
39     avctx->coded_frame = av_frame_alloc();
40     if (!avctx->coded_frame)
41         return AVERROR(ENOMEM);
42
43     return 0;
44 }
45
46 static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
47                         const AVFrame *frame, int *got_packet)
48 {
49     const AVFrame * const p = frame;
50     uint8_t *offsettab, *lengthtab, *in_buf, *encode_buf, *buf;
51     int x, y, z, length, tablesize, ret;
52     unsigned int width, height, depth, dimension;
53     unsigned char *end_buf;
54
55     avctx->coded_frame->pict_type = AV_PICTURE_TYPE_I;
56     avctx->coded_frame->key_frame = 1;
57
58     width  = avctx->width;
59     height = avctx->height;
60
61     switch (avctx->pix_fmt) {
62     case AV_PIX_FMT_GRAY8:
63         dimension = SGI_SINGLE_CHAN;
64         depth     = SGI_GRAYSCALE;
65         break;
66     case AV_PIX_FMT_RGB24:
67         dimension = SGI_MULTI_CHAN;
68         depth     = SGI_RGB;
69         break;
70     case AV_PIX_FMT_RGBA:
71         dimension = SGI_MULTI_CHAN;
72         depth     = SGI_RGBA;
73         break;
74     default:
75         return AVERROR_INVALIDDATA;
76     }
77
78     tablesize = depth * height * 4;
79     length = SGI_HEADER_SIZE;
80     if (avctx->coder_type == FF_CODER_TYPE_RAW)
81         length += depth * height * width;
82     else // assume ff_rl_encode() produces at most 2x size of input
83         length += tablesize * 2 + depth * height * (2 * width + 1);
84
85     if ((ret = ff_alloc_packet(pkt, length)) < 0) {
86         av_log(avctx, AV_LOG_ERROR, "Error getting output packet of size %d.\n", length);
87         return ret;
88     }
89     buf     = pkt->data;
90     end_buf = pkt->data + pkt->size;
91
92     /* Encode header. */
93     bytestream_put_be16(&buf, SGI_MAGIC);
94     bytestream_put_byte(&buf, avctx->coder_type != FF_CODER_TYPE_RAW); /* RLE 1 - VERBATIM 0*/
95     bytestream_put_byte(&buf, 1); /* bytes_per_channel */
96     bytestream_put_be16(&buf, dimension);
97     bytestream_put_be16(&buf, width);
98     bytestream_put_be16(&buf, height);
99     bytestream_put_be16(&buf, depth);
100
101     /* The rest are constant in this implementation. */
102     bytestream_put_be32(&buf, 0L); /* pixmin */
103     bytestream_put_be32(&buf, 255L); /* pixmax */
104     bytestream_put_be32(&buf, 0L); /* dummy */
105
106     /* name */
107     memset(buf, 0, SGI_HEADER_SIZE);
108     buf += 80;
109
110     /* colormap */
111     bytestream_put_be32(&buf, 0L);
112
113     /* The rest of the 512 byte header is unused. */
114     buf += 404;
115     offsettab = buf;
116
117     if (avctx->coder_type != FF_CODER_TYPE_RAW) {
118         /* Skip RLE offset table. */
119         buf += tablesize;
120         lengthtab = buf;
121
122         /* Skip RLE length table. */
123         buf += tablesize;
124
125         /* Make an intermediate consecutive buffer. */
126         if (!(encode_buf = av_malloc(width)))
127             return -1;
128
129         for (z = 0; z < depth; z++) {
130             in_buf = p->data[0] + p->linesize[0] * (height - 1) + z;
131
132             for (y = 0; y < height; y++) {
133                 bytestream_put_be32(&offsettab, buf - pkt->data);
134
135                 for (x = 0; x < width; x++)
136                     encode_buf[x] = in_buf[depth * x];
137
138                 if ((length = ff_rle_encode(buf, end_buf - buf - 1, encode_buf, 1, width, 0, 0, 0x80, 0)) < 1) {
139                     av_free(encode_buf);
140                     return -1;
141                 }
142
143                 buf += length;
144                 bytestream_put_byte(&buf, 0);
145                 bytestream_put_be32(&lengthtab, length + 1);
146                 in_buf -= p->linesize[0];
147             }
148         }
149
150         av_free(encode_buf);
151     } else {
152         for (z = 0; z < depth; z++) {
153             in_buf = p->data[0] + p->linesize[0] * (height - 1) + z;
154
155             for (y = 0; y < height; y++) {
156                 for (x = 0; x < width * depth; x += depth)
157                     bytestream_put_byte(&buf, in_buf[x]);
158
159                 in_buf -= p->linesize[0];
160             }
161         }
162     }
163
164     /* total length */
165     pkt->size   = buf - pkt->data;
166     pkt->flags |= AV_PKT_FLAG_KEY;
167     *got_packet = 1;
168
169     return 0;
170 }
171
172 static av_cold int encode_close(AVCodecContext *avctx)
173 {
174     av_frame_free(&avctx->coded_frame);
175     return 0;
176 }
177
178 AVCodec ff_sgi_encoder = {
179     .name      = "sgi",
180     .long_name = NULL_IF_CONFIG_SMALL("SGI image"),
181     .type      = AVMEDIA_TYPE_VIDEO,
182     .id        = AV_CODEC_ID_SGI,
183     .init      = encode_init,
184     .encode2   = encode_frame,
185     .close     = encode_close,
186     .pix_fmts  = (const enum AVPixelFormat[]) {
187         AV_PIX_FMT_RGB24, AV_PIX_FMT_RGBA, AV_PIX_FMT_GRAY8, AV_PIX_FMT_NONE
188     },
189 };