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 "bytestream.h"
  24 #include "put_bits.h"
  25 #include "pnm.h"
  26
  27
  28 static int pnm_decode_frame(AVCodecContext *avctx, void *data,
  29                             int *data_size, 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 *picture     = data;
  35     AVFrame * const p    = (AVFrame*)&s->picture;
  36     int i, j, n, linesize, h, upgrade = 0, is_mono = 0;
  37     unsigned char *ptr;
  38     int components, sample_len;
  39
  40     s->bytestream_start =
  41     s->bytestream       = buf;
  42     s->bytestream_end   = buf + buf_size;
  43
  44     if (ff_pnm_decode_header(avctx, s) < 0)
  45         return -1;
  46
  47     if (p->data[0])
  48         avctx->release_buffer(avctx, p);
  49
  50     p->reference = 0;
  51     if (avctx->get_buffer(avctx, p) < 0) {
  52         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
  53         return -1;
  54     }
  55     p->pict_type = AV_PICTURE_TYPE_I;
  56     p->key_frame = 1;
  57
  58     switch (avctx->pix_fmt) {
  59     default:
  60         return -1;
  61     case PIX_FMT_RGB48BE:
  62         n = avctx->width * 6;
  63         components=3;
  64         sample_len=16;
  65         goto do_read;
  66     case PIX_FMT_RGB24:
  67         n = avctx->width * 3;
  68         components=3;
  69         sample_len=8;
  70         goto do_read;
  71     case PIX_FMT_GRAY8:
  72         n = avctx->width;
  73         components=1;
  74         sample_len=8;
  75         if (s->maxval < 255)
  76             upgrade = 1;
  77         goto do_read;
  78     case PIX_FMT_GRAY16BE:
  79     case PIX_FMT_GRAY16LE:
  80         n = avctx->width * 2;
  81         components=1;
  82         sample_len=16;
  83         if (s->maxval < 65535)
  84             upgrade = 2;
  85         goto do_read;
  86     case PIX_FMT_MONOWHITE:
  87     case PIX_FMT_MONOBLACK:
  88         n = (avctx->width + 7) >> 3;
  89         components=1;
  90         sample_len=1;
  91         is_mono = 1;
  92     do_read:
  93         ptr      = p->data[0];
  94         linesize = p->linesize[0];
  95         if (s->bytestream + n * avctx->height > s->bytestream_end)
  96             return -1;
  97         if(s->type < 4){
  98             for (i=0; i<avctx->height; i++) {
  99                 PutBitContext pb;
 100                 init_put_bits(&pb, ptr, linesize);
 101                 for(j=0; j<avctx->width * components; j++){
 102                     unsigned int c=0;
 103                     int v=0;
 104                     while(s->bytestream < s->bytestream_end && (*s->bytestream < '0' || *s->bytestream > '9' ))
 105                         s->bytestream++;
 106                     if(s->bytestream >= s->bytestream_end)
 107                         return -1;
 108                     if (is_mono) {
 109                         /* read a single digit */
 110                         v = (*s->bytestream++) - '0';
 111                     } else {
 112                         /* read a sequence of digits */
 113                         do {
 114                             v = 10*v + c;
 115                             c = (*s->bytestream++) - '0';
 116                         } while (c <= 9);
 117                     }
 118                     put_bits(&pb, sample_len, (((1<<sample_len)-1)*v + (s->maxval>>1))/s->maxval);
 119                 }
 120                 flush_put_bits(&pb);
 121                 ptr+= linesize;
 122             }
 123         }else{
 124         for (i = 0; i < avctx->height; i++) {
 125             if (!upgrade)
 126                 memcpy(ptr, s->bytestream, n);
 127             else if (upgrade == 1) {
 128                 unsigned int j, f = (255 * 128 + s->maxval / 2) / s->maxval;
 129                 for (j = 0; j < n; j++)
 130                     ptr[j] = (s->bytestream[j] * f + 64) >> 7;
 131             } else if (upgrade == 2) {
 132                 unsigned int j, v, f = (65535 * 32768 + s->maxval / 2) / s->maxval;
 133                 for (j = 0; j < n / 2; j++) {
 134                     v = av_be2ne16(((uint16_t *)s->bytestream)[j]);
 135                     ((uint16_t *)ptr)[j] = (v * f + 16384) >> 15;
 136                 }
 137             }
 138             s->bytestream += n;
 139             ptr           += linesize;
 140         }
 141         }
 142         break;
 143     case PIX_FMT_YUV420P:
 144         {
 145             unsigned char *ptr1, *ptr2;
 146
 147             n        = avctx->width;
 148             ptr      = p->data[0];
 149             linesize = p->linesize[0];
 150             if (s->bytestream + n * avctx->height * 3 / 2 > s->bytestream_end)
 151                 return -1;
 152             for (i = 0; i < avctx->height; i++) {
 153                 memcpy(ptr, s->bytestream, n);
 154                 s->bytestream += n;
 155                 ptr           += linesize;
 156             }
 157             ptr1 = p->data[1];
 158             ptr2 = p->data[2];
 159             n >>= 1;
 160             h = avctx->height >> 1;
 161             for (i = 0; i < h; i++) {
 162                 memcpy(ptr1, s->bytestream, n);
 163                 s->bytestream += n;
 164                 memcpy(ptr2, s->bytestream, n);
 165                 s->bytestream += n;
 166                 ptr1 += p->linesize[1];
 167                 ptr2 += p->linesize[2];
 168             }
 169         }
 170         break;
 171     case PIX_FMT_RGB32:
 172         ptr      = p->data[0];
 173         linesize = p->linesize[0];
 174         if (s->bytestream + avctx->width * avctx->height * 4 > s->bytestream_end)
 175             return -1;
 176         for (i = 0; i < avctx->height; i++) {
 177             int j, r, g, b, a;
 178
 179             for (j = 0; j < avctx->width; j++) {
 180                 r = *s->bytestream++;
 181                 g = *s->bytestream++;
 182                 b = *s->bytestream++;
 183                 a = *s->bytestream++;
 184                 ((uint32_t *)ptr)[j] = (a << 24) | (r << 16) | (g << 8) | b;
 185             }
 186             ptr += linesize;
 187         }
 188         break;
 189     }
 190     *picture   = *(AVFrame*)&s->picture;
 191     *data_size = sizeof(AVPicture);
 192
 193     return s->bytestream - s->bytestream_start;
 194 }
 195
 196
 197 #if CONFIG_PGM_DECODER
 198 AVCodec ff_pgm_decoder = {
 199     "pgm",
 200     AVMEDIA_TYPE_VIDEO,
 201     CODEC_ID_PGM,
 202     sizeof(PNMContext),
 203     ff_pnm_init,
 204     NULL,
 205     ff_pnm_end,
 206     pnm_decode_frame,
 207     CODEC_CAP_DR1,
 208     .pix_fmts  = (const enum PixelFormat[]){PIX_FMT_GRAY8, PIX_FMT_GRAY16BE, PIX_FMT_NONE},
 209     .long_name = NULL_IF_CONFIG_SMALL("PGM (Portable GrayMap) image"),
 210 };
 211 #endif
 212
 213 #if CONFIG_PGMYUV_DECODER
 214 AVCodec ff_pgmyuv_decoder = {
 215     "pgmyuv",
 216     AVMEDIA_TYPE_VIDEO,
 217     CODEC_ID_PGMYUV,
 218     sizeof(PNMContext),
 219     ff_pnm_init,
 220     NULL,
 221     ff_pnm_end,
 222     pnm_decode_frame,
 223     CODEC_CAP_DR1,
 224     .pix_fmts  = (const enum PixelFormat[]){PIX_FMT_YUV420P, PIX_FMT_NONE},
 225     .long_name = NULL_IF_CONFIG_SMALL("PGMYUV (Portable GrayMap YUV) image"),
 226 };
 227 #endif
 228
 229 #if CONFIG_PPM_DECODER
 230 AVCodec ff_ppm_decoder = {
 231     "ppm",
 232     AVMEDIA_TYPE_VIDEO,
 233     CODEC_ID_PPM,
 234     sizeof(PNMContext),
 235     ff_pnm_init,
 236     NULL,
 237     ff_pnm_end,
 238     pnm_decode_frame,
 239     CODEC_CAP_DR1,
 240     .pix_fmts  = (const enum PixelFormat[]){PIX_FMT_RGB24, PIX_FMT_RGB48BE, PIX_FMT_NONE},
 241     .long_name = NULL_IF_CONFIG_SMALL("PPM (Portable PixelMap) image"),
 242 };
 243 #endif
 244
 245 #if CONFIG_PBM_DECODER
 246 AVCodec ff_pbm_decoder = {
 247     "pbm",
 248     AVMEDIA_TYPE_VIDEO,
 249     CODEC_ID_PBM,
 250     sizeof(PNMContext),
 251     ff_pnm_init,
 252     NULL,
 253     ff_pnm_end,
 254     pnm_decode_frame,
 255     CODEC_CAP_DR1,
 256     .pix_fmts  = (const enum PixelFormat[]){PIX_FMT_MONOWHITE, PIX_FMT_NONE},
 257     .long_name = NULL_IF_CONFIG_SMALL("PBM (Portable BitMap) image"),
 258 };
 259 #endif
 260
 261 #if CONFIG_PAM_DECODER
 262 AVCodec ff_pam_decoder = {
 263     "pam",
 264     AVMEDIA_TYPE_VIDEO,
 265     CODEC_ID_PAM,
 266     sizeof(PNMContext),
 267     ff_pnm_init,
 268     NULL,
 269     ff_pnm_end,
 270     pnm_decode_frame,
 271     CODEC_CAP_DR1,
 272     .pix_fmts  = (const enum PixelFormat[]){PIX_FMT_RGB24, PIX_FMT_RGB32, PIX_FMT_GRAY8, PIX_FMT_MONOWHITE, PIX_FMT_NONE},
 273     .long_name = NULL_IF_CONFIG_SMALL("PAM (Portable AnyMap) image"),
 274 };
 275 #endif