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