git.sesse.net Git - ffmpeg/blob - libavcodec/rawdec.c

   1 /*
   2  * Raw Video Decoder
   3  * Copyright (c) 2001 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 /**
  23  * @file
  24  * Raw Video Decoder
  25  */
  26
  27 #include "avcodec.h"
  28 #include "bswapdsp.h"
  29 #include "get_bits.h"
  30 #include "internal.h"
  31 #include "raw.h"
  32 #include "libavutil/avassert.h"
  33 #include "libavutil/buffer.h"
  34 #include "libavutil/common.h"
  35 #include "libavutil/intreadwrite.h"
  36 #include "libavutil/imgutils.h"
  37 #include "libavutil/opt.h"
  38
  39 typedef struct RawVideoContext {
  40     AVClass *av_class;
  41     AVBufferRef *palette;
  42     int frame_size;  /* size of the frame in bytes */
  43     int flip;
  44     int is_1_2_4_8_bpp; // 1, 2, 4 and 8 bpp in avi/mov, 1 and 8 bpp in nut
  45     int is_mono;
  46     int is_pal8;
  47     int is_nut_mono;
  48     int is_nut_pal8;
  49     int is_yuv2;
  50     int is_lt_16bpp; // 16bpp pixfmt and bits_per_coded_sample < 16
  51     int tff;
  52
  53     BswapDSPContext bbdsp;
  54     void *bitstream_buf;
  55     unsigned int bitstream_buf_size;
  56 } RawVideoContext;
  57
  58 static const AVOption options[]={
  59 {"top", "top field first", offsetof(RawVideoContext, tff), AV_OPT_TYPE_BOOL, {.i64 = -1}, -1, 1, AV_OPT_FLAG_DECODING_PARAM|AV_OPT_FLAG_VIDEO_PARAM},
  60 {NULL}
  61 };
  62
  63 static const AVClass rawdec_class = {
  64     .class_name = "rawdec",
  65     .option     = options,
  66     .version    = LIBAVUTIL_VERSION_INT,
  67 };
  68
  69 static av_cold int raw_init_decoder(AVCodecContext *avctx)
  70 {
  71     RawVideoContext *context = avctx->priv_data;
  72     const AVPixFmtDescriptor *desc;
  73
  74     ff_bswapdsp_init(&context->bbdsp);
  75
  76     if (   avctx->codec_tag == MKTAG('r','a','w',' ')
  77         || avctx->codec_tag == MKTAG('N','O','1','6'))
  78         avctx->pix_fmt = avpriv_find_pix_fmt(avpriv_pix_fmt_bps_mov,
  79                                       avctx->bits_per_coded_sample);
  80     else if (avctx->codec_tag == MKTAG('W', 'R', 'A', 'W'))
  81         avctx->pix_fmt = avpriv_find_pix_fmt(avpriv_pix_fmt_bps_avi,
  82                                       avctx->bits_per_coded_sample);
  83     else if (avctx->codec_tag && (avctx->codec_tag & 0xFFFFFF) != MKTAG('B','I','T', 0))
  84         avctx->pix_fmt = avpriv_find_pix_fmt(ff_raw_pix_fmt_tags, avctx->codec_tag);
  85     else if (avctx->pix_fmt == AV_PIX_FMT_NONE && avctx->bits_per_coded_sample)
  86         avctx->pix_fmt = avpriv_find_pix_fmt(avpriv_pix_fmt_bps_avi,
  87                                       avctx->bits_per_coded_sample);
  88
  89     desc = av_pix_fmt_desc_get(avctx->pix_fmt);
  90     if (!desc) {
  91         av_log(avctx, AV_LOG_ERROR, "Invalid pixel format.\n");
  92         return AVERROR(EINVAL);
  93     }
  94
  95     if (desc->flags & (AV_PIX_FMT_FLAG_PAL | AV_PIX_FMT_FLAG_PSEUDOPAL)) {
  96         context->palette = av_buffer_alloc(AVPALETTE_SIZE);
  97         if (!context->palette)
  98             return AVERROR(ENOMEM);
  99         if (desc->flags & AV_PIX_FMT_FLAG_PSEUDOPAL)
 100             avpriv_set_systematic_pal2((uint32_t*)context->palette->data, avctx->pix_fmt);
 101         else {
 102             memset(context->palette->data, 0, AVPALETTE_SIZE);
 103             if (avctx->bits_per_coded_sample == 1)
 104                 memset(context->palette->data, 0xff, 4);
 105         }
 106     }
 107
 108     if ((avctx->extradata_size >= 9 &&
 109          !memcmp(avctx->extradata + avctx->extradata_size - 9, "BottomUp", 9)) ||
 110         avctx->codec_tag == MKTAG('c','y','u','v') ||
 111         avctx->codec_tag == MKTAG(3, 0, 0, 0) ||
 112         avctx->codec_tag == MKTAG('W','R','A','W'))
 113         context->flip = 1;
 114
 115     if (avctx->pix_fmt == AV_PIX_FMT_MONOWHITE ||
 116         avctx->pix_fmt == AV_PIX_FMT_MONOBLACK)
 117         context->is_mono = 1;
 118     else if (avctx->pix_fmt == AV_PIX_FMT_PAL8)
 119         context->is_pal8 = 1;
 120
 121     if (avctx->codec_tag == MKTAG('B','1','W','0') ||
 122         avctx->codec_tag == MKTAG('B','0','W','1'))
 123         context->is_nut_mono = 1;
 124     else if (avctx->codec_tag == MKTAG('P','A','L',8))
 125         context->is_nut_pal8 = 1;
 126
 127     if (avctx->codec_tag == AV_RL32("yuv2") &&
 128         avctx->pix_fmt   == AV_PIX_FMT_YUYV422)
 129         context->is_yuv2 = 1;
 130
 131     /* Temporary solution until PAL8 is implemented in nut */
 132     if (context->is_pal8 && avctx->bits_per_coded_sample == 1)
 133         avctx->pix_fmt = AV_PIX_FMT_NONE;
 134
 135     return 0;
 136 }
 137
 138 static void flip(AVCodecContext *avctx, AVFrame *frame)
 139 {
 140     frame->data[0]     += frame->linesize[0] * (avctx->height - 1);
 141     frame->linesize[0] *= -1;
 142 }
 143
 144 /*
 145  * Scale sample to 16-bit resolution
 146  */
 147 #define SCALE16(x, bits) (((x) << (16 - (bits))) | ((x) >> (2 * (bits) - 16)))
 148
 149 /**
 150  * Scale buffer to 16 bits per coded sample resolution
 151  */
 152 #define MKSCALE16(name, r16, w16) \
 153 static void name(AVCodecContext *avctx, uint8_t * dst, const uint8_t *buf, int buf_size, int packed) \
 154 { \
 155     int i; \
 156     if (!packed) { \
 157         for (i = 0; i + 1 < buf_size; i += 2) \
 158             w16(dst + i, SCALE16(r16(buf + i), avctx->bits_per_coded_sample)); \
 159     } else { \
 160         GetBitContext gb; \
 161         init_get_bits(&gb, buf, buf_size * 8); \
 162         for (i = 0; i < avctx->width * avctx->height; i++) { \
 163             int sample = get_bits(&gb, avctx->bits_per_coded_sample); \
 164             w16(dst + i*2, SCALE16(sample, avctx->bits_per_coded_sample)); \
 165         } \
 166    } \
 167 }
 168
 169 MKSCALE16(scale16be, AV_RB16, AV_WB16)
 170 MKSCALE16(scale16le, AV_RL16, AV_WL16)
 171
 172 static int raw_decode(AVCodecContext *avctx, void *data, int *got_frame,
 173                       AVPacket *avpkt)
 174 {
 175     const AVPixFmtDescriptor *desc;
 176     RawVideoContext *context       = avctx->priv_data;
 177     const uint8_t *buf             = avpkt->data;
 178     int buf_size                   = avpkt->size;
 179     int linesize_align             = 4;
 180     int stride;
 181     int res, len;
 182     int need_copy;
 183
 184     AVFrame   *frame   = data;
 185
 186     if (avctx->width <= 0) {
 187         av_log(avctx, AV_LOG_ERROR, "width is not set\n");
 188         return AVERROR_INVALIDDATA;
 189     }
 190     if (avctx->height <= 0) {
 191         av_log(avctx, AV_LOG_ERROR, "height is not set\n");
 192         return AVERROR_INVALIDDATA;
 193     }
 194
 195     if (context->is_nut_mono)
 196         stride = avctx->width / 8 + (avctx->width & 7 ? 1 : 0);
 197     else if (context->is_nut_pal8)
 198         stride = avctx->width;
 199     else
 200         stride = avpkt->size / avctx->height;
 201
 202     av_log(avctx, AV_LOG_DEBUG, "PACKET SIZE: %d, STRIDE: %d\n", avpkt->size, stride);
 203
 204     if (stride == 0 || avpkt->size < stride * avctx->height) {
 205         av_log(avctx, AV_LOG_ERROR, "Packet too small (%d)\n", avpkt->size);
 206         return AVERROR_INVALIDDATA;
 207     }
 208
 209     /* Temporary solution until PAL8 is implemented in nut */
 210     if (avctx->pix_fmt == AV_PIX_FMT_NONE &&
 211         avctx->bits_per_coded_sample == 1 &&
 212         avctx->frame_number == 0 &&
 213         context->palette &&
 214         AV_RB64(context->palette->data) == 0xFFFFFFFF00000000
 215     ) {
 216         const uint8_t *pal = av_packet_get_side_data(avpkt, AV_PKT_DATA_PALETTE, NULL);
 217         if (!pal) {
 218             avctx->pix_fmt = AV_PIX_FMT_MONOWHITE;
 219             context->is_pal8 = 0;
 220             context->is_mono = 1;
 221         } else
 222             avctx->pix_fmt = AV_PIX_FMT_PAL8;
 223     }
 224     desc = av_pix_fmt_desc_get(avctx->pix_fmt);
 225
 226     if ((avctx->bits_per_coded_sample == 8 || avctx->bits_per_coded_sample == 4
 227             || avctx->bits_per_coded_sample <= 2) &&
 228         (context->is_mono || context->is_pal8) &&
 229         (!avctx->codec_tag || avctx->codec_tag == MKTAG('r','a','w',' ') ||
 230                 context->is_nut_mono || context->is_nut_pal8)) {
 231         context->is_1_2_4_8_bpp = 1;
 232         if (context->is_mono) {
 233             int row_bytes = avctx->width / 8 + (avctx->width & 7 ? 1 : 0);
 234             context->frame_size = av_image_get_buffer_size(avctx->pix_fmt,
 235                                                            FFALIGN(row_bytes, 16) * 8,
 236                                                            avctx->height, 1);
 237         } else
 238             context->frame_size = av_image_get_buffer_size(avctx->pix_fmt,
 239                                                            FFALIGN(avctx->width, 16),
 240                                                            avctx->height, 1);
 241     } else {
 242         context->is_lt_16bpp = av_get_bits_per_pixel(desc) == 16 && avctx->bits_per_coded_sample && avctx->bits_per_coded_sample < 16;
 243         context->frame_size = av_image_get_buffer_size(avctx->pix_fmt, avctx->width,
 244                                                        avctx->height, 1);
 245     }
 246     if (context->frame_size < 0)
 247         return context->frame_size;
 248
 249     need_copy = !avpkt->buf || context->is_1_2_4_8_bpp || context->is_yuv2 || context->is_lt_16bpp;
 250
 251     frame->pict_type        = AV_PICTURE_TYPE_I;
 252     frame->key_frame        = 1;
 253
 254     res = ff_decode_frame_props(avctx, frame);
 255     if (res < 0)
 256         return res;
 257
 258     av_frame_set_pkt_pos     (frame, avctx->internal->pkt->pos);
 259     av_frame_set_pkt_duration(frame, avctx->internal->pkt->duration);
 260
 261     if (context->tff >= 0) {
 262         frame->interlaced_frame = 1;
 263         frame->top_field_first  = context->tff;
 264     }
 265
 266     if ((res = av_image_check_size(avctx->width, avctx->height, 0, avctx)) < 0)
 267         return res;
 268
 269     if (need_copy)
 270         frame->buf[0] = av_buffer_alloc(FFMAX(context->frame_size, buf_size));
 271     else
 272         frame->buf[0] = av_buffer_ref(avpkt->buf);
 273     if (!frame->buf[0])
 274         return AVERROR(ENOMEM);
 275
 276     // 1, 2, 4 and 8 bpp in avi/mov, 1 and 8 bpp in nut
 277     if (context->is_1_2_4_8_bpp) {
 278         int i, j, row_pix = 0;
 279         uint8_t *dst = frame->buf[0]->data;
 280         buf_size = context->frame_size - (context->is_pal8 ? AVPALETTE_SIZE : 0);
 281         if (avctx->bits_per_coded_sample == 8 || context->is_nut_pal8 || context->is_mono) {
 282             int pix_per_byte = context->is_mono ? 8 : 1;
 283             for (i = 0, j = 0; j < buf_size && i<avpkt->size; i++, j++) {
 284                 dst[j] = buf[i];
 285                 row_pix += pix_per_byte;
 286                 if (row_pix >= avctx->width) {
 287                     i += stride - (i % stride) - 1;
 288                     j += 16 - (j % 16) - 1;
 289                     row_pix = 0;
 290                 }
 291             }
 292         } else if (avctx->bits_per_coded_sample == 4) {
 293             for (i = 0, j = 0; 2 * j + 1 < buf_size && i<avpkt->size; i++, j++) {
 294                 dst[2 * j + 0] = buf[i] >> 4;
 295                 dst[2 * j + 1] = buf[i] & 15;
 296                 row_pix += 2;
 297                 if (row_pix >= avctx->width) {
 298                     i += stride - (i % stride) - 1;
 299                     j += 8 - (j % 8) - 1;
 300                     row_pix = 0;
 301                 }
 302             }
 303         } else if (avctx->bits_per_coded_sample == 2) {
 304             for (i = 0, j = 0; 4 * j + 3 < buf_size && i<avpkt->size; i++, j++) {
 305                 dst[4 * j + 0] = buf[i] >> 6;
 306                 dst[4 * j + 1] = buf[i] >> 4 & 3;
 307                 dst[4 * j + 2] = buf[i] >> 2 & 3;
 308                 dst[4 * j + 3] = buf[i]      & 3;
 309                 row_pix += 4;
 310                 if (row_pix >= avctx->width) {
 311                     i += stride - (i % stride) - 1;
 312                     j += 4 - (j % 4) - 1;
 313                     row_pix = 0;
 314                 }
 315             }
 316         } else {
 317             av_assert0(avctx->bits_per_coded_sample == 1);
 318             for (i = 0, j = 0; 8 * j + 7 < buf_size && i<avpkt->size; i++, j++) {
 319                 dst[8 * j + 0] = buf[i] >> 7;
 320                 dst[8 * j + 1] = buf[i] >> 6 & 1;
 321                 dst[8 * j + 2] = buf[i] >> 5 & 1;
 322                 dst[8 * j + 3] = buf[i] >> 4 & 1;
 323                 dst[8 * j + 4] = buf[i] >> 3 & 1;
 324                 dst[8 * j + 5] = buf[i] >> 2 & 1;
 325                 dst[8 * j + 6] = buf[i] >> 1 & 1;
 326                 dst[8 * j + 7] = buf[i]      & 1;
 327                 row_pix += 8;
 328                 if (row_pix >= avctx->width) {
 329                     i += stride - (i % stride) - 1;
 330                     j += 2 - (j % 2) - 1;
 331                     row_pix = 0;
 332                 }
 333             }
 334         }
 335         linesize_align = 16;
 336         buf = dst;
 337     } else if (context->is_lt_16bpp) {
 338         uint8_t *dst = frame->buf[0]->data;
 339         int packed = (avctx->codec_tag & 0xFFFFFF) == MKTAG('B','I','T', 0);
 340         int swap   =  avctx->codec_tag >> 24;
 341
 342         if (packed && swap) {
 343             av_fast_padded_malloc(&context->bitstream_buf, &context->bitstream_buf_size, buf_size);
 344             if (!context->bitstream_buf)
 345                 return AVERROR(ENOMEM);
 346             if (swap == 16)
 347                 context->bbdsp.bswap16_buf(context->bitstream_buf, (const uint16_t*)buf, buf_size / 2);
 348             else if (swap == 32)
 349                 context->bbdsp.bswap_buf(context->bitstream_buf, (const uint32_t*)buf, buf_size / 4);
 350             else
 351                 return AVERROR_INVALIDDATA;
 352             buf = context->bitstream_buf;
 353         }
 354
 355         if (desc->flags & AV_PIX_FMT_FLAG_BE)
 356             scale16be(avctx, dst, buf, buf_size, packed);
 357         else
 358             scale16le(avctx, dst, buf, buf_size, packed);
 359
 360         buf = dst;
 361     } else if (need_copy) {
 362         memcpy(frame->buf[0]->data, buf, buf_size);
 363         buf = frame->buf[0]->data;
 364     }
 365
 366     if (avctx->codec_tag == MKTAG('A', 'V', '1', 'x') ||
 367         avctx->codec_tag == MKTAG('A', 'V', 'u', 'p'))
 368         buf += buf_size - context->frame_size;
 369
 370     len = context->frame_size - (avctx->pix_fmt==AV_PIX_FMT_PAL8 ? AVPALETTE_SIZE : 0);
 371     if (buf_size < len && ((avctx->codec_tag & 0xFFFFFF) != MKTAG('B','I','T', 0) || !need_copy)) {
 372         av_log(avctx, AV_LOG_ERROR, "Invalid buffer size, packet size %d < expected frame_size %d\n", buf_size, len);
 373         av_buffer_unref(&frame->buf[0]);
 374         return AVERROR(EINVAL);
 375     }
 376
 377     if ((res = av_image_fill_arrays(frame->data, frame->linesize,
 378                                     buf, avctx->pix_fmt,
 379                                     avctx->width, avctx->height, 1)) < 0) {
 380         av_buffer_unref(&frame->buf[0]);
 381         return res;
 382     }
 383
 384     if (avctx->pix_fmt == AV_PIX_FMT_PAL8) {
 385         const uint8_t *pal = av_packet_get_side_data(avpkt, AV_PKT_DATA_PALETTE,
 386                                                      NULL);
 387         if (pal) {
 388             av_buffer_unref(&context->palette);
 389             context->palette = av_buffer_alloc(AVPALETTE_SIZE);
 390             if (!context->palette) {
 391                 av_buffer_unref(&frame->buf[0]);
 392                 return AVERROR(ENOMEM);
 393             }
 394             memcpy(context->palette->data, pal, AVPALETTE_SIZE);
 395             frame->palette_has_changed = 1;
 396         } else if (context->is_nut_pal8) {
 397             int vid_size = avctx->width * avctx->height;
 398             if (avpkt->size - vid_size) {
 399                 pal = avpkt->data + vid_size;
 400                 memcpy(context->palette->data, pal, avpkt->size - vid_size);
 401                 frame->palette_has_changed = 1;
 402             }
 403         }
 404     }
 405
 406     if ((avctx->pix_fmt==AV_PIX_FMT_BGR24    ||
 407         avctx->pix_fmt==AV_PIX_FMT_GRAY8    ||
 408         avctx->pix_fmt==AV_PIX_FMT_RGB555LE ||
 409         avctx->pix_fmt==AV_PIX_FMT_RGB555BE ||
 410         avctx->pix_fmt==AV_PIX_FMT_RGB565LE ||
 411         avctx->pix_fmt==AV_PIX_FMT_MONOWHITE ||
 412         avctx->pix_fmt==AV_PIX_FMT_MONOBLACK ||
 413         avctx->pix_fmt==AV_PIX_FMT_PAL8) &&
 414         FFALIGN(frame->linesize[0], linesize_align) * avctx->height <= buf_size)
 415         frame->linesize[0] = FFALIGN(frame->linesize[0], linesize_align);
 416
 417     if (avctx->pix_fmt == AV_PIX_FMT_NV12 && avctx->codec_tag == MKTAG('N', 'V', '1', '2') &&
 418         FFALIGN(frame->linesize[0], linesize_align) * avctx->height +
 419         FFALIGN(frame->linesize[1], linesize_align) * ((avctx->height + 1) / 2) <= buf_size) {
 420         int la0 = FFALIGN(frame->linesize[0], linesize_align);
 421         frame->data[1] += (la0 - frame->linesize[0]) * avctx->height;
 422         frame->linesize[0] = la0;
 423         frame->linesize[1] = FFALIGN(frame->linesize[1], linesize_align);
 424     }
 425
 426     if ((avctx->pix_fmt == AV_PIX_FMT_PAL8 && buf_size < context->frame_size) ||
 427         (desc->flags & AV_PIX_FMT_FLAG_PSEUDOPAL)) {
 428         frame->buf[1]  = av_buffer_ref(context->palette);
 429         if (!frame->buf[1]) {
 430             av_buffer_unref(&frame->buf[0]);
 431             return AVERROR(ENOMEM);
 432         }
 433         frame->data[1] = frame->buf[1]->data;
 434     }
 435
 436     if (avctx->pix_fmt == AV_PIX_FMT_BGR24 &&
 437         ((frame->linesize[0] + 3) & ~3) * avctx->height <= buf_size)
 438         frame->linesize[0] = (frame->linesize[0] + 3) & ~3;
 439
 440     if (context->flip)
 441         flip(avctx, frame);
 442
 443     if (avctx->codec_tag == MKTAG('Y', 'V', '1', '2') ||
 444         avctx->codec_tag == MKTAG('Y', 'V', '1', '6') ||
 445         avctx->codec_tag == MKTAG('Y', 'V', '2', '4') ||
 446         avctx->codec_tag == MKTAG('Y', 'V', 'U', '9'))
 447         FFSWAP(uint8_t *, frame->data[1], frame->data[2]);
 448
 449     if (avctx->codec_tag == AV_RL32("I420") && (avctx->width+1)*(avctx->height+1) * 3/2 == buf_size) {
 450         frame->data[1] = frame->data[1] +  (avctx->width+1)*(avctx->height+1) -avctx->width*avctx->height;
 451         frame->data[2] = frame->data[2] + ((avctx->width+1)*(avctx->height+1) -avctx->width*avctx->height)*5/4;
 452     }
 453
 454     if (avctx->codec_tag == AV_RL32("yuv2") &&
 455         avctx->pix_fmt   == AV_PIX_FMT_YUYV422) {
 456         int x, y;
 457         uint8_t *line = frame->data[0];
 458         for (y = 0; y < avctx->height; y++) {
 459             for (x = 0; x < avctx->width; x++)
 460                 line[2 * x + 1] ^= 0x80;
 461             line += frame->linesize[0];
 462         }
 463     }
 464
 465     if (avctx->field_order > AV_FIELD_PROGRESSIVE) { /* we have interlaced material flagged in container */
 466         frame->interlaced_frame = 1;
 467         if (avctx->field_order == AV_FIELD_TT || avctx->field_order == AV_FIELD_TB)
 468             frame->top_field_first = 1;
 469     }
 470
 471     *got_frame = 1;
 472     return buf_size;
 473 }
 474
 475 static av_cold int raw_close_decoder(AVCodecContext *avctx)
 476 {
 477     RawVideoContext *context = avctx->priv_data;
 478
 479     av_buffer_unref(&context->palette);
 480     return 0;
 481 }
 482
 483 AVCodec ff_rawvideo_decoder = {
 484     .name           = "rawvideo",
 485     .long_name      = NULL_IF_CONFIG_SMALL("raw video"),
 486     .type           = AVMEDIA_TYPE_VIDEO,
 487     .id             = AV_CODEC_ID_RAWVIDEO,
 488     .priv_data_size = sizeof(RawVideoContext),
 489     .init           = raw_init_decoder,
 490     .close          = raw_close_decoder,
 491     .decode         = raw_decode,
 492     .priv_class     = &rawdec_class,
 493     .capabilities   = AV_CODEC_CAP_PARAM_CHANGE,
 494 };