[cvs] / xvidcore / src / encoder.c Repository:
ViewVC logotype

Annotation of /xvidcore/src/encoder.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.102 - (view) (download)

1 : edgomez 1.40 /*****************************************************************************
2 : edgomez 1.29 *
3 :     * XVID MPEG-4 VIDEO CODEC
4 : edgomez 1.102 * - Encoder main module -
5 : edgomez 1.29 *
6 : edgomez 1.102 * Copyright(C) 2002 Michael Militzer <isibaar@xvid.org>
7 :     * 2002-2003 Peter Ross <pross@xvid.org>
8 :     * 2002 Daniel Smith <danielsmith@astroboymail.com>
9 : edgomez 1.77 *
10 : edgomez 1.102 * This program is free software ; you can redistribute it and/or modify
11 : edgomez 1.91 * it under the terms of the GNU General Public License as published by
12 : edgomez 1.102 * the Free Software Foundation ; either version 2 of the License, or
13 : edgomez 1.29 * (at your option) any later version.
14 :     *
15 :     * This program is distributed in the hope that it will be useful,
16 : edgomez 1.102 * but WITHOUT ANY WARRANTY ; without even the implied warranty of
17 : edgomez 1.29 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 :     * GNU General Public License for more details.
19 :     *
20 :     * You should have received a copy of the GNU General Public License
21 : edgomez 1.102 * along with this program ; if not, write to the Free Software
22 : edgomez 1.29 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 : edgomez 1.79 *
24 : edgomez 1.102 * $Id$
25 : edgomez 1.29 *
26 : edgomez 1.40 ****************************************************************************/
27 : chl 1.64
28 : Isibaar 1.1 #include <stdlib.h>
29 :     #include <stdio.h>
30 :     #include <math.h>
31 : edgomez 1.42 #include <string.h>
32 : Isibaar 1.1
33 :     #include "encoder.h"
34 :     #include "prediction/mbprediction.h"
35 :     #include "global.h"
36 :     #include "utils/timer.h"
37 :     #include "image/image.h"
38 : edgomez 1.91 #include "image/font.h"
39 :     #include "motion/sad.h"
40 : suxen_drol 1.32 #include "motion/motion.h"
41 : edgomez 1.102 #include "motion/gmc.h"
42 :    
43 : Isibaar 1.1 #include "bitstream/cbp.h"
44 :     #include "utils/mbfunctions.h"
45 :     #include "bitstream/bitstream.h"
46 :     #include "bitstream/mbcoding.h"
47 :     #include "utils/emms.h"
48 :     #include "bitstream/mbcoding.h"
49 : Isibaar 1.2 #include "quant/quant_matrix.h"
50 : Isibaar 1.7 #include "utils/mem_align.h"
51 : Isibaar 1.1
52 : edgomez 1.40 /*****************************************************************************
53 :     * Local function prototypes
54 :     ****************************************************************************/
55 :    
56 : edgomez 1.39 static int FrameCodeI(Encoder * pEnc,
57 : edgomez 1.102 Bitstream * bs);
58 : edgomez 1.39
59 :     static int FrameCodeP(Encoder * pEnc,
60 : edgomez 1.41 Bitstream * bs,
61 :     bool force_inter,
62 :     bool vol_header);
63 : Isibaar 1.1
64 : edgomez 1.91 static void FrameCodeB(Encoder * pEnc,
65 :     FRAMEINFO * frame,
66 : edgomez 1.102 Bitstream * bs);
67 : Isibaar 1.1
68 :    
69 : edgomez 1.40 /*****************************************************************************
70 :     * Encoder creation
71 :     *
72 :     * This function creates an Encoder instance, it allocates all necessary
73 : edgomez 1.91 * image buffers (reference, current and bframes) and initialize the internal
74 :     * xvid encoder paremeters according to the XVID_ENC_PARAM input parameter.
75 : edgomez 1.40 *
76 :     * The code seems to be very long but is very basic, mainly memory allocation
77 :     * and cleaning code.
78 :     *
79 :     * Returned values :
80 : edgomez 1.102 * - 0 - no errors
81 : syskin 1.96 * - XVID_ERR_MEMORY - the libc could not allocate memory, the function
82 :     * cleans the structure before exiting.
83 :     * pParam->handle is also set to NULL.
84 : edgomez 1.40 *
85 :     ****************************************************************************/
86 :    
87 : edgomez 1.102 /*
88 :     * Simplify the "fincr/fbase" fraction
89 :     */
90 :     static void
91 :     simplify_time(int *inc, int *base)
92 : Isibaar 1.1 {
93 : edgomez 1.102 /* common factor */
94 :     int i = *inc;
95 : edgomez 1.41 while (i > 1) {
96 : edgomez 1.102 if (*inc % i == 0 && *base % i == 0) {
97 :     *inc /= i;
98 :     *base /= i;
99 :     i = *inc;
100 : Isibaar 1.1 continue;
101 :     }
102 :     i--;
103 :     }
104 :    
105 : edgomez 1.102 /* if neccessary, round to 65535 accuracy */
106 :     if (*base > 65535) {
107 :     float div = (float) *base / 65535;
108 :     *base = (int) (*base / div);
109 :     *inc = (int) (*inc / div);
110 : Isibaar 1.1 }
111 : edgomez 1.102 }
112 : Isibaar 1.1
113 : edgomez 1.39
114 : edgomez 1.102 int
115 :     enc_create(xvid_enc_create_t * create)
116 :     {
117 :     Encoder *pEnc;
118 :     int n;
119 : edgomez 1.39
120 : edgomez 1.102 if (XVID_VERSION_MAJOR(create->version) != 1) /* v1.x.x */
121 :     return XVID_ERR_VERSION;
122 : Isibaar 1.1
123 : edgomez 1.102 if (create->width%2 || create->height%2)
124 :     return XVID_ERR_FAIL;
125 : Isibaar 1.1
126 : edgomez 1.102 /* allocate encoder struct */
127 : edgomez 1.41
128 : edgomez 1.39 pEnc = (Encoder *) xvid_malloc(sizeof(Encoder), CACHE_LINE);
129 :     if (pEnc == NULL)
130 : Isibaar 1.1 return XVID_ERR_MEMORY;
131 : edgomez 1.42 memset(pEnc, 0, sizeof(Encoder));
132 :    
133 : edgomez 1.102 pEnc->mbParam.profile = create->profile;
134 : Isibaar 1.1
135 : edgomez 1.102 /* global flags */
136 :     pEnc->mbParam.global_flags = create->global;
137 : Isibaar 1.1
138 : edgomez 1.102 /* width, height */
139 :     pEnc->mbParam.width = create->width;
140 :     pEnc->mbParam.height = create->height;
141 : Isibaar 1.1 pEnc->mbParam.mb_width = (pEnc->mbParam.width + 15) / 16;
142 :     pEnc->mbParam.mb_height = (pEnc->mbParam.height + 15) / 16;
143 : edgomez 1.41 pEnc->mbParam.edged_width = 16 * pEnc->mbParam.mb_width + 2 * EDGE_SIZE;
144 :     pEnc->mbParam.edged_height = 16 * pEnc->mbParam.mb_height + 2 * EDGE_SIZE;
145 : Isibaar 1.1
146 : edgomez 1.102 /* framerate */
147 :     pEnc->mbParam.fincr = MAX(create->fincr, 0);
148 :     pEnc->mbParam.fbase = create->fincr <= 0 ? 25 : create->fbase;
149 :     if (pEnc->mbParam.fincr>0)
150 :     simplify_time(&pEnc->mbParam.fincr, &pEnc->mbParam.fbase);
151 :    
152 :     /* zones */
153 :     if(create->num_zones > 0) {
154 :     pEnc->num_zones = create->num_zones;
155 :     pEnc->zones = xvid_malloc(sizeof(xvid_enc_zone_t) * pEnc->num_zones, CACHE_LINE);
156 :     if (pEnc->zones == NULL)
157 :     goto xvid_err_memory0;
158 :     memcpy(pEnc->zones, create->zones, sizeof(xvid_enc_zone_t) * pEnc->num_zones);
159 :     } else {
160 :     pEnc->num_zones = 0;
161 :     pEnc->zones = NULL;
162 :     }
163 :    
164 :     /* plugins */
165 :     if(create->num_plugins > 0) {
166 :     pEnc->num_plugins = create->num_plugins;
167 :     pEnc->plugins = xvid_malloc(sizeof(xvid_enc_plugin_t) * pEnc->num_plugins, CACHE_LINE);
168 :     if (pEnc->plugins == NULL)
169 :     goto xvid_err_memory0;
170 :     } else {
171 :     pEnc->num_plugins = 0;
172 :     pEnc->plugins = NULL;
173 :     }
174 :    
175 :     for (n=0; n<pEnc->num_plugins;n++) {
176 :     xvid_plg_create_t pcreate;
177 :     xvid_plg_info_t pinfo;
178 :    
179 :     memset(&pinfo, 0, sizeof(xvid_plg_info_t));
180 :     pinfo.version = XVID_VERSION;
181 :     if (create->plugins[n].func(0, XVID_PLG_INFO, &pinfo, 0) >= 0) {
182 :     pEnc->mbParam.plugin_flags |= pinfo.flags;
183 :     }
184 :    
185 :     memset(&pcreate, 0, sizeof(xvid_plg_create_t));
186 :     pcreate.version = XVID_VERSION;
187 :     pcreate.num_zones = pEnc->num_zones;
188 :     pcreate.zones = pEnc->zones;
189 :     pcreate.width = pEnc->mbParam.width;
190 :     pcreate.height = pEnc->mbParam.height;
191 :     pcreate.mb_width = pEnc->mbParam.mb_width;
192 :     pcreate.mb_height = pEnc->mbParam.mb_height;
193 :     pcreate.fincr = pEnc->mbParam.fincr;
194 :     pcreate.fbase = pEnc->mbParam.fbase;
195 :     pcreate.param = create->plugins[n].param;
196 :    
197 :     pEnc->plugins[n].func = NULL; /* disable plugins that fail */
198 :     if (create->plugins[n].func(0, XVID_PLG_CREATE, &pcreate, &pEnc->plugins[n].param) >= 0) {
199 :     pEnc->plugins[n].func = create->plugins[n].func;
200 :     }
201 :     }
202 :    
203 :     if ((pEnc->mbParam.global_flags & XVID_GLOBAL_EXTRASTATS_ENABLE) ||
204 :     (pEnc->mbParam.plugin_flags & XVID_REQPSNR)) {
205 :     pEnc->mbParam.plugin_flags |= XVID_REQORIGINAL; /* psnr calculation requires the original */
206 :     }
207 : Isibaar 1.43
208 : edgomez 1.102 /* temp dquants */
209 :     if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
210 :     pEnc->temp_dquants = (int *) xvid_malloc(pEnc->mbParam.mb_width *
211 :     pEnc->mbParam.mb_height * sizeof(int), CACHE_LINE);
212 :     if (pEnc->temp_dquants==NULL)
213 :     goto xvid_err_memory1a;
214 :     }
215 : suxen_drol 1.32
216 : edgomez 1.102 /* bframes */
217 :     pEnc->mbParam.max_bframes = MAX(create->max_bframes, 0);
218 :     pEnc->mbParam.bquant_ratio = MAX(create->bquant_ratio, 0);
219 :     pEnc->mbParam.bquant_offset = create->bquant_offset;
220 : Isibaar 1.1
221 : edgomez 1.102 /* min/max quant */
222 :     for (n=0; n<3; n++) {
223 :     pEnc->mbParam.min_quant[n] = create->min_quant[n] > 0 ? create->min_quant[n] : 2;
224 :     pEnc->mbParam.max_quant[n] = create->max_quant[n] > 0 ? create->max_quant[n] : 31;
225 :     }
226 : Isibaar 1.1
227 : edgomez 1.102 /* frame drop ratio */
228 :     pEnc->mbParam.frame_drop_ratio = MAX(create->frame_drop_ratio, 0);
229 : Isibaar 1.1
230 : edgomez 1.102 /* max keyframe interval */
231 :     pEnc->mbParam.iMaxKeyInterval = create->max_key_interval <= 0 ? (10 * (int)pEnc->mbParam.fbase) / (int)pEnc->mbParam.fincr : create->max_key_interval;
232 : Isibaar 1.1
233 : edgomez 1.102 /* allocate working frame-image memory */
234 : h 1.16
235 : edgomez 1.39 pEnc->current = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
236 :     pEnc->reference = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
237 :    
238 : edgomez 1.41 if (pEnc->current == NULL || pEnc->reference == NULL)
239 : edgomez 1.39 goto xvid_err_memory1;
240 : suxen_drol 1.27
241 : edgomez 1.102 /* allocate macroblock memory */
242 : h 1.16
243 : edgomez 1.41 pEnc->current->mbs =
244 :     xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
245 :     pEnc->mbParam.mb_height, CACHE_LINE);
246 :     pEnc->reference->mbs =
247 :     xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
248 :     pEnc->mbParam.mb_height, CACHE_LINE);
249 : Isibaar 1.1
250 : edgomez 1.39 if (pEnc->current->mbs == NULL || pEnc->reference->mbs == NULL)
251 :     goto xvid_err_memory2;
252 : suxen_drol 1.27
253 : edgomez 1.102 /* allocate quant matrix memory */
254 :    
255 :     pEnc->mbParam.mpeg_quant_matrices =
256 :     xvid_malloc(sizeof(uint16_t) * 64 * 8, CACHE_LINE);
257 :    
258 :     if (pEnc->mbParam.mpeg_quant_matrices == NULL)
259 :     goto xvid_err_memory2a;
260 :    
261 :     /* allocate interpolation image memory */
262 : suxen_drol 1.27
263 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
264 : edgomez 1.91 image_null(&pEnc->sOriginal);
265 : edgomez 1.102 image_null(&pEnc->sOriginal2);
266 :     }
267 : edgomez 1.91
268 :     image_null(&pEnc->f_refh);
269 :     image_null(&pEnc->f_refv);
270 :     image_null(&pEnc->f_refhv);
271 :    
272 : suxen_drol 1.27 image_null(&pEnc->current->image);
273 :     image_null(&pEnc->reference->image);
274 :     image_null(&pEnc->vInterH);
275 :     image_null(&pEnc->vInterV);
276 :     image_null(&pEnc->vInterHV);
277 : edgomez 1.39
278 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
279 :     if (image_create
280 : edgomez 1.91 (&pEnc->sOriginal, pEnc->mbParam.edged_width,
281 :     pEnc->mbParam.edged_height) < 0)
282 :     goto xvid_err_memory3;
283 : edgomez 1.102
284 :     if (image_create
285 :     (&pEnc->sOriginal2, pEnc->mbParam.edged_width,
286 :     pEnc->mbParam.edged_height) < 0)
287 :     goto xvid_err_memory3;
288 : edgomez 1.91 }
289 :    
290 :     if (image_create
291 :     (&pEnc->f_refh, pEnc->mbParam.edged_width,
292 :     pEnc->mbParam.edged_height) < 0)
293 :     goto xvid_err_memory3;
294 :     if (image_create
295 :     (&pEnc->f_refv, pEnc->mbParam.edged_width,
296 :     pEnc->mbParam.edged_height) < 0)
297 :     goto xvid_err_memory3;
298 : edgomez 1.41 if (image_create
299 : edgomez 1.91 (&pEnc->f_refhv, pEnc->mbParam.edged_width,
300 : edgomez 1.41 pEnc->mbParam.edged_height) < 0)
301 : edgomez 1.39 goto xvid_err_memory3;
302 : edgomez 1.91
303 : edgomez 1.41 if (image_create
304 :     (&pEnc->current->image, pEnc->mbParam.edged_width,
305 :     pEnc->mbParam.edged_height) < 0)
306 : edgomez 1.39 goto xvid_err_memory3;
307 : edgomez 1.41 if (image_create
308 :     (&pEnc->reference->image, pEnc->mbParam.edged_width,
309 :     pEnc->mbParam.edged_height) < 0)
310 : edgomez 1.39 goto xvid_err_memory3;
311 : edgomez 1.41 if (image_create
312 :     (&pEnc->vInterH, pEnc->mbParam.edged_width,
313 :     pEnc->mbParam.edged_height) < 0)
314 : edgomez 1.39 goto xvid_err_memory3;
315 : edgomez 1.41 if (image_create
316 :     (&pEnc->vInterV, pEnc->mbParam.edged_width,
317 :     pEnc->mbParam.edged_height) < 0)
318 : edgomez 1.39 goto xvid_err_memory3;
319 : edgomez 1.41 if (image_create
320 :     (&pEnc->vInterHV, pEnc->mbParam.edged_width,
321 :     pEnc->mbParam.edged_height) < 0)
322 : edgomez 1.39 goto xvid_err_memory3;
323 : edgomez 1.91
324 :     /* Create full bitplane for GMC, this might be wasteful */
325 :     if (image_create
326 :     (&pEnc->vGMC, pEnc->mbParam.edged_width,
327 :     pEnc->mbParam.edged_height) < 0)
328 :     goto xvid_err_memory3;
329 :    
330 : edgomez 1.102 /* init bframe image buffers */
331 : edgomez 1.91
332 : edgomez 1.102 pEnc->bframenum_head = 0;
333 :     pEnc->bframenum_tail = 0;
334 :     pEnc->flush_bframes = 0;
335 :     pEnc->closed_bframenum = -1;
336 : edgomez 1.91
337 :     /* B Frames specific init */
338 :     pEnc->bframes = NULL;
339 :    
340 :     if (pEnc->mbParam.max_bframes > 0) {
341 :    
342 :     pEnc->bframes =
343 :     xvid_malloc(pEnc->mbParam.max_bframes * sizeof(FRAMEINFO *),
344 :     CACHE_LINE);
345 :    
346 :     if (pEnc->bframes == NULL)
347 :     goto xvid_err_memory3;
348 :    
349 :     for (n = 0; n < pEnc->mbParam.max_bframes; n++)
350 :     pEnc->bframes[n] = NULL;
351 :    
352 :    
353 :     for (n = 0; n < pEnc->mbParam.max_bframes; n++) {
354 :     pEnc->bframes[n] = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
355 :    
356 :     if (pEnc->bframes[n] == NULL)
357 :     goto xvid_err_memory4;
358 :    
359 :     pEnc->bframes[n]->mbs =
360 :     xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
361 :     pEnc->mbParam.mb_height, CACHE_LINE);
362 :    
363 :     if (pEnc->bframes[n]->mbs == NULL)
364 :     goto xvid_err_memory4;
365 :    
366 :     image_null(&pEnc->bframes[n]->image);
367 :    
368 :     if (image_create
369 :     (&pEnc->bframes[n]->image, pEnc->mbParam.edged_width,
370 :     pEnc->mbParam.edged_height) < 0)
371 :     goto xvid_err_memory4;
372 :    
373 :     }
374 :     }
375 :    
376 : edgomez 1.102 /* init incoming frame queue */
377 :     pEnc->queue_head = 0;
378 :     pEnc->queue_tail = 0;
379 :     pEnc->queue_size = 0;
380 : edgomez 1.91
381 : edgomez 1.102 pEnc->queue =
382 :     xvid_malloc((pEnc->mbParam.max_bframes+1) * sizeof(QUEUEINFO),
383 :     CACHE_LINE);
384 : edgomez 1.91
385 : edgomez 1.102 if (pEnc->queue == NULL)
386 :     goto xvid_err_memory4;
387 : edgomez 1.91
388 : edgomez 1.102 for (n = 0; n < pEnc->mbParam.max_bframes+1; n++)
389 :     image_null(&pEnc->queue[n].image);
390 : edgomez 1.91
391 :    
392 : edgomez 1.102 for (n = 0; n < pEnc->mbParam.max_bframes+1; n++) {
393 :     if (image_create
394 :     (&pEnc->queue[n].image, pEnc->mbParam.edged_width,
395 :     pEnc->mbParam.edged_height) < 0)
396 :     goto xvid_err_memory5;
397 : edgomez 1.91 }
398 :    
399 : edgomez 1.102 /* timestamp stuff */
400 : edgomez 1.91
401 :     pEnc->mbParam.m_stamp = 0;
402 :     pEnc->m_framenum = 0;
403 :     pEnc->current->stamp = 0;
404 :     pEnc->reference->stamp = 0;
405 : edgomez 1.39
406 : edgomez 1.102 /* other stuff */
407 :    
408 :     pEnc->iFrameNum = 0;
409 :     pEnc->fMvPrevSigma = -1;
410 : Isibaar 1.1
411 : edgomez 1.102 create->handle = (void *) pEnc;
412 : Isibaar 1.1
413 : Isibaar 1.6 init_timer();
414 : edgomez 1.102 init_mpeg_matrix(pEnc->mbParam.mpeg_quant_matrices);
415 : Isibaar 1.1
416 : edgomez 1.102 return 0; /* ok */
417 : edgomez 1.39
418 :     /*
419 :     * We handle all XVID_ERR_MEMORY here, this makes the code lighter
420 :     */
421 :    
422 : edgomez 1.91 xvid_err_memory5:
423 :    
424 : edgomez 1.102 for (n = 0; n < pEnc->mbParam.max_bframes+1; n++) {
425 :     image_destroy(&pEnc->queue[n].image, pEnc->mbParam.edged_width,
426 : edgomez 1.91 pEnc->mbParam.edged_height);
427 :     }
428 : edgomez 1.102
429 :     xvid_free(pEnc->queue);
430 : edgomez 1.91
431 :     xvid_err_memory4:
432 :    
433 :     if (pEnc->mbParam.max_bframes > 0) {
434 : edgomez 1.102 int i;
435 : edgomez 1.91
436 :     for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
437 :    
438 :     if (pEnc->bframes[i] == NULL)
439 :     continue;
440 :    
441 :     image_destroy(&pEnc->bframes[i]->image, pEnc->mbParam.edged_width,
442 :     pEnc->mbParam.edged_height);
443 :     xvid_free(pEnc->bframes[i]->mbs);
444 :     xvid_free(pEnc->bframes[i]);
445 : syskin 1.96 }
446 : edgomez 1.91
447 :     xvid_free(pEnc->bframes);
448 :     }
449 :    
450 : edgomez 1.41 xvid_err_memory3:
451 : edgomez 1.91
452 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
453 :     image_destroy(&pEnc->sOriginal, pEnc->mbParam.edged_width,
454 :     pEnc->mbParam.edged_height);
455 :     image_destroy(&pEnc->sOriginal2, pEnc->mbParam.edged_width,
456 : edgomez 1.91 pEnc->mbParam.edged_height);
457 :     }
458 :    
459 :     image_destroy(&pEnc->f_refh, pEnc->mbParam.edged_width,
460 :     pEnc->mbParam.edged_height);
461 :     image_destroy(&pEnc->f_refv, pEnc->mbParam.edged_width,
462 :     pEnc->mbParam.edged_height);
463 :     image_destroy(&pEnc->f_refhv, pEnc->mbParam.edged_width,
464 : edgomez 1.41 pEnc->mbParam.edged_height);
465 : edgomez 1.39
466 : edgomez 1.41 image_destroy(&pEnc->current->image, pEnc->mbParam.edged_width,
467 :     pEnc->mbParam.edged_height);
468 :     image_destroy(&pEnc->reference->image, pEnc->mbParam.edged_width,
469 :     pEnc->mbParam.edged_height);
470 :     image_destroy(&pEnc->vInterH, pEnc->mbParam.edged_width,
471 :     pEnc->mbParam.edged_height);
472 :     image_destroy(&pEnc->vInterV, pEnc->mbParam.edged_width,
473 :     pEnc->mbParam.edged_height);
474 :     image_destroy(&pEnc->vInterHV, pEnc->mbParam.edged_width,
475 :     pEnc->mbParam.edged_height);
476 : edgomez 1.91
477 :     /* destroy GMC image */
478 :     image_destroy(&pEnc->vGMC, pEnc->mbParam.edged_width,
479 :     pEnc->mbParam.edged_height);
480 :    
481 : edgomez 1.102 xvid_err_memory2a:
482 :     xvid_free(pEnc->mbParam.mpeg_quant_matrices);
483 : edgomez 1.39
484 : edgomez 1.41 xvid_err_memory2:
485 : edgomez 1.39 xvid_free(pEnc->current->mbs);
486 :     xvid_free(pEnc->reference->mbs);
487 :    
488 : edgomez 1.41 xvid_err_memory1:
489 : edgomez 1.39 xvid_free(pEnc->current);
490 :     xvid_free(pEnc->reference);
491 : edgomez 1.102
492 :     xvid_err_memory1a:
493 :     if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
494 :     xvid_free(pEnc->temp_dquants);
495 :     }
496 :    
497 :     xvid_err_memory0:
498 :     for (n=0; n<pEnc->num_plugins;n++) {
499 :     if (pEnc->plugins[n].func) {
500 :     pEnc->plugins[n].func(pEnc->plugins[n].param, XVID_PLG_DESTROY, 0, 0);
501 :     }
502 :     }
503 :     xvid_free(pEnc->plugins);
504 :    
505 :     xvid_free(pEnc->zones);
506 :    
507 : edgomez 1.39 xvid_free(pEnc);
508 :    
509 : edgomez 1.102 create->handle = NULL;
510 : edgomez 1.40
511 : edgomez 1.39 return XVID_ERR_MEMORY;
512 : Isibaar 1.1 }
513 :    
514 : edgomez 1.40 /*****************************************************************************
515 :     * Encoder destruction
516 :     *
517 :     * This function destroy the entire encoder structure created by a previous
518 : edgomez 1.102 * successful enc_create call.
519 : edgomez 1.40 *
520 :     * Returned values (for now only one returned value) :
521 : edgomez 1.102 * - 0 - no errors
522 : edgomez 1.40 *
523 :     ****************************************************************************/
524 :    
525 :     int
526 : edgomez 1.102 enc_destroy(Encoder * pEnc)
527 : Isibaar 1.1 {
528 : edgomez 1.91 int i;
529 : syskin 1.96
530 : edgomez 1.91 /* B Frames specific */
531 : edgomez 1.102 for (i = 0; i < pEnc->mbParam.max_bframes+1; i++) {
532 :     image_destroy(&pEnc->queue[i].image, pEnc->mbParam.edged_width,
533 : edgomez 1.91 pEnc->mbParam.edged_height);
534 :     }
535 :    
536 : edgomez 1.102 xvid_free(pEnc->queue);
537 :    
538 : edgomez 1.91 if (pEnc->mbParam.max_bframes > 0) {
539 :    
540 :     for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
541 :    
542 :     if (pEnc->bframes[i] == NULL)
543 :     continue;
544 :    
545 :     image_destroy(&pEnc->bframes[i]->image, pEnc->mbParam.edged_width,
546 :     pEnc->mbParam.edged_height);
547 :     xvid_free(pEnc->bframes[i]->mbs);
548 :     xvid_free(pEnc->bframes[i]);
549 :     }
550 :    
551 :     xvid_free(pEnc->bframes);
552 : syskin 1.96
553 : edgomez 1.91 }
554 :    
555 : edgomez 1.39 /* All images, reference, current etc ... */
556 : edgomez 1.91
557 : edgomez 1.41 image_destroy(&pEnc->current->image, pEnc->mbParam.edged_width,
558 :     pEnc->mbParam.edged_height);
559 :     image_destroy(&pEnc->reference->image, pEnc->mbParam.edged_width,
560 :     pEnc->mbParam.edged_height);
561 :     image_destroy(&pEnc->vInterH, pEnc->mbParam.edged_width,
562 :     pEnc->mbParam.edged_height);
563 :     image_destroy(&pEnc->vInterV, pEnc->mbParam.edged_width,
564 :     pEnc->mbParam.edged_height);
565 :     image_destroy(&pEnc->vInterHV, pEnc->mbParam.edged_width,
566 :     pEnc->mbParam.edged_height);
567 : edgomez 1.91 image_destroy(&pEnc->f_refh, pEnc->mbParam.edged_width,
568 : edgomez 1.41 pEnc->mbParam.edged_height);
569 : edgomez 1.91 image_destroy(&pEnc->f_refv, pEnc->mbParam.edged_width,
570 :     pEnc->mbParam.edged_height);
571 :     image_destroy(&pEnc->f_refhv, pEnc->mbParam.edged_width,
572 :     pEnc->mbParam.edged_height);
573 : edgomez 1.102 image_destroy(&pEnc->vGMC, pEnc->mbParam.edged_width,
574 :     pEnc->mbParam.edged_height);
575 : edgomez 1.91
576 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
577 :     image_destroy(&pEnc->sOriginal, pEnc->mbParam.edged_width,
578 :     pEnc->mbParam.edged_height);
579 :     image_destroy(&pEnc->sOriginal2, pEnc->mbParam.edged_width,
580 : edgomez 1.91 pEnc->mbParam.edged_height);
581 :     }
582 : edgomez 1.39
583 :     /* Encoder structure */
584 : edgomez 1.91
585 : suxen_drol 1.27 xvid_free(pEnc->current->mbs);
586 :     xvid_free(pEnc->current);
587 :    
588 :     xvid_free(pEnc->reference->mbs);
589 :     xvid_free(pEnc->reference);
590 :    
591 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
592 :     xvid_free(pEnc->temp_dquants);
593 : edgomez 1.91 }
594 :    
595 :    
596 : edgomez 1.102 if (pEnc->num_plugins>0) {
597 :     xvid_plg_destroy_t pdestroy;
598 :     memset(&pdestroy, 0, sizeof(xvid_plg_destroy_t));
599 : edgomez 1.91
600 : edgomez 1.102 pdestroy.version = XVID_VERSION;
601 :     pdestroy.num_frames = pEnc->m_framenum;
602 : edgomez 1.91
603 : edgomez 1.102 for (i=0; i<pEnc->num_plugins;i++) {
604 :     if (pEnc->plugins[i].func) {
605 :     pEnc->plugins[i].func(pEnc->plugins[i].param, XVID_PLG_DESTROY, &pdestroy, 0);
606 :     }
607 :     }
608 :     xvid_free(pEnc->plugins);
609 : edgomez 1.92 }
610 :    
611 : edgomez 1.102 xvid_free(pEnc->mbParam.mpeg_quant_matrices);
612 : edgomez 1.91
613 : edgomez 1.102 if (pEnc->num_plugins>0)
614 :     xvid_free(pEnc->zones);
615 : edgomez 1.91
616 : edgomez 1.102 xvid_free(pEnc);
617 : edgomez 1.91
618 : edgomez 1.102 return 0; /* ok */
619 : edgomez 1.91 }
620 :    
621 :    
622 : edgomez 1.102 /*
623 :     call the plugins
624 :     */
625 : edgomez 1.91
626 : edgomez 1.102 static void call_plugins(Encoder * pEnc, FRAMEINFO * frame, IMAGE * original,
627 :     int opt, int * type, int * quant, xvid_enc_stats_t * stats)
628 : suxen_drol 1.44 {
629 : edgomez 1.102 unsigned int i, j;
630 :     xvid_plg_data_t data;
631 : edgomez 1.91
632 : edgomez 1.102 /* set data struct */
633 : suxen_drol 1.44
634 : edgomez 1.102 memset(&data, 0, sizeof(xvid_plg_data_t));
635 :     data.version = XVID_VERSION;
636 : edgomez 1.91
637 : edgomez 1.102 /* find zone */
638 :     for(i=0; i<pEnc->num_zones && pEnc->zones[i].frame<=frame->frame_num; i++) ;
639 :     data.zone = i>0 ? &pEnc->zones[i-1] : NULL;
640 :    
641 :     data.width = pEnc->mbParam.width;
642 :     data.height = pEnc->mbParam.height;
643 :     data.mb_width = pEnc->mbParam.mb_width;
644 :     data.mb_height = pEnc->mbParam.mb_height;
645 :     data.fincr = frame->fincr;
646 :     data.fbase = pEnc->mbParam.fbase;
647 :     data.bquant_ratio = pEnc->mbParam.bquant_ratio;
648 :     data.bquant_offset = pEnc->mbParam.bquant_offset;
649 :    
650 :     for (i=0; i<3; i++) {
651 :     data.min_quant[i] = pEnc->mbParam.min_quant[i];
652 :     data.max_quant[i] = pEnc->mbParam.max_quant[i];
653 :     }
654 :    
655 :     data.reference.csp = XVID_CSP_PLANAR;
656 :     data.reference.plane[0] = pEnc->reference->image.y;
657 :     data.reference.plane[1] = pEnc->reference->image.u;
658 :     data.reference.plane[2] = pEnc->reference->image.v;
659 :     data.reference.stride[0] = pEnc->mbParam.edged_width;
660 :     data.reference.stride[1] = pEnc->mbParam.edged_width/2;
661 :     data.reference.stride[2] = pEnc->mbParam.edged_width/2;
662 :    
663 :     data.current.csp = XVID_CSP_PLANAR;
664 :     data.current.plane[0] = frame->image.y;
665 :     data.current.plane[1] = frame->image.u;
666 :     data.current.plane[2] = frame->image.v;
667 :     data.current.stride[0] = pEnc->mbParam.edged_width;
668 :     data.current.stride[1] = pEnc->mbParam.edged_width/2;
669 :     data.current.stride[2] = pEnc->mbParam.edged_width/2;
670 :    
671 :     data.frame_num = frame->frame_num;
672 :    
673 :     if (opt == XVID_PLG_BEFORE) {
674 :     data.type = *type;
675 :     data.quant = *quant;
676 :    
677 :     data.vol_flags = frame->vol_flags;
678 :     data.vop_flags = frame->vop_flags;
679 :     data.motion_flags = frame->motion_flags;
680 :    
681 :     } else if (opt == XVID_PLG_FRAME) {
682 :     data.type = coding2type(frame->coding_type);
683 :     data.quant = frame->quant;
684 :    
685 :     if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
686 :     data.dquant = pEnc->temp_dquants;
687 :     data.dquant_stride = pEnc->mbParam.mb_width;
688 :     memset(data.dquant, 0, data.mb_width*data.mb_height);
689 :     }
690 :    
691 :     } else { /* XVID_PLG_AFTER */
692 :     if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
693 :     data.original.csp = XVID_CSP_PLANAR;
694 :     data.original.plane[0] = original->y;
695 :     data.original.plane[1] = original->u;
696 :     data.original.plane[2] = original->v;
697 :     data.original.stride[0] = pEnc->mbParam.edged_width;
698 :     data.original.stride[1] = pEnc->mbParam.edged_width/2;
699 :     data.original.stride[2] = pEnc->mbParam.edged_width/2;
700 :     }
701 : edgomez 1.91
702 : edgomez 1.102 if ((frame->vol_flags & XVID_VOL_EXTRASTATS) ||
703 :     (pEnc->mbParam.plugin_flags & XVID_REQPSNR)) {
704 : edgomez 1.91
705 : edgomez 1.102 data.sse_y =
706 :     plane_sse( original->y, frame->image.y,
707 :     pEnc->mbParam.edged_width, pEnc->mbParam.width,
708 :     pEnc->mbParam.height);
709 : edgomez 1.91
710 : edgomez 1.102 data.sse_u =
711 :     plane_sse( original->u, frame->image.u,
712 :     pEnc->mbParam.edged_width/2, pEnc->mbParam.width/2,
713 :     pEnc->mbParam.height/2);
714 : edgomez 1.91
715 : edgomez 1.102 data.sse_v =
716 :     plane_sse( original->v, frame->image.v,
717 :     pEnc->mbParam.edged_width/2, pEnc->mbParam.width/2,
718 :     pEnc->mbParam.height/2);
719 :     }
720 : edgomez 1.91
721 : edgomez 1.102 data.type = coding2type(frame->coding_type);
722 :     data.quant = frame->quant;
723 : edgomez 1.91
724 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
725 :     data.dquant = pEnc->temp_dquants;
726 :     data.dquant_stride = pEnc->mbParam.mb_width;
727 :    
728 :     for (j=0; j<pEnc->mbParam.mb_height; j++)
729 :     for (i=0; i<pEnc->mbParam.mb_width; i++) {
730 :     data.dquant[j*data.dquant_stride + i] = frame->mbs[j*pEnc->mbParam.mb_width + i].dquant;
731 :     }
732 :     }
733 : edgomez 1.91
734 : edgomez 1.102 data.vol_flags = frame->vol_flags;
735 :     data.vop_flags = frame->vop_flags;
736 :     data.motion_flags = frame->motion_flags;
737 :    
738 :     data.length = frame->length;
739 :     data.kblks = frame->sStat.kblks;
740 :     data.mblks = frame->sStat.mblks;
741 :     data.ublks = frame->sStat.ublks;
742 :    
743 :     /* New code */
744 :     data.stats.type = coding2type(frame->coding_type);
745 :     data.stats.quant = frame->quant;
746 :     data.stats.vol_flags = frame->vol_flags;
747 :     data.stats.vop_flags = frame->vop_flags;
748 :     data.stats.length = frame->length;
749 :     data.stats.hlength = frame->length - (frame->sStat.iTextBits / 8);
750 :     data.stats.kblks = frame->sStat.kblks;
751 :     data.stats.mblks = frame->sStat.mblks;
752 :     data.stats.ublks = frame->sStat.ublks;
753 :     data.stats.sse_y = data.sse_y;
754 :     data.stats.sse_u = data.sse_u;
755 :     data.stats.sse_v = data.sse_v;
756 : edgomez 1.91
757 : edgomez 1.102 if (stats)
758 :     *stats = data.stats;
759 :     }
760 : edgomez 1.91
761 : edgomez 1.102 /* call plugins */
762 :     for (i=0; i<(unsigned int)pEnc->num_plugins;i++) {
763 :     emms();
764 :     if (pEnc->plugins[i].func) {
765 :     if (pEnc->plugins[i].func(pEnc->plugins[i].param, opt, &data, 0) < 0) {
766 :     continue;
767 :     }
768 :     }
769 :     }
770 :     emms();
771 : edgomez 1.91
772 : edgomez 1.102 /* copy modified values back into frame*/
773 :     if (opt == XVID_PLG_BEFORE) {
774 :     *type = data.type;
775 :     *quant = data.quant > 0 ? data.quant : 2; /* default */
776 :    
777 :     frame->vol_flags = data.vol_flags;
778 :     frame->vop_flags = data.vop_flags;
779 :     frame->motion_flags = data.motion_flags;
780 :    
781 :     } else if (opt == XVID_PLG_FRAME) {
782 : edgomez 1.91
783 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
784 :     for (j=0; j<pEnc->mbParam.mb_height; j++)
785 :     for (i=0; i<pEnc->mbParam.mb_width; i++) {
786 :     frame->mbs[j*pEnc->mbParam.mb_width + i].dquant = data.dquant[j*data.mb_width + i];
787 :     }
788 :     } else {
789 :     for (j=0; j<pEnc->mbParam.mb_height; j++)
790 :     for (i=0; i<pEnc->mbParam.mb_width; i++) {
791 :     frame->mbs[j*pEnc->mbParam.mb_width + i].dquant = 0;
792 :     }
793 :     }
794 :     frame->mbs[0].quant = data.quant; /* FRAME will not affect the quant in stats */
795 :     }
796 : edgomez 1.91
797 :    
798 : edgomez 1.102 }
799 : edgomez 1.91
800 :    
801 : edgomez 1.102 static __inline void inc_frame_num(Encoder * pEnc)
802 :     {
803 :     pEnc->current->frame_num = pEnc->m_framenum;
804 :     pEnc->current->stamp = pEnc->mbParam.m_stamp; /* first frame is zero */
805 : edgomez 1.91
806 : edgomez 1.102 pEnc->mbParam.m_stamp += pEnc->current->fincr;
807 :     pEnc->m_framenum++; /* debug ticker */
808 :     }
809 :    
810 :     static __inline void dec_frame_num(Encoder * pEnc)
811 :     {
812 :     pEnc->mbParam.m_stamp -= pEnc->mbParam.fincr;
813 :     pEnc->m_framenum--; /* debug ticker */
814 :     }
815 : edgomez 1.91
816 : edgomez 1.102 static __inline void
817 :     MBSetDquant(MACROBLOCK * pMB, int x, int y, MBParam * mbParam)
818 :     {
819 :     if (pMB->cbp == 0) {
820 :     /* we want to code dquant but the quantizer value will not be used yet
821 :     let's find out if we can postpone dquant to next MB
822 :     */
823 :     if (x == mbParam->mb_width-1 && y == mbParam->mb_height-1) {
824 :     pMB->dquant = 0; /* it's the last MB of all, the easiest case */
825 :     return;
826 :     } else {
827 :     MACROBLOCK * next = pMB + 1;
828 :     const MACROBLOCK * prev = pMB - 1;
829 :     if (next->mode != MODE_INTER4V && next->mode != MODE_NOT_CODED)
830 :     /* mode allows dquant change in the future */
831 :     if (abs(next->quant - prev->quant) <= 2) {
832 :     /* quant change is not out of range */
833 :     pMB->quant = prev->quant;
834 :     pMB->dquant = 0;
835 :     next->dquant = next->quant - prev->quant;
836 :     return;
837 :     }
838 :     }
839 :     }
840 :     /* couldn't skip this dquant */
841 :     pMB->mode = MODE_INTER_Q;
842 :     }
843 :    
844 : edgomez 1.91
845 :    
846 : edgomez 1.102 static __inline void
847 :     set_timecodes(FRAMEINFO* pCur,FRAMEINFO *pRef, int32_t time_base)
848 :     {
849 : edgomez 1.91
850 : edgomez 1.102 pCur->ticks = (int32_t)pCur->stamp % time_base;
851 :     pCur->seconds = ((int32_t)pCur->stamp / time_base) - ((int32_t)pRef->stamp / time_base) ;
852 : edgomez 1.91
853 : edgomez 1.102 #if 0 /* HEAVY DEBUG OUTPUT */
854 :     fprintf(stderr,"WriteVop: %d - %d \n",
855 :     ((int32_t)pCur->stamp / time_base), ((int32_t)pRef->stamp / time_base));
856 :     fprintf(stderr,"set_timecodes: VOP %1d stamp=%lld ref_stamp=%lld base=%d\n",
857 :     pCur->coding_type, pCur->stamp, pRef->stamp, time_base);
858 :     fprintf(stderr,"set_timecodes: VOP %1d seconds=%d ticks=%d (ref-sec=%d ref-tick=%d)\n",
859 :     pCur->coding_type, pCur->seconds, pCur->ticks, pRef->seconds, pRef->ticks);
860 :     #endif
861 :     }
862 : edgomez 1.91
863 : edgomez 1.102 static int
864 :     gcd(int a, int b)
865 :     {
866 :     int r ;
867 : edgomez 1.91
868 : edgomez 1.102 if (b > a) {
869 :     r = a;
870 :     a = b;
871 :     b = r;
872 :     }
873 : Isibaar 1.97
874 : edgomez 1.102 while ((r = a % b)) {
875 :     a = b;
876 :     b = r;
877 :     }
878 :     return b;
879 :     }
880 : Isibaar 1.97
881 : edgomez 1.102 static void
882 :     simplify_par(int *par_width, int *par_height)
883 :     {
884 : edgomez 1.91
885 : edgomez 1.102 int _par_width = (!*par_width) ? 1 : (*par_width<0) ? -*par_width: *par_width;
886 :     int _par_height = (!*par_height) ? 1 : (*par_height<0) ? -*par_height: *par_height;
887 :     int divisor = gcd(_par_width, _par_height);
888 :    
889 :     _par_width /= divisor;
890 :     _par_height /= divisor;
891 :    
892 :     /* 2^8 precision maximum */
893 :     if (_par_width>255 || _par_height>255) {
894 :     float div;
895 : edgomez 1.91 emms();
896 : edgomez 1.102 if (_par_width>_par_height)
897 :     div = (float)_par_width/255;
898 :     else
899 :     div = (float)_par_height/255;
900 : edgomez 1.91
901 : edgomez 1.102 _par_width = (int)((float)_par_width/div);
902 :     _par_height = (int)((float)_par_height/div);
903 : edgomez 1.91 }
904 :    
905 : edgomez 1.102 *par_width = _par_width;
906 :     *par_height = _par_height;
907 : edgomez 1.91
908 : edgomez 1.102 return;
909 :     }
910 : edgomez 1.91
911 : syskin 1.96
912 : edgomez 1.102 /*****************************************************************************
913 :     * IPB frame encoder entry point
914 :     *
915 :     * Returned values :
916 :     * - >0 - output bytes
917 :     * - 0 - no output
918 :     * - XVID_ERR_VERSION - wrong version passed to core
919 :     * - XVID_ERR_END - End of stream reached before end of coding
920 :     * - XVID_ERR_FORMAT - the image subsystem reported the image had a wrong
921 :     * format
922 :     ****************************************************************************/
923 : edgomez 1.91
924 :    
925 : edgomez 1.102 int
926 :     enc_encode(Encoder * pEnc,
927 :     xvid_enc_frame_t * xFrame,
928 :     xvid_enc_stats_t * stats)
929 :     {
930 :     xvid_enc_frame_t * frame;
931 :     int type;
932 :     Bitstream bs;
933 : Isibaar 1.97
934 : edgomez 1.102 if (XVID_VERSION_MAJOR(xFrame->version) != 1 || (stats && XVID_VERSION_MAJOR(stats->version) != 1)) /* v1.x.x */
935 :     return XVID_ERR_VERSION;
936 : Isibaar 1.97
937 : edgomez 1.102 xFrame->out_flags = 0;
938 : edgomez 1.91
939 : edgomez 1.102 start_global_timer();
940 :     BitstreamInit(&bs, xFrame->bitstream, 0);
941 : edgomez 1.91
942 :    
943 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
944 :     * enqueue image to the encoding-queue
945 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
946 : edgomez 1.91
947 : edgomez 1.102 if (xFrame->input.csp != XVID_CSP_NULL)
948 : edgomez 1.91 {
949 : edgomez 1.102 QUEUEINFO * q = &pEnc->queue[pEnc->queue_tail];
950 : edgomez 1.91
951 :     start_timer();
952 :     if (image_input
953 : edgomez 1.102 (&q->image, pEnc->mbParam.width, pEnc->mbParam.height,
954 :     pEnc->mbParam.edged_width, (uint8_t**)xFrame->input.plane, xFrame->input.stride,
955 :     xFrame->input.csp, xFrame->vol_flags & XVID_VOL_INTERLACING))
956 : edgomez 1.91 {
957 :     emms();
958 :     return XVID_ERR_FORMAT;
959 :     }
960 :     stop_conv_timer();
961 :    
962 : edgomez 1.102 if ((xFrame->vop_flags & XVID_VOP_CHROMAOPT)) {
963 :     image_chroma_optimize(&q->image,
964 : edgomez 1.92 pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.edged_width);
965 :     }
966 :    
967 : edgomez 1.102 q->frame = *xFrame;
968 :    
969 :     if (xFrame->quant_intra_matrix)
970 : edgomez 1.91 {
971 : edgomez 1.102 memcpy(q->quant_intra_matrix, xFrame->quant_intra_matrix, 64*sizeof(unsigned char));
972 :     q->frame.quant_intra_matrix = q->quant_intra_matrix;
973 : edgomez 1.91 }
974 :    
975 : edgomez 1.102 if (xFrame->quant_inter_matrix)
976 :     {
977 :     memcpy(q->quant_inter_matrix, xFrame->quant_inter_matrix, 64*sizeof(unsigned char));
978 :     q->frame.quant_inter_matrix = q->quant_inter_matrix;
979 : edgomez 1.91 }
980 :    
981 : edgomez 1.102 pEnc->queue_tail = (pEnc->queue_tail + 1) % (pEnc->mbParam.max_bframes+1);
982 :     pEnc->queue_size++;
983 : edgomez 1.91 }
984 :    
985 :    
986 :     /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
987 : edgomez 1.102 * bframe flush code
988 : edgomez 1.91 * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
989 :    
990 : edgomez 1.102 repeat:
991 : edgomez 1.91
992 : edgomez 1.102 if (pEnc->flush_bframes)
993 :     {
994 :     if (pEnc->bframenum_head < pEnc->bframenum_tail) {
995 : edgomez 1.91
996 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** BFRAME (flush) bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
997 :     pEnc->bframenum_head, pEnc->bframenum_tail,
998 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
999 : edgomez 1.91
1000 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
1001 :     image_copy(&pEnc->sOriginal2, &pEnc->bframes[pEnc->bframenum_head]->image,
1002 :     pEnc->mbParam.edged_width, pEnc->mbParam.height);
1003 : edgomez 1.91 }
1004 :    
1005 : edgomez 1.102 FrameCodeB(pEnc, pEnc->bframes[pEnc->bframenum_head], &bs);
1006 :     call_plugins(pEnc, pEnc->bframes[pEnc->bframenum_head], &pEnc->sOriginal2, XVID_PLG_AFTER, 0, 0, stats);
1007 :     pEnc->bframenum_head++;
1008 : edgomez 1.91
1009 : edgomez 1.102 goto done;
1010 :     }
1011 : edgomez 1.91
1012 : edgomez 1.102 /* write an empty marker to the bitstream.
1013 : edgomez 1.91
1014 : edgomez 1.102 for divx5 decoder compatibility, this marker must consist
1015 :     of a not-coded p-vop, with a time_base of zero, and time_increment
1016 :     indentical to the future-referece frame.
1017 :     */
1018 : edgomez 1.91
1019 : edgomez 1.102 if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED && pEnc->bframenum_tail > 0)) {
1020 :     int tmp;
1021 :     int bits;
1022 : edgomez 1.91
1023 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** EMPTY bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
1024 : edgomez 1.91 pEnc->bframenum_head, pEnc->bframenum_tail,
1025 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1026 :    
1027 : edgomez 1.102 bits = BitstreamPos(&bs);
1028 : edgomez 1.91
1029 : edgomez 1.102 tmp = pEnc->current->seconds;
1030 :     pEnc->current->seconds = 0; /* force time_base = 0 */
1031 : edgomez 1.91
1032 : edgomez 1.102 BitstreamWriteVopHeader(&bs, &pEnc->mbParam, pEnc->current, 0, pEnc->current->quant);
1033 :     BitstreamPad(&bs);
1034 :     pEnc->current->seconds = tmp;
1035 : edgomez 1.91
1036 : edgomez 1.102 /* add the not-coded length to the reference frame size */
1037 :     pEnc->current->length += (BitstreamPos(&bs) - bits) / 8;
1038 :     call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
1039 : edgomez 1.91
1040 : edgomez 1.102 /* flush complete: reset counters */
1041 :     pEnc->flush_bframes = 0;
1042 :     pEnc->bframenum_head = pEnc->bframenum_tail = 0;
1043 :     goto done;
1044 : edgomez 1.91
1045 :     }
1046 :    
1047 : edgomez 1.102 /* flush complete: reset counters */
1048 :     pEnc->flush_bframes = 0;
1049 :     pEnc->bframenum_head = pEnc->bframenum_tail = 0;
1050 :     }
1051 : edgomez 1.91
1052 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1053 :     * dequeue frame from the encoding queue
1054 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1055 : edgomez 1.91
1056 : edgomez 1.102 if (pEnc->queue_size == 0) /* empty */
1057 :     {
1058 :     if (xFrame->input.csp == XVID_CSP_NULL) /* no futher input */
1059 :     {
1060 : edgomez 1.91
1061 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** FINISH bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
1062 : edgomez 1.91 pEnc->bframenum_head, pEnc->bframenum_tail,
1063 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1064 :    
1065 : edgomez 1.102 if (!(pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->mbParam.max_bframes > 0) {
1066 :     call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
1067 :     }
1068 : edgomez 1.91
1069 : edgomez 1.102 /* if the very last frame is to be b-vop, we must change it to a p-vop */
1070 :     if (pEnc->bframenum_tail > 0) {
1071 : edgomez 1.91
1072 : edgomez 1.102 SWAP(FRAMEINFO*, pEnc->current, pEnc->reference);
1073 :     pEnc->bframenum_tail--;
1074 :     SWAP(FRAMEINFO*, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
1075 : edgomez 1.91
1076 : edgomez 1.102 /* convert B-VOP to P-VOP */
1077 :     pEnc->current->quant = 100*pEnc->current->quant - pEnc->mbParam.bquant_offset;
1078 :     pEnc->current->quant += pEnc->mbParam.bquant_ratio - 1; /* to avoid rouding issues */
1079 :     pEnc->current->quant /= pEnc->mbParam.bquant_ratio;
1080 : edgomez 1.91
1081 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
1082 :     image_copy(&pEnc->sOriginal, &pEnc->current->image,
1083 :     pEnc->mbParam.edged_width, pEnc->mbParam.height);
1084 :     }
1085 : syskin 1.96
1086 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** PFRAME bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
1087 : edgomez 1.91 pEnc->bframenum_head, pEnc->bframenum_tail,
1088 : edgomez 1.102 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1089 : edgomez 1.91
1090 : edgomez 1.102 FrameCodeP(pEnc, &bs, 1, 0);
1091 : edgomez 1.91
1092 :    
1093 : edgomez 1.102 if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->bframenum_tail==0) {
1094 :     call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
1095 :     }else{
1096 :     pEnc->flush_bframes = 1;
1097 :     goto done;
1098 :     }
1099 :     }
1100 :     DPRINTF(XVID_DEBUG_DEBUG, "*** END\n");
1101 : edgomez 1.91
1102 : edgomez 1.102 emms();
1103 :     return XVID_ERR_END; /* end of stream reached */
1104 : edgomez 1.91 }
1105 : edgomez 1.102 goto done; /* nothing to encode yet; encoder lag */
1106 : edgomez 1.91 }
1107 :    
1108 : edgomez 1.102 /* the current FRAME becomes the reference */
1109 :     SWAP(FRAMEINFO*, pEnc->current, pEnc->reference);
1110 : edgomez 1.91
1111 : edgomez 1.102 /* remove frame from encoding-queue (head), and move it into the current */
1112 :     image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_head].image);
1113 :     frame = &pEnc->queue[pEnc->queue_head].frame;
1114 :     pEnc->queue_head = (pEnc->queue_head + 1) % (pEnc->mbParam.max_bframes+1);
1115 :     pEnc->queue_size--;
1116 : edgomez 1.91
1117 : Isibaar 1.1
1118 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1119 :     * init pEnc->current fields
1120 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1121 : Isibaar 1.1
1122 : edgomez 1.102 pEnc->current->fincr = pEnc->mbParam.fincr>0 ? pEnc->mbParam.fincr : frame->fincr;
1123 : edgomez 1.91 inc_frame_num(pEnc);
1124 : edgomez 1.102 pEnc->current->vol_flags = frame->vol_flags;
1125 :     pEnc->current->vop_flags = frame->vop_flags;
1126 :     pEnc->current->motion_flags = frame->motion;
1127 :     pEnc->current->fcode = pEnc->mbParam.m_fcode;
1128 :     pEnc->current->bcode = pEnc->mbParam.m_fcode;
1129 : edgomez 1.91
1130 : edgomez 1.92
1131 : edgomez 1.102 if ((xFrame->vop_flags & XVID_VOP_CHROMAOPT)) {
1132 : syskin 1.96 image_chroma_optimize(&pEnc->current->image,
1133 : edgomez 1.92 pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.edged_width);
1134 :     }
1135 : Isibaar 1.1
1136 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1137 :     * frame type & quant selection
1138 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1139 :    
1140 :     type = frame->type;
1141 :     pEnc->current->quant = frame->quant;
1142 :    
1143 :     call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_BEFORE, &type, &pEnc->current->quant, stats);
1144 :    
1145 :     if (type > 0){ /* XVID_TYPE_?VOP */
1146 :     type = type2coding(type); /* convert XVID_TYPE_?VOP to bitstream coding type */
1147 :     } else{ /* XVID_TYPE_AUTO */
1148 :     if (pEnc->iFrameNum == 0 || (pEnc->mbParam.iMaxKeyInterval > 0 && pEnc->iFrameNum >= pEnc->mbParam.iMaxKeyInterval)){
1149 :     pEnc->iFrameNum = 0;
1150 :     type = I_VOP;
1151 :     }else{
1152 :     type = MEanalysis(&pEnc->reference->image, pEnc->current,
1153 :     &pEnc->mbParam, pEnc->mbParam.iMaxKeyInterval,
1154 :     pEnc->iFrameNum, pEnc->bframenum_tail, xFrame->bframe_threshold,
1155 :     (pEnc->bframes) ? pEnc->bframes[pEnc->bframenum_head]->mbs: NULL);
1156 :     }
1157 : edgomez 1.91 }
1158 : Isibaar 1.23
1159 : edgomez 1.102 if (type != I_VOP)
1160 :     pEnc->current->vol_flags = pEnc->mbParam.vol_flags; /* don't allow VOL changes here */
1161 :    
1162 :     /* bframes buffer overflow check */
1163 :     if (type == B_VOP && pEnc->bframenum_tail >= pEnc->mbParam.max_bframes) {
1164 :     type = P_VOP;
1165 :     }
1166 : suxen_drol 1.27
1167 : edgomez 1.102 pEnc->iFrameNum++;
1168 : Isibaar 1.1
1169 : edgomez 1.102 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
1170 :     image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 5,
1171 :     "%d st:%lld if:%d", pEnc->current->frame_num, pEnc->current->stamp, pEnc->iFrameNum);
1172 : Isibaar 1.1 }
1173 :    
1174 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1175 :     * encode this frame as a b-vop
1176 :     * (we dont encode here, rather we store the frame in the bframes queue, to be encoded later)
1177 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1178 :     if (type == B_VOP) {
1179 :     if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
1180 :     image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "BVOP");
1181 :     }
1182 :    
1183 :     if (frame->quant < 1) {
1184 :     pEnc->current->quant = ((((pEnc->reference->quant + pEnc->current->quant) *
1185 :     pEnc->mbParam.bquant_ratio) / 2) + pEnc->mbParam.bquant_offset)/100;
1186 : edgomez 1.91
1187 : edgomez 1.102 } else {
1188 :     pEnc->current->quant = frame->quant;
1189 :     }
1190 : edgomez 1.41
1191 : edgomez 1.102 if (pEnc->current->quant < 1)
1192 :     pEnc->current->quant = 1;
1193 :     else if (pEnc->current->quant > 31)
1194 :     pEnc->current->quant = 31;
1195 : edgomez 1.41
1196 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** BFRAME (store) bf: head=%i tail=%i queue: head=%i tail=%i size=%i quant=%i\n",
1197 :     pEnc->bframenum_head, pEnc->bframenum_tail,
1198 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size,pEnc->current->quant);
1199 : edgomez 1.40
1200 : edgomez 1.102 /* store frame into bframe buffer & swap ref back to current */
1201 :     SWAP(FRAMEINFO*, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
1202 :     SWAP(FRAMEINFO*, pEnc->current, pEnc->reference);
1203 : edgomez 1.41
1204 : edgomez 1.102 pEnc->bframenum_tail++;
1205 : edgomez 1.40
1206 : edgomez 1.102 goto repeat;
1207 :     }
1208 : edgomez 1.40
1209 :    
1210 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** XXXXXX bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
1211 :     pEnc->bframenum_head, pEnc->bframenum_tail,
1212 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1213 : edgomez 1.40
1214 : edgomez 1.102 /* for unpacked bframes, output the stats for the last encoded frame */
1215 :     if (!(pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->mbParam.max_bframes > 0)
1216 :     {
1217 :     if (pEnc->current->stamp > 0) {
1218 :     call_plugins(pEnc, pEnc->reference, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
1219 : edgomez 1.40 }
1220 : edgomez 1.102 else
1221 :     stats->type = XVID_TYPE_NOTHING;
1222 :     }
1223 : edgomez 1.40
1224 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1225 :     * closed-gop
1226 :     * if the frame prior to an iframe is scheduled as a bframe, we must change it to a pframe
1227 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1228 : Isibaar 1.1
1229 : edgomez 1.102 if (type == I_VOP && (pEnc->mbParam.global_flags & XVID_GLOBAL_CLOSED_GOP) && pEnc->bframenum_tail > 0) {
1230 : Isibaar 1.1
1231 : edgomez 1.102 /* place this frame back on the encoding-queue (head) */
1232 :     /* we will deal with it next time */
1233 :     dec_frame_num(pEnc);
1234 :     pEnc->iFrameNum--;
1235 : edgomez 1.13
1236 : edgomez 1.102 pEnc->queue_head = (pEnc->queue_head + (pEnc->mbParam.max_bframes+1) - 1) % (pEnc->mbParam.max_bframes+1);
1237 :     pEnc->queue_size++;
1238 :     image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_head].image);
1239 : edgomez 1.41
1240 : edgomez 1.102 /* grab the last frame from the bframe-queue */
1241 : edgomez 1.41
1242 : edgomez 1.102 pEnc->bframenum_tail--;
1243 :     SWAP(FRAMEINFO*, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
1244 : Isibaar 1.1
1245 : edgomez 1.102 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
1246 :     image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 100, "DX50 BVOP->PVOP");
1247 : edgomez 1.40 }
1248 :    
1249 : edgomez 1.102 /* convert B-VOP quant to P-VOP */
1250 :     pEnc->current->quant = 100*pEnc->current->quant - pEnc->mbParam.bquant_offset;
1251 :     pEnc->current->quant += pEnc->mbParam.bquant_ratio - 1; /* to avoid rouding issues */
1252 :     pEnc->current->quant /= pEnc->mbParam.bquant_ratio;
1253 :     type = P_VOP;
1254 : edgomez 1.3 }
1255 : Isibaar 1.1
1256 : edgomez 1.93
1257 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1258 :     * encode this frame as an i-vop
1259 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1260 : h 1.5
1261 : edgomez 1.102 if (type == I_VOP) {
1262 : edgomez 1.41
1263 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** IFRAME bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
1264 :     pEnc->bframenum_head, pEnc->bframenum_tail,
1265 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1266 : Isibaar 1.7
1267 : edgomez 1.102 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
1268 :     image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "IVOP");
1269 :     }
1270 : syskin 1.96
1271 : edgomez 1.102 pEnc->iFrameNum = 1;
1272 : Isibaar 1.1
1273 : edgomez 1.102 /* ---- update vol flags at IVOP ----------- */
1274 :     pEnc->mbParam.vol_flags = pEnc->current->vol_flags;
1275 : edgomez 1.41
1276 : edgomez 1.102 /* Aspect ratio */
1277 :     switch(frame->par) {
1278 :     case XVID_PAR_11_VGA:
1279 :     case XVID_PAR_43_PAL:
1280 :     case XVID_PAR_43_NTSC:
1281 :     case XVID_PAR_169_PAL:
1282 :     case XVID_PAR_169_NTSC:
1283 :     case XVID_PAR_EXT:
1284 :     pEnc->mbParam.par = frame->par;
1285 :     break;
1286 :     default:
1287 :     pEnc->mbParam.par = XVID_PAR_11_VGA;
1288 :     break;
1289 :     }
1290 : Isibaar 1.1
1291 : edgomez 1.102 /* For extended PAR only, we try to sanityse/simplify par values */
1292 :     if (pEnc->mbParam.par == XVID_PAR_EXT) {
1293 :     pEnc->mbParam.par_width = frame->par_width;
1294 :     pEnc->mbParam.par_height = frame->par_height;
1295 :     simplify_par(&pEnc->mbParam.par_width, &pEnc->mbParam.par_height);
1296 :     }
1297 : Isibaar 1.1
1298 : edgomez 1.102 if ((pEnc->mbParam.vol_flags & XVID_VOL_MPEGQUANT)) {
1299 :     if (frame->quant_intra_matrix != NULL)
1300 :     set_intra_matrix(pEnc->mbParam.mpeg_quant_matrices, frame->quant_intra_matrix);
1301 :     if (frame->quant_inter_matrix != NULL)
1302 :     set_inter_matrix(pEnc->mbParam.mpeg_quant_matrices, frame->quant_inter_matrix);
1303 :     }
1304 : Isibaar 1.1
1305 : edgomez 1.102 /* prevent vol/vop misuse */
1306 : Isibaar 1.1
1307 : edgomez 1.102 if (!(pEnc->current->vol_flags & XVID_VOL_REDUCED_ENABLE))
1308 :     pEnc->current->vop_flags &= ~XVID_VOP_REDUCED;
1309 : Isibaar 1.1
1310 : edgomez 1.102 if (!(pEnc->current->vol_flags & XVID_VOL_INTERLACING))
1311 :     pEnc->current->vop_flags &= ~(XVID_VOP_TOPFIELDFIRST|XVID_VOP_ALTERNATESCAN);
1312 : suxen_drol 1.27
1313 : edgomez 1.102 /* ^^^------------------------ */
1314 : edgomez 1.41
1315 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
1316 :     image_copy(&pEnc->sOriginal, &pEnc->current->image,
1317 :     pEnc->mbParam.edged_width, pEnc->mbParam.height);
1318 : Isibaar 1.1 }
1319 :    
1320 : edgomez 1.102 FrameCodeI(pEnc, &bs);
1321 :     xFrame->out_flags |= XVID_KEYFRAME;
1322 : Isibaar 1.1
1323 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1324 :     * encode this frame as an p-vop
1325 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1326 : Isibaar 1.1
1327 : edgomez 1.102 } else { /* (type == P_VOP || type == S_VOP) */
1328 : h 1.20
1329 : edgomez 1.102 DPRINTF(XVID_DEBUG_DEBUG,"*** PFRAME bf: head=%i tail=%i queue: head=%i tail=%i size=%i\n",
1330 :     pEnc->bframenum_head, pEnc->bframenum_tail,
1331 :     pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
1332 : h 1.20
1333 : edgomez 1.102 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
1334 :     image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "PVOP");
1335 :     }
1336 : h 1.20
1337 : edgomez 1.102 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
1338 :     image_copy(&pEnc->sOriginal, &pEnc->current->image,
1339 :     pEnc->mbParam.edged_width, pEnc->mbParam.height);
1340 :     }
1341 : h 1.20
1342 : edgomez 1.102 FrameCodeP(pEnc, &bs, 1, 0);
1343 : h 1.20 }
1344 :    
1345 : edgomez 1.41
1346 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1347 :     * on next enc_encode call we must flush bframes
1348 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1349 : edgomez 1.41
1350 : edgomez 1.102 /*done_flush:*/
1351 : h 1.26
1352 : edgomez 1.102 pEnc->flush_bframes = 1;
1353 : h 1.26
1354 : edgomez 1.102 /* packed & queued_bframes: dont bother outputting stats here, we do so after the flush */
1355 :     if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->bframenum_tail > 0) {
1356 :     goto repeat;
1357 : h 1.20 }
1358 :    
1359 : edgomez 1.102 /* packed or no-bframes or no-bframes-queued: output stats */
1360 :     if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) || pEnc->mbParam.max_bframes == 0 ) {
1361 :     call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
1362 :     }
1363 : h 1.20
1364 : edgomez 1.102 /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1365 :     * done; return number of bytes consumed
1366 :     * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
1367 : h 1.20
1368 : edgomez 1.102 done:
1369 : h 1.20
1370 : edgomez 1.102 stop_global_timer();
1371 :     write_timer();
1372 : h 1.20
1373 : edgomez 1.102 emms();
1374 :     return BitstreamLength(&bs);
1375 :     }
1376 : h 1.20
1377 :    
1378 : edgomez 1.102 static void SetMacroblockQuants(MBParam * const pParam, FRAMEINFO * frame)
1379 :     {
1380 :     unsigned int i;
1381 :     MACROBLOCK * pMB = frame->mbs;
1382 :     int quant = frame->mbs[0].quant; /* set by XVID_PLG_FRAME */
1383 :     if (quant > 31)
1384 :     frame->quant = quant = 31;
1385 :     else if (quant < 1)
1386 :     frame->quant = quant = 1;
1387 :    
1388 :     for (i = 0; i < pParam->mb_height * pParam->mb_width; i++) {
1389 :     quant += pMB->dquant;
1390 :     if (quant > 31)
1391 :     quant = 31;
1392 :     else if (quant < 1)
1393 :     quant = 1;
1394 :     pMB->quant = quant;
1395 :     pMB++;
1396 : h 1.20 }
1397 : edgomez 1.102 }
1398 : h 1.20
1399 :    
1400 : edgomez 1.102 static __inline void
1401 :     CodeIntraMB(Encoder * pEnc,
1402 :     MACROBLOCK * pMB)
1403 :     {
1404 : h 1.20
1405 : edgomez 1.102 pMB->mode = MODE_INTRA;
1406 : h 1.20
1407 : edgomez 1.102 /* zero mv statistics */
1408 :     pMB->mvs[0].x = pMB->mvs[1].x = pMB->mvs[2].x = pMB->mvs[3].x = 0;
1409 :     pMB->mvs[0].y = pMB->mvs[1].y = pMB->mvs[2].y = pMB->mvs[3].y = 0;
1410 :     pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = 0;
1411 :     pMB->sad16 = 0;
1412 : h 1.20
1413 : edgomez 1.102 if (pMB->dquant != 0) {
1414 :     pMB->mode = MODE_INTRA_Q;
1415 : h 1.20 }
1416 :     }
1417 :    
1418 :    
1419 : edgomez 1.102
1420 : edgomez 1.41 static int
1421 :     FrameCodeI(Encoder * pEnc,
1422 : edgomez 1.102 Bitstream * bs)
1423 : h 1.21 {
1424 : edgomez 1.102 int bits = BitstreamPos(bs);
1425 : edgomez 1.91 int mb_width = pEnc->mbParam.mb_width;
1426 :     int mb_height = pEnc->mbParam.mb_height;
1427 : h 1.21
1428 :     DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
1429 : edgomez 1.41 DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
1430 : h 1.21
1431 :     uint16_t x, y;
1432 :    
1433 : edgomez 1.102 if ((pEnc->current->vol_flags & XVID_VOL_REDUCED_ENABLE))
1434 : edgomez 1.91 {
1435 :     mb_width = (pEnc->mbParam.width + 31) / 32;
1436 :     mb_height = (pEnc->mbParam.height + 31) / 32;
1437 :    
1438 :     /* 16x16->8x8 downsample requires 1 additional edge pixel*/
1439 :     /* XXX: setedges is overkill */
1440 :     start_timer();
1441 : syskin 1.96 image_setedges(&pEnc->current->image,
1442 : edgomez 1.91 pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
1443 : edgomez 1.102 pEnc->mbParam.width, pEnc->mbParam.height, 0);
1444 : edgomez 1.91 stop_edges_timer();
1445 :     }
1446 : edgomez 1.102
1447 : suxen_drol 1.27 pEnc->mbParam.m_rounding_type = 1;
1448 :     pEnc->current->rounding_type = pEnc->mbParam.m_rounding_type;
1449 :     pEnc->current->coding_type = I_VOP;
1450 : h 1.21
1451 : edgomez 1.102 call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_FRAME, NULL, NULL, NULL);
1452 :    
1453 :     SetMacroblockQuants(&pEnc->mbParam, pEnc->current);
1454 :    
1455 : suxen_drol 1.27 BitstreamWriteVolHeader(bs, &pEnc->mbParam, pEnc->current);
1456 : edgomez 1.78
1457 : edgomez 1.91 set_timecodes(pEnc->current,pEnc->reference,pEnc->mbParam.fbase);
1458 :    
1459 : edgomez 1.101 BitstreamPad(bs);
1460 : h 1.21
1461 : edgomez 1.102 BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current, 1, pEnc->current->mbs[0].quant);
1462 : h 1.21
1463 : edgomez 1.91 pEnc->current->sStat.iTextBits = 0;
1464 :     pEnc->current->sStat.kblks = mb_width * mb_height;
1465 :     pEnc->current->sStat.mblks = pEnc->current->sStat.ublks = 0;
1466 : h 1.21
1467 : edgomez 1.91 for (y = 0; y < mb_height; y++)
1468 :     for (x = 0; x < mb_width; x++) {
1469 : edgomez 1.41 MACROBLOCK *pMB =
1470 :     &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
1471 : h 1.21
1472 :     CodeIntraMB(pEnc, pMB);
1473 :    
1474 : edgomez 1.41 MBTransQuantIntra(&pEnc->mbParam, pEnc->current, pMB, x, y,
1475 :     dct_codes, qcoeff);
1476 : h 1.21
1477 :     start_timer();
1478 : suxen_drol 1.27 MBPrediction(pEnc->current, x, y, pEnc->mbParam.mb_width, qcoeff);
1479 : h 1.21 stop_prediction_timer();
1480 :    
1481 :     start_timer();
1482 : edgomez 1.102 if (pEnc->current->vop_flags & XVID_VOP_GREYSCALE)
1483 : chl 1.68 { pMB->cbp &= 0x3C; /* keep only bits 5-2 */
1484 :     qcoeff[4*64+0]=0; /* zero, because for INTRA MBs DC value is saved */
1485 :     qcoeff[5*64+0]=0;
1486 :     }
1487 : edgomez 1.91 MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->current->sStat);
1488 : h 1.21 stop_coding_timer();
1489 :     }
1490 :    
1491 : edgomez 1.102 if ((pEnc->current->vop_flags & XVID_VOP_REDUCED))
1492 : edgomez 1.91 {
1493 : syskin 1.96 image_deblock_rrv(&pEnc->current->image, pEnc->mbParam.edged_width,
1494 : edgomez 1.91 pEnc->current->mbs, mb_width, mb_height, pEnc->mbParam.mb_width,
1495 : edgomez 1.102 16, 0);
1496 : edgomez 1.91 }
1497 : h 1.21 emms();
1498 :    
1499 : edgomez 1.102 BitstreamPadAlways(bs); /* next_start_code() at the end of VideoObjectPlane() */
1500 :    
1501 :     pEnc->current->length = (BitstreamPos(bs) - bits) / 8;
1502 :    
1503 : edgomez 1.91 pEnc->fMvPrevSigma = -1;
1504 : suxen_drol 1.27 pEnc->mbParam.m_fcode = 2;
1505 : h 1.21
1506 : edgomez 1.102 pEnc->current->is_edged = 0; /* not edged */
1507 :     pEnc->current->is_interpolated = -1; /* not interpolated (fake rounding -1) */
1508 : h 1.21
1509 : edgomez 1.93 return 1; /* intra */
1510 : h 1.21 }
1511 :    
1512 :    
1513 : Isibaar 1.1 #define INTRA_THRESHOLD 0.5
1514 : edgomez 1.91 #define BFRAME_SKIP_THRESHHOLD 30
1515 :    
1516 : Isibaar 1.1
1517 : edgomez 1.91 /* FrameCodeP also handles S(GMC)-VOPs */
1518 : edgomez 1.41 static int
1519 :     FrameCodeP(Encoder * pEnc,
1520 :     Bitstream * bs,
1521 :     bool force_inter,
1522 :     bool vol_header)
1523 : Isibaar 1.1 {
1524 : edgomez 1.3 float fSigma;
1525 : edgomez 1.102 int bits = BitstreamPos(bs);
1526 : edgomez 1.13
1527 :     DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
1528 : edgomez 1.41 DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
1529 : Isibaar 1.8
1530 : Isibaar 1.1 int iLimit;
1531 : edgomez 1.91 int x, y, k;
1532 : edgomez 1.3 int iSearchRange;
1533 : edgomez 1.102 int bIntra=0, skip_possible;
1534 :     FRAMEINFO *const current = pEnc->current;
1535 :     FRAMEINFO *const reference = pEnc->reference;
1536 :     MBParam * const pParam = &pEnc->mbParam;
1537 :     int mb_width = pParam->mb_width;
1538 :     int mb_height = pParam->mb_height;
1539 : syskin 1.96
1540 : Isibaar 1.1
1541 : edgomez 1.102 /* IMAGE *pCurrent = &current->image; */
1542 :     IMAGE *pRef = &reference->image;
1543 :    
1544 :     if ((current->vop_flags & XVID_VOP_REDUCED))
1545 : edgomez 1.91 {
1546 : edgomez 1.102 mb_width = (pParam->width + 31) / 32;
1547 :     mb_height = (pParam->height + 31) / 32;
1548 : edgomez 1.91 }
1549 :    
1550 : Isibaar 1.1
1551 : edgomez 1.102 if (!reference->is_edged) {
1552 :     start_timer();
1553 :     image_setedges(pRef, pParam->edged_width, pParam->edged_height,
1554 :     pParam->width, pParam->height, 0);
1555 :     stop_edges_timer();
1556 :     reference->is_edged = 1;
1557 :     }
1558 :    
1559 :     pParam->m_rounding_type = 1 - pParam->m_rounding_type;
1560 :     current->rounding_type = pParam->m_rounding_type;
1561 :     current->fcode = pParam->m_fcode;
1562 : Isibaar 1.1
1563 :     if (!force_inter)
1564 : edgomez 1.91 iLimit = (int)(mb_width * mb_height * INTRA_THRESHOLD);
1565 : edgomez 1.3 else
1566 : edgomez 1.91 iLimit = mb_width * mb_height + 1;
1567 : Isibaar 1.1
1568 : edgomez 1.102 if ((current->vop_flags & XVID_VOP_HALFPEL)) {
1569 :     if (reference->is_interpolated != current->rounding_type) {
1570 :     start_timer();
1571 :     image_interpolate(pRef, &pEnc->vInterH, &pEnc->vInterV,
1572 :     &pEnc->vInterHV, pParam->edged_width,
1573 :     pParam->edged_height,
1574 :     (pParam->vol_flags & XVID_VOL_QUARTERPEL),
1575 :     current->rounding_type);
1576 :     stop_inter_timer();
1577 :     reference->is_interpolated = current->rounding_type;
1578 :     }
1579 : Isibaar 1.1 }
1580 :    
1581 : edgomez 1.102 current->coding_type = P_VOP;
1582 :    
1583 :     call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_FRAME, NULL, NULL, NULL);
1584 :    
1585 :     SetMacroblockQuants(&pEnc->mbParam, current);
1586 : syskin 1.96
1587 : Isibaar 1.1 start_timer();
1588 : edgomez 1.102 if (current->vol_flags & XVID_VOL_GMC ) /* GMC only for S(GMC)-VOPs */
1589 :     { int gmcval;
1590 :     current->warp = GlobalMotionEst( current->mbs, pParam, current, reference,
1591 :     &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV);
1592 :    
1593 :     if (current->motion_flags & XVID_ME_GME_REFINE) {
1594 :     gmcval = GlobalMotionEstRefine(&current->warp,
1595 :     current->mbs, pParam,
1596 :     current, reference,
1597 :     &current->image,
1598 :     &reference->image,
1599 :     &pEnc->vInterH,
1600 :     &pEnc->vInterV,
1601 :     &pEnc->vInterHV);
1602 :     } else {
1603 :     gmcval = globalSAD(&current->warp, pParam, current->mbs,
1604 :     current,
1605 :     &reference->image,
1606 :     &current->image,
1607 :     pEnc->vGMC.y);
1608 :     }
1609 :    
1610 :     gmcval += /*current->quant*/ 2 * (int)(pParam->mb_width*pParam->mb_height);
1611 :    
1612 :     /* 1st '3': 3 warpoints, 2nd '3': 16th pel res (2<<3) */
1613 :     generate_GMCparameters( 3, 3, &current->warp,
1614 :     pParam->width, pParam->height,
1615 :     &current->new_gmc_data);
1616 :    
1617 :     if ( (gmcval<0) && ( (current->warp.duv[1].x != 0) || (current->warp.duv[1].y != 0) ||
1618 :     (current->warp.duv[2].x != 0) || (current->warp.duv[2].y != 0) ) )
1619 :     {
1620 :     current->coding_type = S_VOP;
1621 :    
1622 :     generate_GMCimage(&current->new_gmc_data, &reference->image,
1623 :     pParam->mb_width, pParam->mb_height,
1624 :     pParam->edged_width, pParam->edged_width/2,
1625 :     pParam->m_fcode, ((pParam->vol_flags & XVID_VOL_QUARTERPEL)?1:0), 0,
1626 :     current->rounding_type, current->mbs, &pEnc->vGMC);
1627 :    
1628 :     } else {
1629 : edgomez 1.91
1630 : edgomez 1.102 generate_GMCimage(&current->new_gmc_data, &reference->image,
1631 :     pParam->mb_width, pParam->mb_height,
1632 :     pParam->edged_width, pParam->edged_width/2,
1633 :     pParam->m_fcode, ((pParam->vol_flags & XVID_VOL_QUARTERPEL)?1:0), 0,
1634 :     current->rounding_type, current->mbs, NULL); /* no warping, just AMV */
1635 :     }
1636 :     }
1637 : Isibaar 1.1
1638 : edgomez 1.102 bIntra =
1639 :     MotionEstimation(&pEnc->mbParam, current, reference,
1640 :     &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
1641 :     &pEnc->vGMC, iLimit);
1642 : edgomez 1.91
1643 :    
1644 : edgomez 1.102 stop_motion_timer();
1645 : edgomez 1.91
1646 : edgomez 1.102 if (bIntra == 1) return FrameCodeI(pEnc, bs);
1647 : Isibaar 1.1
1648 : edgomez 1.102 set_timecodes(current,reference,pParam->fbase);
1649 : edgomez 1.41 if (vol_header)
1650 : edgomez 1.102 { BitstreamWriteVolHeader(bs, &pEnc->mbParam, current);
1651 : edgomez 1.101 BitstreamPad(bs);
1652 : edgomez 1.91 }
1653 : Isibaar 1.1
1654 : edgomez 1.102 BitstreamWriteVopHeader(bs, &pEnc->mbParam, current, 1, current->mbs[0].quant);
1655 : edgomez 1.3
1656 : edgomez 1.102 current->sStat.iTextBits = current->sStat.iMvSum = current->sStat.iMvCount =
1657 :     current->sStat.kblks = current->sStat.mblks = current->sStat.ublks = 0;
1658 : edgomez 1.91
1659 : Isibaar 1.1
1660 : edgomez 1.91 for (y = 0; y < mb_height; y++) {
1661 :     for (x = 0; x < mb_width; x++) {
1662 : edgomez 1.41 MACROBLOCK *pMB =
1663 : edgomez 1.102 &current->mbs[x + y * pParam->mb_width];
1664 : edgomez 1.91
1665 : edgomez 1.3 bIntra = (pMB->mode == MODE_INTRA) || (pMB->mode == MODE_INTRA_Q);
1666 : Isibaar 1.1
1667 : edgomez 1.91 if (bIntra) {
1668 : Isibaar 1.1 CodeIntraMB(pEnc, pMB);
1669 : edgomez 1.102 MBTransQuantIntra(&pEnc->mbParam, current, pMB, x, y,
1670 : edgomez 1.41 dct_codes, qcoeff);
1671 : chl 1.81
1672 :     start_timer();
1673 : edgomez 1.102 MBPrediction(current, x, y, pParam->mb_width, qcoeff);
1674 : chl 1.81 stop_prediction_timer();
1675 : edgomez 1.91
1676 : edgomez 1.102 current->sStat.kblks++;
1677 : edgomez 1.91
1678 : edgomez 1.102 if (pEnc->current->vop_flags & XVID_VOP_GREYSCALE)
1679 :     { pMB->cbp &= 0x3C; /* keep only bits 5-2 */
1680 :     qcoeff[4*64+0]=0; /* zero, because for INTRA MBs DC value is saved */
1681 :     qcoeff[5*64+0]=0;
1682 :     }
1683 :     MBCoding(current, pMB, qcoeff, bs, &current->sStat);
1684 : edgomez 1.91 stop_coding_timer();
1685 :     continue;
1686 :     }
1687 :    
1688 :     start_timer();
1689 : edgomez 1.102 MBMotionCompensation(pMB, x, y, &reference->image,
1690 : edgomez 1.91 &pEnc->vInterH, &pEnc->vInterV,
1691 : syskin 1.96 &pEnc->vInterHV, &pEnc->vGMC,
1692 : edgomez 1.102 &current->image,
1693 :     dct_codes, pParam->width,
1694 :     pParam->height,
1695 :     pParam->edged_width,
1696 :     (current->vol_flags & XVID_VOL_QUARTERPEL),
1697 :     (current->vop_flags & XVID_VOP_REDUCED),
1698 :     current->rounding_type);
1699 : edgomez 1.91
1700 :     stop_comp_timer();
1701 :    
1702 :     pMB->field_pred = 0;
1703 :    
1704 :     if (pMB->mode != MODE_NOT_CODED)
1705 :     { pMB->cbp =
1706 : edgomez 1.102 MBTransQuantInter(&pEnc->mbParam, current, pMB, x, y,
1707 : edgomez 1.91 dct_codes, qcoeff);
1708 :     }
1709 :    
1710 : edgomez 1.102 if (pMB->dquant != 0)
1711 :     MBSetDquant(pMB, x, y, &pEnc->mbParam);
1712 :    
1713 :    
1714 : edgomez 1.91 if (pMB->cbp || pMB->mvs[0].x || pMB->mvs[0].y ||
1715 :     pMB->mvs[1].x || pMB->mvs[1].y || pMB->mvs[2].x ||
1716 :     pMB->mvs[2].y || pMB->mvs[3].x || pMB->mvs[3].y) {
1717 : edgomez 1.102 current->sStat.mblks++;
1718 : chl 1.64 } else {
1719 : edgomez 1.102 current->sStat.ublks++;
1720 : edgomez 1.91 }
1721 : edgomez 1.102
1722 : Isibaar 1.1 start_timer();
1723 : chl 1.65
1724 :     /* Finished processing the MB, now check if to CODE or SKIP */
1725 :    
1726 : edgomez 1.91 skip_possible = (pMB->cbp == 0) && (pMB->mode == MODE_INTER) &&
1727 : edgomez 1.102 (pMB->dquant == 0);
1728 :    
1729 :     if (current->coding_type == S_VOP)
1730 : edgomez 1.91 skip_possible &= (pMB->mcsel == 1);
1731 : edgomez 1.102 else if (current->coding_type == P_VOP) {
1732 :     if ((pParam->vol_flags & XVID_VOL_QUARTERPEL))
1733 : edgomez 1.91 skip_possible &= ( (pMB->qmvs[0].x == 0) && (pMB->qmvs[0].y == 0) );
1734 : syskin 1.96 else
1735 : edgomez 1.91 skip_possible &= ( (pMB->mvs[0].x == 0) && (pMB->mvs[0].y == 0) );
1736 :     }
1737 :    
1738 :     if ( (pMB->mode == MODE_NOT_CODED) || (skip_possible)) {
1739 :    
1740 :     /* This is a candidate for SKIPping, but for P-VOPs check intermediate B-frames first */
1741 :    
1742 : edgomez 1.102 if (current->coding_type == P_VOP) /* special rule for P-VOP's SKIP */
1743 : edgomez 1.91 {
1744 : syskin 1.96 int bSkip = 1;
1745 : edgomez 1.102
1746 : edgomez 1.91 for (k=pEnc->bframenum_head; k< pEnc->bframenum_tail; k++)
1747 :     {
1748 :     int iSAD;
1749 : edgomez 1.102 iSAD = sad16(reference->image.y + 16*y*pParam->edged_width + 16*x,
1750 :     pEnc->bframes[k]->image.y + 16*y*pParam->edged_width + 16*x,
1751 :     pParam->edged_width,BFRAME_SKIP_THRESHHOLD);
1752 : edgomez 1.91 if (iSAD >= BFRAME_SKIP_THRESHHOLD * pMB->quant)
1753 : syskin 1.96 { bSkip = 0;
1754 : edgomez 1.91 break;
1755 :     }
1756 :     }
1757 : edgomez 1.102
1758 : edgomez 1.91 if (!bSkip) { /* no SKIP, but trivial block */
1759 : edgomez 1.102 if((pParam->vol_flags & XVID_VOL_QUARTERPEL)) {
1760 :     VECTOR predMV = get_qpmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
1761 : syskin 1.96 pMB->pmvs[0].x = - predMV.x;
1762 :     pMB->pmvs[0].y = - predMV.y;
1763 : edgomez 1.91 }
1764 :     else {
1765 : edgomez 1.102 VECTOR predMV = get_pmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
1766 : syskin 1.96 pMB->pmvs[0].x = - predMV.x;
1767 :     pMB->pmvs[0].y = - predMV.y;
1768 : edgomez 1.91 }
1769 :     pMB->mode = MODE_INTER;
1770 :     pMB->cbp = 0;
1771 : edgomez 1.102 MBCoding(current, pMB, qcoeff, bs, &current->sStat);
1772 : edgomez 1.91 stop_coding_timer();
1773 :    
1774 :     continue; /* next MB */
1775 :     }
1776 :     }
1777 :     /* do SKIP */
1778 :    
1779 :     pMB->mode = MODE_NOT_CODED;
1780 :     MBSkip(bs);
1781 :     stop_coding_timer();
1782 :     continue; /* next MB */
1783 :     }
1784 :     /* ordinary case: normal coded INTER/INTER4V block */
1785 : chl 1.65
1786 : edgomez 1.102 if ((current->vop_flags & XVID_VOP_GREYSCALE))
1787 : edgomez 1.91 { pMB->cbp &= 0x3C; /* keep only bits 5-2 */
1788 :     qcoeff[4*64+0]=0; /* zero, because DC for INTRA MBs DC value is saved */
1789 :     qcoeff[5*64+0]=0;
1790 :     }
1791 : chl 1.65
1792 : edgomez 1.102 if((pParam->vol_flags & XVID_VOL_QUARTERPEL)) {
1793 :     VECTOR predMV = get_qpmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
1794 :     pMB->pmvs[0].x = pMB->qmvs[0].x - predMV.x;
1795 : syskin 1.96 pMB->pmvs[0].y = pMB->qmvs[0].y - predMV.y;
1796 : edgomez 1.102 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[0].x, pMB->pmvs[0].y, predMV.x, predMV.y, pMB->mvs[0].x, pMB->mvs[0].y);
1797 : edgomez 1.91 } else {
1798 : edgomez 1.102 VECTOR predMV = get_pmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
1799 : syskin 1.96 pMB->pmvs[0].x = pMB->mvs[0].x - predMV.x;
1800 :     pMB->pmvs[0].y = pMB->mvs[0].y - predMV.y;
1801 : edgomez 1.102 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[0].x, pMB->pmvs[0].y, predMV.x, predMV.y, pMB->mvs[0].x, pMB->mvs[0].y);
1802 : edgomez 1.78 }
1803 : edgomez 1.91
1804 :    
1805 :     if (pMB->mode == MODE_INTER4V)
1806 :     { int k;
1807 :     for (k=1;k<4;k++)
1808 :     {
1809 : edgomez 1.102 if((pParam->vol_flags & XVID_VOL_QUARTERPEL)) {
1810 :     VECTOR predMV = get_qpmv2(current->mbs, pParam->mb_width, 0, x, y, k);
1811 :     pMB->pmvs[k].x = pMB->qmvs[k].x - predMV.x;
1812 : syskin 1.96 pMB->pmvs[k].y = pMB->qmvs[k].y - predMV.y;
1813 : edgomez 1.102 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[k].x, pMB->pmvs[k].y, predMV.x, predMV.y, pMB->mvs[k].x, pMB->mvs[k].y);
1814 : edgomez 1.91 } else {
1815 : edgomez 1.102 VECTOR predMV = get_pmv2(current->mbs, pParam->mb_width, 0, x, y, k);
1816 : syskin 1.96 pMB->pmvs[k].x = pMB->mvs[k].x - predMV.x;
1817 :     pMB->pmvs[k].y = pMB->mvs[k].y - predMV.y;
1818 : edgomez 1.102 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[k].x, pMB->pmvs[k].y, predMV.x, predMV.y, pMB->mvs[k].x, pMB->mvs[k].y);
1819 : edgomez 1.91 }
1820 :    
1821 : chl 1.68 }
1822 : chl 1.65 }
1823 : edgomez 1.102
1824 :     MBCoding(current, pMB, qcoeff, bs, &pEnc->current->sStat);
1825 : edgomez 1.91 stop_coding_timer();
1826 : chl 1.65
1827 : Isibaar 1.1 }
1828 :     }
1829 :    
1830 : edgomez 1.102 if ((current->vop_flags & XVID_VOP_REDUCED))
1831 : edgomez 1.91 {
1832 : edgomez 1.102 image_deblock_rrv(&current->image, pParam->edged_width,
1833 :     current->mbs, mb_width, mb_height, pParam->mb_width,
1834 :     16, 0);
1835 : edgomez 1.91 }
1836 :    
1837 : Isibaar 1.1 emms();
1838 : h 1.20
1839 : edgomez 1.102 if (current->sStat.iMvCount == 0)
1840 :     current->sStat.iMvCount = 1;
1841 : Isibaar 1.1
1842 : edgomez 1.102 fSigma = (float) sqrt((float) current->sStat.iMvSum / current->sStat.iMvCount);
1843 : Isibaar 1.1
1844 : edgomez 1.102 iSearchRange = 1 << (3 + pParam->m_fcode);
1845 : Isibaar 1.1
1846 : edgomez 1.41 if ((fSigma > iSearchRange / 3)
1847 : edgomez 1.102 && (pParam->m_fcode <= (3 + (pParam->vol_flags & XVID_VOL_QUARTERPEL?1:0) ))) /* maximum search range 128 */
1848 : edgomez 1.3 {
1849 : edgomez 1.102 pParam->m_fcode++;
1850 : Isibaar 1.1 iSearchRange *= 2;
1851 : edgomez 1.41 } else if ((fSigma < iSearchRange / 6)
1852 : edgomez 1.91 && (pEnc->fMvPrevSigma >= 0)
1853 :     && (pEnc->fMvPrevSigma < iSearchRange / 6)
1854 : edgomez 1.102 && (pParam->m_fcode >= (2 + (pParam->vol_flags & XVID_VOL_QUARTERPEL?1:0) ))) /* minimum search range 16 */
1855 : edgomez 1.3 {
1856 : edgomez 1.102 pParam->m_fcode--;
1857 : Isibaar 1.1 iSearchRange /= 2;
1858 : edgomez 1.3 }
1859 : Isibaar 1.1
1860 : edgomez 1.91 pEnc->fMvPrevSigma = fSigma;
1861 :    
1862 :     /* frame drop code */
1863 : edgomez 1.102 #if 0
1864 :     DPRINTF(XVID_DEBUG_DEBUG, "kmu %i %i %i\n", current->sStat.kblks, current->sStat.mblks, current->sStat.ublks);
1865 :     #endif
1866 :     if (current->sStat.kblks + current->sStat.mblks <
1867 :     (pParam->frame_drop_ratio * mb_width * mb_height) / 100)
1868 : edgomez 1.91 {
1869 : edgomez 1.102 current->sStat.kblks = current->sStat.mblks = 0;
1870 :     current->sStat.ublks = mb_width * mb_height;
1871 : edgomez 1.91
1872 :     BitstreamReset(bs);
1873 :    
1874 : edgomez 1.102 set_timecodes(current,reference,pParam->fbase);
1875 :     BitstreamWriteVopHeader(bs, &pEnc->mbParam, current, 0, current->mbs[0].quant);
1876 : edgomez 1.91
1877 : edgomez 1.93 /* copy reference frame details into the current frame */
1878 : edgomez 1.102 current->quant = reference->quant;
1879 :     current->motion_flags = reference->motion_flags;
1880 :     current->rounding_type = reference->rounding_type;
1881 :     current->fcode = reference->fcode;
1882 :     current->bcode = reference->bcode;
1883 :     image_copy(&current->image, &reference->image, pParam->edged_width, pParam->height);
1884 :     memcpy(current->mbs, reference->mbs, sizeof(MACROBLOCK) * mb_width * mb_height);
1885 :     }
1886 :    
1887 :     pEnc->current->is_edged = 0; /* not edged */
1888 :     pEnc->current->is_interpolated = -1; /* not interpolated (fake rounding -1) */
1889 :    
1890 :     /* what was this frame's interpolated reference will become
1891 :     forward (past) reference in b-frame coding */
1892 :    
1893 :     image_swap(&pEnc->vInterH, &pEnc->f_refh);
1894 :     image_swap(&pEnc->vInterV, &pEnc->f_refv);
1895 :     image_swap(&pEnc->vInterHV, &pEnc->f_refhv);
1896 :    
1897 : edgomez 1.91
1898 :     /* XXX: debug
1899 :     {
1900 :     char s[100];
1901 :     sprintf(s, "\\%05i_cur.pgm", pEnc->m_framenum);
1902 : edgomez 1.102 image_dump_yuvpgm(&current->image,
1903 :     pParam->edged_width,
1904 :     pParam->width, pParam->height, s);
1905 :    
1906 : edgomez 1.91 sprintf(s, "\\%05i_ref.pgm", pEnc->m_framenum);
1907 : edgomez 1.102 image_dump_yuvpgm(&reference->image,
1908 :     pParam->edged_width,
1909 :     pParam->width, pParam->height, s);
1910 : syskin 1.96 }
1911 : edgomez 1.91 */
1912 :    
1913 : edgomez 1.102 BitstreamPadAlways(bs); /* next_start_code() at the end of VideoObjectPlane() */
1914 : suxen_drol 1.60
1915 : edgomez 1.102 current->length = (BitstreamPos(bs) - bits) / 8;
1916 : Isibaar 1.1
1917 : edgomez 1.93 return 0; /* inter */
1918 : edgomez 1.91 }
1919 :    
1920 :    
1921 :     static void
1922 :     FrameCodeB(Encoder * pEnc,
1923 :     FRAMEINFO * frame,
1924 : edgomez 1.102 Bitstream * bs)
1925 : edgomez 1.91 {
1926 : edgomez 1.102 int bits = BitstreamPos(bs);
1927 : edgomez 1.91 DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
1928 :     DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
1929 :     uint32_t x, y;
1930 :    
1931 :     IMAGE *f_ref = &pEnc->reference->image;
1932 :     IMAGE *b_ref = &pEnc->current->image;
1933 :    
1934 : edgomez 1.102 #ifdef BFRAMES_DEC_DEBUG
1935 : edgomez 1.91 FILE *fp;
1936 :     static char first=0;
1937 :     #define BFRAME_DEBUG if (!first && fp){ \
1938 :     fprintf(fp,"Y=%3d X=%3d MB=%2d CBP=%02X\n",y,x,mb->mode,mb->cbp); \
1939 :     }
1940 :    
1941 : edgomez 1.102 /* XXX: pEnc->current->global_flags &= ~XVID_VOP_REDUCED; reduced resoltion not yet supported */
1942 : edgomez 1.91
1943 :     if (!first){
1944 :     fp=fopen("C:\\XVIDDBGE.TXT","w");
1945 :     }
1946 :     #endif
1947 :    
1948 : edgomez 1.102 /* forward */
1949 :     if (!pEnc->reference->is_edged) {
1950 :     image_setedges(f_ref, pEnc->mbParam.edged_width,
1951 :     pEnc->mbParam.edged_height, pEnc->mbParam.width,
1952 :     pEnc->mbParam.height, 0);
1953 :     pEnc->current->is_edged = 1;
1954 :     }
1955 : syskin 1.96
1956 : edgomez 1.102 if (pEnc->reference->is_interpolated != 0) {
1957 :     start_timer();
1958 :     image_interpolate(f_ref, &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
1959 :     pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
1960 :     (pEnc->mbParam.vol_flags & XVID_VOL_QUARTERPEL), 0);
1961 :     stop_inter_timer();
1962 :     pEnc->reference->is_interpolated = 0;
1963 :     }
1964 : edgomez 1.91
1965 : edgomez 1.93 /* backward */
1966 : edgomez 1.102 if (!pEnc->current->is_edged) {
1967 :     image_setedges(b_ref, pEnc->mbParam.edged_width,
1968 :     pEnc->mbParam.edged_height, pEnc->mbParam.width,
1969 :     pEnc->mbParam.height, 0);
1970 :     pEnc->current->is_edged = 1;
1971 :     }
1972 :    
1973 :     if (pEnc->current->is_interpolated != 0) {
1974 :     start_timer();
1975 :     image_interpolate(b_ref, &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
1976 :     pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
1977 :     (pEnc->mbParam.vol_flags & XVID_VOL_QUARTERPEL), 0);
1978 :     stop_inter_timer();
1979 :     pEnc->current->is_interpolated = 0;
1980 :     }
1981 :    
1982 :     frame->coding_type = B_VOP;
1983 :     call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_FRAME, NULL, NULL, NULL);
1984 : edgomez 1.91
1985 :     start_timer();
1986 : syskin 1.96 MotionEstimationBVOP(&pEnc->mbParam, frame,
1987 : edgomez 1.93 ((int32_t)(pEnc->current->stamp - frame->stamp)), /* time_bp */
1988 :     ((int32_t)(pEnc->current->stamp - pEnc->reference->stamp)), /* time_pp */
1989 :     pEnc->reference->mbs, f_ref,
1990 : edgomez 1.91 &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
1991 :     pEnc->current, b_ref, &pEnc->vInterH,
1992 :     &pEnc->vInterV, &pEnc->vInterHV);
1993 :     stop_motion_timer();
1994 :    
1995 :     set_timecodes(frame, pEnc->reference,pEnc->mbParam.fbase);
1996 : edgomez 1.102 BitstreamWriteVopHeader(bs, &pEnc->mbParam, frame, 1, frame->quant);
1997 : edgomez 1.91
1998 :     frame->sStat.iTextBits = 0;
1999 :     frame->sStat.iMvSum = 0;
2000 :     frame->sStat.iMvCount = 0;
2001 :     frame->sStat.kblks = frame->sStat.mblks = frame->sStat.ublks = 0;
2002 : edgomez 1.102 frame->sStat.mblks = pEnc->mbParam.mb_width * pEnc->mbParam.mb_height;
2003 :     frame->sStat.kblks = frame->sStat.ublks = 0;
2004 : edgomez 1.91
2005 :     for (y = 0; y < pEnc->mbParam.mb_height; y++) {
2006 :     for (x = 0; x < pEnc->mbParam.mb_width; x++) {
2007 :     MACROBLOCK * const mb = &frame->mbs[x + y * pEnc->mbParam.mb_width];
2008 :    
2009 : edgomez 1.93 /* decoder ignores mb when refence block is INTER(0,0), CBP=0 */
2010 : edgomez 1.91 if (mb->mode == MODE_NOT_CODED) {
2011 : edgomez 1.102 if (pEnc->mbParam.plugin_flags & XVID_REQORIGINAL) {
2012 :     MBMotionCompensation(mb, x, y, f_ref, NULL, f_ref, NULL, NULL, &frame->image,
2013 :     NULL, 0, 0, pEnc->mbParam.edged_width, 0, 0, 0);
2014 :     }
2015 :    
2016 : edgomez 1.91 continue;
2017 :     }
2018 :    
2019 : edgomez 1.102 if (mb->mode != MODE_DIRECT_NONE_MV || pEnc->mbParam.plugin_flags & XVID_REQORIGINAL) {
2020 : edgomez 1.91 MBMotionCompensationBVOP(&pEnc->mbParam, mb, x, y, &frame->image,
2021 :     f_ref, &pEnc->f_refh, &pEnc->f_refv,
2022 :     &pEnc->f_refhv, b_ref, &pEnc->vInterH,
2023 :     &pEnc->vInterV, &pEnc->vInterHV,
2024 :     dct_codes);
2025 :    
2026 :     if (mb->mode == MODE_DIRECT_NO4V) mb->mode = MODE_DIRECT;
2027 :     mb->quant = frame->quant;
2028 : edgomez 1.102
2029 :     if (mb->mode != MODE_DIRECT_NONE_MV)
2030 :     mb->cbp = MBTransQuantInterBVOP(&pEnc->mbParam, frame, mb, x, y, dct_codes, qcoeff);
2031 : edgomez 1.91
2032 :     if ( (mb->mode == MODE_DIRECT) && (mb->cbp == 0)
2033 :     && (mb->pmvs[3].x == 0) && (mb->pmvs[3].y == 0) ) {
2034 : edgomez 1.93 mb->mode = MODE_DIRECT_NONE_MV; /* skipped */
2035 : edgomez 1.91 }
2036 :     }
2037 :    
2038 : edgomez 1.102 /* keep only bits 5-2 -- Chroma blocks will just be skipped by the
2039 :     * coding function for BFrames, that's why we don't zero teh DC
2040 :     * coeffs */
2041 :     if ((frame->vop_flags & XVID_VOP_GREYSCALE))
2042 :     mb->cbp &= 0x3C;
2043 :    
2044 : edgomez 1.91 start_timer();
2045 : edgomez 1.102 MBCodingBVOP(frame, mb, qcoeff, frame->fcode, frame->bcode, bs,
2046 :     &frame->sStat);
2047 : edgomez 1.91 stop_coding_timer();
2048 :     }
2049 :     }
2050 :    
2051 :     emms();
2052 :    
2053 : edgomez 1.93 /* TODO: dynamic fcode/bcode ??? */
2054 : edgomez 1.91
2055 : edgomez 1.102 BitstreamPadAlways(bs); /* next_start_code() at the end of VideoObjectPlane() */
2056 :     frame->length = (BitstreamPos(bs) - bits) / 8;
2057 : edgomez 1.91
2058 :     #ifdef BFRAMES_DEC_DEBUG
2059 :     if (!first){
2060 :     first=1;
2061 :     if (fp)
2062 :     fclose(fp);
2063 :     }
2064 :     #endif
2065 : suxen_drol 1.24 }

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