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