a34acf812de938f4b000a6b56bb4e5e836eab44d
[ffmpeg.git] / libavcodec / pnmdec.c
1 /*
2  * PNM image format
3  * Copyright (c) 2002, 2003 Fabrice Bellard
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 "internal.h"
24 #include "put_bits.h"
25 #include "pnm.h"
26
27
28 static int pnm_decode_frame(AVCodecContext *avctx, void *data,
29                             int *got_frame, AVPacket *avpkt)
30 {
31     const uint8_t *buf   = avpkt->data;
32     int buf_size         = avpkt->size;
33     PNMContext * const s = avctx->priv_data;
34     AVFrame * const p    = data;
35     int i, j, n, linesize, h, upgrade = 0, is_mono = 0;
36     unsigned char *ptr;
37     int components, sample_len, ret;
38
39     s->bytestream_start =
40     s->bytestream       = (uint8_t *)buf;
41     s->bytestream_end   = (uint8_t *)buf + buf_size;
42
43     if ((ret = ff_pnm_decode_header(avctx, s)) < 0)
44         return ret;
45
46     if ((ret = ff_get_buffer(avctx, p, 0)) < 0) {
47         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
48         return ret;
49     }
50     p->pict_type = AV_PICTURE_TYPE_I;
51     p->key_frame = 1;
52
53     switch (avctx->pix_fmt) {
54     default:
55         return AVERROR(EINVAL);
56     case AV_PIX_FMT_RGBA64BE:
57         n = avctx->width * 8;
58         components=4;
59         sample_len=16;
60         goto do_read;
61     case AV_PIX_FMT_RGB48BE:
62         n = avctx->width * 6;
63         components=3;
64         sample_len=16;
65         goto do_read;
66     case AV_PIX_FMT_RGBA:
67         n = avctx->width * 4;
68         components=4;
69         sample_len=8;
70         goto do_read;
71     case AV_PIX_FMT_RGB24:
72         n = avctx->width * 3;
73         components=3;
74         sample_len=8;
75         goto do_read;
76     case AV_PIX_FMT_GRAY8:
77         n = avctx->width;
78         components=1;
79         sample_len=8;
80         if (s->maxval < 255)
81             upgrade = 1;
82         goto do_read;
83     case AV_PIX_FMT_GRAY8A:
84         n = avctx->width * 2;
85         components=2;
86         sample_len=8;
87         goto do_read;
88     case AV_PIX_FMT_GRAY16BE:
89     case AV_PIX_FMT_GRAY16LE:
90         n = avctx->width * 2;
91         components=1;
92         sample_len=16;
93         if (s->maxval < 65535)
94             upgrade = 2;
95         goto do_read;
96     case AV_PIX_FMT_MONOWHITE:
97     case AV_PIX_FMT_MONOBLACK:
98         n = (avctx->width + 7) >> 3;
99         components=1;
100         sample_len=1;
101         is_mono = 1;
102     do_read:
103         ptr      = p->data[0];
104         linesize = p->linesize[0];
105         if (s->bytestream + n * avctx->height > s->bytestream_end)
106             return AVERROR_INVALIDDATA;
107         if(s->type < 4 || (is_mono && s->type==7)){
108             for (i=0; i<avctx->height; i++) {
109                 PutBitContext pb;
110                 init_put_bits(&pb, ptr, linesize);
111                 for(j=0; j<avctx->width * components; j++){
112                     unsigned int c=0;
113                     int v=0;
114                     if(s->type < 4)
115                     while(s->bytestream < s->bytestream_end && (*s->bytestream < '0' || *s->bytestream > '9' ))
116                         s->bytestream++;
117                     if(s->bytestream >= s->bytestream_end)
118                         return AVERROR_INVALIDDATA;
119                     if (is_mono) {
120                         /* read a single digit */
121                         v = (*s->bytestream++)&1;
122                     } else {
123                         /* read a sequence of digits */
124                         do {
125                             v = 10*v + c;
126                             c = (*s->bytestream++) - '0';
127                         } while (c <= 9);
128                     }
129                     put_bits(&pb, sample_len, (((1<<sample_len)-1)*v + (s->maxval>>1))/s->maxval);
130                 }
131                 flush_put_bits(&pb);
132                 ptr+= linesize;
133             }
134         }else{
135         for (i = 0; i < avctx->height; i++) {
136             if (!upgrade)
137                 memcpy(ptr, s->bytestream, n);
138             else if (upgrade == 1) {
139                 unsigned int j, f = (255 * 128 + s->maxval / 2) / s->maxval;
140                 for (j = 0; j < n; j++)
141                     ptr[j] = (s->bytestream[j] * f + 64) >> 7;
142             } else if (upgrade == 2) {
143                 unsigned int j, v, f = (65535 * 32768 + s->maxval / 2) / s->maxval;
144                 for (j = 0; j < n / 2; j++) {
145                     v = av_be2ne16(((uint16_t *)s->bytestream)[j]);
146                     ((uint16_t *)ptr)[j] = (v * f + 16384) >> 15;
147                 }
148             }
149             s->bytestream += n;
150             ptr           += linesize;
151         }
152         }
153         break;
154     case AV_PIX_FMT_YUV420P:
155     case AV_PIX_FMT_YUV420P9BE:
156     case AV_PIX_FMT_YUV420P10BE:
157         {
158             unsigned char *ptr1, *ptr2;
159
160             n        = avctx->width;
161             ptr      = p->data[0];
162             linesize = p->linesize[0];
163             if (s->maxval >= 256)
164                 n *= 2;
165             if (s->bytestream + n * avctx->height * 3 / 2 > s->bytestream_end)
166                 return AVERROR_INVALIDDATA;
167             for (i = 0; i < avctx->height; i++) {
168                 memcpy(ptr, s->bytestream, n);
169                 s->bytestream += n;
170                 ptr           += linesize;
171             }
172             ptr1 = p->data[1];
173             ptr2 = p->data[2];
174             n >>= 1;
175             h = avctx->height >> 1;
176             for (i = 0; i < h; i++) {
177                 memcpy(ptr1, s->bytestream, n);
178                 s->bytestream += n;
179                 memcpy(ptr2, s->bytestream, n);
180                 s->bytestream += n;
181                 ptr1 += p->linesize[1];
182                 ptr2 += p->linesize[2];
183             }
184         }
185         break;
186     case AV_PIX_FMT_YUV420P16:
187         {
188             uint16_t *ptr1, *ptr2;
189             const int f = (65535 * 32768 + s->maxval / 2) / s->maxval;
190             unsigned int j, v;
191
192             n        = avctx->width * 2;
193             ptr      = p->data[0];
194             linesize = p->linesize[0];
195             if (s->bytestream + n * avctx->height * 3 / 2 > s->bytestream_end)
196                 return AVERROR_INVALIDDATA;
197             for (i = 0; i < avctx->height; i++) {
198                 for (j = 0; j < n / 2; j++) {
199                     v = av_be2ne16(((uint16_t *)s->bytestream)[j]);
200                     ((uint16_t *)ptr)[j] = (v * f + 16384) >> 15;
201                 }
202                 s->bytestream += n;
203                 ptr           += linesize;
204             }
205             ptr1 = (uint16_t*)p->data[1];
206             ptr2 = (uint16_t*)p->data[2];
207             n >>= 1;
208             h = avctx->height >> 1;
209             for (i = 0; i < h; i++) {
210                 for (j = 0; j < n / 2; j++) {
211                     v = av_be2ne16(((uint16_t *)s->bytestream)[j]);
212                     ptr1[j] = (v * f + 16384) >> 15;
213                 }
214                 s->bytestream += n;
215
216                 for (j = 0; j < n / 2; j++) {
217                     v = av_be2ne16(((uint16_t *)s->bytestream)[j]);
218                     ptr2[j] = (v * f + 16384) >> 15;
219                 }
220                 s->bytestream += n;
221
222                 ptr1 += p->linesize[1] / 2;
223                 ptr2 += p->linesize[2] / 2;
224             }
225         }
226         break;
227     }
228     *got_frame = 1;
229
230     return s->bytestream - s->bytestream_start;
231 }
232
233
234 #if CONFIG_PGM_DECODER
235 AVCodec ff_pgm_decoder = {
236     .name           = "pgm",
237     .type           = AVMEDIA_TYPE_VIDEO,
238     .id             = AV_CODEC_ID_PGM,
239     .priv_data_size = sizeof(PNMContext),
240     .decode         = pnm_decode_frame,
241     .capabilities   = CODEC_CAP_DR1,
242     .long_name      = NULL_IF_CONFIG_SMALL("PGM (Portable GrayMap) image"),
243 };
244 #endif
245
246 #if CONFIG_PGMYUV_DECODER
247 AVCodec ff_pgmyuv_decoder = {
248     .name           = "pgmyuv",
249     .type           = AVMEDIA_TYPE_VIDEO,
250     .id             = AV_CODEC_ID_PGMYUV,
251     .priv_data_size = sizeof(PNMContext),
252     .decode         = pnm_decode_frame,
253     .capabilities   = CODEC_CAP_DR1,
254     .long_name      = NULL_IF_CONFIG_SMALL("PGMYUV (Portable GrayMap YUV) image"),
255 };
256 #endif
257
258 #if CONFIG_PPM_DECODER
259 AVCodec ff_ppm_decoder = {
260     .name           = "ppm",
261     .type           = AVMEDIA_TYPE_VIDEO,
262     .id             = AV_CODEC_ID_PPM,
263     .priv_data_size = sizeof(PNMContext),
264     .decode         = pnm_decode_frame,
265     .capabilities   = CODEC_CAP_DR1,
266     .long_name      = NULL_IF_CONFIG_SMALL("PPM (Portable PixelMap) image"),
267 };
268 #endif
269
270 #if CONFIG_PBM_DECODER
271 AVCodec ff_pbm_decoder = {
272     .name           = "pbm",
273     .type           = AVMEDIA_TYPE_VIDEO,
274     .id             = AV_CODEC_ID_PBM,
275     .priv_data_size = sizeof(PNMContext),
276     .decode         = pnm_decode_frame,
277     .capabilities   = CODEC_CAP_DR1,
278     .long_name      = NULL_IF_CONFIG_SMALL("PBM (Portable BitMap) image"),
279 };
280 #endif
281
282 #if CONFIG_PAM_DECODER
283 AVCodec ff_pam_decoder = {
284     .name           = "pam",
285     .type           = AVMEDIA_TYPE_VIDEO,
286     .id             = AV_CODEC_ID_PAM,
287     .priv_data_size = sizeof(PNMContext),
288     .decode         = pnm_decode_frame,
289     .capabilities   = CODEC_CAP_DR1,
290     .long_name      = NULL_IF_CONFIG_SMALL("PAM (Portable AnyMap) image"),
291 };
292 #endif