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

Annotation of /xvidcore/src/encoder.c

Parent Directory Parent Directory | Revision Log Revision Log


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

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