Imported Debian version 2.4.3~trusty1
[deb_ffmpeg.git] / ffmpeg / libavcodec / asvenc.c
CommitLineData
2ba45a60
DM
1/*
2 * Copyright (c) 2003 Michael Niedermayer
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 Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
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 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser 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 * ASUS V1/V2 encoder.
24 */
25
26#include "libavutil/attributes.h"
27#include "libavutil/mem.h"
28
29#include "aandcttab.h"
30#include "asv.h"
31#include "avcodec.h"
32#include "dct.h"
33#include "fdctdsp.h"
34#include "internal.h"
35#include "mathops.h"
36#include "mpeg12data.h"
37
38static inline void asv2_put_bits(PutBitContext *pb, int n, int v)
39{
40 put_bits(pb, n, ff_reverse[v << (8 - n)]);
41}
42
43static inline void asv1_put_level(PutBitContext *pb, int level)
44{
45 unsigned int index = level + 3;
46
47 if (index <= 6) {
48 put_bits(pb, ff_asv_level_tab[index][1], ff_asv_level_tab[index][0]);
49 } else {
50 put_bits(pb, ff_asv_level_tab[3][1], ff_asv_level_tab[3][0]);
51 put_sbits(pb, 8, level);
52 }
53}
54
55static inline void asv2_put_level(PutBitContext *pb, int level)
56{
57 unsigned int index = level + 31;
58
59 if (index <= 62) {
60 put_bits(pb, ff_asv2_level_tab[index][1], ff_asv2_level_tab[index][0]);
61 } else {
62 put_bits(pb, ff_asv2_level_tab[31][1], ff_asv2_level_tab[31][0]);
63 asv2_put_bits(pb, 8, level & 0xFF);
64 }
65}
66
67static inline void asv1_encode_block(ASV1Context *a, int16_t block[64])
68{
69 int i;
70 int nc_count = 0;
71
72 put_bits(&a->pb, 8, (block[0] + 32) >> 6);
73 block[0] = 0;
74
75 for (i = 0; i < 10; i++) {
76 const int index = ff_asv_scantab[4 * i];
77 int ccp = 0;
78
79 if ((block[index + 0] = (block[index + 0] *
80 a->q_intra_matrix[index + 0] + (1 << 15)) >> 16))
81 ccp |= 8;
82 if ((block[index + 8] = (block[index + 8] *
83 a->q_intra_matrix[index + 8] + (1 << 15)) >> 16))
84 ccp |= 4;
85 if ((block[index + 1] = (block[index + 1] *
86 a->q_intra_matrix[index + 1] + (1 << 15)) >> 16))
87 ccp |= 2;
88 if ((block[index + 9] = (block[index + 9] *
89 a->q_intra_matrix[index + 9] + (1 << 15)) >> 16))
90 ccp |= 1;
91
92 if (ccp) {
93 for (; nc_count; nc_count--)
94 put_bits(&a->pb, ff_asv_ccp_tab[0][1], ff_asv_ccp_tab[0][0]);
95
96 put_bits(&a->pb, ff_asv_ccp_tab[ccp][1], ff_asv_ccp_tab[ccp][0]);
97
98 if (ccp & 8)
99 asv1_put_level(&a->pb, block[index + 0]);
100 if (ccp & 4)
101 asv1_put_level(&a->pb, block[index + 8]);
102 if (ccp & 2)
103 asv1_put_level(&a->pb, block[index + 1]);
104 if (ccp & 1)
105 asv1_put_level(&a->pb, block[index + 9]);
106 } else {
107 nc_count++;
108 }
109 }
110 put_bits(&a->pb, ff_asv_ccp_tab[16][1], ff_asv_ccp_tab[16][0]);
111}
112
113static inline void asv2_encode_block(ASV1Context *a, int16_t block[64])
114{
115 int i;
116 int count = 0;
117
118 for (count = 63; count > 3; count--) {
119 const int index = ff_asv_scantab[count];
120 if ((block[index] * a->q_intra_matrix[index] + (1 << 15)) >> 16)
121 break;
122 }
123
124 count >>= 2;
125
126 asv2_put_bits(&a->pb, 4, count);
127 asv2_put_bits(&a->pb, 8, (block[0] + 32) >> 6);
128 block[0] = 0;
129
130 for (i = 0; i <= count; i++) {
131 const int index = ff_asv_scantab[4 * i];
132 int ccp = 0;
133
134 if ((block[index + 0] = (block[index + 0] *
135 a->q_intra_matrix[index + 0] + (1 << 15)) >> 16))
136 ccp |= 8;
137 if ((block[index + 8] = (block[index + 8] *
138 a->q_intra_matrix[index + 8] + (1 << 15)) >> 16))
139 ccp |= 4;
140 if ((block[index + 1] = (block[index + 1] *
141 a->q_intra_matrix[index + 1] + (1 << 15)) >> 16))
142 ccp |= 2;
143 if ((block[index + 9] = (block[index + 9] *
144 a->q_intra_matrix[index + 9] + (1 << 15)) >> 16))
145 ccp |= 1;
146
147 av_assert2(i || ccp < 8);
148 if (i)
149 put_bits(&a->pb, ff_asv_ac_ccp_tab[ccp][1], ff_asv_ac_ccp_tab[ccp][0]);
150 else
151 put_bits(&a->pb, ff_asv_dc_ccp_tab[ccp][1], ff_asv_dc_ccp_tab[ccp][0]);
152
153 if (ccp) {
154 if (ccp & 8)
155 asv2_put_level(&a->pb, block[index + 0]);
156 if (ccp & 4)
157 asv2_put_level(&a->pb, block[index + 8]);
158 if (ccp & 2)
159 asv2_put_level(&a->pb, block[index + 1]);
160 if (ccp & 1)
161 asv2_put_level(&a->pb, block[index + 9]);
162 }
163 }
164}
165
166#define MAX_MB_SIZE (30 * 16 * 16 * 3 / 2 / 8)
167
168static inline int encode_mb(ASV1Context *a, int16_t block[6][64])
169{
170 int i;
171
172 if (a->pb.buf_end - a->pb.buf - (put_bits_count(&a->pb) >> 3) < MAX_MB_SIZE) {
173 av_log(a->avctx, AV_LOG_ERROR, "encoded frame too large\n");
174 return -1;
175 }
176
177 if (a->avctx->codec_id == AV_CODEC_ID_ASV1) {
178 for (i = 0; i < 6; i++)
179 asv1_encode_block(a, block[i]);
180 } else {
181 for (i = 0; i < 6; i++)
182 asv2_encode_block(a, block[i]);
183 }
184 return 0;
185}
186
187static inline void dct_get(ASV1Context *a, const AVFrame *frame,
188 int mb_x, int mb_y)
189{
190 int16_t (*block)[64] = a->block;
191 int linesize = frame->linesize[0];
192 int i;
193
194 uint8_t *ptr_y = frame->data[0] + (mb_y * 16 * linesize) + mb_x * 16;
195 uint8_t *ptr_cb = frame->data[1] + (mb_y * 8 * frame->linesize[1]) + mb_x * 8;
196 uint8_t *ptr_cr = frame->data[2] + (mb_y * 8 * frame->linesize[2]) + mb_x * 8;
197
198 a->pdsp.get_pixels(block[0], ptr_y, linesize);
199 a->pdsp.get_pixels(block[1], ptr_y + 8, linesize);
200 a->pdsp.get_pixels(block[2], ptr_y + 8 * linesize, linesize);
201 a->pdsp.get_pixels(block[3], ptr_y + 8 * linesize + 8, linesize);
202 for (i = 0; i < 4; i++)
203 a->fdsp.fdct(block[i]);
204
205 if (!(a->avctx->flags & CODEC_FLAG_GRAY)) {
206 a->pdsp.get_pixels(block[4], ptr_cb, frame->linesize[1]);
207 a->pdsp.get_pixels(block[5], ptr_cr, frame->linesize[2]);
208 for (i = 4; i < 6; i++)
209 a->fdsp.fdct(block[i]);
210 }
211}
212
213static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
214 const AVFrame *pict, int *got_packet)
215{
216 ASV1Context *const a = avctx->priv_data;
217 int size, ret;
218 int mb_x, mb_y;
219
220 if (pict->width % 16 || pict->height % 16) {
221 AVFrame *clone = av_frame_alloc();
222 int i;
223
224 if (!clone)
225 return AVERROR(ENOMEM);
226 clone->format = pict->format;
227 clone->width = FFALIGN(pict->width, 16);
228 clone->height = FFALIGN(pict->height, 16);
229 ret = av_frame_get_buffer(clone, 32);
230 if (ret < 0) {
231 av_frame_free(&clone);
232 return ret;
233 }
234
235 ret = av_frame_copy(clone, pict);
236 if (ret < 0) {
237 av_frame_free(&clone);
238 return ret;
239 }
240
241 for (i = 0; i<3; i++) {
242 int x, y;
243 int w = FF_CEIL_RSHIFT(pict->width, !!i);
244 int h = FF_CEIL_RSHIFT(pict->height, !!i);
245 int w2 = FF_CEIL_RSHIFT(clone->width, !!i);
246 int h2 = FF_CEIL_RSHIFT(clone->height, !!i);
247 for (y=0; y<h; y++)
248 for (x=w; x<w2; x++)
249 clone->data[i][x + y*clone->linesize[i]] =
250 clone->data[i][w - 1 + y*clone->linesize[i]];
251 for (y=h; y<h2; y++)
252 for (x=0; x<w2; x++)
253 clone->data[i][x + y*clone->linesize[i]] =
254 clone->data[i][x + (h-1)*clone->linesize[i]];
255 }
256 ret = encode_frame(avctx, pkt, clone, got_packet);
257
258 av_frame_free(&clone);
259 return ret;
260 }
261
262 if ((ret = ff_alloc_packet2(avctx, pkt, a->mb_height * a->mb_width * MAX_MB_SIZE +
263 FF_MIN_BUFFER_SIZE)) < 0)
264 return ret;
265
266 init_put_bits(&a->pb, pkt->data, pkt->size);
267
268 for (mb_y = 0; mb_y < a->mb_height2; mb_y++) {
269 for (mb_x = 0; mb_x < a->mb_width2; mb_x++) {
270 dct_get(a, pict, mb_x, mb_y);
271 encode_mb(a, a->block);
272 }
273 }
274
275 if (a->mb_width2 != a->mb_width) {
276 mb_x = a->mb_width2;
277 for (mb_y = 0; mb_y < a->mb_height2; mb_y++) {
278 dct_get(a, pict, mb_x, mb_y);
279 encode_mb(a, a->block);
280 }
281 }
282
283 if (a->mb_height2 != a->mb_height) {
284 mb_y = a->mb_height2;
285 for (mb_x = 0; mb_x < a->mb_width; mb_x++) {
286 dct_get(a, pict, mb_x, mb_y);
287 encode_mb(a, a->block);
288 }
289 }
290 emms_c();
291
292 avpriv_align_put_bits(&a->pb);
293 while (put_bits_count(&a->pb) & 31)
294 put_bits(&a->pb, 8, 0);
295
296 size = put_bits_count(&a->pb) / 32;
297
298 if (avctx->codec_id == AV_CODEC_ID_ASV1) {
299 a->bbdsp.bswap_buf((uint32_t *) pkt->data,
300 (uint32_t *) pkt->data, size);
301 } else {
302 int i;
303 for (i = 0; i < 4 * size; i++)
304 pkt->data[i] = ff_reverse[pkt->data[i]];
305 }
306
307 pkt->size = size * 4;
308 pkt->flags |= AV_PKT_FLAG_KEY;
309 *got_packet = 1;
310
311 return 0;
312}
313
314static av_cold int encode_init(AVCodecContext *avctx)
315{
316 ASV1Context *const a = avctx->priv_data;
317 int i;
318 const int scale = avctx->codec_id == AV_CODEC_ID_ASV1 ? 1 : 2;
319
320 ff_asv_common_init(avctx);
321 ff_fdctdsp_init(&a->fdsp, avctx);
322 ff_pixblockdsp_init(&a->pdsp, avctx);
323
324 if (avctx->global_quality <= 0)
325 avctx->global_quality = 4 * FF_QUALITY_SCALE;
326
327 a->inv_qscale = (32 * scale * FF_QUALITY_SCALE +
328 avctx->global_quality / 2) / avctx->global_quality;
329
330 avctx->extradata = av_mallocz(8);
331 avctx->extradata_size = 8;
332 ((uint32_t *) avctx->extradata)[0] = av_le2ne32(a->inv_qscale);
333 ((uint32_t *) avctx->extradata)[1] = av_le2ne32(AV_RL32("ASUS"));
334
335 for (i = 0; i < 64; i++) {
336 if (a->fdsp.fdct == ff_fdct_ifast) {
337 int q = 32LL * scale * ff_mpeg1_default_intra_matrix[i] * ff_aanscales[i];
338 a->q_intra_matrix[i] = (((int64_t)a->inv_qscale << 30) + q / 2) / q;
339 } else {
340 int q = 32 * scale * ff_mpeg1_default_intra_matrix[i];
341 a->q_intra_matrix[i] = ((a->inv_qscale << 16) + q / 2) / q;
342 }
343 }
344
345 return 0;
346}
347
348#if CONFIG_ASV1_ENCODER
349AVCodec ff_asv1_encoder = {
350 .name = "asv1",
351 .long_name = NULL_IF_CONFIG_SMALL("ASUS V1"),
352 .type = AVMEDIA_TYPE_VIDEO,
353 .id = AV_CODEC_ID_ASV1,
354 .priv_data_size = sizeof(ASV1Context),
355 .init = encode_init,
356 .encode2 = encode_frame,
357 .pix_fmts = (const enum AVPixelFormat[]) { AV_PIX_FMT_YUV420P,
358 AV_PIX_FMT_NONE },
359};
360#endif
361
362#if CONFIG_ASV2_ENCODER
363AVCodec ff_asv2_encoder = {
364 .name = "asv2",
365 .long_name = NULL_IF_CONFIG_SMALL("ASUS V2"),
366 .type = AVMEDIA_TYPE_VIDEO,
367 .id = AV_CODEC_ID_ASV2,
368 .priv_data_size = sizeof(ASV1Context),
369 .init = encode_init,
370 .encode2 = encode_frame,
371 .pix_fmts = (const enum AVPixelFormat[]) { AV_PIX_FMT_YUV420P,
372 AV_PIX_FMT_NONE },
373};
374#endif