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

Annotation of /xvidcore/src/encoder.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.95.2.33 - (view) (download)

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

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