lavc/texturedsp: replace rint by lrint
[ffmpeg.git] / libavcodec / libutvideodec.cpp
1 /*
2  * Copyright (c) 2011 Derek Buitenhuis
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public
8  * License as published by the Free Software Foundation;
9  * version 2 of the License.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 /**
22  * @file
23  * Known FOURCCs:
24  *     'ULY0' (YCbCr 4:2:0), 'ULY2' (YCbCr 4:2:2), 'ULRG' (RGB), 'ULRA' (RGBA),
25  *     'ULH0' (YCbCr 4:2:0 BT.709), 'ULH2' (YCbCr 4:2:2 BT.709)
26  */
27
28 extern "C" {
29 #include "avcodec.h"
30 }
31
32 #include "libutvideo.h"
33 #include "get_bits.h"
34
35 static av_cold int utvideo_decode_init(AVCodecContext *avctx)
36 {
37     UtVideoContext *utv = (UtVideoContext *)avctx->priv_data;
38     UtVideoExtra info;
39     int format;
40     int begin_ret;
41
42     if (avctx->extradata_size != 16 && avctx->extradata_size != 8 ) {
43         av_log(avctx, AV_LOG_ERROR, "Extradata size (%d) mismatch.\n", avctx->extradata_size);
44         return -1;
45     }
46
47     /* Read extradata */
48     info.version = AV_RL32(avctx->extradata);
49     info.original_format = AV_RL32(avctx->extradata + 4);
50     info.frameinfo_size = AV_RL32(avctx->extradata + 8);
51     info.flags = AV_RL32(avctx->extradata + 12);
52
53     /* Pick format based on FOURCC */
54     switch (avctx->codec_tag) {
55 #ifdef UTV_BT709
56     case MKTAG('U', 'L', 'H', '0'):
57         avctx->pix_fmt = AV_PIX_FMT_YUV420P;
58         avctx->colorspace = AVCOL_SPC_BT709;
59         format = UTVF_YV12;
60         break;
61     case MKTAG('U', 'L', 'H', '2'):
62         avctx->pix_fmt = AV_PIX_FMT_YUYV422;
63         avctx->colorspace = AVCOL_SPC_BT709;
64         format = UTVF_YUY2;
65         break;
66 #endif
67     case MKTAG('U', 'L', 'Y', '0'):
68         avctx->pix_fmt = AV_PIX_FMT_YUV420P;
69         format = UTVF_YV12;
70         break;
71     case MKTAG('U', 'L', 'Y', '2'):
72         avctx->pix_fmt = AV_PIX_FMT_YUYV422;
73         format = UTVF_YUY2;
74         break;
75     case MKTAG('U', 'L', 'R', 'G'):
76         avctx->pix_fmt = AV_PIX_FMT_BGR24;
77         format = UTVF_NFCC_BGR_BU;
78         break;
79     case MKTAG('U', 'L', 'R', 'A'):
80         avctx->pix_fmt = AV_PIX_FMT_RGB32;
81         format = UTVF_NFCC_BGRA_BU;
82         break;
83 #ifdef UTVF_UQY2
84     case MKTAG('U', 'Q', 'Y', '2'):
85         avctx->pix_fmt = AV_PIX_FMT_YUV422P10;
86         format = UTVF_v210;
87         break;
88 #endif
89     default:
90         av_log(avctx, AV_LOG_ERROR,
91               "Not a Ut Video FOURCC: %X\n", avctx->codec_tag);
92         return -1;
93     }
94
95     /* Only allocate the buffer once */
96     utv->buf_size = avpicture_get_size(avctx->pix_fmt, avctx->width, avctx->height);
97 #ifdef UTVF_UQY2
98     if (format == UTVF_v210)
99         utv->buf_size += avctx->height * ((avctx->width + 47) / 48) * 128; // the linesize used by the decoder, this does not seem to be exported
100 #endif
101     utv->buffer = (uint8_t *)av_malloc(utv->buf_size * sizeof(uint8_t));
102
103     if (utv->buffer == NULL) {
104         av_log(avctx, AV_LOG_ERROR, "Unable to allocate output buffer.\n");
105         return -1;
106     }
107
108     /* Allocate the output frame */
109     avctx->coded_frame = av_frame_alloc();
110
111     /* Ut Video only supports 8-bit */
112     avctx->bits_per_raw_sample = 8;
113
114     /* Is it interlaced? */
115     avctx->coded_frame->interlaced_frame = info.flags & 0x800 ? 1 : 0;
116
117     /* Apparently Ut Video doesn't store this info... */
118     avctx->coded_frame->top_field_first = 1;
119
120     /*
121      * Create a Ut Video instance. Since the function wants
122      * an "interface name" string, pass it the name of the lib.
123      */
124     utv->codec = CCodec::CreateInstance(UNFCC(avctx->codec_tag), "libavcodec");
125
126     /* Initialize Decoding */
127     begin_ret = utv->codec->DecodeBegin(format, avctx->width, avctx->height,
128                             CBGROSSWIDTH_WINDOWS, &info, sizeof(UtVideoExtra));
129
130     /* Check to see if the decoder initlized properly */
131     if (begin_ret != 0) {
132         av_log(avctx, AV_LOG_ERROR,
133                "Could not initialize decoder: %d\n", begin_ret);
134         return -1;
135     }
136
137     return 0;
138 }
139
140 static int utvideo_decode_frame(AVCodecContext *avctx, void *data,
141                                 int *got_frame, AVPacket *avpkt)
142 {
143     UtVideoContext *utv = (UtVideoContext *)avctx->priv_data;
144     AVFrame *pic = avctx->coded_frame;
145     int w = avctx->width, h = avctx->height;
146
147     /* Set flags */
148     pic->pict_type = AV_PICTURE_TYPE_I;
149     pic->key_frame = 1;
150
151     /* Decode the frame */
152     utv->codec->DecodeFrame(utv->buffer, avpkt->data, true);
153
154     /* Set the output data depending on the colorspace */
155     switch (avctx->pix_fmt) {
156     case AV_PIX_FMT_YUV420P:
157         pic->linesize[0] = w;
158         pic->linesize[1] = pic->linesize[2] = w / 2;
159         pic->data[0] = utv->buffer;
160         pic->data[2] = utv->buffer + (w * h);
161         pic->data[1] = pic->data[2] + (w * h / 4);
162         break;
163     case AV_PIX_FMT_YUYV422:
164         pic->linesize[0] = w * 2;
165         pic->data[0] = utv->buffer;
166         break;
167     case AV_PIX_FMT_YUV422P10: {
168         uint16_t *y, *u, *v;
169         int i,j;
170         int linesize = ((w + 47) / 48) * 128;
171
172         pic->linesize[0] = w * 2;
173         pic->linesize[1] =
174         pic->linesize[2] = w;
175         pic->data[0] = utv->buffer + linesize * h;
176         pic->data[1] = pic->data[0] + h*pic->linesize[0];
177         pic->data[2] = pic->data[1] + h*pic->linesize[1];
178         y = (uint16_t*)pic->data[0];
179         u = (uint16_t*)pic->data[1];
180         v = (uint16_t*)pic->data[2];
181         for (j = 0; j < h; j++) {
182             const uint8_t *in = utv->buffer + j * linesize;
183
184             for (i = 0; i + 1 < w; i += 6, in += 4) {
185                 unsigned a,b;
186                 a = AV_RL32(in);
187                 in += 4;
188                 b = AV_RL32(in);
189                 *u++ = (a    ) & 0x3FF;
190                 *y++ = (a>>10) & 0x3FF;
191                 *v++ = (a>>20) & 0x3FF;
192                 *y++ = (b    ) & 0x3FF;
193
194                 if (i + 3 >= w)
195                     break;
196
197                 in += 4;
198                 a = AV_RL32(in);
199                 *u++ = (b>>10) & 0x3FF;
200                 *y++ = (b>>20) & 0x3FF;
201                 *v++ = (a    ) & 0x3FF;
202                 *y++ = (a>>10) & 0x3FF;
203
204                 if (i + 5 >= w)
205                     break;
206
207                 in += 4;
208                 b = AV_RL32(in);
209                 *u++ = (a>>20) & 0x3FF;
210                 *y++ = (b    ) & 0x3FF;
211                 *v++ = (b>>10) & 0x3FF;
212                 *y++ = (b>>20) & 0x3FF;
213             }
214         }
215         break;
216     }
217     case AV_PIX_FMT_BGR24:
218     case AV_PIX_FMT_RGB32:
219         /* Make the linesize negative, since Ut Video uses bottom-up BGR */
220         pic->linesize[0] = -1 * w * (avctx->pix_fmt == AV_PIX_FMT_BGR24 ? 3 : 4);
221         pic->data[0] = utv->buffer + utv->buf_size + pic->linesize[0];
222         break;
223     }
224
225     *got_frame = 1;
226     av_frame_move_ref((AVFrame*)data, pic);
227
228     return avpkt->size;
229 }
230
231 static av_cold int utvideo_decode_close(AVCodecContext *avctx)
232 {
233     UtVideoContext *utv = (UtVideoContext *)avctx->priv_data;
234
235     /* Free output */
236     av_frame_free(&avctx->coded_frame);
237     av_freep(&utv->buffer);
238
239     /* Finish decoding and clean up the instance */
240     utv->codec->DecodeEnd();
241     CCodec::DeleteInstance(utv->codec);
242
243     return 0;
244 }
245
246 AVCodec ff_libutvideo_decoder = {
247     "libutvideo",
248     NULL_IF_CONFIG_SMALL("Ut Video"),
249     AVMEDIA_TYPE_VIDEO,
250     AV_CODEC_ID_UTVIDEO,
251     0,    //capabilities
252     NULL, //supported_framerates
253     NULL, //pix_fmts
254     NULL, //supported_samplerates
255     NULL, //sample_fmts
256     NULL, //channel_layouts
257     0,    //max_lowres
258     NULL, //priv_class
259     NULL, //profiles
260     sizeof(UtVideoContext),
261     NULL, //next
262     NULL, //init_thread_copy
263     NULL, //update_thread_context
264     NULL, //defaults
265     NULL, //init_static_data
266     utvideo_decode_init,
267     NULL, //encode
268     NULL, //encode2
269     utvideo_decode_frame,
270     utvideo_decode_close,
271 };