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 "raw.h"
29#include "libavutil/intreadwrite.h"
30
31typedef struct RawVideoContext {
32    unsigned char * buffer;  /* block of memory for holding one frame */
33    int             length;  /* number of bytes in buffer */
34    int flip;
35    AVFrame pic;             ///< AVCodecContext.coded_frame
36} RawVideoContext;
37
38static const PixelFormatTag pixelFormatBpsAVI[] = {
39    { PIX_FMT_PAL8,    4 },
40    { PIX_FMT_PAL8,    8 },
41    { PIX_FMT_RGB555, 15 },
42    { PIX_FMT_RGB555, 16 },
43    { PIX_FMT_BGR24,  24 },
44    { PIX_FMT_RGB32,  32 },
45    { PIX_FMT_NONE, 0 },
46};
47
48static const PixelFormatTag pixelFormatBpsMOV[] = {
49    { PIX_FMT_MONOWHITE, 1 },
50    { PIX_FMT_PAL8,      2 },
51    { PIX_FMT_PAL8,      4 },
52    { PIX_FMT_PAL8,      8 },
53    // FIXME swscale does not support 16 bit in .mov, sample 16bit.mov
54    // http://developer.apple.com/documentation/QuickTime/QTFF/QTFFChap3/qtff3.html
55    { PIX_FMT_RGB555BE, 16 },
56    { PIX_FMT_RGB24,    24 },
57    { PIX_FMT_ARGB,     32 },
58    { PIX_FMT_NONE, 0 },
59};
60
61static enum PixelFormat findPixelFormat(const PixelFormatTag *tags, unsigned int fourcc)
62{
63    while (tags->pix_fmt >= 0) {
64        if (tags->fourcc == fourcc)
65            return tags->pix_fmt;
66        tags++;
67    }
68    return PIX_FMT_YUV420P;
69}
70
71static av_cold int raw_init_decoder(AVCodecContext *avctx)
72{
73    RawVideoContext *context = avctx->priv_data;
74
75    if (avctx->codec_tag == MKTAG('r','a','w',' '))
76        avctx->pix_fmt = findPixelFormat(pixelFormatBpsMOV, avctx->bits_per_coded_sample);
77    else if (avctx->codec_tag)
78        avctx->pix_fmt = findPixelFormat(ff_raw_pixelFormatTags, avctx->codec_tag);
79    else if (avctx->bits_per_coded_sample)
80        avctx->pix_fmt = findPixelFormat(pixelFormatBpsAVI, avctx->bits_per_coded_sample);
81
82    context->length = avpicture_get_size(avctx->pix_fmt, avctx->width, avctx->height);
83    context->buffer = av_malloc(context->length);
84    context->pic.pict_type = FF_I_TYPE;
85    context->pic.key_frame = 1;
86
87    avctx->coded_frame= &context->pic;
88
89    if (!context->buffer)
90        return -1;
91
92    if((avctx->extradata_size >= 9 && !memcmp(avctx->extradata + avctx->extradata_size - 9, "BottomUp", 9)) ||
93       avctx->codec_tag == MKTAG( 3 ,  0 ,  0 ,  0 ))
94        context->flip=1;
95
96    return 0;
97}
98
99static void flip(AVCodecContext *avctx, AVPicture * picture){
100    picture->data[0] += picture->linesize[0] * (avctx->height-1);
101    picture->linesize[0] *= -1;
102}
103
104static int raw_decode(AVCodecContext *avctx,
105                            void *data, int *data_size,
106                            AVPacket *avpkt)
107{
108    const uint8_t *buf = avpkt->data;
109    int buf_size = avpkt->size;
110    RawVideoContext *context = avctx->priv_data;
111
112    AVFrame * frame = (AVFrame *) data;
113    AVPicture * picture = (AVPicture *) data;
114
115    frame->interlaced_frame = avctx->coded_frame->interlaced_frame;
116    frame->top_field_first = avctx->coded_frame->top_field_first;
117
118    //2bpp and 4bpp raw in avi and mov (yes this is ugly ...)
119    if((avctx->bits_per_coded_sample == 4 || avctx->bits_per_coded_sample == 2) &&
120       avctx->pix_fmt==PIX_FMT_PAL8 &&
121       (!avctx->codec_tag || avctx->codec_tag == MKTAG('r','a','w',' '))){
122        int i;
123        uint8_t *dst = context->buffer + 256*4;
124        buf_size = context->length - 256*4;
125        if (avctx->bits_per_coded_sample == 4){
126            for(i=0; 2*i+1 < buf_size; i++){
127                dst[2*i+0]= buf[i]>>4;
128                dst[2*i+1]= buf[i]&15;
129            }
130        } else
131            for(i=0; 4*i+3 < buf_size; i++){
132                dst[4*i+0]= buf[i]>>6;
133                dst[4*i+1]= buf[i]>>4&3;
134                dst[4*i+2]= buf[i]>>2&3;
135                dst[4*i+3]= buf[i]   &3;
136            }
137        buf= dst;
138    }
139
140    if(avctx->codec_tag == MKTAG('A', 'V', '1', 'x') ||
141       avctx->codec_tag == MKTAG('A', 'V', 'u', 'p'))
142        buf += buf_size - context->length;
143
144    if(buf_size < context->length - (avctx->pix_fmt==PIX_FMT_PAL8 ? 256*4 : 0))
145        return -1;
146
147    avpicture_fill(picture, buf, avctx->pix_fmt, avctx->width, avctx->height);
148    if(avctx->pix_fmt==PIX_FMT_PAL8 && buf_size < context->length){
149        frame->data[1]= context->buffer;
150    }
151    if (avctx->palctrl && avctx->palctrl->palette_changed) {
152        memcpy(frame->data[1], avctx->palctrl->palette, AVPALETTE_SIZE);
153        avctx->palctrl->palette_changed = 0;
154    }
155    if(avctx->pix_fmt==PIX_FMT_BGR24 && ((frame->linesize[0]+3)&~3)*avctx->height <= buf_size)
156        frame->linesize[0] = (frame->linesize[0]+3)&~3;
157
158    if(context->flip)
159        flip(avctx, picture);
160
161    if (   avctx->codec_tag == MKTAG('Y', 'V', '1', '2')
162        || avctx->codec_tag == MKTAG('Y', 'V', 'U', '9'))
163        FFSWAP(uint8_t *, picture->data[1], picture->data[2]);
164
165    if(avctx->codec_tag == AV_RL32("yuv2") &&
166       avctx->pix_fmt   == PIX_FMT_YUYV422) {
167        int x, y;
168        uint8_t *line = picture->data[0];
169        for(y = 0; y < avctx->height; y++) {
170            for(x = 0; x < avctx->width; x++)
171                line[2*x + 1] ^= 0x80;
172            line += picture->linesize[0];
173        }
174    }
175
176    *data_size = sizeof(AVPicture);
177    return buf_size;
178}
179
180static av_cold int raw_close_decoder(AVCodecContext *avctx)
181{
182    RawVideoContext *context = avctx->priv_data;
183
184    av_freep(&context->buffer);
185    return 0;
186}
187
188AVCodec rawvideo_decoder = {
189    "rawvideo",
190    AVMEDIA_TYPE_VIDEO,
191    CODEC_ID_RAWVIDEO,
192    sizeof(RawVideoContext),
193    raw_init_decoder,
194    NULL,
195    raw_close_decoder,
196    raw_decode,
197    .long_name = NULL_IF_CONFIG_SMALL("raw video"),
198};
199