c2045ef83356b3ed77a09907a15ecce0ce0bcbf4
[libav.git] / libavcodec / targaenc.c
1 /*
2 * Targa (.tga) image encoder
3 * Copyright (c) 2007 Bobby Bingham
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/pixdesc.h"
24 #include "avcodec.h"
25 #include "internal.h"
26 #include "rle.h"
27 #include "targa.h"
28
29 typedef struct TargaContext {
30 AVFrame picture;
31 } TargaContext;
32
33 /**
34 * RLE compress the image, with maximum size of out_size
35 * @param outbuf Output buffer
36 * @param out_size Maximum output size
37 * @param pic Image to compress
38 * @param bpp Bytes per pixel
39 * @param w Image width
40 * @param h Image height
41 * @return Size of output in bytes, or -1 if larger than out_size
42 */
43 static int targa_encode_rle(uint8_t *outbuf, int out_size, const AVFrame *pic,
44 int bpp, int w, int h)
45 {
46 int y,ret;
47 uint8_t *out;
48
49 out = outbuf;
50
51 for(y = 0; y < h; y ++) {
52 ret = ff_rle_encode(out, out_size, pic->data[0] + pic->linesize[0] * y, bpp, w, 0x7f, 0, -1, 0);
53 if(ret == -1){
54 return -1;
55 }
56 out+= ret;
57 out_size -= ret;
58 }
59
60 return out - outbuf;
61 }
62
63 static int targa_encode_normal(uint8_t *outbuf, const AVFrame *pic, int bpp, int w, int h)
64 {
65 int i, n = bpp * w;
66 uint8_t *out = outbuf;
67 uint8_t *ptr = pic->data[0];
68
69 for(i=0; i < h; i++) {
70 memcpy(out, ptr, n);
71 out += n;
72 ptr += pic->linesize[0];
73 }
74
75 return out - outbuf;
76 }
77
78 static int targa_encode_frame(AVCodecContext *avctx, AVPacket *pkt,
79 const AVFrame *p, int *got_packet)
80 {
81 int bpp, picsize, datasize = -1, ret;
82 uint8_t *out;
83
84 if(avctx->width > 0xffff || avctx->height > 0xffff) {
85 av_log(avctx, AV_LOG_ERROR, "image dimensions too large\n");
86 return AVERROR(EINVAL);
87 }
88 picsize = avpicture_get_size(avctx->pix_fmt, avctx->width, avctx->height);
89 if ((ret = ff_alloc_packet(pkt, picsize + 45)) < 0) {
90 av_log(avctx, AV_LOG_ERROR, "encoded frame too large\n");
91 return ret;
92 }
93
94 /* zero out the header and only set applicable fields */
95 memset(pkt->data, 0, 12);
96 AV_WL16(pkt->data+12, avctx->width);
97 AV_WL16(pkt->data+14, avctx->height);
98 /* image descriptor byte: origin is always top-left, bits 0-3 specify alpha */
99 pkt->data[17] = 0x20 | (avctx->pix_fmt == PIX_FMT_BGRA ? 8 : 0);
100
101 switch(avctx->pix_fmt) {
102 case PIX_FMT_GRAY8:
103 pkt->data[2] = TGA_BW; /* uncompressed grayscale image */
104 pkt->data[16] = 8; /* bpp */
105 break;
106 case PIX_FMT_RGB555LE:
107 pkt->data[2] = TGA_RGB; /* uncompresses true-color image */
108 pkt->data[16] = 16; /* bpp */
109 break;
110 case PIX_FMT_BGR24:
111 pkt->data[2] = TGA_RGB; /* uncompressed true-color image */
112 pkt->data[16] = 24; /* bpp */
113 break;
114 case PIX_FMT_BGRA:
115 pkt->data[2] = TGA_RGB; /* uncompressed true-color image */
116 pkt->data[16] = 32; /* bpp */
117 break;
118 default:
119 av_log(avctx, AV_LOG_ERROR, "Pixel format '%s' not supported.\n",
120 av_get_pix_fmt_name(avctx->pix_fmt));
121 return AVERROR(EINVAL);
122 }
123 bpp = pkt->data[16] >> 3;
124
125 out = pkt->data + 18; /* skip past the header we just output */
126
127 /* try RLE compression */
128 if (avctx->coder_type != FF_CODER_TYPE_RAW)
129 datasize = targa_encode_rle(out, picsize, p, bpp, avctx->width, avctx->height);
130
131 /* if that worked well, mark the picture as RLE compressed */
132 if(datasize >= 0)
133 pkt->data[2] |= 8;
134
135 /* if RLE didn't make it smaller, go back to no compression */
136 else datasize = targa_encode_normal(out, p, bpp, avctx->width, avctx->height);
137
138 out += datasize;
139
140 /* The standard recommends including this section, even if we don't use
141 * any of the features it affords. TODO: take advantage of the pixel
142 * aspect ratio and encoder ID fields available? */
143 memcpy(out, "\0\0\0\0\0\0\0\0TRUEVISION-XFILE.", 26);
144
145 pkt->size = out + 26 - pkt->data;
146 pkt->flags |= AV_PKT_FLAG_KEY;
147 *got_packet = 1;
148
149 return 0;
150 }
151
152 static av_cold int targa_encode_init(AVCodecContext *avctx)
153 {
154 TargaContext *s = avctx->priv_data;
155
156 avcodec_get_frame_defaults(&s->picture);
157 s->picture.key_frame= 1;
158 s->picture.pict_type = AV_PICTURE_TYPE_I;
159 avctx->coded_frame= &s->picture;
160
161 return 0;
162 }
163
164 AVCodec ff_targa_encoder = {
165 .name = "targa",
166 .type = AVMEDIA_TYPE_VIDEO,
167 .id = AV_CODEC_ID_TARGA,
168 .priv_data_size = sizeof(TargaContext),
169 .init = targa_encode_init,
170 .encode2 = targa_encode_frame,
171 .pix_fmts = (const enum PixelFormat[]){
172 PIX_FMT_BGR24, PIX_FMT_BGRA, PIX_FMT_RGB555LE, PIX_FMT_GRAY8,
173 PIX_FMT_NONE
174 },
175 .long_name= NULL_IF_CONFIG_SMALL("Truevision Targa image"),
176 };