pnm.c 6.49 KB
Newer Older
1 2
/*
 * PNM image format
3
 * Copyright (c) 2002, 2003 Fabrice Bellard
4
 *
5 6 7
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
8 9
 * modify it under the terms of the GNU Lesser General Public
 * 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 14 15 16 17
 * 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
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 23 24
#include <stdlib.h>
#include <string.h>

25
#include "libavutil/imgutils.h"
26
#include "avcodec.h"
27
#include "pnm.h"
28

29 30
static inline int pnm_space(int c)
{
31
    return c == ' ' || c == '\n' || c == '\r' || c == '\t';
32 33
}

34
static void pnm_get(PNMContext *sc, char *str, int buf_size)
Michael Niedermayer's avatar
Michael Niedermayer committed
35
{
36 37 38 39
    char *s;
    int c;

    /* skip spaces and comments */
40
    while (sc->bytestream < sc->bytestream_end) {
41 42
        c = *sc->bytestream++;
        if (c == '#')  {
43
            while (c != '\n' && sc->bytestream < sc->bytestream_end) {
44
                c = *sc->bytestream++;
45
            }
46 47 48
        } else if (!pnm_space(c)) {
            break;
        }
49
    }
50

51 52 53 54 55 56 57 58
    s = str;
    while (sc->bytestream < sc->bytestream_end && !pnm_space(c)) {
        if ((s - str)  < buf_size - 1)
            *s++ = c;
        c = *sc->bytestream++;
    }
    *s = '\0';
}
59

60 61
int ff_pnm_decode_header(AVCodecContext *avctx, PNMContext * const s)
{
62 63 64 65
    char buf1[32], tuple_type[32];
    int h, w, depth, maxval;

    pnm_get(s, buf1, sizeof(buf1));
66
    if(buf1[0] != 'P')
67
        return AVERROR_INVALIDDATA;
68
    s->type= buf1[1]-'0';
69 70

    if (s->type==1 || s->type==4) {
71
        avctx->pix_fmt = AV_PIX_FMT_MONOWHITE;
72
    } else if (s->type==2 || s->type==5) {
73
        if (avctx->codec_id == AV_CODEC_ID_PGMYUV)
74
            avctx->pix_fmt = AV_PIX_FMT_YUV420P;
75
        else
76
            avctx->pix_fmt = AV_PIX_FMT_GRAY8;
77
    } else if (s->type==3 || s->type==6) {
78
        avctx->pix_fmt = AV_PIX_FMT_RGB24;
79
    } else if (s->type==7) {
80 81
        w      = -1;
        h      = -1;
82
        maxval = -1;
83
        depth  = -1;
84
        tuple_type[0] = '\0';
85
        for (;;) {
86 87 88 89 90 91 92 93 94 95 96 97 98
            pnm_get(s, buf1, sizeof(buf1));
            if (!strcmp(buf1, "WIDTH")) {
                pnm_get(s, buf1, sizeof(buf1));
                w = strtol(buf1, NULL, 10);
            } else if (!strcmp(buf1, "HEIGHT")) {
                pnm_get(s, buf1, sizeof(buf1));
                h = strtol(buf1, NULL, 10);
            } else if (!strcmp(buf1, "DEPTH")) {
                pnm_get(s, buf1, sizeof(buf1));
                depth = strtol(buf1, NULL, 10);
            } else if (!strcmp(buf1, "MAXVAL")) {
                pnm_get(s, buf1, sizeof(buf1));
                maxval = strtol(buf1, NULL, 10);
99
            } else if (!strcmp(buf1, "TUPLTYPE") ||
100
                       /* libavcodec used to write invalid files */
101
                       !strcmp(buf1, "TUPLETYPE")) {
102 103 104 105
                pnm_get(s, tuple_type, sizeof(tuple_type));
            } else if (!strcmp(buf1, "ENDHDR")) {
                break;
            } else {
106
                return AVERROR_INVALIDDATA;
107 108
            }
        }
109
        /* check that all tags are present */
110
        if (w <= 0 || h <= 0 || maxval <= 0 || depth <= 0 || tuple_type[0] == '\0' || av_image_check_size(w, h, 0, avctx) || s->bytestream >= s->bytestream_end)
111
            return AVERROR_INVALIDDATA;
112

113
        avctx->width  = w;
114
        avctx->height = h;
115
        s->maxval     = maxval;
116
        if (depth == 1) {
117
            if (maxval == 1) {
118
                avctx->pix_fmt = AV_PIX_FMT_MONOBLACK;
119
            } else if (maxval < 256) {
120
                avctx->pix_fmt = AV_PIX_FMT_GRAY8;
121
            } else {
122
                avctx->pix_fmt = AV_PIX_FMT_GRAY16;
123
            }
124
        } else if (depth == 2) {
125
            if (maxval < 256) {
126
                avctx->pix_fmt = AV_PIX_FMT_GRAY8A;
127 128 129
            } else {
                avctx->pix_fmt = AV_PIX_FMT_YA16;
            }
130
        } else if (depth == 3) {
131
            if (maxval < 256) {
Paul B Mahol's avatar
Paul B Mahol committed
132
                avctx->pix_fmt = AV_PIX_FMT_RGB24;
133
            } else {
134
                avctx->pix_fmt = AV_PIX_FMT_RGB48;
135
            }
136
        } else if (depth == 4) {
ami_stuff's avatar
ami_stuff committed
137
            if (maxval < 256) {
138
                avctx->pix_fmt = AV_PIX_FMT_RGBA;
ami_stuff's avatar
ami_stuff committed
139
            } else {
140
                avctx->pix_fmt = AV_PIX_FMT_RGBA64;
ami_stuff's avatar
ami_stuff committed
141
            }
142
        } else {
143
            return AVERROR_INVALIDDATA;
144
        }
145 146
        return 0;
    } else {
147
        return AVERROR_INVALIDDATA;
148
    }
149
    pnm_get(s, buf1, sizeof(buf1));
150
    w = atoi(buf1);
151
    pnm_get(s, buf1, sizeof(buf1));
152 153
    h = atoi(buf1);
    if(w <= 0 || h <= 0 || av_image_check_size(w, h, 0, avctx) || s->bytestream >= s->bytestream_end)
154
        return AVERROR_INVALIDDATA;
155 156 157 158

    avctx->width  = w;
    avctx->height = h;

159
    if (avctx->pix_fmt != AV_PIX_FMT_MONOWHITE && avctx->pix_fmt != AV_PIX_FMT_MONOBLACK) {
160 161
        pnm_get(s, buf1, sizeof(buf1));
        s->maxval = atoi(buf1);
162 163
        if (s->maxval <= 0) {
            av_log(avctx, AV_LOG_ERROR, "Invalid maxval: %d\n", s->maxval);
164
            s->maxval = 255;
165
        }
166
        if (s->maxval >= 256) {
167
            if (avctx->pix_fmt == AV_PIX_FMT_GRAY8) {
168
                avctx->pix_fmt = AV_PIX_FMT_GRAY16;
169
            } else if (avctx->pix_fmt == AV_PIX_FMT_RGB24) {
170
                avctx->pix_fmt = AV_PIX_FMT_RGB48;
171 172
            } else if (avctx->pix_fmt == AV_PIX_FMT_YUV420P && s->maxval < 65536) {
                if (s->maxval < 512)
173
                    avctx->pix_fmt = AV_PIX_FMT_YUV420P9;
174
                else if (s->maxval < 1024)
175
                    avctx->pix_fmt = AV_PIX_FMT_YUV420P10;
176 177
                else
                    avctx->pix_fmt = AV_PIX_FMT_YUV420P16;
178
            } else {
179
                av_log(avctx, AV_LOG_ERROR, "Unsupported pixel format\n");
180
                avctx->pix_fmt = AV_PIX_FMT_NONE;
181
                return AVERROR_INVALIDDATA;
182
            }
183
        }
184 185
    }else
        s->maxval=1;
186
    /* more check if YUV420 */
187
    if (av_pix_fmt_desc_get(avctx->pix_fmt)->flags & AV_PIX_FMT_FLAG_PLANAR) {
188
        if ((avctx->width & 1) != 0)
189
            return AVERROR_INVALIDDATA;
190 191
        h = (avctx->height * 2);
        if ((h % 3) != 0)
192
            return AVERROR_INVALIDDATA;
193 194
        h /= 3;
        avctx->height = h;
195
    }
196
    return 0;
197
}