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

Annotation of /xvidcore/src/encoder.c

Parent Directory Parent Directory | Revision Log Revision Log


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

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