Annotation of /branches/dev-api-3/xvidcore/src/encoder.c

Revision 788 - (view) (download)

1 :	edgomez	194	/*****************************************************************************
2 :	edgomez	145	*
3 :			* XVID MPEG-4 VIDEO CODEC
4 :			* - Encoder main module -
5 :			*
6 :			* This program is an implementation of a part of one or more MPEG-4
7 :			* Video tools as specified in ISO/IEC 14496-2 standard. Those intending
8 :			* to use this software module in hardware or software products are
9 :			* advised that its use may infringe existing patents or copyrights, and
10 :			* any such use would be at such party's own risk. The original
11 :			* developer of this software module and his/her company, and subsequent
12 :			* editors and their companies, will have no liability for use of this
13 :			* software or modifications or derivatives thereof.
14 :			*
15 :			* This program is free software; you can redistribute it and/or modify
16 :			* it under the terms of the GNU General Public License as published by
17 :			* the Free Software Foundation; either version 2 of the License, or
18 :			* (at your option) any later version.
19 :			*
20 :			* This program is distributed in the hope that it will be useful,
21 :			* but WITHOUT ANY WARRANTY; without even the implied warranty of
22 :			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 :			* GNU General Public License for more details.
24 :			*
25 :			* You should have received a copy of the GNU General Public License
26 :			* along with this program; if not, write to the Free Software
27 :			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 :			*
29 :	edgomez	194	****************************************************************************/
30 :	suxen_drol	118
31 :	edgomez	194	/*****************************************************************************
32 :	edgomez	145	*
33 :			* History
34 :			*
35 :	chenm001	290	* 10.07.2002 added BFRAMES_DEC_DEBUG support
36 :			* MinChen <chenm001@163.com>
37 :			* 20.06.2002 bframe patch
38 :	chenm001	168	* 08.05.2002 fix some problem in DEBUG mode;
39 :			* MinChen <chenm001@163.com>
40 :	edgomez	145	* 14.04.2002 added FrameCodeB()
41 :			*
42 :	syskin	788	* $Id: encoder.c,v 1.76.2.39 2003-01-15 14:36:06 syskin Exp $
43 :	edgomez	145	*
44 :	edgomez	194	****************************************************************************/
45 :	edgomez	145
46 :	Isibaar	3	#include <stdlib.h>
47 :			#include <stdio.h>
48 :			#include <math.h>
49 :	edgomez	198	#include <string.h>
50 :	Isibaar	3
51 :			#include "encoder.h"
52 :			#include "prediction/mbprediction.h"
53 :			#include "global.h"
54 :			#include "utils/timer.h"
55 :			#include "image/image.h"
56 :	suxen_drol	238	#include "image/font.h"
57 :	chl	347	#include "motion/sad.h"
58 :	suxen_drol	152	#include "motion/motion.h"
59 :	Isibaar	3	#include "bitstream/cbp.h"
60 :			#include "utils/mbfunctions.h"
61 :			#include "bitstream/bitstream.h"
62 :			#include "bitstream/mbcoding.h"
63 :			#include "utils/ratecontrol.h"
64 :			#include "utils/emms.h"
65 :			#include "bitstream/mbcoding.h"
66 :			#include "quant/adapt_quant.h"
67 :	Isibaar	4	#include "quant/quant_matrix.h"
68 :	Isibaar	41	#include "utils/mem_align.h"
69 :	Isibaar	3
70 :	edgomez	194	/*****************************************************************************
71 :			* Local macros
72 :			****************************************************************************/
73 :
74 :	Isibaar	3	#define ENC_CHECK(X) if(!(X)) return XVID_ERR_FORMAT
75 :	suxen_drol	758	#define SWAP(_T_,A,B) { _T_ tmp = A; A = B; B = tmp; }
76 :	Isibaar	3
77 :	edgomez	194	/*****************************************************************************
78 :			* Local function prototypes
79 :			****************************************************************************/
80 :
81 :	edgomez	192	static int FrameCodeI(Encoder * pEnc,
82 :	edgomez	195	Bitstream * bs,
83 :			uint32_t * pBits);
84 :	Isibaar	3
85 :	edgomez	192	static int FrameCodeP(Encoder * pEnc,
86 :	edgomez	195	Bitstream * bs,
87 :			uint32_t * pBits,
88 :			bool force_inter,
89 :			bool vol_header);
90 :	Isibaar	3
91 :	edgomez	192	static void FrameCodeB(Encoder * pEnc,
92 :	edgomez	195	FRAMEINFO * frame,
93 :			Bitstream * bs,
94 :			uint32_t * pBits);
95 :	edgomez	192
96 :	edgomez	194	/*****************************************************************************
97 :			* Local data
98 :			****************************************************************************/
99 :
100 :	edgomez	195	static int DQtab[4] = {
101 :	Isibaar	3	-1, -2, 1, 2
102 :			};
103 :
104 :	edgomez	195	static int iDQtab[5] = {
105 :	Isibaar	3	1, 0, NO_CHANGE, 2, 3
106 :			};
107 :
108 :
109 :	edgomez	194	/*****************************************************************************
110 :			* Encoder creation
111 :			*
112 :			* This function creates an Encoder instance, it allocates all necessary
113 :			* image buffers (reference, current and bframes) and initialize the internal
114 :			* xvid encoder paremeters according to the XVID_ENC_PARAM input parameter.
115 :			*
116 :			* The code seems to be very long but is very basic, mainly memory allocation
117 :			* and cleaning code.
118 :			*
119 :			* Returned values :
120 :			* - XVID_ERR_OK - no errors
121 :			* - XVID_ERR_MEMORY - the libc could not allocate memory, the function
122 :			* cleans the structure before exiting.
123 :			* pParam->handle is also set to NULL.
124 :			*
125 :			****************************************************************************/
126 :
127 :			int
128 :			encoder_create(XVID_ENC_PARAM * pParam)
129 :	Isibaar	3	{
130 :	edgomez	13	Encoder *pEnc;
131 :	suxen_drol	229	int i;
132 :	Isibaar	3
133 :	edgomez	13	pParam->handle = NULL;
134 :	Isibaar	3
135 :	edgomez	13	ENC_CHECK(pParam);
136 :	Isibaar	3
137 :	edgomez	13	ENC_CHECK(pParam->width > 0 && pParam->width <= 1920);
138 :			ENC_CHECK(pParam->height > 0 && pParam->height <= 1280);
139 :			ENC_CHECK(!(pParam->width % 2));
140 :			ENC_CHECK(!(pParam->height % 2));
141 :	Isibaar	3
142 :	edgomez	192	/* Fps */
143 :
144 :	edgomez	195	if (pParam->fincr <= 0 \|\| pParam->fbase <= 0) {
145 :	Isibaar	3	pParam->fincr = 1;
146 :			pParam->fbase = 25;
147 :			}
148 :
149 :	edgomez	192	/*
150 :			* Simplify the "fincr/fbase" fraction
151 :			* (neccessary, since windows supplies us with huge numbers)
152 :			*/
153 :	Isibaar	3
154 :			i = pParam->fincr;
155 :	edgomez	195	while (i > 1) {
156 :			if (pParam->fincr % i == 0 && pParam->fbase % i == 0) {
157 :	Isibaar	3	pParam->fincr /= i;
158 :			pParam->fbase /= i;
159 :			i = pParam->fincr;
160 :			continue;
161 :			}
162 :			i--;
163 :			}
164 :
165 :	edgomez	195	if (pParam->fbase > 65535) {
166 :			float div = (float) pParam->fbase / 65535;
167 :
168 :			pParam->fbase = (int) (pParam->fbase / div);
169 :			pParam->fincr = (int) (pParam->fincr / div);
170 :	Isibaar	3	}
171 :
172 :	edgomez	192	/* Bitrate allocator defaults */
173 :
174 :	h	121	if (pParam->rc_bitrate <= 0)
175 :			pParam->rc_bitrate = 900000;
176 :	Isibaar	3
177 :	h	121	if (pParam->rc_reaction_delay_factor <= 0)
178 :			pParam->rc_reaction_delay_factor = 16;
179 :	Isibaar	3
180 :	h	121	if (pParam->rc_averaging_period <= 0)
181 :			pParam->rc_averaging_period = 100;
182 :
183 :			if (pParam->rc_buffer <= 0)
184 :			pParam->rc_buffer = 100;
185 :
186 :	edgomez	192	/* Max and min quantizers */
187 :
188 :	edgomez	13	if ((pParam->min_quantizer <= 0) \|\| (pParam->min_quantizer > 31))
189 :	Isibaar	3	pParam->min_quantizer = 1;
190 :
191 :	edgomez	13	if ((pParam->max_quantizer <= 0) \|\| (pParam->max_quantizer > 31))
192 :	Isibaar	3	pParam->max_quantizer = 31;
193 :
194 :	edgomez	13	if (pParam->max_quantizer < pParam->min_quantizer)
195 :	Isibaar	3	pParam->max_quantizer = pParam->min_quantizer;
196 :
197 :	edgomez	195	/* 1 keyframe each 10 seconds */
198 :	edgomez	192
199 :	edgomez	325	if (pParam->max_key_interval <= 0)
200 :	edgomez	192	pParam->max_key_interval = 10 * pParam->fincr / pParam->fbase;
201 :
202 :			pEnc = (Encoder *) xvid_malloc(sizeof(Encoder), CACHE_LINE);
203 :			if (pEnc == NULL)
204 :	Isibaar	3	return XVID_ERR_MEMORY;
205 :
206 :	edgomez	198	/* Zero the Encoder Structure */
207 :
208 :			memset(pEnc, 0, sizeof(Encoder));
209 :
210 :	Isibaar	3	/* Fill members of Encoder structure */
211 :
212 :	edgomez	13	pEnc->mbParam.width = pParam->width;
213 :			pEnc->mbParam.height = pParam->height;
214 :	Isibaar	3
215 :			pEnc->mbParam.mb_width = (pEnc->mbParam.width + 15) / 16;
216 :			pEnc->mbParam.mb_height = (pEnc->mbParam.height + 15) / 16;
217 :
218 :	edgomez	195	pEnc->mbParam.edged_width = 16 * pEnc->mbParam.mb_width + 2 * EDGE_SIZE;
219 :			pEnc->mbParam.edged_height = 16 * pEnc->mbParam.mb_height + 2 * EDGE_SIZE;
220 :	Isibaar	3
221 :	suxen_drol	152	pEnc->mbParam.fbase = pParam->fbase;
222 :			pEnc->mbParam.fincr = pParam->fincr;
223 :
224 :	Isibaar	208	pEnc->mbParam.m_quant_type = H263_QUANT;
225 :
226 :	suxen_drol	690	pEnc->fMvPrevSigma = -1;
227 :	Isibaar	3
228 :			/* Fill rate control parameters */
229 :
230 :	h	121	pEnc->bitrate = pParam->rc_bitrate;
231 :	Isibaar	3
232 :	edgomez	13	pEnc->iFrameNum = 0;
233 :	suxen_drol	701	pEnc->mbParam.iMaxKeyInterval = pParam->max_key_interval;
234 :	Isibaar	3
235 :	suxen_drol	136	/* try to allocate frame memory */
236 :	Isibaar	3
237 :	edgomez	192	pEnc->current = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
238 :			pEnc->reference = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
239 :	Isibaar	3
240 :	edgomez	195	if (pEnc->current == NULL \|\| pEnc->reference == NULL)
241 :	edgomez	192	goto xvid_err_memory1;
242 :
243 :	suxen_drol	136	/* try to allocate mb memory */
244 :	Isibaar	3
245 :	edgomez	195	pEnc->current->mbs =
246 :			xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
247 :			pEnc->mbParam.mb_height, CACHE_LINE);
248 :			pEnc->reference->mbs =
249 :			xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
250 :			pEnc->mbParam.mb_height, CACHE_LINE);
251 :	suxen_drol	136
252 :	edgomez	192	if (pEnc->current->mbs == NULL \|\| pEnc->reference->mbs == NULL)
253 :			goto xvid_err_memory2;
254 :	suxen_drol	136
255 :			/* try to allocate image memory */
256 :
257 :	suxen_drol	229	#ifdef _DEBUG_PSNR
258 :	suxen_drol	136	image_null(&pEnc->sOriginal);
259 :			#endif
260 :	chl	530
261 :	suxen_drol	152	image_null(&pEnc->f_refh);
262 :			image_null(&pEnc->f_refv);
263 :			image_null(&pEnc->f_refhv);
264 :	chl	530
265 :	suxen_drol	136	image_null(&pEnc->current->image);
266 :			image_null(&pEnc->reference->image);
267 :			image_null(&pEnc->vInterH);
268 :			image_null(&pEnc->vInterV);
269 :			image_null(&pEnc->vInterVf);
270 :			image_null(&pEnc->vInterHV);
271 :			image_null(&pEnc->vInterHVf);
272 :	edgomez	192
273 :	suxen_drol	229	#ifdef _DEBUG_PSNR
274 :	edgomez	195	if (image_create
275 :			(&pEnc->sOriginal, pEnc->mbParam.edged_width,
276 :			pEnc->mbParam.edged_height) < 0)
277 :	edgomez	192	goto xvid_err_memory3;
278 :	suxen_drol	136	#endif
279 :	chl	530
280 :	edgomez	195	if (image_create
281 :			(&pEnc->f_refh, pEnc->mbParam.edged_width,
282 :			pEnc->mbParam.edged_height) < 0)
283 :	edgomez	192	goto xvid_err_memory3;
284 :	edgomez	195	if (image_create
285 :			(&pEnc->f_refv, pEnc->mbParam.edged_width,
286 :			pEnc->mbParam.edged_height) < 0)
287 :	edgomez	192	goto xvid_err_memory3;
288 :	edgomez	195	if (image_create
289 :			(&pEnc->f_refhv, pEnc->mbParam.edged_width,
290 :			pEnc->mbParam.edged_height) < 0)
291 :	edgomez	192	goto xvid_err_memory3;
292 :	chl	530
293 :	edgomez	195	if (image_create
294 :			(&pEnc->current->image, pEnc->mbParam.edged_width,
295 :			pEnc->mbParam.edged_height) < 0)
296 :	edgomez	192	goto xvid_err_memory3;
297 :	edgomez	195	if (image_create
298 :			(&pEnc->reference->image, pEnc->mbParam.edged_width,
299 :			pEnc->mbParam.edged_height) < 0)
300 :	edgomez	192	goto xvid_err_memory3;
301 :	edgomez	195	if (image_create
302 :			(&pEnc->vInterH, pEnc->mbParam.edged_width,
303 :			pEnc->mbParam.edged_height) < 0)
304 :	edgomez	192	goto xvid_err_memory3;
305 :	edgomez	195	if (image_create
306 :			(&pEnc->vInterV, pEnc->mbParam.edged_width,
307 :			pEnc->mbParam.edged_height) < 0)
308 :	edgomez	192	goto xvid_err_memory3;
309 :	edgomez	195	if (image_create
310 :			(&pEnc->vInterVf, pEnc->mbParam.edged_width,
311 :			pEnc->mbParam.edged_height) < 0)
312 :	edgomez	192	goto xvid_err_memory3;
313 :	edgomez	195	if (image_create
314 :			(&pEnc->vInterHV, pEnc->mbParam.edged_width,
315 :			pEnc->mbParam.edged_height) < 0)
316 :	edgomez	192	goto xvid_err_memory3;
317 :	edgomez	195	if (image_create
318 :			(&pEnc->vInterHVf, pEnc->mbParam.edged_width,
319 :			pEnc->mbParam.edged_height) < 0)
320 :	edgomez	192	goto xvid_err_memory3;
321 :	suxen_drol	136
322 :	chl	769	/* Create full bitplane for GMC, this might be wasteful */
323 :			if (image_create
324 :			(&pEnc->vGMC, pEnc->mbParam.edged_width,
325 :			pEnc->mbParam.edged_height) < 0)
326 :			goto xvid_err_memory3;
327 :	Isibaar	3
328 :	edgomez	192
329 :			/* B Frames specific init */
330 :	edgomez	195
331 :	suxen_drol	701	pEnc->mbParam.global = pParam->global;
332 :	suxen_drol	164	pEnc->mbParam.max_bframes = pParam->max_bframes;
333 :	suxen_drol	701	pEnc->mbParam.bquant_ratio = pParam->bquant_ratio;
334 :			pEnc->mbParam.bquant_offset = pParam->bquant_offset;
335 :			pEnc->mbParam.frame_drop_ratio = pParam->frame_drop_ratio;
336 :	edgomez	192	pEnc->bframes = NULL;
337 :
338 :	edgomez	195	if (pEnc->mbParam.max_bframes > 0) {
339 :	suxen_drol	152	int n;
340 :
341 :	edgomez	195	pEnc->bframes =
342 :			xvid_malloc(pEnc->mbParam.max_bframes * sizeof(FRAMEINFO *),
343 :			CACHE_LINE);
344 :	suxen_drol	152
345 :	edgomez	192	if (pEnc->bframes == NULL)
346 :			goto xvid_err_memory3;
347 :
348 :	edgomez	195	for (n = 0; n < pEnc->mbParam.max_bframes; n++)
349 :	edgomez	192	pEnc->bframes[n] = NULL;
350 :
351 :	suxen_drol	152
352 :	edgomez	195	for (n = 0; n < pEnc->mbParam.max_bframes; n++) {
353 :			pEnc->bframes[n] = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
354 :
355 :	edgomez	192	if (pEnc->bframes[n] == NULL)
356 :			goto xvid_err_memory4;
357 :
358 :	edgomez	195	pEnc->bframes[n]->mbs =
359 :			xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
360 :			pEnc->mbParam.mb_height, CACHE_LINE);
361 :	edgomez	192
362 :			if (pEnc->bframes[n]->mbs == NULL)
363 :			goto xvid_err_memory4;
364 :
365 :			image_null(&pEnc->bframes[n]->image);
366 :
367 :	edgomez	195	if (image_create
368 :			(&pEnc->bframes[n]->image, pEnc->mbParam.edged_width,
369 :			pEnc->mbParam.edged_height) < 0)
370 :	edgomez	192	goto xvid_err_memory4;
371 :
372 :	suxen_drol	152	}
373 :			}
374 :	edgomez	192
375 :	suxen_drol	152	pEnc->bframenum_head = 0;
376 :			pEnc->bframenum_tail = 0;
377 :			pEnc->flush_bframes = 0;
378 :	suxen_drol	238	pEnc->bframenum_dx50bvop = -1;
379 :	suxen_drol	152
380 :	suxen_drol	229	pEnc->queue = NULL;
381 :
382 :
383 :			if (pEnc->mbParam.max_bframes > 0) {
384 :			int n;
385 :
386 :			pEnc->queue =
387 :			xvid_malloc(pEnc->mbParam.max_bframes * sizeof(IMAGE),
388 :			CACHE_LINE);
389 :
390 :			if (pEnc->queue == NULL)
391 :			goto xvid_err_memory4;
392 :
393 :			for (n = 0; n < pEnc->mbParam.max_bframes; n++)
394 :			image_null(&pEnc->queue[n]);
395 :
396 :			for (n = 0; n < pEnc->mbParam.max_bframes; n++) {
397 :			if (image_create
398 :			(&pEnc->queue[n], pEnc->mbParam.edged_width,
399 :			pEnc->mbParam.edged_height) < 0)
400 :			goto xvid_err_memory5;
401 :
402 :			}
403 :			}
404 :
405 :			pEnc->queue_head = 0;
406 :			pEnc->queue_tail = 0;
407 :			pEnc->queue_size = 0;
408 :
409 :	chl	557	pEnc->mbParam.m_stamp = 0;
410 :	chl	572
411 :	suxen_drol	234	pEnc->m_framenum = 0;
412 :	chl	572	pEnc->current->stamp = 0;
413 :			pEnc->reference->stamp = 0;
414 :	suxen_drol	152
415 :	edgomez	195	pParam->handle = (void *) pEnc;
416 :	Isibaar	3
417 :	edgomez	195	if (pParam->rc_bitrate) {
418 :			RateControlInit(&pEnc->rate_control, pParam->rc_bitrate,
419 :			pParam->rc_reaction_delay_factor,
420 :			pParam->rc_averaging_period, pParam->rc_buffer,
421 :			pParam->fbase * 1000 / pParam->fincr,
422 :			pParam->max_quantizer, pParam->min_quantizer);
423 :	Isibaar	3	}
424 :
425 :	Isibaar	36	init_timer();
426 :	Isibaar	3
427 :			return XVID_ERR_OK;
428 :	edgomez	192
429 :			/*
430 :			* We handle all XVID_ERR_MEMORY here, this makes the code lighter
431 :			*/
432 :	chl	530
433 :	suxen_drol	229	xvid_err_memory5:
434 :
435 :
436 :			if (pEnc->mbParam.max_bframes > 0) {
437 :
438 :			for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
439 :			image_destroy(&pEnc->queue[i], pEnc->mbParam.edged_width,
440 :			pEnc->mbParam.edged_height);
441 :			}
442 :			xvid_free(pEnc->queue);
443 :			}
444 :
445 :	edgomez	195	xvid_err_memory4:
446 :	edgomez	192
447 :	suxen_drol	229	if (pEnc->mbParam.max_bframes > 0) {
448 :	edgomez	192
449 :	suxen_drol	229	for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
450 :	edgomez	192
451 :	suxen_drol	229	if (pEnc->bframes[i] == NULL)
452 :			continue;
453 :	edgomez	192
454 :	suxen_drol	229	image_destroy(&pEnc->bframes[i]->image, pEnc->mbParam.edged_width,
455 :			pEnc->mbParam.edged_height);
456 :
457 :			xvid_free(pEnc->bframes[i]->mbs);
458 :
459 :			xvid_free(pEnc->bframes[i]);
460 :	edgomez	192
461 :	suxen_drol	229	}
462 :
463 :			xvid_free(pEnc->bframes);
464 :	edgomez	192	}
465 :
466 :	edgomez	195	xvid_err_memory3:
467 :	suxen_drol	229	#ifdef _DEBUG_PSNR
468 :	edgomez	195	image_destroy(&pEnc->sOriginal, pEnc->mbParam.edged_width,
469 :			pEnc->mbParam.edged_height);
470 :	edgomez	192	#endif
471 :
472 :	edgomez	195	image_destroy(&pEnc->f_refh, pEnc->mbParam.edged_width,
473 :			pEnc->mbParam.edged_height);
474 :			image_destroy(&pEnc->f_refv, pEnc->mbParam.edged_width,
475 :			pEnc->mbParam.edged_height);
476 :			image_destroy(&pEnc->f_refhv, pEnc->mbParam.edged_width,
477 :			pEnc->mbParam.edged_height);
478 :	edgomez	192
479 :	edgomez	195	image_destroy(&pEnc->current->image, pEnc->mbParam.edged_width,
480 :			pEnc->mbParam.edged_height);
481 :			image_destroy(&pEnc->reference->image, pEnc->mbParam.edged_width,
482 :			pEnc->mbParam.edged_height);
483 :			image_destroy(&pEnc->vInterH, pEnc->mbParam.edged_width,
484 :			pEnc->mbParam.edged_height);
485 :			image_destroy(&pEnc->vInterV, pEnc->mbParam.edged_width,
486 :			pEnc->mbParam.edged_height);
487 :			image_destroy(&pEnc->vInterVf, pEnc->mbParam.edged_width,
488 :			pEnc->mbParam.edged_height);
489 :			image_destroy(&pEnc->vInterHV, pEnc->mbParam.edged_width,
490 :			pEnc->mbParam.edged_height);
491 :			image_destroy(&pEnc->vInterHVf, pEnc->mbParam.edged_width,
492 :			pEnc->mbParam.edged_height);
493 :	edgomez	192
494 :	chl	769	/* destroy GMC image */
495 :			image_destroy(&pEnc->vGMC, pEnc->mbParam.edged_width,
496 :			pEnc->mbParam.edged_height);
497 :
498 :
499 :	edgomez	195	xvid_err_memory2:
500 :	edgomez	192	xvid_free(pEnc->current->mbs);
501 :			xvid_free(pEnc->reference->mbs);
502 :
503 :	edgomez	195	xvid_err_memory1:
504 :	edgomez	192	xvid_free(pEnc->current);
505 :			xvid_free(pEnc->reference);
506 :			xvid_free(pEnc);
507 :
508 :	edgomez	194	pParam->handle = NULL;
509 :
510 :	edgomez	192	return XVID_ERR_MEMORY;
511 :	Isibaar	3	}
512 :
513 :	edgomez	194	/*****************************************************************************
514 :			* Encoder destruction
515 :			*
516 :			* This function destroy the entire encoder structure created by a previous
517 :			* successful encoder_create call.
518 :			*
519 :			* Returned values (for now only one returned value) :
520 :			* - XVID_ERR_OK - no errors
521 :			*
522 :			****************************************************************************/
523 :
524 :			int
525 :			encoder_destroy(Encoder * pEnc)
526 :	Isibaar	3	{
527 :	suxen_drol	229	int i;
528 :
529 :	edgomez	13	ENC_CHECK(pEnc);
530 :	Isibaar	3
531 :	edgomez	192	/* B Frames specific */
532 :	suxen_drol	229	if (pEnc->mbParam.max_bframes > 0) {
533 :	edgomez	192
534 :	suxen_drol	229	for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
535 :
536 :			image_destroy(&pEnc->queue[i], pEnc->mbParam.edged_width,
537 :			pEnc->mbParam.edged_height);
538 :			}
539 :			xvid_free(pEnc->queue);
540 :			}
541 :	edgomez	192
542 :
543 :	suxen_drol	229	if (pEnc->mbParam.max_bframes > 0) {
544 :
545 :			for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
546 :
547 :			if (pEnc->bframes[i] == NULL)
548 :			continue;
549 :
550 :			image_destroy(&pEnc->bframes[i]->image, pEnc->mbParam.edged_width,
551 :	edgomez	195	pEnc->mbParam.edged_height);
552 :	edgomez	192
553 :	suxen_drol	229	xvid_free(pEnc->bframes[i]->mbs);
554 :	edgomez	192
555 :	suxen_drol	229	xvid_free(pEnc->bframes[i]);
556 :			}
557 :	edgomez	192
558 :	suxen_drol	229	xvid_free(pEnc->bframes);
559 :
560 :	suxen_drol	152	}
561 :
562 :	edgomez	192	/* All images, reference, current etc ... */
563 :
564 :	edgomez	195	image_destroy(&pEnc->current->image, pEnc->mbParam.edged_width,
565 :			pEnc->mbParam.edged_height);
566 :			image_destroy(&pEnc->reference->image, pEnc->mbParam.edged_width,
567 :			pEnc->mbParam.edged_height);
568 :			image_destroy(&pEnc->vInterH, pEnc->mbParam.edged_width,
569 :			pEnc->mbParam.edged_height);
570 :			image_destroy(&pEnc->vInterV, pEnc->mbParam.edged_width,
571 :			pEnc->mbParam.edged_height);
572 :			image_destroy(&pEnc->vInterVf, pEnc->mbParam.edged_width,
573 :			pEnc->mbParam.edged_height);
574 :			image_destroy(&pEnc->vInterHV, pEnc->mbParam.edged_width,
575 :			pEnc->mbParam.edged_height);
576 :			image_destroy(&pEnc->vInterHVf, pEnc->mbParam.edged_width,
577 :			pEnc->mbParam.edged_height);
578 :	chl	530
579 :	edgomez	195	image_destroy(&pEnc->f_refh, pEnc->mbParam.edged_width,
580 :			pEnc->mbParam.edged_height);
581 :			image_destroy(&pEnc->f_refv, pEnc->mbParam.edged_width,
582 :			pEnc->mbParam.edged_height);
583 :			image_destroy(&pEnc->f_refhv, pEnc->mbParam.edged_width,
584 :			pEnc->mbParam.edged_height);
585 :	chl	530
586 :	suxen_drol	229	#ifdef _DEBUG_PSNR
587 :	edgomez	195	image_destroy(&pEnc->sOriginal, pEnc->mbParam.edged_width,
588 :			pEnc->mbParam.edged_height);
589 :	Isibaar	113	#endif
590 :	edgomez	192
591 :			/* Encoder structure */
592 :	edgomez	195
593 :	suxen_drol	136	xvid_free(pEnc->current->mbs);
594 :			xvid_free(pEnc->current);
595 :
596 :			xvid_free(pEnc->reference->mbs);
597 :			xvid_free(pEnc->reference);
598 :
599 :	Isibaar	41	xvid_free(pEnc);
600 :	edgomez	192
601 :	edgomez	13	return XVID_ERR_OK;
602 :	Isibaar	3	}
603 :
604 :	suxen_drol	229
605 :	chl	530	static __inline void inc_frame_num(Encoder * pEnc)
606 :	suxen_drol	229	{
607 :	chl	569	pEnc->current->stamp = pEnc->mbParam.m_stamp; // first frame is zero
608 :	chl	557	pEnc->mbParam.m_stamp += pEnc->mbParam.fincr;
609 :	chl	387	}
610 :	suxen_drol	229
611 :	chl	387
612 :	chl	530	static __inline void
613 :			queue_image(Encoder * pEnc, XVID_ENC_FRAME * pFrame)
614 :	suxen_drol	229	{
615 :			if (pEnc->queue_size >= pEnc->mbParam.max_bframes)
616 :			{
617 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"FATAL: QUEUE FULL");
618 :	suxen_drol	229	return;
619 :			}
620 :
621 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"*** QUEUE bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
622 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
623 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
624 :
625 :
626 :			start_timer();
627 :			if (image_input
628 :			(&pEnc->queue[pEnc->queue_tail], pEnc->mbParam.width, pEnc->mbParam.height,
629 :	suxen_drol	631	pEnc->mbParam.edged_width, pFrame->image, pFrame->stride, pFrame->colorspace, pFrame->general & XVID_INTERLACING))
630 :	suxen_drol	229	return;
631 :			stop_conv_timer();
632 :
633 :			pEnc->queue_size++;
634 :			pEnc->queue_tail = (pEnc->queue_tail + 1) % pEnc->mbParam.max_bframes;
635 :			}
636 :
637 :	chl	557	static __inline void
638 :			set_timecodes(FRAMEINFO* pCur,FRAMEINFO *pRef, int32_t time_base)
639 :			{
640 :	suxen_drol	229
641 :	chl	557	pCur->ticks = (int32_t)pCur->stamp % time_base;
642 :			pCur->seconds = ((int32_t)pCur->stamp / time_base) - ((int32_t)pRef->stamp / time_base) ;
643 :
644 :	chl	569	//HEAVY DEBUG OUTPUT remove when timecodes prove to be stable
645 :	chl	530
646 :	chl	570	/* fprintf(stderr,"WriteVop: %d - %d \n",
647 :	chl	557	((int32_t)pCur->stamp / time_base), ((int32_t)pRef->stamp / time_base));
648 :			fprintf(stderr,"set_timecodes: VOP %1d stamp=%lld ref_stamp=%lld base=%d\n",
649 :			pCur->coding_type, pCur->stamp, pRef->stamp, time_base);
650 :			fprintf(stderr,"set_timecodes: VOP %1d seconds=%d ticks=%d (ref-sec=%d ref-tick=%d)\n",
651 :			pCur->coding_type, pCur->seconds, pCur->ticks, pRef->seconds, pRef->ticks);
652 :
653 :	chl	570	*/
654 :	chl	557	}
655 :
656 :
657 :
658 :	suxen_drol	709	/* convert pFrame->intra to coding_type */
659 :			static int intra2coding_type(int intra)
660 :			{
661 :	edgomez	786	if (intra < 0) return -1;
662 :			if (intra == 1) return I_VOP;
663 :			if (intra == 2) return B_VOP;
664 :			if (intra == 3) return S_VOP;
665 :
666 :	suxen_drol	709	return P_VOP;
667 :			}
668 :	chl	557
669 :
670 :	suxen_drol	709
671 :	edgomez	194	/*****************************************************************************
672 :	suxen_drol	229	* IPB frame encoder entry point
673 :	edgomez	194	*
674 :			* Returned values :
675 :			* - XVID_ERR_OK - no errors
676 :			* - XVID_ERR_FORMAT - the image subsystem reported the image had a wrong
677 :			* format
678 :			****************************************************************************/
679 :	suxen_drol	152
680 :	edgomez	194	int
681 :	suxen_drol	229	encoder_encode_bframes(Encoder * pEnc,
682 :	edgomez	195	XVID_ENC_FRAME * pFrame,
683 :			XVID_ENC_STATS * pResult)
684 :	Isibaar	3	{
685 :	edgomez	13	uint16_t x, y;
686 :			Bitstream bs;
687 :	syskin	763	uint32_t bits;
688 :			int mode;
689 :	suxen_drol	152
690 :	suxen_drol	229	int input_valid = 1;
691 :	syskin	643	int bframes_count = 0;
692 :	suxen_drol	229
693 :			#ifdef _DEBUG_PSNR
694 :	chenm001	168	float psnr;
695 :			char temp[128];
696 :			#endif
697 :
698 :	suxen_drol	152	ENC_CHECK(pEnc);
699 :			ENC_CHECK(pFrame);
700 :	suxen_drol	229	ENC_CHECK(pFrame->image);
701 :	suxen_drol	152
702 :			start_global_timer();
703 :	edgomez	195
704 :	suxen_drol	152	BitstreamInit(&bs, pFrame->bitstream, 0);
705 :
706 :	suxen_drol	229	ipvop_loop:
707 :
708 :	edgomez	194	/*
709 :			* bframe "flush" code
710 :			*/
711 :	suxen_drol	152
712 :	edgomez	195	if ((pFrame->image == NULL \|\| pEnc->flush_bframes)
713 :			&& (pEnc->bframenum_head < pEnc->bframenum_tail)) {
714 :
715 :			if (pEnc->flush_bframes == 0) {
716 :	edgomez	194	/*
717 :			* we have reached the end of stream without getting
718 :			* a future reference frame... so encode last final
719 :			* frame as a pframe
720 :			*/
721 :
722 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"*** BFRAME (final frame) bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
723 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
724 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
725 :
726 :	suxen_drol	152	pEnc->bframenum_tail--;
727 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->reference);
728 :	suxen_drol	152
729 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
730 :	suxen_drol	152
731 :			FrameCodeP(pEnc, &bs, &bits, 1, 0);
732 :	syskin	643	bframes_count = 0;
733 :	suxen_drol	152
734 :	chl	784	BitstreamPadAlways(&bs);
735 :	suxen_drol	152	pFrame->length = BitstreamLength(&bs);
736 :	edgomez	786	if(pEnc->current->coding_type == P_VOP)
737 :			pFrame->intra = 0;
738 :			else
739 :			pFrame->intra = 3;
740 :	edgomez	194
741 :	suxen_drol	631	emms();
742 :
743 :	edgomez	786	if (pResult) {
744 :			pResult->quant = pEnc->current->quant;
745 :			pResult->hlength = pFrame->length - (pEnc->current->sStat.iTextBits / 8);
746 :			pResult->kblks = pEnc->current->sStat.kblks;
747 :			pResult->mblks = pEnc->current->sStat.mblks;
748 :			pResult->ublks = pEnc->current->sStat.ublks;
749 :			}
750 :
751 :	suxen_drol	152	return XVID_ERR_OK;
752 :			}
753 :
754 :	suxen_drol	229
755 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"*** BFRAME (flush) bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
756 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
757 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
758 :
759 :	edgomez	195	FrameCodeB(pEnc, pEnc->bframes[pEnc->bframenum_head], &bs, &bits);
760 :	suxen_drol	152	pEnc->bframenum_head++;
761 :
762 :	chl	784	BitstreamPadAlways(&bs);
763 :	suxen_drol	152	pFrame->length = BitstreamLength(&bs);
764 :	suxen_drol	659	pFrame->intra = 2;
765 :	edgomez	194
766 :	edgomez	786	if (pResult) {
767 :			pResult->quant = pEnc->current->quant;
768 :			pResult->hlength = pFrame->length - (pEnc->current->sStat.iTextBits / 8);
769 :			pResult->kblks = pEnc->current->sStat.kblks;
770 :			pResult->mblks = pEnc->current->sStat.mblks;
771 :			pResult->ublks = pEnc->current->sStat.ublks;
772 :			}
773 :
774 :	suxen_drol	229	if (input_valid)
775 :			queue_image(pEnc, pFrame);
776 :
777 :	suxen_drol	631	emms();
778 :
779 :	suxen_drol	152	return XVID_ERR_OK;
780 :			}
781 :
782 :	suxen_drol	229	if (pEnc->bframenum_head > 0) {
783 :			pEnc->bframenum_head = pEnc->bframenum_tail = 0;
784 :
785 :	suxen_drol	575	/* write an empty marker to the bitstream.
786 :
787 :			for divx5 decoder compatibility, this marker must consist
788 :			of a not-coded p-vop, with a time_base of zero, and time_increment
789 :			indentical to the future-referece frame.
790 :			*/
791 :
792 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_PACKED)) {
793 :	suxen_drol	575	int tmp;
794 :	suxen_drol	229
795 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"*** EMPTY bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
796 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
797 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
798 :
799 :
800 :	suxen_drol	575	tmp = pEnc->current->seconds;
801 :			pEnc->current->seconds = 0; /* force time_base = 0 */
802 :	chl	784
803 :	suxen_drol	575	BitstreamWriteVopHeader(&bs, &pEnc->mbParam, pEnc->current, 0);
804 :			pEnc->current->seconds = tmp;
805 :
806 :	chl	784	BitstreamPadAlways(&bs);
807 :	suxen_drol	229	pFrame->length = BitstreamLength(&bs);
808 :	suxen_drol	659	pFrame->intra = 4;
809 :	suxen_drol	229
810 :	edgomez	786	if (pResult) {
811 :			pResult->quant = pEnc->current->quant;
812 :			pResult->hlength = pFrame->length - (pEnc->current->sStat.iTextBits / 8);
813 :			pResult->kblks = pEnc->current->sStat.kblks;
814 :			pResult->mblks = pEnc->current->sStat.mblks;
815 :			pResult->ublks = pEnc->current->sStat.ublks;
816 :			}
817 :
818 :	suxen_drol	229	if (input_valid)
819 :			queue_image(pEnc, pFrame);
820 :
821 :	suxen_drol	631	emms();
822 :
823 :	suxen_drol	229	return XVID_ERR_OK;
824 :			}
825 :			}
826 :
827 :
828 :			bvop_loop:
829 :
830 :	suxen_drol	238	if (pEnc->bframenum_dx50bvop != -1)
831 :			{
832 :	suxen_drol	229
833 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->reference);
834 :			SWAP(FRAMEINFO *, pEnc->current, pEnc->bframes[pEnc->bframenum_dx50bvop]);
835 :	suxen_drol	229
836 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DEBUG)) {
837 :	suxen_drol	238	image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 100, "DX50 IVOP");
838 :			}
839 :
840 :			if (input_valid)
841 :			{
842 :			queue_image(pEnc, pFrame);
843 :			input_valid = 0;
844 :			}
845 :
846 :			} else if (input_valid) {
847 :
848 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->reference);
849 :	suxen_drol	238
850 :	suxen_drol	229	start_timer();
851 :			if (image_input
852 :			(&pEnc->current->image, pEnc->mbParam.width, pEnc->mbParam.height,
853 :	suxen_drol	631	pEnc->mbParam.edged_width, pFrame->image, pFrame->stride, pFrame->colorspace, pFrame->general & XVID_INTERLACING))
854 :			{
855 :			emms();
856 :	suxen_drol	229	return XVID_ERR_FORMAT;
857 :	suxen_drol	631	}
858 :	suxen_drol	229	stop_conv_timer();
859 :
860 :			// queue input frame, and dequue next image
861 :			if (pEnc->queue_size > 0)
862 :			{
863 :			image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_tail]);
864 :			if (pEnc->queue_head != pEnc->queue_tail)
865 :			{
866 :			image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_head]);
867 :			}
868 :			pEnc->queue_head = (pEnc->queue_head + 1) % pEnc->mbParam.max_bframes;
869 :			pEnc->queue_tail = (pEnc->queue_tail + 1) % pEnc->mbParam.max_bframes;
870 :			}
871 :
872 :			} else if (pEnc->queue_size > 0) {
873 :
874 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->reference);
875 :	suxen_drol	229
876 :			image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_head]);
877 :			pEnc->queue_head = (pEnc->queue_head + 1) % pEnc->mbParam.max_bframes;
878 :			pEnc->queue_size--;
879 :
880 :	suxen_drol	575	} else {
881 :	suxen_drol	229
882 :	suxen_drol	575	/* if nothing was encoded, write an 'ignore this frame' flag
883 :			to the bitstream */
884 :
885 :			if (BitstreamPos(&bs) == 0) {
886 :
887 :			DPRINTF(DPRINTF_DEBUG,"*** SKIP bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
888 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
889 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
890 :
891 :	chl	784	// BitstreamPutBits(&bs, 0x7f, 8);
892 :	suxen_drol	659	pFrame->intra = 5;
893 :	edgomez	786
894 :			if (pResult) {
895 :			/*
896 :			* We must decide what to put there because i know some apps
897 :			* are storing statistics about quantizers and just do
898 :			* stats[quant]++ or stats[quant-1]++
899 :			* transcode is one of these app with its 2pass module
900 :			*/
901 :
902 :			/*
903 :			* For now i prefer 31 than 0 that could lead to a segfault
904 :			* in transcode
905 :			*/
906 :			pResult->quant = 31;
907 :
908 :			pResult->hlength = 0;
909 :			pResult->kblks = 0;
910 :			pResult->mblks = 0;
911 :			pResult->ublks = 0;
912 :			}
913 :
914 :			} else {
915 :
916 :			if (pResult) {
917 :			pResult->quant = pEnc->current->quant;
918 :			pResult->hlength = pFrame->length - (pEnc->current->sStat.iTextBits / 8);
919 :			pResult->kblks = pEnc->current->sStat.kblks;
920 :			pResult->mblks = pEnc->current->sStat.mblks;
921 :			pResult->ublks = pEnc->current->sStat.ublks;
922 :			}
923 :
924 :	suxen_drol	575	}
925 :	edgomez	194
926 :	suxen_drol	229	pFrame->length = BitstreamLength(&bs);
927 :	edgomez	786
928 :	suxen_drol	631	emms();
929 :	edgomez	786
930 :	suxen_drol	152	return XVID_ERR_OK;
931 :			}
932 :
933 :			pEnc->flush_bframes = 0;
934 :
935 :	edgomez	198	emms();
936 :	edgomez	194
937 :	suxen_drol	238	// only inc frame num, adapt quant, etc. if we havent seen it before
938 :			if (pEnc->bframenum_dx50bvop < 0 )
939 :			{
940 :	suxen_drol	709	mode = intra2coding_type(pFrame->intra);
941 :	suxen_drol	238	if (pFrame->quant == 0)
942 :			pEnc->current->quant = RateControlGetQ(&pEnc->rate_control, 0);
943 :			else
944 :			pEnc->current->quant = pFrame->quant;
945 :	edgomez	194
946 :	chl	326	/* if (pEnc->current->quant < 1)
947 :	suxen_drol	238	pEnc->current->quant = 1;
948 :	edgomez	195
949 :	suxen_drol	238	if (pEnc->current->quant > 31)
950 :			pEnc->current->quant = 31;
951 :	chl	326	*/
952 :	suxen_drol	238	pEnc->current->global_flags = pFrame->general;
953 :			pEnc->current->motion_flags = pFrame->motion;
954 :	suxen_drol	152
955 :	suxen_drol	238	/* ToDo : dynamic fcode (in both directions) */
956 :			pEnc->current->fcode = pEnc->mbParam.m_fcode;
957 :			pEnc->current->bcode = pEnc->mbParam.m_fcode;
958 :	suxen_drol	152
959 :	suxen_drol	238	inc_frame_num(pEnc);
960 :
961 :	suxen_drol	229	#ifdef _DEBUG_PSNR
962 :	suxen_drol	238	image_copy(&pEnc->sOriginal, &pEnc->current->image,
963 :	edgomez	195	pEnc->mbParam.edged_width, pEnc->mbParam.height);
964 :	suxen_drol	152	#endif
965 :
966 :	suxen_drol	238	emms();
967 :	suxen_drol	152
968 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DEBUG)) {
969 :	suxen_drol	238	image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 5,
970 :	suxen_drol	577	"%i if:%i st:%i", pEnc->m_framenum++, pEnc->iFrameNum, pEnc->current->stamp);
971 :	suxen_drol	238	}
972 :	suxen_drol	234
973 :	edgomez	194	/* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
974 :			* Luminance masking
975 :			* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
976 :	suxen_drol	152
977 :	suxen_drol	238	if ((pEnc->current->global_flags & XVID_LUMIMASKING)) {
978 :			int *temp_dquants =
979 :			(int ) xvid_malloc(pEnc->mbParam.mb_width
980 :	edgomez	195	pEnc->mbParam.mb_height * sizeof(int),
981 :			CACHE_LINE);
982 :
983 :	suxen_drol	238	pEnc->current->quant =
984 :			adaptive_quantization(pEnc->current->image.y,
985 :	edgomez	195	pEnc->mbParam.edged_width, temp_dquants,
986 :			pEnc->current->quant, pEnc->current->quant,
987 :			2 * pEnc->current->quant,
988 :			pEnc->mbParam.mb_width,
989 :			pEnc->mbParam.mb_height);
990 :	edgomez	194
991 :	suxen_drol	238	for (y = 0; y < pEnc->mbParam.mb_height; y++) {
992 :	edgomez	194
993 :	edgomez	195	#define OFFSET(x,y) ((x) + (y)*pEnc->mbParam.mb_width)
994 :
995 :	suxen_drol	238	for (x = 0; x < pEnc->mbParam.mb_width; x++) {
996 :			MACROBLOCK *pMB = &pEnc->current->mbs[OFFSET(x, y)];
997 :	edgomez	195
998 :	suxen_drol	238	pMB->dquant = iDQtab[temp_dquants[OFFSET(x, y)] + 2];
999 :			}
1000 :	edgomez	194
1001 :	edgomez	195	#undef OFFSET
1002 :	suxen_drol	238	}
1003 :	edgomez	194
1004 :	suxen_drol	238	xvid_free(temp_dquants);
1005 :	edgomez	194	}
1006 :
1007 :	suxen_drol	152	}
1008 :
1009 :	edgomez	194	/* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1010 :			* ivop/pvop/bvop selection
1011 :			* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1012 :	syskin	688	pEnc->iFrameNum++;
1013 :	suxen_drol	152
1014 :	suxen_drol	709	if (pEnc->iFrameNum == 0 \|\| pEnc->bframenum_dx50bvop >= 0 \|\|
1015 :			(mode < 0 && pEnc->mbParam.iMaxKeyInterval > 0 &&
1016 :			pEnc->iFrameNum >= pEnc->mbParam.iMaxKeyInterval))
1017 :			{
1018 :			mode = I_VOP;
1019 :			}else{
1020 :			mode = MEanalysis(&pEnc->reference->image, pEnc->current,
1021 :			&pEnc->mbParam, pEnc->mbParam.iMaxKeyInterval,
1022 :			(mode < 0) ? pEnc->iFrameNum : 0,
1023 :			bframes_count++);
1024 :			}
1025 :	h	545
1026 :	suxen_drol	709	if (mode == I_VOP) {
1027 :	edgomez	194	/*
1028 :			* This will be coded as an Intra Frame
1029 :			*/
1030 :	syskin	658	if ((pEnc->current->global_flags & XVID_QUARTERPEL))
1031 :			pEnc->mbParam.m_quarterpel = 1;
1032 :			else
1033 :			pEnc->mbParam.m_quarterpel = 0;
1034 :	suxen_drol	152
1035 :	syskin	671	if (pEnc->current->global_flags & XVID_MPEGQUANT) pEnc->mbParam.m_quant_type = MPEG4_QUANT;
1036 :
1037 :	suxen_drol	680	if ((pEnc->current->global_flags & XVID_CUSTOM_QMATRIX) > 0) {
1038 :			if (pFrame->quant_intra_matrix != NULL)
1039 :			set_intra_matrix(pFrame->quant_intra_matrix);
1040 :			if (pFrame->quant_inter_matrix != NULL)
1041 :			set_inter_matrix(pFrame->quant_inter_matrix);
1042 :			}
1043 :
1044 :
1045 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"*** IFRAME bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
1046 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
1047 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1048 :	suxen_drol	234
1049 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DEBUG)) {
1050 :	suxen_drol	234	image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "IVOP");
1051 :			}
1052 :	edgomez	194
1053 :	suxen_drol	238	// when we reach an iframe in DX50BVOP mode, encode the last bframe as a pframe
1054 :	suxen_drol	152
1055 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DX50BVOP) && pEnc->bframenum_tail > 0) {
1056 :	suxen_drol	238
1057 :			pEnc->bframenum_tail--;
1058 :			pEnc->bframenum_dx50bvop = pEnc->bframenum_tail;
1059 :
1060 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->bframes[pEnc->bframenum_dx50bvop]);
1061 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DEBUG)) {
1062 :	suxen_drol	238	image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 100, "DX50 BVOP->PVOP");
1063 :			}
1064 :			FrameCodeP(pEnc, &bs, &bits, 1, 0);
1065 :	syskin	643	bframes_count = 0;
1066 :	suxen_drol	238
1067 :	edgomez	786	if(pEnc->current->coding_type == P_VOP)
1068 :			pFrame->intra = 0;
1069 :			else
1070 :			pFrame->intra = 3;
1071 :
1072 :
1073 :	suxen_drol	238	} else {
1074 :	suxen_drol	240
1075 :	suxen_drol	238	FrameCodeI(pEnc, &bs, &bits);
1076 :	syskin	643	bframes_count = 0;
1077 :	suxen_drol	238	pFrame->intra = 1;
1078 :	suxen_drol	240
1079 :			pEnc->bframenum_dx50bvop = -1;
1080 :	suxen_drol	238	}
1081 :
1082 :	suxen_drol	152	pEnc->flush_bframes = 1;
1083 :
1084 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_PACKED) && pEnc->bframenum_tail > 0) {
1085 :	suxen_drol	577	BitstreamPadAlways(&bs);
1086 :	suxen_drol	229	input_valid = 0;
1087 :			goto ipvop_loop;
1088 :			}
1089 :
1090 :	edgomez	194	/*
1091 :			* NB : sequences like "IIBB" decode fine with msfdam but,
1092 :			* go screwy with divx 5.00
1093 :			*/
1094 :	edgomez	786	} else if (mode == P_VOP \|\| mode == S_VOP \|\| pEnc->bframenum_tail >= pEnc->mbParam.max_bframes) {
1095 :	edgomez	194	/*
1096 :			* This will be coded as a Predicted Frame
1097 :			*/
1098 :	suxen_drol	152
1099 :	suxen_drol	252	DPRINTF(DPRINTF_DEBUG,"*** PFRAME bf: head=%i tail=%i queue: head=%i tail=%i size=%i",
1100 :	suxen_drol	229	pEnc->bframenum_head, pEnc->bframenum_tail,
1101 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1102 :	suxen_drol	234
1103 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DEBUG)) {
1104 :	suxen_drol	234	image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "PVOP");
1105 :			}
1106 :	edgomez	194
1107 :	suxen_drol	152	FrameCodeP(pEnc, &bs, &bits, 1, 0);
1108 :	syskin	643	bframes_count = 0;
1109 :	edgomez	786	if(pEnc->current->coding_type == P_VOP)
1110 :			pFrame->intra = 0;
1111 :			else
1112 :			pFrame->intra = 3;
1113 :	suxen_drol	152	pEnc->flush_bframes = 1;
1114 :	suxen_drol	229
1115 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_PACKED) && (pEnc->bframenum_tail > 0)) {
1116 :	suxen_drol	577	BitstreamPadAlways(&bs);
1117 :	suxen_drol	229	input_valid = 0;
1118 :			goto ipvop_loop;
1119 :			}
1120 :
1121 :	suxen_drol	709	} else { /* mode == B_VOP */
1122 :	edgomez	194	/*
1123 :			* This will be coded as a Bidirectional Frame
1124 :			*/
1125 :	suxen_drol	152
1126 :	suxen_drol	701	if ((pEnc->mbParam.global & XVID_GLOBAL_DEBUG)) {
1127 :	suxen_drol	234	image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "BVOP");
1128 :			}
1129 :
1130 :	edgomez	195	if (pFrame->bquant < 1) {
1131 :	suxen_drol	659	pEnc->current->quant = ((((pEnc->reference->quant + pEnc->current->quant) *
1132 :	suxen_drol	701	pEnc->mbParam.bquant_ratio) / 2) + pEnc->mbParam.bquant_offset)/100;
1133 :	suxen_drol	659
1134 :	edgomez	195	} else {
1135 :	suxen_drol	152	pEnc->current->quant = pFrame->bquant;
1136 :			}
1137 :	edgomez	195
1138 :	suxen_drol	659	if (pEnc->current->quant < 1)
1139 :			pEnc->current->quant = 1;
1140 :			else if (pEnc->current->quant > 31)
1141 :			pEnc->current->quant = 31;
1142 :	chl	326
1143 :	suxen_drol	659	DPRINTF(DPRINTF_DEBUG,"*** BFRAME (store) bf: head=%i tail=%i queue: head=%i tail=%i size=%i quant=%i\n",
1144 :			pEnc->bframenum_head, pEnc->bframenum_tail,
1145 :			pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size,pEnc->current->quant);
1146 :	chl	327
1147 :	edgomez	194	/* store frame into bframe buffer & swap ref back to current */
1148 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
1149 :			SWAP(FRAMEINFO *, pEnc->current, pEnc->reference);
1150 :	suxen_drol	152
1151 :			pEnc->bframenum_tail++;
1152 :
1153 :	suxen_drol	659	// bframe report by koepi
1154 :			pFrame->intra = 2;
1155 :	suxen_drol	152	pFrame->length = 0;
1156 :
1157 :	suxen_drol	229	input_valid = 0;
1158 :			goto bvop_loop;
1159 :	suxen_drol	152	}
1160 :
1161 :	chl	784	BitstreamPadAlways(&bs);
1162 :	suxen_drol	152	pFrame->length = BitstreamLength(&bs);
1163 :
1164 :	edgomez	195	if (pResult) {
1165 :	suxen_drol	152	pResult->quant = pEnc->current->quant;
1166 :	suxen_drol	690	pResult->hlength = pFrame->length - (pEnc->current->sStat.iTextBits / 8);
1167 :			pResult->kblks = pEnc->current->sStat.kblks;
1168 :			pResult->mblks = pEnc->current->sStat.mblks;
1169 :			pResult->ublks = pEnc->current->sStat.ublks;
1170 :	suxen_drol	152	}
1171 :
1172 :	edgomez	198	emms();
1173 :	edgomez	194
1174 :	suxen_drol	229	#ifdef _DEBUG_PSNR
1175 :	edgomez	195	psnr =
1176 :			image_psnr(&pEnc->sOriginal, &pEnc->current->image,
1177 :			pEnc->mbParam.edged_width, pEnc->mbParam.width,
1178 :			pEnc->mbParam.height);
1179 :	suxen_drol	152
1180 :	chl	769	printf("PSNR: %f\n", psnr);
1181 :			// DEBUG(temp);
1182 :	suxen_drol	152	#endif
1183 :
1184 :	edgomez	195	if (pFrame->quant == 0) {
1185 :			RateControlUpdate(&pEnc->rate_control, pEnc->current->quant,
1186 :			pFrame->length, pFrame->intra);
1187 :	suxen_drol	152	}
1188 :
1189 :			stop_global_timer();
1190 :			write_timer();
1191 :
1192 :	suxen_drol	631	emms();
1193 :	suxen_drol	152	return XVID_ERR_OK;
1194 :			}
1195 :	suxen_drol	229
1196 :
1197 :
1198 :	edgomez	194	/*****************************************************************************
1199 :	suxen_drol	229	* "original" IP frame encoder entry point
1200 :			*
1201 :			* Returned values :
1202 :			* - XVID_ERR_OK - no errors
1203 :			* - XVID_ERR_FORMAT - the image subsystem reported the image had a wrong
1204 :			* format
1205 :	edgomez	194	****************************************************************************/
1206 :	suxen_drol	229
1207 :	edgomez	194	int
1208 :			encoder_encode(Encoder * pEnc,
1209 :	edgomez	195	XVID_ENC_FRAME * pFrame,
1210 :			XVID_ENC_STATS * pResult)
1211 :	suxen_drol	152	{
1212 :			uint16_t x, y;
1213 :			Bitstream bs;
1214 :			uint32_t bits;
1215 :	Isibaar	4	uint16_t write_vol_header = 0;
1216 :	edgomez	195
1217 :	suxen_drol	229	#ifdef _DEBUG_PSNR
1218 :	Isibaar	113	float psnr;
1219 :	edgomez	194	uint8_t temp[128];
1220 :	Isibaar	113	#endif
1221 :	Isibaar	3
1222 :			start_global_timer();
1223 :
1224 :	edgomez	13	ENC_CHECK(pEnc);
1225 :			ENC_CHECK(pFrame);
1226 :			ENC_CHECK(pFrame->bitstream);
1227 :			ENC_CHECK(pFrame->image);
1228 :	Isibaar	3
1229 :	suxen_drol	758	SWAP(FRAMEINFO *, pEnc->current, pEnc->reference);
1230 :	suxen_drol	136
1231 :			pEnc->current->global_flags = pFrame->general;
1232 :			pEnc->current->motion_flags = pFrame->motion;
1233 :	h	101	pEnc->mbParam.hint = &pFrame->hint;
1234 :	Isibaar	3
1235 :	chl	573	inc_frame_num(pEnc);
1236 :
1237 :	h	543	/* disable alternate scan flag if interlacing is not enabled */
1238 :			if ((pEnc->current->global_flags & XVID_ALTERNATESCAN) &&
1239 :			!(pEnc->current->global_flags & XVID_INTERLACING))
1240 :			{
1241 :			pEnc->current->global_flags -= XVID_ALTERNATESCAN;
1242 :			}
1243 :
1244 :	Isibaar	3	start_timer();
1245 :	edgomez	195	if (image_input
1246 :			(&pEnc->current->image, pEnc->mbParam.width, pEnc->mbParam.height,
1247 :	suxen_drol	631	pEnc->mbParam.edged_width, pFrame->image, pFrame->stride, pFrame->colorspace, pFrame->general & XVID_INTERLACING) < 0)
1248 :	Isibaar	3	return XVID_ERR_FORMAT;
1249 :			stop_conv_timer();
1250 :
1251 :	suxen_drol	229	#ifdef _DEBUG_PSNR
1252 :	edgomez	195	image_copy(&pEnc->sOriginal, &pEnc->current->image,
1253 :			pEnc->mbParam.edged_width, pEnc->mbParam.height);
1254 :	Isibaar	113	#endif
1255 :
1256 :	edgomez	198	emms();
1257 :	suxen_drol	136
1258 :	edgomez	13	BitstreamInit(&bs, pFrame->bitstream, 0);
1259 :	Isibaar	3
1260 :	edgomez	195	if (pFrame->quant == 0) {
1261 :			pEnc->current->quant = RateControlGetQ(&pEnc->rate_control, 0);
1262 :			} else {
1263 :	suxen_drol	136	pEnc->current->quant = pFrame->quant;
1264 :	Isibaar	3	}
1265 :
1266 :	Isibaar	579	if ((pEnc->current->global_flags & XVID_QUARTERPEL))
1267 :			pEnc->mbParam.m_quarterpel = 1;
1268 :			else
1269 :			pEnc->mbParam.m_quarterpel = 0;
1270 :
1271 :	edgomez	195	if ((pEnc->current->global_flags & XVID_LUMIMASKING)) {
1272 :			int *temp_dquants =
1273 :			(int ) xvid_malloc(pEnc->mbParam.mb_width
1274 :			pEnc->mbParam.mb_height * sizeof(int),
1275 :			CACHE_LINE);
1276 :
1277 :	edgomez	194	pEnc->current->quant =
1278 :			adaptive_quantization(pEnc->current->image.y,
1279 :	edgomez	195	pEnc->mbParam.edged_width, temp_dquants,
1280 :			pEnc->current->quant, pEnc->current->quant,
1281 :			2 * pEnc->current->quant,
1282 :			pEnc->mbParam.mb_width,
1283 :			pEnc->mbParam.mb_height);
1284 :	edgomez	194
1285 :	edgomez	195	for (y = 0; y < pEnc->mbParam.mb_height; y++) {
1286 :	edgomez	194
1287 :	edgomez	195	#define OFFSET(x,y) ((x) + (y)*pEnc->mbParam.mb_width)
1288 :	edgomez	194
1289 :	edgomez	195	for (x = 0; x < pEnc->mbParam.mb_width; x++) {
1290 :	edgomez	194
1291 :	edgomez	195
1292 :			MACROBLOCK *pMB = &pEnc->current->mbs[OFFSET(x, y)];
1293 :
1294 :			pMB->dquant = iDQtab[temp_dquants[OFFSET(x, y)] + 2];
1295 :	Isibaar	3	}
1296 :	edgomez	194
1297 :	edgomez	195	#undef OFFSET
1298 :	edgomez	194	}
1299 :
1300 :	Isibaar	41	xvid_free(temp_dquants);
1301 :	Isibaar	3	}
1302 :
1303 :	edgomez	195	if (pEnc->current->global_flags & XVID_H263QUANT) {
1304 :			if (pEnc->mbParam.m_quant_type != H263_QUANT)
1305 :	Isibaar	20	write_vol_header = 1;
1306 :	suxen_drol	136	pEnc->mbParam.m_quant_type = H263_QUANT;
1307 :	edgomez	195	} else if (pEnc->current->global_flags & XVID_MPEGQUANT) {
1308 :	edgomez	194	int matrix1_changed, matrix2_changed;
1309 :	Isibaar	3
1310 :	edgomez	194	matrix1_changed = matrix2_changed = 0;
1311 :	edgomez	78
1312 :	edgomez	195	if (pEnc->mbParam.m_quant_type != MPEG4_QUANT)
1313 :	Isibaar	20	write_vol_header = 1;
1314 :	edgomez	195
1315 :	suxen_drol	136	pEnc->mbParam.m_quant_type = MPEG4_QUANT;
1316 :	edgomez	195
1317 :	suxen_drol	136	if ((pEnc->current->global_flags & XVID_CUSTOM_QMATRIX) > 0) {
1318 :	edgomez	195	if (pFrame->quant_intra_matrix != NULL)
1319 :			matrix1_changed = set_intra_matrix(pFrame->quant_intra_matrix);
1320 :			if (pFrame->quant_inter_matrix != NULL)
1321 :			matrix2_changed = set_inter_matrix(pFrame->quant_inter_matrix);
1322 :			} else {
1323 :	edgomez	194	matrix1_changed = set_intra_matrix(get_default_intra_matrix());
1324 :			matrix2_changed = set_inter_matrix(get_default_inter_matrix());
1325 :	Isibaar	20	}
1326 :	edgomez	195	if (write_vol_header == 0)
1327 :	edgomez	194	write_vol_header = matrix1_changed \| matrix2_changed;
1328 :	Isibaar	4	}
1329 :	Isibaar	3
1330 :	edgomez	195	if (pFrame->intra < 0) {
1331 :			if ((pEnc->iFrameNum == 0)
1332 :	suxen_drol	701	\|\| ((pEnc->mbParam.iMaxKeyInterval > 0)
1333 :			&& (pEnc->iFrameNum >= pEnc->mbParam.iMaxKeyInterval))) {
1334 :	edgomez	195	pFrame->intra = FrameCodeI(pEnc, &bs, &bits);
1335 :			} else {
1336 :			pFrame->intra = FrameCodeP(pEnc, &bs, &bits, 0, write_vol_header);
1337 :	edgomez	194	}
1338 :	edgomez	195	} else {
1339 :			if (pFrame->intra == 1) {
1340 :			pFrame->intra = FrameCodeI(pEnc, &bs, &bits);
1341 :			} else {
1342 :			pFrame->intra = FrameCodeP(pEnc, &bs, &bits, 1, write_vol_header);
1343 :	edgomez	194	}
1344 :
1345 :	edgomez	13	}
1346 :	Isibaar	3
1347 :	chl	784	// BitstreamPutBits(&bs, 0xFFFF, 16);
1348 :			// BitstreamPutBits(&bs, 0xFFFF, 16);
1349 :			BitstreamPadAlways(&bs);
1350 :	edgomez	13	pFrame->length = BitstreamLength(&bs);
1351 :	h	29
1352 :	edgomez	195	if (pResult) {
1353 :	suxen_drol	136	pResult->quant = pEnc->current->quant;
1354 :	suxen_drol	690	pResult->hlength = pFrame->length - (pEnc->current->sStat.iTextBits / 8);
1355 :			pResult->kblks = pEnc->current->sStat.kblks;
1356 :			pResult->mblks = pEnc->current->sStat.mblks;
1357 :			pResult->ublks = pEnc->current->sStat.ublks;
1358 :	edgomez	13	}
1359 :	edgomez	195
1360 :	edgomez	198	emms();
1361 :	Isibaar	41
1362 :	edgomez	195	if (pFrame->quant == 0) {
1363 :			RateControlUpdate(&pEnc->rate_control, pEnc->current->quant,
1364 :			pFrame->length, pFrame->intra);
1365 :	Isibaar	3	}
1366 :	suxen_drol	229	#ifdef _DEBUG_PSNR
1367 :	edgomez	195	psnr =
1368 :			image_psnr(&pEnc->sOriginal, &pEnc->current->image,
1369 :			pEnc->mbParam.edged_width, pEnc->mbParam.width,
1370 :			pEnc->mbParam.height);
1371 :	Isibaar	113
1372 :	edgomez	194	snprintf(temp, 127, "PSNR: %f\n", psnr);
1373 :	chl	769	// DEBUG(temp);
1374 :	Isibaar	113	#endif
1375 :
1376 :	Isibaar	3	pEnc->iFrameNum++;
1377 :	edgomez	195
1378 :	Isibaar	3	stop_global_timer();
1379 :			write_timer();
1380 :
1381 :			return XVID_ERR_OK;
1382 :			}
1383 :
1384 :
1385 :	edgomez	195	static __inline void
1386 :			CodeIntraMB(Encoder * pEnc,
1387 :			MACROBLOCK * pMB)
1388 :			{
1389 :	Isibaar	3
1390 :			pMB->mode = MODE_INTRA;
1391 :
1392 :	suxen_drol	136	/* zero mv statistics */
1393 :			pMB->mvs[0].x = pMB->mvs[1].x = pMB->mvs[2].x = pMB->mvs[3].x = 0;
1394 :			pMB->mvs[0].y = pMB->mvs[1].y = pMB->mvs[2].y = pMB->mvs[3].y = 0;
1395 :			pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = 0;
1396 :			pMB->sad16 = 0;
1397 :
1398 :			if ((pEnc->current->global_flags & XVID_LUMIMASKING)) {
1399 :	edgomez	195	if (pMB->dquant != NO_CHANGE) {
1400 :	Isibaar	3	pMB->mode = MODE_INTRA_Q;
1401 :	suxen_drol	136	pEnc->current->quant += DQtab[pMB->dquant];
1402 :	edgomez	195
1403 :			if (pEnc->current->quant > 31)
1404 :			pEnc->current->quant = 31;
1405 :			if (pEnc->current->quant < 1)
1406 :			pEnc->current->quant = 1;
1407 :	Isibaar	3	}
1408 :			}
1409 :
1410 :	suxen_drol	136	pMB->quant = pEnc->current->quant;
1411 :	Isibaar	3	}
1412 :
1413 :
1414 :	h	101	#define FCODEBITS 3
1415 :			#define MODEBITS 5
1416 :
1417 :	edgomez	195	void
1418 :			HintedMESet(Encoder * pEnc,
1419 :			int *intra)
1420 :	h	101	{
1421 :	edgomez	195	HINTINFO *hint;
1422 :	h	101	Bitstream bs;
1423 :			int length, high;
1424 :			uint32_t x, y;
1425 :
1426 :			hint = pEnc->mbParam.hint;
1427 :
1428 :	edgomez	195	if (hint->rawhints) {
1429 :	h	101	*intra = hint->mvhint.intra;
1430 :	edgomez	195	} else {
1431 :	h	101	BitstreamInit(&bs, hint->hintstream, hint->hintlength);
1432 :			*intra = BitstreamGetBit(&bs);
1433 :			}
1434 :
1435 :	edgomez	195	if (*intra) {
1436 :	h	101	return;
1437 :			}
1438 :
1439 :	edgomez	195	pEnc->current->fcode =
1440 :			(hint->rawhints) ? hint->mvhint.fcode : BitstreamGetBits(&bs,
1441 :			FCODEBITS);
1442 :	h	101
1443 :	edgomez	195	length = pEnc->current->fcode + 5;
1444 :			high = 1 << (length - 1);
1445 :	h	101
1446 :	edgomez	195	for (y = 0; y < pEnc->mbParam.mb_height; ++y) {
1447 :			for (x = 0; x < pEnc->mbParam.mb_width; ++x) {
1448 :			MACROBLOCK *pMB =
1449 :			&pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
1450 :			MVBLOCKHINT *bhint =
1451 :			&hint->mvhint.block[x + y * pEnc->mbParam.mb_width];
1452 :	chl	284	VECTOR pred;
1453 :	h	101	VECTOR tmp;
1454 :			int vec;
1455 :
1456 :	edgomez	195	pMB->mode =
1457 :			(hint->rawhints) ? bhint->mode : BitstreamGetBits(&bs,
1458 :			MODEBITS);
1459 :	h	101
1460 :	h	128	pMB->mode = (pMB->mode == MODE_INTER_Q) ? MODE_INTER : pMB->mode;
1461 :			pMB->mode = (pMB->mode == MODE_INTRA_Q) ? MODE_INTRA : pMB->mode;
1462 :
1463 :	edgomez	195	if (pMB->mode == MODE_INTER) {
1464 :			tmp.x =
1465 :			(hint->rawhints) ? bhint->mvs[0].x : BitstreamGetBits(&bs,
1466 :			length);
1467 :			tmp.y =
1468 :			(hint->rawhints) ? bhint->mvs[0].y : BitstreamGetBits(&bs,
1469 :			length);
1470 :			tmp.x -= (tmp.x >= high) ? high * 2 : 0;
1471 :			tmp.y -= (tmp.y >= high) ? high * 2 : 0;
1472 :	h	101
1473 :	chl	284	pred = get_pmv2(pEnc->current->mbs,pEnc->mbParam.mb_width,0,x,y,0);
1474 :	h	101
1475 :	edgomez	195	for (vec = 0; vec < 4; ++vec) {
1476 :			pMB->mvs[vec].x = tmp.x;
1477 :			pMB->mvs[vec].y = tmp.y;
1478 :	chl	284	pMB->pmvs[vec].x = pMB->mvs[0].x - pred.x;
1479 :			pMB->pmvs[vec].y = pMB->mvs[0].y - pred.y;
1480 :	h	101	}
1481 :	edgomez	195	} else if (pMB->mode == MODE_INTER4V) {
1482 :			for (vec = 0; vec < 4; ++vec) {
1483 :			tmp.x =
1484 :			(hint->rawhints) ? bhint->mvs[vec].
1485 :			x : BitstreamGetBits(&bs, length);
1486 :			tmp.y =
1487 :			(hint->rawhints) ? bhint->mvs[vec].
1488 :			y : BitstreamGetBits(&bs, length);
1489 :			tmp.x -= (tmp.x >= high) ? high * 2 : 0;
1490 :			tmp.y -= (tmp.y >= high) ? high * 2 : 0;
1491 :	h	101
1492 :	chl	284	pred = get_pmv2(pEnc->current->mbs,pEnc->mbParam.mb_width,0,x,y,vec);
1493 :	h	101
1494 :	edgomez	195	pMB->mvs[vec].x = tmp.x;
1495 :			pMB->mvs[vec].y = tmp.y;
1496 :	chl	284	pMB->pmvs[vec].x = pMB->mvs[vec].x - pred.x;
1497 :			pMB->pmvs[vec].y = pMB->mvs[vec].y - pred.y;
1498 :	h	101	}
1499 :	edgomez	195	} else // intra / stuffing / not_coded
1500 :	h	101	{
1501 :	edgomez	195	for (vec = 0; vec < 4; ++vec) {
1502 :			pMB->mvs[vec].x = pMB->mvs[vec].y = 0;
1503 :	h	101	}
1504 :			}
1505 :	h	128
1506 :	suxen_drol	136	if (pMB->mode == MODE_INTER4V &&
1507 :	edgomez	195	(pEnc->current->global_flags & XVID_LUMIMASKING)
1508 :			&& pMB->dquant != NO_CHANGE) {
1509 :	h	128	pMB->mode = MODE_INTRA;
1510 :
1511 :	edgomez	195	for (vec = 0; vec < 4; ++vec) {
1512 :	h	128	pMB->mvs[vec].x = pMB->mvs[vec].y = 0;
1513 :			}
1514 :			}
1515 :	h	101	}
1516 :			}
1517 :			}
1518 :
1519 :
1520 :	edgomez	195	void
1521 :			HintedMEGet(Encoder * pEnc,
1522 :			int intra)
1523 :	h	101	{
1524 :	edgomez	195	HINTINFO *hint;
1525 :	h	101	Bitstream bs;
1526 :			uint32_t x, y;
1527 :			int length, high;
1528 :
1529 :			hint = pEnc->mbParam.hint;
1530 :
1531 :	edgomez	195	if (hint->rawhints) {
1532 :	h	101	hint->mvhint.intra = intra;
1533 :	edgomez	195	} else {
1534 :	h	101	BitstreamInit(&bs, hint->hintstream, 0);
1535 :			BitstreamPutBit(&bs, intra);
1536 :			}
1537 :
1538 :	edgomez	195	if (intra) {
1539 :			if (!hint->rawhints) {
1540 :	chl	784	BitstreamPadAlways(&bs);
1541 :	h	101	hint->hintlength = BitstreamLength(&bs);
1542 :			}
1543 :			return;
1544 :			}
1545 :
1546 :	edgomez	195	length = pEnc->current->fcode + 5;
1547 :			high = 1 << (length - 1);
1548 :	h	101
1549 :	edgomez	195	if (hint->rawhints) {
1550 :	suxen_drol	136	hint->mvhint.fcode = pEnc->current->fcode;
1551 :	edgomez	195	} else {
1552 :	suxen_drol	136	BitstreamPutBits(&bs, pEnc->current->fcode, FCODEBITS);
1553 :	h	101	}
1554 :
1555 :	edgomez	195	for (y = 0; y < pEnc->mbParam.mb_height; ++y) {
1556 :			for (x = 0; x < pEnc->mbParam.mb_width; ++x) {
1557 :			MACROBLOCK *pMB =
1558 :			&pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
1559 :			MVBLOCKHINT *bhint =
1560 :			&hint->mvhint.block[x + y * pEnc->mbParam.mb_width];
1561 :	h	101	VECTOR tmp;
1562 :
1563 :	edgomez	195	if (hint->rawhints) {
1564 :	h	101	bhint->mode = pMB->mode;
1565 :	edgomez	195	} else {
1566 :	h	101	BitstreamPutBits(&bs, pMB->mode, MODEBITS);
1567 :			}
1568 :
1569 :	edgomez	195	if (pMB->mode == MODE_INTER \|\| pMB->mode == MODE_INTER_Q) {
1570 :			tmp.x = pMB->mvs[0].x;
1571 :			tmp.y = pMB->mvs[0].y;
1572 :			tmp.x += (tmp.x < 0) ? high * 2 : 0;
1573 :			tmp.y += (tmp.y < 0) ? high * 2 : 0;
1574 :	h	101
1575 :	edgomez	195	if (hint->rawhints) {
1576 :	h	101	bhint->mvs[0].x = tmp.x;
1577 :			bhint->mvs[0].y = tmp.y;
1578 :	edgomez	195	} else {
1579 :	h	101	BitstreamPutBits(&bs, tmp.x, length);
1580 :			BitstreamPutBits(&bs, tmp.y, length);
1581 :			}
1582 :	edgomez	195	} else if (pMB->mode == MODE_INTER4V) {
1583 :	h	101	int vec;
1584 :
1585 :	edgomez	195	for (vec = 0; vec < 4; ++vec) {
1586 :			tmp.x = pMB->mvs[vec].x;
1587 :			tmp.y = pMB->mvs[vec].y;
1588 :			tmp.x += (tmp.x < 0) ? high * 2 : 0;
1589 :			tmp.y += (tmp.y < 0) ? high * 2 : 0;
1590 :	h	101
1591 :	edgomez	195	if (hint->rawhints) {
1592 :	h	101	bhint->mvs[vec].x = tmp.x;
1593 :			bhint->mvs[vec].y = tmp.y;
1594 :	edgomez	195	} else {
1595 :	h	101	BitstreamPutBits(&bs, tmp.x, length);
1596 :			BitstreamPutBits(&bs, tmp.y, length);
1597 :			}
1598 :			}
1599 :			}
1600 :			}
1601 :			}
1602 :
1603 :	edgomez	195	if (!hint->rawhints) {
1604 :	h	101	BitstreamPad(&bs);
1605 :			hint->hintlength = BitstreamLength(&bs);
1606 :			}
1607 :			}
1608 :
1609 :
1610 :	edgomez	195	static int
1611 :			FrameCodeI(Encoder * pEnc,
1612 :			Bitstream * bs,
1613 :			uint32_t * pBits)
1614 :	h	104	{
1615 :	suxen_drol	701	int mb_width = pEnc->mbParam.mb_width;
1616 :			int mb_height = pEnc->mbParam.mb_height;
1617 :	h	104
1618 :			DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
1619 :	edgomez	195	DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
1620 :	h	104
1621 :			uint16_t x, y;
1622 :
1623 :	suxen_drol	701	if ((pEnc->current->global_flags & XVID_REDUCED))
1624 :			{
1625 :			mb_width = (pEnc->mbParam.width + 31) / 32;
1626 :			mb_height = (pEnc->mbParam.height + 31) / 32;
1627 :
1628 :			/* 16x16->8x8 downsample requires 1 additional edge pixel*/
1629 :			/* XXX: setedges is overkill */
1630 :			start_timer();
1631 :			image_setedges(&pEnc->current->image,
1632 :			pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
1633 :			pEnc->mbParam.width, pEnc->mbParam.height);
1634 :			stop_edges_timer();
1635 :			}
1636 :
1637 :	h	104	pEnc->iFrameNum = 0;
1638 :	suxen_drol	136	pEnc->mbParam.m_rounding_type = 1;
1639 :			pEnc->current->rounding_type = pEnc->mbParam.m_rounding_type;
1640 :	chl	619	pEnc->current->quarterpel = pEnc->mbParam.m_quarterpel;
1641 :	suxen_drol	136	pEnc->current->coding_type = I_VOP;
1642 :	h	104
1643 :	suxen_drol	136	BitstreamWriteVolHeader(bs, &pEnc->mbParam, pEnc->current);
1644 :	chl	530
1645 :	chl	557	set_timecodes(pEnc->current,pEnc->reference,pEnc->mbParam.fbase);
1646 :	chl	784
1647 :			BitstreamPadAlways(bs);
1648 :	suxen_drol	229	BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current, 1);
1649 :	h	104
1650 :			*pBits = BitstreamPos(bs);
1651 :
1652 :	suxen_drol	690	pEnc->current->sStat.iTextBits = 0;
1653 :	suxen_drol	701	pEnc->current->sStat.kblks = mb_width * mb_height;
1654 :	suxen_drol	690	pEnc->current->sStat.mblks = pEnc->current->sStat.ublks = 0;
1655 :	h	104
1656 :	suxen_drol	701	for (y = 0; y < mb_height; y++)
1657 :			for (x = 0; x < mb_width; x++) {
1658 :	edgomez	195	MACROBLOCK *pMB =
1659 :			&pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
1660 :	h	104
1661 :			CodeIntraMB(pEnc, pMB);
1662 :
1663 :	edgomez	195	MBTransQuantIntra(&pEnc->mbParam, pEnc->current, pMB, x, y,
1664 :			dct_codes, qcoeff);
1665 :	h	104
1666 :			start_timer();
1667 :	suxen_drol	136	MBPrediction(pEnc->current, x, y, pEnc->mbParam.mb_width, qcoeff);
1668 :	h	104	stop_prediction_timer();
1669 :
1670 :			start_timer();
1671 :	chl	353	if (pEnc->current->global_flags & XVID_GREYSCALE)
1672 :			{ pMB->cbp &= 0x3C; /* keep only bits 5-2 */
1673 :			qcoeff[464+0]=0; / zero, because for INTRA MBs DC value is saved */
1674 :			qcoeff[5*64+0]=0;
1675 :			}
1676 :	suxen_drol	690	MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->current->sStat);
1677 :	h	104	stop_coding_timer();
1678 :			}
1679 :
1680 :	suxen_drol	702	if ((pEnc->current->global_flags & XVID_REDUCED))
1681 :			{
1682 :			image_deblock_rrv(&pEnc->current->image, pEnc->mbParam.edged_width,
1683 :	suxen_drol	715	pEnc->current->mbs, mb_width, mb_height, pEnc->mbParam.mb_width,
1684 :			16, XVID_DEC_DEBLOCKY\|XVID_DEC_DEBLOCKUV);
1685 :	suxen_drol	702	}
1686 :	h	104	emms();
1687 :
1688 :			pBits = BitstreamPos(bs) - pBits;
1689 :	suxen_drol	690	pEnc->fMvPrevSigma = -1;
1690 :	suxen_drol	136	pEnc->mbParam.m_fcode = 2;
1691 :	h	104
1692 :	edgomez	195	if (pEnc->current->global_flags & XVID_HINTEDME_GET) {
1693 :	h	104	HintedMEGet(pEnc, 1);
1694 :			}
1695 :
1696 :	edgomez	195	return 1; // intra
1697 :	h	104	}
1698 :
1699 :
1700 :	Isibaar	3	#define INTRA_THRESHOLD 0.5
1701 :	chl	530	#define BFRAME_SKIP_THRESHHOLD 30
1702 :	Isibaar	3
1703 :	chl	769
1704 :			/* FrameCodeP also handles S(GMC)-VOPs */
1705 :	edgomez	195	static int
1706 :			FrameCodeP(Encoder * pEnc,
1707 :			Bitstream * bs,
1708 :			uint32_t * pBits,
1709 :			bool force_inter,
1710 :			bool vol_header)
1711 :	Isibaar	3	{
1712 :	edgomez	13	float fSigma;
1713 :	Isibaar	42
1714 :	edgomez	78	DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
1715 :	edgomez	195	DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
1716 :	edgomez	78
1717 :	suxen_drol	701	int mb_width = pEnc->mbParam.mb_width;
1718 :			int mb_height = pEnc->mbParam.mb_height;
1719 :
1720 :	Isibaar	3	int iLimit;
1721 :	chl	354	int x, y, k;
1722 :	edgomez	13	int iSearchRange;
1723 :	Isibaar	579	int bIntra, skip_possible;
1724 :	suxen_drol	240
1725 :	edgomez	145	/* IMAGE pCurrent = &pEnc->current->image; /
1726 :	suxen_drol	136	IMAGE *pRef = &pEnc->reference->image;
1727 :	Isibaar	3
1728 :	suxen_drol	701	if ((pEnc->current->global_flags & XVID_REDUCED))
1729 :			{
1730 :	suxen_drol	702	mb_width = (pEnc->mbParam.width + 31) / 32;
1731 :			mb_height = (pEnc->mbParam.height + 31) / 32;
1732 :	suxen_drol	701	}
1733 :
1734 :	suxen_drol	702
1735 :	h	69	start_timer();
1736 :	edgomez	195	image_setedges(pRef, pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
1737 :	h	543	pEnc->mbParam.width, pEnc->mbParam.height);
1738 :	h	69	stop_edges_timer();
1739 :	Isibaar	3
1740 :	suxen_drol	136	pEnc->mbParam.m_rounding_type = 1 - pEnc->mbParam.m_rounding_type;
1741 :			pEnc->current->rounding_type = pEnc->mbParam.m_rounding_type;
1742 :	chl	619	pEnc->current->quarterpel = pEnc->mbParam.m_quarterpel;
1743 :	suxen_drol	136	pEnc->current->fcode = pEnc->mbParam.m_fcode;
1744 :	Isibaar	3
1745 :			if (!force_inter)
1746 :	suxen_drol	701	iLimit = (int)(mb_width * mb_height * INTRA_THRESHOLD);
1747 :	edgomez	13	else
1748 :	suxen_drol	701	iLimit = mb_width * mb_height + 1;
1749 :	Isibaar	3
1750 :	suxen_drol	136	if ((pEnc->current->global_flags & XVID_HALFPEL)) {
1751 :	Isibaar	3	start_timer();
1752 :	edgomez	195	image_interpolate(pRef, &pEnc->vInterH, &pEnc->vInterV,
1753 :			&pEnc->vInterHV, pEnc->mbParam.edged_width,
1754 :			pEnc->mbParam.edged_height,
1755 :	Isibaar	579	pEnc->mbParam.m_quarterpel,
1756 :	edgomez	195	pEnc->current->rounding_type);
1757 :	Isibaar	3	stop_inter_timer();
1758 :			}
1759 :
1760 :	chl	769	pEnc->current->coding_type = P_VOP;
1761 :	chl	619
1762 :	Isibaar	3	start_timer();
1763 :	syskin	711	if (pEnc->current->global_flags & XVID_HINTEDME_SET)
1764 :	h	101	HintedMESet(pEnc, &bIntra);
1765 :	syskin	711	else
1766 :	chl	619	bIntra =
1767 :			MotionEstimation(&pEnc->mbParam, pEnc->current, pEnc->reference,
1768 :	suxen_drol	295	&pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
1769 :			iLimit);
1770 :	syskin	711
1771 :	Isibaar	3	stop_motion_timer();
1772 :
1773 :	chl	530	if (bIntra == 1) return FrameCodeI(pEnc, bs, pBits);
1774 :	Isibaar	3
1775 :	chl	769	if ( ( pEnc->current->global_flags & XVID_GMC )
1776 :			&& ( (pEnc->current->warp.duv[1].x != 0) \|\| (pEnc->current->warp.duv[1].y != 0) ) )
1777 :			{
1778 :			pEnc->current->coding_type = S_VOP;
1779 :	Isibaar	3
1780 :	chl	769	generate_GMCparameters( 2, 16, &pEnc->current->warp,
1781 :			pEnc->mbParam.width, pEnc->mbParam.height,
1782 :			&pEnc->current->gmc_data);
1783 :	chl	619
1784 :	chl	769	generate_GMCimage(&pEnc->current->gmc_data, &pEnc->reference->image,
1785 :			pEnc->mbParam.mb_width, pEnc->mbParam.mb_height,
1786 :			pEnc->mbParam.edged_width, pEnc->mbParam.edged_width/2,
1787 :	chl	773	pEnc->mbParam.m_fcode, pEnc->mbParam.m_quarterpel, 0,
1788 :	chl	769	pEnc->current->rounding_type, pEnc->current->mbs, &pEnc->vGMC);
1789 :
1790 :			}
1791 :	chl	784
1792 :			set_timecodes(pEnc->current,pEnc->reference,pEnc->mbParam.fbase);
1793 :	edgomez	195	if (vol_header)
1794 :	chl	784	{ BitstreamWriteVolHeader(bs, &pEnc->mbParam, pEnc->current);
1795 :			BitstreamPadAlways(bs);
1796 :			}
1797 :	Isibaar	3
1798 :	suxen_drol	229	BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current, 1);
1799 :	Isibaar	3
1800 :	edgomez	13	*pBits = BitstreamPos(bs);
1801 :	Isibaar	3
1802 :	suxen_drol	690	pEnc->current->sStat.iTextBits = pEnc->current->sStat.iMvSum = pEnc->current->sStat.iMvCount =
1803 :			pEnc->current->sStat.kblks = pEnc->current->sStat.mblks = pEnc->current->sStat.ublks = 0;
1804 :	Isibaar	3
1805 :	chl	769
1806 :	suxen_drol	701	for (y = 0; y < mb_height; y++) {
1807 :			for (x = 0; x < mb_width; x++) {
1808 :	edgomez	195	MACROBLOCK *pMB =
1809 :			&pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
1810 :	Isibaar	3
1811 :	chl	769	/* Mode decision: Check, if the block should be INTRA / INTER or GMC-coded */
1812 :			/* For a start, leave INTRA decision as is, only choose only between INTER/GMC - gruel, 9.1.2002 */
1813 :	Isibaar	3
1814 :	chl	769	bIntra = (pMB->mode == MODE_INTRA) \|\| (pMB->mode == MODE_INTRA_Q);
1815 :	Isibaar	3
1816 :	chl	769	if (bIntra) {
1817 :	Isibaar	3	CodeIntraMB(pEnc, pMB);
1818 :	edgomez	195	MBTransQuantIntra(&pEnc->mbParam, pEnc->current, pMB, x, y,
1819 :			dct_codes, qcoeff);
1820 :	chl	769
1821 :			start_timer();
1822 :			MBPrediction(pEnc->current, x, y, pEnc->mbParam.mb_width, qcoeff);
1823 :			stop_prediction_timer();
1824 :
1825 :			pEnc->current->sStat.kblks++;
1826 :
1827 :			MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->current->sStat);
1828 :	chl	773	stop_coding_timer();
1829 :	chl	769	continue;
1830 :	Isibaar	3	}
1831 :	chl	769
1832 :			if (pEnc->current->coding_type == S_VOP) {
1833 :	Isibaar	3
1834 :	chl	769	int32_t iSAD = sad16(pEnc->current->image.y + 16ypEnc->mbParam.edged_width + 16*x,
1835 :			pEnc->vGMC.y + 16ypEnc->mbParam.edged_width + 16*x,
1836 :	chl	773	pEnc->mbParam.edged_width, 65536);
1837 :	syskin	788
1838 :			if (pEnc->current->motion_flags & PMV_CHROMA16) {
1839 :			iSAD += sad8(pEnc->current->image.u + 8y(pEnc->mbParam.edged_width/2) + 8*x,
1840 :			pEnc->vGMC.u + 8y(pEnc->mbParam.edged_width/2) + 8*x, pEnc->mbParam.edged_width/2);
1841 :	chl	773
1842 :	syskin	788	iSAD += sad8(pEnc->current->image.v + 8y(pEnc->mbParam.edged_width/2) + 8*x,
1843 :			pEnc->vGMC.v + 8y(pEnc->mbParam.edged_width/2) + 8*x, pEnc->mbParam.edged_width/2);
1844 :			}
1845 :
1846 :	chl	769	if (iSAD <= pMB->sad16) { /* mode decision GMC */
1847 :	chl	773
1848 :	chl	769	if (pEnc->mbParam.m_quarterpel)
1849 :	chl	773	pMB->qmvs[0] = pMB->qmvs[1] = pMB->qmvs[2] = pMB->qmvs[3] = pMB->amv;
1850 :	chl	769	else
1851 :	chl	773	pMB->mvs[0] = pMB->mvs[1] = pMB->mvs[2] = pMB->mvs[3] = pMB->amv;
1852 :	chl	769
1853 :			pMB->mode = MODE_INTER;
1854 :			pMB->mcsel = 1;
1855 :			pMB->sad16 = iSAD;
1856 :			} else {
1857 :			pMB->mcsel = 0;
1858 :			}
1859 :	chl	773	} else {
1860 :	chl	769	pMB->mcsel = 0; /* just a precaution */
1861 :			}
1862 :
1863 :	edgomez	13	start_timer();
1864 :	chl	769	MBMotionCompensation(pMB, x, y, &pEnc->reference->image,
1865 :			&pEnc->vInterH, &pEnc->vInterV,
1866 :			&pEnc->vInterHV, &pEnc->vGMC,
1867 :			&pEnc->current->image,
1868 :			dct_codes, pEnc->mbParam.width,
1869 :			pEnc->mbParam.height,
1870 :			pEnc->mbParam.edged_width,
1871 :			pEnc->mbParam.m_quarterpel,
1872 :			(pEnc->current->global_flags & XVID_REDUCED),
1873 :			pEnc->current->rounding_type);
1874 :	Isibaar	3
1875 :	chl	769	stop_comp_timer();
1876 :
1877 :			if ((pEnc->current->global_flags & XVID_LUMIMASKING)) {
1878 :			if (pMB->dquant != NO_CHANGE) {
1879 :			pMB->mode = MODE_INTER_Q;
1880 :			pEnc->current->quant += DQtab[pMB->dquant];
1881 :			if (pEnc->current->quant > 31)
1882 :			pEnc->current->quant = 31;
1883 :			else if (pEnc->current->quant < 1)
1884 :			pEnc->current->quant = 1;
1885 :			}
1886 :			}
1887 :			pMB->quant = pEnc->current->quant;
1888 :
1889 :			pMB->field_pred = 0;
1890 :
1891 :			if (pMB->mode != MODE_NOT_CODED)
1892 :			{ pMB->cbp =
1893 :			MBTransQuantInter(&pEnc->mbParam, pEnc->current, pMB, x, y,
1894 :			dct_codes, qcoeff);
1895 :			}
1896 :
1897 :			if (pMB->cbp \|\| pMB->mvs[0].x \|\| pMB->mvs[0].y \|\|
1898 :			pMB->mvs[1].x \|\| pMB->mvs[1].y \|\| pMB->mvs[2].x \|\|
1899 :			pMB->mvs[2].y \|\| pMB->mvs[3].x \|\| pMB->mvs[3].y) {
1900 :	suxen_drol	690	pEnc->current->sStat.mblks++;
1901 :	chl	340	} else {
1902 :	suxen_drol	690	pEnc->current->sStat.ublks++;
1903 :	chl	769	}
1904 :
1905 :	Isibaar	3	start_timer();
1906 :	chl	347
1907 :			/* Finished processing the MB, now check if to CODE or SKIP */
1908 :
1909 :	chl	773	skip_possible = (pMB->cbp == 0) && (pMB->mode == MODE_INTER) &&
1910 :	Isibaar	579	(pMB->dquant == NO_CHANGE);
1911 :	chl	769
1912 :			if (pEnc->current->coding_type == S_VOP)
1913 :			skip_possible &= (pMB->mcsel == 1);
1914 :			else if (pEnc->current->coding_type == P_VOP) {
1915 :			if (pEnc->mbParam.m_quarterpel)
1916 :	chl	773	skip_possible &= ( (pMB->qmvs[0].x == 0) && (pMB->qmvs[0].y == 0) );
1917 :	chl	769	else
1918 :	chl	773	skip_possible &= ( (pMB->mvs[0].x == 0) && (pMB->mvs[0].y == 0) );
1919 :	chl	769	}
1920 :	chl	347
1921 :	chl	619	if ( (pMB->mode == MODE_NOT_CODED) \|\| (skip_possible)) {
1922 :	Isibaar	579
1923 :	chl	619	/* This is a candidate for SKIPping, but for P-VOPs check intermediate B-frames first */
1924 :	chl	347
1925 :	chl	619	if (pEnc->current->coding_type == P_VOP) /* special rule for P-VOP's SKIP */
1926 :	chl	769	{
1927 :			int bSkip = 1;
1928 :
1929 :	chl	619	for (k=pEnc->bframenum_head; k< pEnc->bframenum_tail; k++)
1930 :			{
1931 :			int iSAD;
1932 :			iSAD = sad16(pEnc->reference->image.y + 16ypEnc->mbParam.edged_width + 16*x,
1933 :			pEnc->bframes[k]->image.y + 16ypEnc->mbParam.edged_width + 16*x,
1934 :	chl	347	pEnc->mbParam.edged_width,BFRAME_SKIP_THRESHHOLD);
1935 :	chl	619	if (iSAD >= BFRAME_SKIP_THRESHHOLD * pMB->quant)
1936 :			{ bSkip = 0;
1937 :			break;
1938 :			}
1939 :	chl	347	}
1940 :	chl	619
1941 :	chl	769	if (!bSkip) { /* no SKIP, but trivial block */
1942 :			if(pEnc->mbParam.m_quarterpel) {
1943 :			VECTOR predMV = get_qpmv2(pEnc->current->mbs, pEnc->mbParam.mb_width, 0, x, y, 0);
1944 :			pMB->pmvs[0].x = - predMV.x;
1945 :			pMB->pmvs[0].y = - predMV.y;
1946 :			}
1947 :			else {
1948 :			VECTOR predMV = get_pmv2(pEnc->current->mbs, pEnc->mbParam.mb_width, 0, x, y, 0);
1949 :			pMB->pmvs[0].x = - predMV.x;
1950 :			pMB->pmvs[0].y = - predMV.y;
1951 :			}
1952 :			pMB->mode = MODE_INTER;
1953 :			pMB->cbp = 0;
1954 :			MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->current->sStat);
1955 :			stop_coding_timer();
1956 :	chl	773
1957 :	chl	769	continue; /* next MB */
1958 :			}
1959 :			}
1960 :			/* do SKIP */
1961 :
1962 :			pMB->mode = MODE_NOT_CODED;
1963 :			MBSkip(bs);
1964 :			stop_coding_timer();
1965 :			continue; /* next MB */
1966 :			}
1967 :			/* ordinary case: normal coded INTER/INTER4V block */
1968 :
1969 :			if (pEnc->current->global_flags & XVID_GREYSCALE)
1970 :			{ pMB->cbp &= 0x3C; /* keep only bits 5-2 */
1971 :			qcoeff[464+0]=0; / zero, because DC for INTRA MBs DC value is saved */
1972 :			qcoeff[5*64+0]=0;
1973 :			}
1974 :
1975 :			if(pEnc->mbParam.m_quarterpel) {
1976 :			VECTOR predMV = get_qpmv2(pEnc->current->mbs, pEnc->mbParam.mb_width, 0, x, y, 0);
1977 :			pMB->pmvs[0].x = pMB->qmvs[0].x - predMV.x;
1978 :			pMB->pmvs[0].y = pMB->qmvs[0].y - predMV.y;
1979 :			DPRINTF(DPRINTF_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)", pMB->pmvs[0].x, pMB->pmvs[0].y, predMV.x, predMV.y, pMB->mvs[0].x, pMB->mvs[0].y);
1980 :			} else {
1981 :			VECTOR predMV = get_pmv2(pEnc->current->mbs, pEnc->mbParam.mb_width, 0, x, y, 0);
1982 :			pMB->pmvs[0].x = pMB->mvs[0].x - predMV.x;
1983 :			pMB->pmvs[0].y = pMB->mvs[0].y - predMV.y;
1984 :			DPRINTF(DPRINTF_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)", pMB->pmvs[0].x, pMB->pmvs[0].y, predMV.x, predMV.y, pMB->mvs[0].x, pMB->mvs[0].y);
1985 :			}
1986 :
1987 :
1988 :			if (pMB->mode == MODE_INTER4V)
1989 :			{ int k;
1990 :			for (k=1;k<4;k++)
1991 :	chl	619	{
1992 :			if(pEnc->mbParam.m_quarterpel) {
1993 :	chl	769	VECTOR predMV = get_qpmv2(pEnc->current->mbs, pEnc->mbParam.mb_width, 0, x, y, k);
1994 :			pMB->pmvs[k].x = pMB->qmvs[k].x - predMV.x;
1995 :			pMB->pmvs[k].y = pMB->qmvs[k].y - predMV.y;
1996 :			DPRINTF(DPRINTF_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)", pMB->pmvs[k].x, pMB->pmvs[k].y, predMV.x, predMV.y, pMB->mvs[k].x, pMB->mvs[k].y);
1997 :			} else {
1998 :			VECTOR predMV = get_pmv2(pEnc->current->mbs, pEnc->mbParam.mb_width, 0, x, y, k);
1999 :			pMB->pmvs[k].x = pMB->mvs[k].x - predMV.x;
2000 :			pMB->pmvs[k].y = pMB->mvs[k].y - predMV.y;
2001 :			DPRINTF(DPRINTF_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)", pMB->pmvs[k].x, pMB->pmvs[k].y, predMV.x, predMV.y, pMB->mvs[k].x, pMB->mvs[k].y);
2002 :	chl	619	}
2003 :	chl	769
2004 :	chl	347	}
2005 :			}
2006 :	chl	773
2007 :	chl	769	MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->current->sStat);
2008 :	Isibaar	3	stop_coding_timer();
2009 :	chl	773
2010 :	Isibaar	3	}
2011 :			}
2012 :
2013 :	suxen_drol	702	if ((pEnc->current->global_flags & XVID_REDUCED))
2014 :			{
2015 :			image_deblock_rrv(&pEnc->current->image, pEnc->mbParam.edged_width,
2016 :	suxen_drol	715	pEnc->current->mbs, mb_width, mb_height, pEnc->mbParam.mb_width,
2017 :			16, XVID_DEC_DEBLOCKY\|XVID_DEC_DEBLOCKUV);
2018 :	suxen_drol	702	}
2019 :
2020 :	Isibaar	3	emms();
2021 :
2022 :	edgomez	195	if (pEnc->current->global_flags & XVID_HINTEDME_GET) {
2023 :	h	101	HintedMEGet(pEnc, 0);
2024 :			}
2025 :
2026 :	suxen_drol	690	if (pEnc->current->sStat.iMvCount == 0)
2027 :			pEnc->current->sStat.iMvCount = 1;
2028 :	Isibaar	3
2029 :	suxen_drol	690	fSigma = (float) sqrt((float) pEnc->current->sStat.iMvSum / pEnc->current->sStat.iMvCount);
2030 :	Isibaar	3
2031 :	suxen_drol	136	iSearchRange = 1 << (3 + pEnc->mbParam.m_fcode);
2032 :	Isibaar	3
2033 :	edgomez	195	if ((fSigma > iSearchRange / 3)
2034 :	Isibaar	579	&& (pEnc->mbParam.m_fcode <= (3 + pEnc->mbParam.m_quarterpel))) // maximum search range 128
2035 :	edgomez	13	{
2036 :	suxen_drol	136	pEnc->mbParam.m_fcode++;
2037 :	Isibaar	3	iSearchRange *= 2;
2038 :	edgomez	195	} else if ((fSigma < iSearchRange / 6)
2039 :	suxen_drol	690	&& (pEnc->fMvPrevSigma >= 0)
2040 :			&& (pEnc->fMvPrevSigma < iSearchRange / 6)
2041 :	Isibaar	579	&& (pEnc->mbParam.m_fcode >= (2 + pEnc->mbParam.m_quarterpel))) // minimum search range 16
2042 :	edgomez	13	{
2043 :	suxen_drol	136	pEnc->mbParam.m_fcode--;
2044 :	Isibaar	3	iSearchRange /= 2;
2045 :	edgomez	13	}
2046 :	Isibaar	3
2047 :	suxen_drol	690	pEnc->fMvPrevSigma = fSigma;
2048 :	edgomez	195
2049 :	suxen_drol	324	/* frame drop code */
2050 :	chl	769	DPRINTF(DPRINTF_DEBUG, "kmu %i %i %i", pEnc->current->sStat.kblks, pEnc->current->sStat.mblks, pEnc->current->sStat.ublks);
2051 :	suxen_drol	690	if (pEnc->current->sStat.kblks + pEnc->current->sStat.mblks <
2052 :	suxen_drol	701	(pEnc->mbParam.frame_drop_ratio * mb_width * mb_height) / 100)
2053 :	suxen_drol	324	{
2054 :	suxen_drol	690	pEnc->current->sStat.kblks = pEnc->current->sStat.mblks = 0;
2055 :	suxen_drol	701	pEnc->current->sStat.ublks = mb_width * mb_height;
2056 :	suxen_drol	324
2057 :			BitstreamReset(bs);
2058 :	chl	557
2059 :			set_timecodes(pEnc->current,pEnc->reference,pEnc->mbParam.fbase);
2060 :	suxen_drol	324	BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current, 0);
2061 :
2062 :			// copy reference frame details into the current frame
2063 :			pEnc->current->quant = pEnc->reference->quant;
2064 :			pEnc->current->motion_flags = pEnc->reference->motion_flags;
2065 :			pEnc->current->rounding_type = pEnc->reference->rounding_type;
2066 :	chl	619	pEnc->current->quarterpel = pEnc->reference->quarterpel;
2067 :	suxen_drol	324	pEnc->current->fcode = pEnc->reference->fcode;
2068 :			pEnc->current->bcode = pEnc->reference->bcode;
2069 :			image_copy(&pEnc->current->image, &pEnc->reference->image, pEnc->mbParam.edged_width, pEnc->mbParam.height);
2070 :	suxen_drol	701	memcpy(pEnc->current->mbs, pEnc->reference->mbs, sizeof(MACROBLOCK) * mb_width * mb_height);
2071 :			}
2072 :	suxen_drol	324
2073 :	suxen_drol	701	/* XXX: debug
2074 :			{
2075 :			char s[100];
2076 :			sprintf(s, "\\%05i_cur.pgm", pEnc->m_framenum);
2077 :			image_dump_yuvpgm(&pEnc->current->image,
2078 :			pEnc->mbParam.edged_width,
2079 :			pEnc->mbParam.width, pEnc->mbParam.height, s);
2080 :
2081 :			sprintf(s, "\\%05i_ref.pgm", pEnc->m_framenum);
2082 :			image_dump_yuvpgm(&pEnc->reference->image,
2083 :			pEnc->mbParam.edged_width,
2084 :			pEnc->mbParam.width, pEnc->mbParam.height, s);
2085 :	suxen_drol	702	}
2086 :	suxen_drol	701	*/
2087 :	suxen_drol	324
2088 :	suxen_drol	702
2089 :	Isibaar	3	pBits = BitstreamPos(bs) - pBits;
2090 :
2091 :	edgomez	195	return 0; // inter
2092 :	Isibaar	3	}
2093 :	suxen_drol	118
2094 :
2095 :	suxen_drol	698	static void
2096 :	edgomez	195	FrameCodeB(Encoder * pEnc,
2097 :			FRAMEINFO * frame,
2098 :			Bitstream * bs,
2099 :			uint32_t * pBits)
2100 :	suxen_drol	118	{
2101 :	suxen_drol	761	DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
2102 :			DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
2103 :	edgomez	195	uint32_t x, y;
2104 :	suxen_drol	118
2105 :	edgomez	195	IMAGE *f_ref = &pEnc->reference->image;
2106 :	suxen_drol	118	IMAGE *b_ref = &pEnc->current->image;
2107 :
2108 :	chenm001	290	#ifdef BFRAMES_DEC_DEBUG
2109 :			FILE *fp;
2110 :			static char first=0;
2111 :			#define BFRAME_DEBUG if (!first && fp){ \
2112 :			fprintf(fp,"Y=%3d X=%3d MB=%2d CBP=%02X\n",y,x,mb->mode,mb->cbp); \
2113 :			}
2114 :
2115 :	suxen_drol	701	pEnc->current->global_flags &= ~XVID_REDUCED; /* reduced resoltion not yet supported */
2116 :
2117 :	chenm001	290	if (!first){
2118 :			fp=fopen("C:\\XVIDDBGE.TXT","w");
2119 :			}
2120 :			#endif
2121 :
2122 :	chl	619	frame->quarterpel = pEnc->mbParam.m_quarterpel;
2123 :	syskin	671
2124 :	suxen_drol	152	// forward
2125 :	edgomez	195	image_setedges(f_ref, pEnc->mbParam.edged_width,
2126 :			pEnc->mbParam.edged_height, pEnc->mbParam.width,
2127 :	h	543	pEnc->mbParam.height);
2128 :	suxen_drol	118	start_timer();
2129 :			image_interpolate(f_ref, &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
2130 :	edgomez	195	pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
2131 :	Isibaar	579	pEnc->mbParam.m_quarterpel, 0);
2132 :	suxen_drol	118	stop_inter_timer();
2133 :
2134 :	suxen_drol	152	// backward
2135 :	edgomez	195	image_setedges(b_ref, pEnc->mbParam.edged_width,
2136 :			pEnc->mbParam.edged_height, pEnc->mbParam.width,
2137 :	h	543	pEnc->mbParam.height);
2138 :	edgomez	195	start_timer();
2139 :	suxen_drol	118	image_interpolate(b_ref, &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
2140 :	edgomez	195	pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
2141 :	Isibaar	579	pEnc->mbParam.m_quarterpel, 0);
2142 :	suxen_drol	118	stop_inter_timer();
2143 :
2144 :			start_timer();
2145 :	chl	557
2146 :	chl	317	MotionEstimationBVOP(&pEnc->mbParam, frame,
2147 :	chl	569	((int32_t)(pEnc->current->stamp - frame->stamp)), // time_bp
2148 :	chl	557	((int32_t)(pEnc->current->stamp - pEnc->reference->stamp)), // time_pp
2149 :			pEnc->reference->mbs, f_ref,
2150 :	edgomez	195	&pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
2151 :	syskin	643	pEnc->current, b_ref, &pEnc->vInterH,
2152 :	edgomez	195	&pEnc->vInterV, &pEnc->vInterHV);
2153 :	suxen_drol	118
2154 :	edgomez	195
2155 :	suxen_drol	118	stop_motion_timer();
2156 :	edgomez	195
2157 :	suxen_drol	152	/*if (test_quant_type(&pEnc->mbParam, pEnc->current))
2158 :	edgomez	195	{
2159 :			BitstreamWriteVolHeader(bs, pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.quant_type);
2160 :			} */
2161 :	suxen_drol	118
2162 :	edgomez	195	frame->coding_type = B_VOP;
2163 :	chl	557
2164 :			set_timecodes(frame, pEnc->reference,pEnc->mbParam.fbase);
2165 :	suxen_drol	229	BitstreamWriteVopHeader(bs, &pEnc->mbParam, frame, 1);
2166 :	suxen_drol	118
2167 :	edgomez	195	*pBits = BitstreamPos(bs);
2168 :	suxen_drol	118
2169 :	suxen_drol	690	frame->sStat.iTextBits = 0;
2170 :			frame->sStat.iMvSum = 0;
2171 :			frame->sStat.iMvCount = 0;
2172 :			frame->sStat.kblks = frame->sStat.mblks = frame->sStat.ublks = 0;
2173 :	suxen_drol	118
2174 :
2175 :	edgomez	195	for (y = 0; y < pEnc->mbParam.mb_height; y++) {
2176 :			for (x = 0; x < pEnc->mbParam.mb_width; x++) {
2177 :	chl	530	MACROBLOCK * const mb = &frame->mbs[x + y * pEnc->mbParam.mb_width];
2178 :	suxen_drol	701	int direction = pEnc->mbParam.global & XVID_ALTERNATESCAN ? 2 : 0;
2179 :	suxen_drol	118
2180 :			// decoder ignores mb when refence block is INTER(0,0), CBP=0
2181 :	edgomez	195	if (mb->mode == MODE_NOT_CODED) {
2182 :	chl	530	//mb->mvs[0].x = mb->mvs[0].y = mb->cbp = 0;
2183 :	suxen_drol	118	continue;
2184 :			}
2185 :
2186 :	chl	530	if (mb->mode != MODE_DIRECT_NONE_MV) {
2187 :			MBMotionCompensationBVOP(&pEnc->mbParam, mb, x, y, &frame->image,
2188 :	edgomez	195	f_ref, &pEnc->f_refh, &pEnc->f_refv,
2189 :			&pEnc->f_refhv, b_ref, &pEnc->vInterH,
2190 :			&pEnc->vInterV, &pEnc->vInterHV,
2191 :			dct_codes);
2192 :
2193 :	chl	530	if (mb->mode == MODE_DIRECT_NO4V) mb->mode = MODE_DIRECT;
2194 :			mb->quant = frame->quant;
2195 :
2196 :			mb->cbp =
2197 :			MBTransQuantInterBVOP(&pEnc->mbParam, frame, mb, dct_codes, qcoeff);
2198 :	suxen_drol	118
2199 :	chl	530	if ( (mb->mode == MODE_DIRECT) && (mb->cbp == 0)
2200 :			&& (mb->pmvs[3].x == 0) && (mb->pmvs[3].y == 0) ) {
2201 :			mb->mode = MODE_DIRECT_NONE_MV; // skipped
2202 :			}
2203 :	suxen_drol	118	}
2204 :
2205 :	chenm001	290	#ifdef BFRAMES_DEC_DEBUG
2206 :			BFRAME_DEBUG
2207 :			#endif
2208 :	edgomez	195	start_timer();
2209 :			MBCodingBVOP(mb, qcoeff, frame->fcode, frame->bcode, bs,
2210 :	suxen_drol	690	&frame->sStat, direction);
2211 :	suxen_drol	118	stop_coding_timer();
2212 :			}
2213 :			}
2214 :
2215 :			emms();
2216 :
2217 :			// TODO: dynamic fcode/bcode ???
2218 :
2219 :			pBits = BitstreamPos(bs) - pBits;
2220 :	chenm001	290
2221 :			#ifdef BFRAMES_DEC_DEBUG
2222 :			if (!first){
2223 :			first=1;
2224 :			if (fp)
2225 :			fclose(fp);
2226 :			}
2227 :			#endif
2228 :	suxen_drol	118	}

No admin address has been configured	ViewVC Help
Powered by ViewVC 1.0.4