[svn] / trunk / xvidcore / examples / xvid_stat.c Repository:
ViewVC logotype

Diff of /trunk/xvidcore/examples/xvid_stat.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 211, Fri Jun 14 15:36:22 2002 UTC revision 728, Wed Dec 18 20:48:25 2002 UTC
# Line 1  Line 1 
1  /**************************************************************************  /*****************************************************************************
2   *   *
3   *      XVID MPEG-4 VIDEO CODEC - Example for encoding and decoding   *  XVID MPEG-4 VIDEO CODEC
4     *  - Console based test application  -
5     *
6     *  Copyright(C) 2002 Christoph Lampert
7   *   *
8   *      This program is free software; you can redistribute it and/or modify   *      This program is free software; you can redistribute it and/or modify
9   *      it under the terms of the GNU General Public License as published by   *      it under the terms of the GNU General Public License as published by
# Line 14  Line 17 
17   *   *
18   *      You should have received a copy of the GNU General Public License   *      You should have received a copy of the GNU General Public License
19   *      along with this program; if not, write to the Free Software   *      along with this program; if not, write to the Free Software
20   *      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
21   *   *
22   *************************************************************************/   * $Id: xvid_stat.c,v 1.17 2002-12-18 20:48:25 edgomez Exp $
   
 /************************************************************************  
23   *   *
24   *  PSNR and Speed test routine for XviD using the XviD-API   ****************************************************************************/
25   *  (C) Christoph Lampert, 2002/04/13  
26    /*****************************************************************************
27     *  Application notes :
28   *   *
29   *  A sequence of YUV pics in PGM file format is encoded and decoded   *  A sequence of YUV pics in PGM file format is encoded and decoded
30   *  The speed is measured and PSNR of decoded picture is calculated.   *  The speed is measured and PSNR of decoded picture is calculated.
31   *   *
32   *  The program is plain C and needs no libraries except for libxvidcore,   *  The program is plain C and needs no libraries except for libxvidcore,
33   *  and maths-lib ,so with UN*X you simply compile by   *  and maths-lib.
  *  
  *   gcc xvid_stat.c -lxvidcore -lm -o xvid_stat  
  *  
  *  Run without or with illegal parameters, then PGM input input is read  
  *  from stdin.  
  *  
  *  Parameters are: xvid_stat XDIM YDIM QUALITY BITRATE/QUANTIZER FRAMERATE  
  *  
  *  if XDIM or YDIM are illegal (e.g. 0), they are ignored and input is  
  *  considered to be PGM. Otherwise (X and Y both greater than 0) raw YUV  
  *  is expected, as e.g. the standard MPEG test-files, like "foreman"  
  *  
  *  0 <= QUALITY <= 6  (default 5)  
  *  
  *  BITRATE is in kbps (default 900),  
  *      if BITRATE<32, then value is taken is fixed QUANTIZER  
34   *   *
35   *  FRAMERATE is a float (with or without decimal dot), default is 25.00   * Usage : xvid_stat [OPTIONS]
36     * Options :
37     *  -w integer     : frame width ([1.2048])
38     *  -h integer     : frame height ([1.2048])
39     *  -b integer     : target bitrate (>0 | default=900kbit)
40     *  -f float       : target framerate (>0)
41     *  -i string      : input filename (default=stdin)
42     *  -t integer     : input data type (yuv=0, pgm=1)
43     *  -n integer     : number of frames to encode
44     *  -q integer     : quality ([0..5])
45     *  -d boolean     : save decoder output (0 False*, !=0 True)
46     *  -m boolean     : save mpeg4 raw stream (0 False*, !=0 True)
47     *  -mv integer    : Hinted Motion Estimation (0 none, 1 get hints, 2 set hints)
48     *  -help          : prints this help message
49     *  -quant integer : fixed quantizer (disables -b setting)
50     *  (* means default)
51     *
52     *  An input file named "stdin" is treated as standard input stream.
53     *
54     *
55     *  PGM input must be in a very specific format, basically it pgm file must
56     *  contain Y plane first just like usual P5 pgm files, and then U and V
57     *  planes are stored just after Y plane so y dimension is y*3/2 in reality
58   *   *
59   *  input/output and m4v-output is saved, if corresponding flags are set   *  See read_pgmheader for more details.
60   *   *
61   *  PGM input must in a very specific format, see read_pgmheader   *  Such a PGM file can be generated from MPEG2 by # mpeg2dec -o pgmpipe
  *  it can be generated e.g. from MPEG2 by    mpeg2dec -o pgmpipe  
62   *   *
63   ************************************************************************/   ****************************************************************************/
   
 /************************************************************************  
  *  
  *  For EXAMPLES how to use this, see the seperate file xvid_stat.examples  
  *  
  ************************************************************************/  
64    
65  #include <stdio.h>  #include <stdio.h>
66  #include <stdlib.h>  #include <stdlib.h>
67  #include <math.h>               // needed for log10  #include <string.h>
68  #include <sys/time.h>           // only needed for gettimeofday  #include <math.h>
69    #ifndef _MSC_VER
70    #include <sys/time.h>
71    #else
72    #include <time.h>
73    #endif
74    
75    #include "xvid.h"
76    
77  #include "../src/xvid.h"                /* comes with XviD */  /****************************************************************************
78     *                               Prototypes
79     ***************************************************************************/
80    
81    /* Prints program usage message */
82    static void usage();
83    
84    /* Statistical functions */
85    static double msecond();
86    static double absdistq(int x, int y,
87                                               unsigned char* buf1, int stride1,
88                                               unsigned char* buf2, int stride2);
89    static double PSNR(int x, int y,
90                                       unsigned char* buf1, int stride1,
91                                       unsigned char* buf2, int stride2);
92    
93    /* PGM related functions */
94    static int read_pgmheader(FILE* handle);
95    static int read_pgmdata(FILE* handle, unsigned char *image);
96    static int read_yuvdata(FILE* handle, unsigned char *image);
97    static int write_pgm(char *filename, unsigned char *image);
98    
99    /* Encoder related functions */
100    static int enc_init(int use_assembler);
101    static int enc_stop();
102    static int enc_main(unsigned char* image, unsigned char* bitstream,
103                                            unsigned char* hints_buffer,
104                                            long *streamlength, long* frametype, long* hints_size);
105    
106    /* Decoder related functions */
107    static int dec_stop();
108    static int dec_main(unsigned char *m4v_buffer, unsigned char *out_buffer,
109                                            int m4v_size);
110    static int dec_init(int use_assembler);
111    
112    /*****************************************************************************
113     *                            Quality presets
114     ****************************************************************************/
115    
116    static int const motion_presets[7] = {
117            0,                                                        /* Q 0 */
118            PMV_EARLYSTOP16,                                          /* Q 1 */
119            PMV_EARLYSTOP16,                                          /* Q 2 */
120            PMV_EARLYSTOP16 | PMV_HALFPELREFINE16,                    /* Q 3 */
121            PMV_EARLYSTOP16 | PMV_HALFPELREFINE16,                    /* Q 4 */
122            PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EARLYSTOP8 |  /* Q 5 */
123            PMV_HALFPELREFINE8,
124            PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EXTSEARCH16 | /* Q 6 */
125            PMV_USESQUARES16 | PMV_EARLYSTOP8 | PMV_HALFPELREFINE8
126    };
127    
128  int motion_presets[7] = {  static int const general_presets[7] = {
129          0,                                                              // Q 0          XVID_H263QUANT,                               /* Q 0 */
130          PMV_EARLYSTOP16,                                                // Q 1          XVID_MPEGQUANT,                               /* Q 1 */
131          PMV_EARLYSTOP16,                                                // Q 2          XVID_H263QUANT,                               /* Q 2 */
132          PMV_EARLYSTOP16 | PMV_HALFPELREFINE16,                          // Q 3          XVID_H263QUANT | XVID_HALFPEL,                /* Q 3 */
133          PMV_EARLYSTOP16 | PMV_HALFPELREFINE16,                          // Q 4          XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V, /* Q 4 */
134          PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EARLYSTOP8          // Q 5          XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V, /* Q 5 */
135                          | PMV_HALFPELREFINE8,          XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V  /* Q 6 */
         PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EXTSEARCH16         // Q 6  
                         | PMV_USESQUARES16 | PMV_EARLYSTOP8 | PMV_HALFPELREFINE8  
136          };          };
137    
 int general_presets[7] = {  
         XVID_H263QUANT, /* or use XVID_MPEGQUANT */             // Q 0  
         XVID_MPEGQUANT,                                         // Q 1  
         XVID_H263QUANT,                                // Q 2  
         XVID_H263QUANT | XVID_HALFPEL,                          // Q 3  
         XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V,           // Q 4  
         XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V,           // Q 5  
         XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V };         // Q 6  
138    
139    /*****************************************************************************
140     *                     Command line global variables
141     ****************************************************************************/
142    
143    /* Maximum number of frames to encode */
144    #define ABS_MAXFRAMENR 9999
145    
146    /* HINTMODEs */
147    #define HINT_MODE_NONE 0
148    #define HINT_MODE_GET  1
149    #define HINT_MODE_SET  2
150    #define HINT_FILE "hints.mv"
151    
152    static int   ARG_BITRATE = 900;
153    static int   ARG_QUANTI = 0;
154    static int   ARG_QUALITY = 6;
155    static int   ARG_MINQUANT = 1;
156    static int   ARG_MAXQUANT = 31;
157    static float ARG_FRAMERATE = 25.00f;
158    static int   ARG_MAXFRAMENR = ABS_MAXFRAMENR;
159    static char *ARG_INPUTFILE = NULL;
160    static int   ARG_INPUTTYPE = 0;
161    static int   ARG_SAVEDECOUTPUT = 0;
162    static int   ARG_SAVEMPEGSTREAM = 0;
163    static int   ARG_HINTMODE = HINT_MODE_NONE;
164    static int   XDIM = 0;
165    static int   YDIM = 0;
166    #define IMAGE_SIZE(x,y) ((x)*(y)*3/2)
167    
168    #define MAX(A,B) ( ((A)>(B)) ? (A) : (B) )
169    #define SMALL_EPS 1e-10
170    
171  /* my default values for encoding */  #define LONG_PACK(a,b,c,d) ((long) (((long)(a))<<24) | (((long)(b))<<16) | \
172                                       (((long)(c))<<8)  |((long)(d)))
173    
174  #define ABS_MAXFRAMENR 9999               // max number of frames  #define SWAP(a) ( (((a)&0x000000ff)<<24) | (((a)&0x0000ff00)<<8) | \
175                      (((a)&0x00ff0000)>>8)  | (((a)&0xff000000)>>24) )
176    
177  int ARG_BITRATE=900;  /****************************************************************************
178  int ARG_QUANTI=0;   *                     Nasty global vars ;-)
179     ***************************************************************************/
180    
181  int ARG_QUALITY =6;  static int i,filenr = 0;
182  int ARG_MINQUANT=1;  static int save_ref_flag = 0;
 int ARG_MAXQUANT=31;  
 float ARG_FRAMERATE=25.00;  
183    
184  int ARG_MAXFRAMENR=ABS_MAXFRAMENR;  /* the path where to save output */
185    static char filepath[256] = "./";
186    
187    /* Internal structures (handles) for encoding and decoding */
188    static void *enc_handle = NULL;
189    static void *dec_handle = NULL;
190    
191  #define MAX(A,B) ( ((A)>(B)) ? (A) : (B) )  /*****************************************************************************
192  #define SMALL_EPS 1e-10   *                               Main program
193     ****************************************************************************/
194    
195    int main(int argc, char *argv[])
196    {
197    
198            unsigned char *divx_buffer = NULL;
199            unsigned char *in_buffer = NULL;
200            unsigned char *out_buffer = NULL;
201            unsigned char *hints_buffer = NULL;
202    
203            double enctime,dectime;
204            double totalenctime=0.;
205            double totaldectime=0.;
206    
207            long totalsize=0;
208            long hints_size;
209            int status;
210            int bigendian;
211    
212            long m4v_size;
213            long frame_type[ABS_MAXFRAMENR];
214            int Iframes=0, Pframes=0, use_assembler=0;
215            double framepsnr[ABS_MAXFRAMENR];
216    
217            double Ipsnr=0.,Imaxpsnr=0.,Iminpsnr=999.,Ivarpsnr=0.;
218            double Ppsnr=0.,Pmaxpsnr=0.,Pminpsnr=999.,Pvarpsnr=0.;
219    
220            char filename[256];
221    
222            FILE *filehandle;
223            FILE *in_file = stdin;
224            FILE *hints_file = NULL;
225    
226            printf("xvid_stat - XviD core library test program ");
227            printf("written by Christoph Lampert 2002\n\n");
228    
229    /*****************************************************************************
230     *                            Command line parsing
231     ****************************************************************************/
232    
233            for (i=1; i< argc; i++) {
234    
235                    if (strcmp("-asm", argv[i]) == 0 ) {
236                            use_assembler = 1;
237                    }
238                    else if (strcmp("-w", argv[i]) == 0 && i < argc - 1 ) {
239                            i++;
240                            XDIM = atoi(argv[i]);
241                    }
242                    else if (strcmp("-h", argv[i]) == 0 && i < argc - 1 ) {
243                            i++;
244                            YDIM = atoi(argv[i]);
245                    }
246                    else if (strcmp("-b", argv[i]) == 0 && i < argc - 1 ) {
247                            i++;
248                            ARG_BITRATE = atoi(argv[i]);
249                    }
250                    else if (strcmp("-q", argv[i]) == 0 && i < argc - 1 ) {
251                            i++;
252                            ARG_QUALITY = atoi(argv[i]);
253                    }
254                    else if (strcmp("-f", argv[i]) == 0 && i < argc - 1 ) {
255                            i++;
256                            ARG_FRAMERATE = (float)atof(argv[i]);
257                    }
258                    else if (strcmp("-i", argv[i]) == 0 && i < argc - 1 ) {
259                            i++;
260                            ARG_INPUTFILE = argv[i];
261                    }
262                    else if (strcmp("-t", argv[i]) == 0 && i < argc - 1 ) {
263                            i++;
264                            ARG_INPUTTYPE = atoi(argv[i]);
265                    }
266                    else if(strcmp("-n", argv[i]) == 0 && i < argc - 1 ) {
267                            i++;
268                            ARG_MAXFRAMENR  = atoi(argv[i]);
269                    }
270                    else if (strcmp("-quant", argv[i]) == 0 && i < argc - 1 ) {
271                            i++;
272                            ARG_QUANTI = atoi(argv[i]);
273                    }
274                    else if (strcmp("-d", argv[i]) == 0 && i < argc - 1 ) {
275                            i++;
276                            ARG_SAVEDECOUTPUT = atoi(argv[i]);
277                    }
278                    else if (strcmp("-m", argv[i]) == 0 && i < argc - 1 ) {
279                            i++;
280                            ARG_SAVEMPEGSTREAM = atoi(argv[i]);
281                    }
282                    else if (strcmp("-mv", argv[i]) == 0 && i < argc - 1 ) {
283                            i++;
284                            ARG_HINTMODE = atoi(argv[i]);
285                    }
286                    else if (strcmp("-help", argv[i])) {
287                            usage();
288                            return(0);
289                    }
290                    else {
291                            usage();
292                            exit(-1);
293                    }
294    
295            }
296    
297    /*****************************************************************************
298     *                            Arguments checking
299     ****************************************************************************/
300    
301            if (XDIM <= 0 || XDIM >= 2048 || YDIM <=0 || YDIM >= 2048 ) {
302                    fprintf(stderr, "Trying to retreive width and height from PGM header\n");
303                    ARG_INPUTTYPE = 1; /* pgm */
304            }
305    
306            if ( ARG_QUALITY < 0 || ARG_QUALITY > 6) {
307                    fprintf(stderr,"Wrong Quality\n");
308                    return -1;
309            }
310    
311            if ( ARG_BITRATE <= 0 && ARG_QUANTI == 0) {
312                    fprintf(stderr,"Wrong Bitrate\n");
313                    return -1;
314            }
315    
316            if ( ARG_FRAMERATE <= 0) {
317                    fprintf(stderr,"Wrong Framerate %s \n",argv[5]);
318                    return -1;
319            }
320    
321            if ( ARG_MAXFRAMENR <= 0) {
322                    fprintf(stderr,"Wrong number of frames\n");
323                    return -1;
324            }
325    
326            if ( ARG_HINTMODE != HINT_MODE_NONE &&
327                     ARG_HINTMODE != HINT_MODE_GET &&
328                     ARG_HINTMODE != HINT_MODE_SET)
329                    ARG_HINTMODE = HINT_MODE_NONE;
330    
331            if( ARG_HINTMODE != HINT_MODE_NONE) {
332                    char *rights = "rb";
333    
334                    /*
335                     * If we are getting hints from core, we will have to write them to
336                     * hint file
337                     */
338                    if(ARG_HINTMODE == HINT_MODE_GET)
339                            rights = "w+b";
340    
341                    /* Open the hint file */
342                    hints_file = fopen(HINT_FILE, rights);
343                    if(hints_file == NULL) {
344                            fprintf(stderr, "Error opening input file %s\n", HINT_FILE);
345                            return -1;
346                    }
347    
348                    /* Allocate hint memory space, we will be using rawhints */
349                    /* NB : Hope 1Mb is enough */
350                    if((hints_buffer = malloc(1024*1024)) == NULL) {
351                            fprintf(stderr, "Memory allocation error\n");
352                            return -1;
353                    }
354    
355  /* these are global variables. Not very elegant, but easy, and this is an easy program */          }
356    
357            if ( ARG_INPUTFILE == NULL || strcmp(ARG_INPUTFILE, "stdin") == 0) {
358                    in_file = stdin;
359            }
360            else {
361    
362  int XDIM=0;                  in_file = fopen(ARG_INPUTFILE, "rb");
363  int YDIM=0;     // will be set when reading first image                  if (in_file == NULL) {
364  int i,filenr = 0;                          fprintf(stderr, "Error opening input file %s\n", ARG_INPUTFILE);
365                            return -1;
366                    }
367            }
368    
369  int save_m4v_flag = 0;          // save MPEG4-bytestream?          if (ARG_INPUTTYPE) {
370  int save_dec_flag = 1;          // save decompressed bytestream?                  if (read_pgmheader(in_file)) {
371  int save_ref_flag = 0;          //                          fprintf(stderr, "Wrong input format, I want YUV encapsulated in PGM\n");
372                            return -1;
373                    }
374            }
375    
376            /* now we know the sizes, so allocate memory */
377    
378  int pgmflag = 0;                // a flag, if input is in PGM format, overwritten in init-phase          in_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM));
379  char filepath[256] = "./";      // the path where to save output          if (!in_buffer)
380                    goto free_all_memory;
381    
382            /* this should really be enough memory ! */
383            divx_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM)*2);
384            if (!divx_buffer)
385                    goto free_all_memory;
386    
387            out_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM)*4);
388            if (!out_buffer)
389                    goto free_all_memory;
390    
 void *enc_handle = NULL;                // internal structures (handles) for encoding  
 void *dec_handle = NULL;                // and decoding  
391    
392    /*****************************************************************************
393     *                            XviD PART  Start
394     ****************************************************************************/
395    
 /*********************************************************************/  
 /*                     "statistical" functions                       */  
 /*                                                                   */  
 /*  these are not needed for encoding or decoding, but for measuring */  
 /*  time and quality, there in nothing specific to XviD in these     */  
 /*                                                                   */  
 /*********************************************************************/  
396    
397  double msecond()          status = enc_init(use_assembler);
398  /* return the current time in seconds(!)  */          if (status)
399  {  {
400                    fprintf(stderr, "Encore INIT problem, return value %d\n", status);
401                    goto release_all;
402            }
403    
404            status = dec_init(use_assembler);
405            if (status)
406            {
407                    fprintf(stderr, "Decore INIT problem, return value %d\n", status);
408                    goto release_all;
409            }
410    
411            totalsize = LONG_PACK('M','P','4','U');
412            if(*((char *)(&totalsize)) == 'M')
413                    bigendian = 1;
414            else
415                    bigendian = 0;
416    
417    /*****************************************************************************
418     *                            Main loop
419     ****************************************************************************/
420    
421            do {
422    
423                    if (ARG_INPUTTYPE)
424                            status = read_pgmdata(in_file, in_buffer);      /* read PGM data (YUV-format) */
425                    else
426                            status = read_yuvdata(in_file, in_buffer);      /* read raw data (YUV-format) */
427    
428                    if (status)
429                    {
430                            /* Couldn't read image, most likely end-of-file */
431                            continue;
432                    }
433    
434    
435                    if (save_ref_flag)
436                    {
437                            sprintf(filename, "%s%05d.pgm", filepath, filenr);
438                            write_pgm(filename,in_buffer);
439                    }
440    
441    
442    /*****************************************************************************
443     *                       Analyse this frame before encoding
444     ****************************************************************************/
445    
446    /*
447     *      nothing is done here at the moment, but you could e.g. create
448     *      histograms or measure entropy or apply preprocessing filters...
449     */
450    
451    /*****************************************************************************
452     *                       Read hints from file
453     ****************************************************************************/
454    
455                    if(ARG_HINTMODE == HINT_MODE_SET) {
456                            fread(&hints_size, 1, sizeof(long), hints_file);
457                            hints_size = (!bigendian)?SWAP(hints_size):hints_size;
458                            fread(hints_buffer, 1, hints_size, hints_file);
459                    }
460    
461    /*****************************************************************************
462     *                       Encode and decode this frame
463     ****************************************************************************/
464    
465                    enctime = msecond();
466                    status = enc_main(in_buffer, divx_buffer, hints_buffer,
467                                                      &m4v_size, &frame_type[filenr], &hints_size);
468                    enctime = msecond() - enctime;
469    
470                    totalenctime += enctime;
471                    totalsize += m4v_size;
472    
473                    printf("Frame %5d: intra %1d, enctime=%6.1f ms, size=%6d bytes ",
474                               (int)filenr, (int)frame_type[filenr], (float)enctime, (int)m4v_size);
475    
476    /*****************************************************************************
477     *                       Save hints to file
478     ****************************************************************************/
479    
480                    if(ARG_HINTMODE == HINT_MODE_GET) {
481                            hints_size = (!bigendian)?SWAP(hints_size):hints_size;
482                            fwrite(&hints_size, 1, sizeof(long), hints_file);
483                            hints_size = (!bigendian)?SWAP(hints_size):hints_size;
484                            fwrite(hints_buffer, 1, hints_size, hints_file);
485                    }
486    
487    /*****************************************************************************
488     *                       Save stream to file
489     ****************************************************************************/
490    
491                    if (ARG_SAVEMPEGSTREAM)
492                    {
493                            sprintf(filename, "%sframe%05d.m4v", filepath, filenr);
494                            filehandle = fopen(filename, "wb");
495                            fwrite(divx_buffer, m4v_size, 1, filehandle);
496                            fclose(filehandle);
497                    }
498    
499                    dectime = msecond();
500                    status = dec_main(divx_buffer, out_buffer, m4v_size);
501                    dectime = msecond() - dectime;
502    
503                    totaldectime += dectime;
504    
505    
506    /*****************************************************************************
507     *             Analyse the decoded frame and compare to original
508     ****************************************************************************/
509    
510                    framepsnr[filenr] = PSNR(XDIM,YDIM*3/2, in_buffer, XDIM, out_buffer, XDIM);
511    
512                    printf("dectime =%6.1f ms PSNR %5.2f\n",dectime, framepsnr[filenr]);
513    
514                    if (ARG_SAVEDECOUTPUT)
515                    {
516                            sprintf(filename, "%sdec%05d.pgm", filepath, filenr);
517                            write_pgm(filename, out_buffer);
518                    }
519    
520                    /* Read the header if it's pgm stream */
521                    if (ARG_INPUTTYPE)
522                            status = read_pgmheader(in_file);
523    
524                    filenr++;
525    
526            } while ( (!status) && (filenr<ARG_MAXFRAMENR) );
527    
528    
529    
530    /*****************************************************************************
531     *         Calculate totals and averages for output, print results
532     ****************************************************************************/
533    
534            totalsize    /= filenr;
535            totalenctime /= filenr;
536            totaldectime /= filenr;
537    
538            for (i=0;i<filenr;i++)
539            {
540                    switch (frame_type[i])
541                    {
542                    case 0:
543                            Pframes++;
544                            Ppsnr += framepsnr[i];
545                            break;
546                    case 1:
547                            Iframes++;
548                            Ipsnr += framepsnr[i];
549                            break;
550                    default:
551                            break;
552                    }
553            }
554    
555            if (Pframes)
556                    Ppsnr /= Pframes;
557            if (Iframes)
558                    Ipsnr /= Iframes;
559    
560            /* calculate statistics for every frametype: P,I */
561            for (i=0;i<filenr;i++)
562            {
563                    switch (frame_type[i])
564                    {
565                    case 0:
566                            if (framepsnr[i] > Pmaxpsnr)
567                                    Pmaxpsnr = framepsnr[i];
568                            if (framepsnr[i] < Pminpsnr)
569                                    Pminpsnr = framepsnr[i];
570                            Pvarpsnr += (framepsnr[i] - Ppsnr)*(framepsnr[i] - Ppsnr) /Pframes;
571                            break;
572                    case 1:
573                            if (framepsnr[i] > Imaxpsnr)
574                                    Imaxpsnr = framepsnr[i];
575                            if (framepsnr[i] < Pminpsnr)
576                                    Iminpsnr = framepsnr[i];
577                            Ivarpsnr += (framepsnr[i] - Ipsnr)*(framepsnr[i] - Ipsnr) /Iframes;
578                    default:
579                            break;
580                    }
581            }
582    
583            /* Print all statistics */
584            printf("Avg. Q%1d %2s ",ARG_QUALITY, (ARG_QUANTI ? " q" : "br"));
585            printf("%04d ",(ARG_QUANTI)?ARG_QUANTI:ARG_BITRATE);
586            printf("( %.2f bpp) ", (double)ARG_BITRATE*1000/XDIM/YDIM/ARG_FRAMERATE);
587            printf("size %6d ", (int)totalsize);
588            printf("( %4d kbps ",(int)(totalsize*8*ARG_FRAMERATE/1000));
589            printf("/ %.2f bpp) ",(double)totalsize*8/XDIM/YDIM);
590            printf("enc: %6.1f fps, dec: %6.1f fps \n",1000/totalenctime, 1000/totaldectime);
591            printf("PSNR P(%d): %5.2f ( %5.2f , %5.2f ; %5.4f ) ",Pframes,Ppsnr,Pminpsnr,Pmaxpsnr,sqrt(Pvarpsnr/filenr));
592            printf("I(%d): %5.2f ( %5.2f , %5.2f ; %5.4f ) ",Iframes,Ipsnr,Iminpsnr,Imaxpsnr,sqrt(Ivarpsnr/filenr));
593            printf("\n");
594    
595    /*****************************************************************************
596     *                            XviD PART  Stop
597     ****************************************************************************/
598    
599     release_all:
600    
601            if (enc_handle)
602            {
603                    status = enc_stop();
604                    if (status)
605                            fprintf(stderr, "Encore RELEASE problem return value %d\n", status);
606            }
607    
608            if (dec_handle)
609            {
610                    status = dec_stop();
611                    if (status)
612                            fprintf(stderr, "Decore RELEASE problem return value %d\n", status);
613            }
614    
615            fclose(in_file);
616    
617     free_all_memory:
618            free(out_buffer);
619            free(divx_buffer);
620            free(in_buffer);
621    
622            return 0;
623    
624    }
625    
626    /*****************************************************************************
627     *                        "statistical" functions
628     *
629     *  these are not needed for encoding or decoding, but for measuring
630     *  time and quality, there in nothing specific to XviD in these
631     *
632     *****************************************************************************/
633    
634    
635    
636    /* Return time elapsed time in miliseconds since the program started */
637    static double msecond()
638    {
639    #ifndef _MSC_VER
640          struct timeval  tv;          struct timeval  tv;
641          gettimeofday(&tv, 0);          gettimeofday(&tv, 0);
642          return tv.tv_sec + tv.tv_usec * 1.0e-6;          return tv.tv_sec*1.0e3 + tv.tv_usec * 1.0e-3;
643    #else
644            clock_t clk;
645            clk = clock();
646            return clk * 1000 / CLOCKS_PER_SEC;
647    #endif
648  }  }
649    
650    
651    /*
652  double absdistq(int x,int y, unsigned char* buf1, int stride1, unsigned char* buf2, int stride2)   * Returns the sum of squared distances (SSD) between two images of dimensions
653  /* returns the sum of squared distances (SSD) between two images of dimensions x times y */   * x times y
654     */
655    static double absdistq(int x, int y,
656                                               unsigned char* buf1, int stride1,
657                                               unsigned char* buf2, int stride2)
658  {  {
659          double dist=0.;          double dist=0.;
660          int i,j,val;          int i,j,val;
# Line 163  Line 673 
673  }  }
674    
675    
676  double PSNR(int x,int y, unsigned char* buf1, int stride1, unsigned char* buf2, int stride2 )  /*
677  /* return the PSNR between to images                                               */   * Returns the PSNR between to images.
678  /* this is a logarithmic measure for "quality" from the world of signal processing */   *
679  /* if you don't know what it is, simply accept that higher values are better       */   * This is a common logarithmic measure for "quality" from the world of signal
680     * processing if you don't know what it is, simply accept that higher values
681     * are better.
682     *
683     * PSNR represents the ratio of useful signal over noise signal. In our case,
684     * useful signal is refernce image, noise signal is the difference between
685     * reference and decoded frame from encoded bitstream.
686     *
687     * The problem is this type of value is dependant of image source and so, is
688     * not reliable as a common "quality" indicator.
689     * So PSNR computes the ratio of maximum/noise. Maximum being set to 2^bpp/channel
690     * This way, PSNR is not dependant anymore of image data type.
691     *
692     */
693    static double PSNR(int x, int y,
694                                       unsigned char* buf1, int stride1,
695                                       unsigned char* buf2, int stride2)
696    {
697            return 10*(log10(255*255)-log10( absdistq(x, y, buf1, stride1, buf2, stride2) ));
698    }
699    
700    /*****************************************************************************
701     *                             Usage message
702     *****************************************************************************/
703    
704    static void usage()
705  {  {
    return 10*(log10(255*255)-log10( absdistq(x, y, buf1, stride1, buf2, stride2) ));  
 }  
706    
707            fprintf(stderr, "Usage : xvid_stat [OPTIONS]\n");
708            fprintf(stderr, "Options :\n");
709            fprintf(stderr, " -w integer     : frame width ([1.2048])\n");
710            fprintf(stderr, " -h integer     : frame height ([1.2048])\n");
711            fprintf(stderr, " -b integer     : target bitrate (>0 | default=900kbit)\n");
712            fprintf(stderr, " -f float       : target framerate (>0)\n");
713            fprintf(stderr, " -i string      : input filename (default=stdin)\n");
714            fprintf(stderr, " -t integer     : input data type (yuv=0, pgm=1)\n");
715            fprintf(stderr, " -n integer     : number of frames to encode\n");
716            fprintf(stderr, " -q integer     : quality ([0..5])\n");
717            fprintf(stderr, " -d boolean     : save decoder output (0 False*, !=0 True)\n");
718            fprintf(stderr, " -m boolean     : save mpeg4 raw stream (0 False*, !=0 True)\n");
719            fprintf(stderr, " -help          : prints this help message\n");
720            fprintf(stderr, " -quant integer : fixed quantizer (disables -b setting)\n");
721            fprintf(stderr, " (* means default)\n");
722    
723  /*********************************************************************/  }
724  /*                    input and output functions                     */  
725  /*                                                                   */  /*****************************************************************************
726  /* the are small and simple routines to read and write PGM and YUV   */   *                       Input and output functions
727  /* image. It's just for convenience, again nothing specific to XviD  */   *
728  /*                                                                   */   *      the are small and simple routines to read and write PGM and YUV
729  /*********************************************************************/   *      image. It's just for convenience, again nothing specific to XviD
730     *
731     *****************************************************************************/
732    
733  int read_pgmheader(FILE* handle)  static int read_pgmheader(FILE* handle)
734  {  {
735          int bytes,xsize,ysize,depth;          int bytes,xsize,ysize,depth;
736          char dummy[2];          char dummy[2];
# Line 189  Line 739 
739    
740          if ( (bytes < 2) || (dummy[0] != 'P') || (dummy[1] != '5' ))          if ( (bytes < 2) || (dummy[0] != 'P') || (dummy[1] != '5' ))
741                  return 1;                  return 1;
742    
743          fscanf(handle,"%d %d %d",&xsize,&ysize,&depth);          fscanf(handle,"%d %d %d",&xsize,&ysize,&depth);
744          if ( (xsize > 1440) || (ysize > 2880 ) || (depth != 255) )          if ( (xsize > 1440) || (ysize > 2880 ) || (depth != 255) )
745          {          {
# Line 196  Line 747 
747                  return 2;                  return 2;
748          }          }
749          if ( (XDIM==0) || (YDIM==0) )          if ( (XDIM==0) || (YDIM==0) )
750          {       XDIM=xsize;          {
751                  YDIM=ysize;                  XDIM=xsize;
752                    YDIM=ysize*2/3;
753          }          }
754    
755          return 0;          return 0;
756  }  }
757    
758  int read_pgmdata(FILE* handle, unsigned char *image)  static int read_pgmdata(FILE* handle, unsigned char *image)
759  {  {
760          int i,status;          int i;
761          char dummy;          char dummy;
762    
763          unsigned char* buff1_ptr2 = image + XDIM*YDIM;          unsigned char *y = image;
764          unsigned char* buff1_ptr3 = image + XDIM*YDIM + XDIM/2*YDIM/2;          unsigned char *u = image + XDIM*YDIM;
765            unsigned char *v = image + XDIM*YDIM + XDIM/2*YDIM/2;
766    
767          fread(image,XDIM*YDIM,1,stdin); // read Y component of picture          /* read Y component of picture */
768            fread(y, 1, XDIM*YDIM, handle);
769    
770          for (i=0;i<YDIM/2;i++)          for (i=0;i<YDIM/2;i++)
771          {          {
772                  fread(buff1_ptr2,XDIM/2,1,stdin);        // read U                  /* read U */
773                  buff1_ptr2 += XDIM/2;                  fread(u, 1, XDIM/2, handle);
774                  fread(buff1_ptr3,XDIM/2,1,stdin);        // read V  
775                  buff1_ptr3 += XDIM/2;                  /* read V */
776                    fread(v, 1, XDIM/2, handle);
777    
778                    /* Update pointers */
779                    u += XDIM/2;
780                    v += XDIM/2;
781          }          }
782          fread(&dummy,1,1,handle);       //  I don't know why, but this seems needed  
783        /*  I don't know why, but this seems needed */
784            fread(&dummy, 1, 1, handle);
785    
786          return 0;          return 0;
787  }  }
788    
789  int read_yuvdata(FILE* handle, unsigned char *image)  static int read_yuvdata(FILE* handle, unsigned char *image)
790  {       int i;  {
         char dummy;  
   
         unsigned char* buff1_ptr2 = image + XDIM*YDIM;  
         unsigned char* buff1_ptr3 = image + XDIM*YDIM + XDIM/2*YDIM/2;  
791    
792          if (fread(image,XDIM,YDIM*3/2,stdin) != YDIM*3/2)          if (fread(image, 1, IMAGE_SIZE(XDIM, YDIM), handle) != (unsigned int)IMAGE_SIZE(XDIM, YDIM))
793                  return 1;                  return 1;
794          else          else
795                  return 0;                  return 0;
796  }  }
797    
798  int write_pgm(char *filename, unsigned char *image)  static int write_pgm(char *filename, unsigned char *image)
799  {  {
800            int loop;
801    
802            unsigned char *y = image;
803            unsigned char *u = image + XDIM*YDIM;
804            unsigned char *v = image + XDIM*YDIM + XDIM/2*YDIM/2;
805    
806          FILE *filehandle;          FILE *filehandle;
807          filehandle=fopen(filename,"wb");          filehandle=fopen(filename,"w+b");
808          if (filehandle)          if (filehandle)
809          {          {
810                  fprintf(filehandle,"P5\n\n");           //                  /* Write header */
811                  fprintf(filehandle,"%d %d 255\n",XDIM,YDIM*3/2);                  fprintf(filehandle,"P5\n\n%d %d 255\n", XDIM,YDIM*3/2);
812                  fwrite(image,XDIM,YDIM*3/2,filehandle);  
813                    /* Write Y data */
814                    fwrite(y, 1, XDIM*YDIM, filehandle);
815    
816                    for(loop=0; loop<YDIM/2; loop++)
817                    {
818                            /* Write U scanline */
819                            fwrite(u, 1, XDIM/2, filehandle);
820    
821                            /* Write V scanline */
822                            fwrite(v, 1, XDIM/2, filehandle);
823    
824                            /* Update pointers */
825                            u += XDIM/2;
826                            v += XDIM/2;
827    
828                    }
829    
830                    /* Close file */
831                  fclose(filehandle);                  fclose(filehandle);
832    
833                  return 0;                  return 0;
834          }          }
835          else          else
836                  return 1;                  return 1;
837  }  }
838    
839    /*****************************************************************************
840     *     Routines for encoding: init encoder, frame step, release encoder
841  /*********************************************************************/   ****************************************************************************/
 /* Routines for encoding: init encoder, frame step, release encoder  */  
 /*********************************************************************/  
842    
843  #define FRAMERATE_INCR 1001  #define FRAMERATE_INCR 1001
844    
845    /* Initialize encoder for first use, pass all needed parameters to the codec */
846  int enc_init(int use_assembler)  static int enc_init(int use_assembler)
847  {       /* initialize encoder for first use, pass all needed parameters to the codec */  {
848          int xerr;          int xerr;
849    
850          XVID_INIT_PARAM xinit;          XVID_INIT_PARAM xinit;
851          XVID_ENC_PARAM xparam;          XVID_ENC_PARAM xparam;
852    
853          if(use_assembler)          if(use_assembler) {
854    
855  #ifdef ARCH_IA64  #ifdef ARCH_IA64
856                  xinit.cpu_flags = XVID_CPU_FORCE | XVID_CPU_IA64;                  xinit.cpu_flags = XVID_CPU_FORCE | XVID_CPU_IA64;
857  #else  #else
858                  xinit.cpu_flags = 0;                  xinit.cpu_flags = 0;
859  #endif  #endif
860            }
861          else          else {
862                  xinit.cpu_flags = XVID_CPU_FORCE;                  xinit.cpu_flags = XVID_CPU_FORCE;
863            }
864    
865          xvid_init(NULL, 0, &xinit, NULL);          xvid_init(NULL, 0, &xinit, NULL);
866    
# Line 298  Line 880 
880          xparam.rc_averaging_period = 100;          xparam.rc_averaging_period = 100;
881          xparam.rc_buffer = 10;          xparam.rc_buffer = 10;
882          xparam.rc_bitrate = ARG_BITRATE*1000;          xparam.rc_bitrate = ARG_BITRATE*1000;
883          xparam.min_quantizer = 1;          xparam.min_quantizer = ARG_MINQUANT;
884          xparam.max_quantizer = 31;          xparam.max_quantizer = ARG_MAXQUANT;
885          xparam.max_key_interval = (int)ARG_FRAMERATE*10;          xparam.max_key_interval = (int)ARG_FRAMERATE*10;
886    
887                  /* I use a small value here, since will not encode whole movies, but short clips */                  /* I use a small value here, since will not encode whole movies, but short clips */
# Line 310  Line 892 
892          return xerr;          return xerr;
893  }  }
894    
895  int  enc_stop()  static int enc_stop()
896  {       int xerr;  {
897            int xerr;
898    
899          xerr = xvid_encore(enc_handle, XVID_ENC_DESTROY, NULL, NULL);          xerr = xvid_encore(enc_handle, XVID_ENC_DESTROY, NULL, NULL);
900          return xerr;          return xerr;
901    
902  }  }
903    
904  int  enc_main(unsigned char* image, unsigned char* bitstream, int *streamlength, int* frametype)  static int enc_main(unsigned char* image, unsigned char* bitstream,
905  {       int xerr;                                          unsigned char* hints_buffer,
906                                            long *streamlength, long* frametype, long* hints_size)
907    {
908            int xerr;
909    
910          XVID_ENC_FRAME xframe;          XVID_ENC_FRAME xframe;
911          XVID_ENC_STATS xstats;          XVID_ENC_STATS xstats;
912    
913          xframe.bitstream = bitstream;          xframe.bitstream = bitstream;
914          xframe.length = -1;     // this is written by the routine          xframe.length = -1;     /* this is written by the routine */
915    
916          xframe.image = image;          xframe.image = image;
917          xframe.colorspace = XVID_CSP_YV12;      // defined in <xvid.h>          xframe.colorspace = XVID_CSP_YV12;      /* defined in <xvid.h> */
918    
919          xframe.intra = -1; // let the codec decide between I-frame (1) and P-frame (0)          xframe.intra = -1; /* let the codec decide between I-frame (1) and P-frame (0) */
920    
921          xframe.quant = ARG_QUANTI;      // is quant != 0, use a fixed quant (and ignore bitrate)          xframe.quant = ARG_QUANTI;      /* is quant != 0, use a fixed quant (and ignore bitrate) */
922    
923          xframe.motion = motion_presets[ARG_QUALITY];          xframe.motion = motion_presets[ARG_QUALITY];
924          xframe.general = general_presets[ARG_QUALITY];          xframe.general = general_presets[ARG_QUALITY];
925          xframe.quant_intra_matrix = xframe.quant_inter_matrix = NULL;          xframe.quant_intra_matrix = xframe.quant_inter_matrix = NULL;
926    
927            xframe.hint.hintstream = hints_buffer;
928    
929            if(ARG_HINTMODE == HINT_MODE_SET) {
930                    xframe.hint.hintlength = *hints_size;
931                    xframe.hint.rawhints = 0;
932                    xframe.general |= XVID_HINTEDME_SET;
933            }
934    
935            if(ARG_HINTMODE == HINT_MODE_GET) {
936                    xframe.hint.rawhints = 0;
937                    xframe.general |= XVID_HINTEDME_GET;
938            }
939    
940          xerr = xvid_encore(enc_handle, XVID_ENC_ENCODE, &xframe, &xstats);          xerr = xvid_encore(enc_handle, XVID_ENC_ENCODE, &xframe, &xstats);
941    
942  /*              enc_result->is_key_frame = xframe.intra;          if(ARG_HINTMODE == HINT_MODE_GET)
943                  enc_result->quantizer = xframe.quant;                  *hints_size = xframe.hint.hintlength;
                 enc_result->total_bits = xframe.length * 8;  
                 enc_result->motion_bits = xstats.hlength * 8;  
                 enc_result->texture_bits = enc_result->total_bits - enc_result->motion_bits;  
 */  
944    
945  /*  This is statictical data, e.g. for 2-pass.          /*
946      If you are not interested in any of this, you can use NULL instead of &xstats           * This is statictical data, e.g. for 2-pass. If you are not
947             * interested in any of this, you can use NULL instead of &xstats
948  */  */
949          *frametype = xframe.intra;          *frametype = xframe.intra;
950          *streamlength = xframe.length;          *streamlength = xframe.length;
# Line 355  Line 952 
952          return xerr;          return xerr;
953  }  }
954    
955    /*****************************************************************************
956     * Routines for decoding: init encoder, frame step, release encoder
957     ****************************************************************************/
958    
959  /*********************************************************************/  /* init decoder before first run */
960  /* Routines for decoding: init encoder, frame step, release encoder  */  static int dec_init(int use_assembler)
 /*********************************************************************/  
   
 int dec_init(int use_assembler) /* init decoder before first run */  
961  {  {
962          int xerr;          int xerr;
963    
# Line 388  Line 985 
985          return xerr;          return xerr;
986  }  }
987    
988  int dec_main(unsigned char *m4v_buffer, unsigned char *out_buffer, int m4v_size)  /* decode one frame  */
989  {       /* decode one frame  */  static int dec_main(unsigned char *m4v_buffer, unsigned char *out_buffer,
990                                            int m4v_size)
991    {
992          int xerr;          int xerr;
993          XVID_DEC_FRAME xframe;          XVID_DEC_FRAME xframe;
994    
# Line 398  Line 996 
996          xframe.length = m4v_size;          xframe.length = m4v_size;
997          xframe.image = out_buffer;          xframe.image = out_buffer;
998          xframe.stride = XDIM;          xframe.stride = XDIM;
999          xframe.colorspace = XVID_CSP_YV12;             // XVID_CSP_USER is fastest (no memcopy involved)          xframe.colorspace = XVID_CSP_YV12;             /* XVID_CSP_USER is fastest (no memcopy involved) */
1000    
1001          xerr = xvid_decore(dec_handle, XVID_DEC_DECODE, &xframe, NULL);          xerr = xvid_decore(dec_handle, XVID_DEC_DECODE, &xframe, NULL);
1002    
1003          return xerr;          return xerr;
1004  }  }
1005    
1006  int dec_stop()  /* close decoder to release resources */  /* close decoder to release resources */
1007    static int dec_stop()
1008  {  {
1009          int xerr;          int xerr;
1010          xerr = xvid_decore(dec_handle, XVID_DEC_DESTROY, NULL, NULL);          xerr = xvid_decore(dec_handle, XVID_DEC_DESTROY, NULL, NULL);
# Line 413  Line 1012 
1012          return xerr;          return xerr;
1013  }  }
1014    
1015    /* EOF */
 /*********************************************************************/  
 /*                          Main program                             */  
 /*********************************************************************/  
   
 int main(int argc, char *argv[])  
 {  
   unsigned char *divx_buffer = NULL;  
   unsigned char *in_buffer = NULL;  
   unsigned char *out_buffer = NULL;  
   
   double enctime,dectime;  
   double totalenctime=0.;  
   double totaldectime=0.;  
   
   long totalsize=0;  
   int status;  
   
   int m4v_size;  
   int frame_type[ABS_MAXFRAMENR];  
   int Iframes=0, Pframes=0, Bframes=0, use_assembler=0;  
   double framepsnr[ABS_MAXFRAMENR];  
   
   double Ipsnr=0.,Imaxpsnr=0.,Iminpsnr=999.,Ivarpsnr=0.;  
   double Ppsnr=0.,Pmaxpsnr=0.,Pminpsnr=999.,Pvarpsnr=0.;  
   double Bpsnr=0.,Bmaxpsnr=0.,Bminpsnr=999.,Bvarpsnr=0.;  
   
   char filename[256];  
   
   FILE *filehandle;  
   
 /* read YUV in pgm format from stdin */  
   if (!pgmflag)  
   {  
         pgmflag = 1;  
   
         if (argc==2 && !strcmp(argv[1],"-asm"))  
           use_assembler = 1;  
         if (argc>=3)  
         {       XDIM = atoi(argv[1]);  
                 YDIM = atoi(argv[2]);  
                 if ( (XDIM <= 0) || (XDIM >= 2048) || (YDIM <=0) || (YDIM >= 2048) )  
                 {       fprintf(stderr,"Wrong frames size %d %d, trying PGM \n",XDIM, YDIM);  
                 }  
                 else  
                 {  
                         YDIM = YDIM*3/2; /* for YUV */  
                         pgmflag = 0;  
                 }  
         }  
   }  
   
   if (pgmflag)  
   {     if (read_pgmheader(stdin))  
             {  
               printf("Wrong input format, I want YUV encapsulated in PGM\n");  
               return 1;  
             }  
   }  
   if (argc>=4)  
   {     ARG_QUALITY = atoi(argv[3]);  
         if ( (ARG_QUALITY < 0) || (ARG_QUALITY > 6) )  
                 { fprintf(stderr,"Wrong Quality\n"); return -1; }  
         else  
                   printf("Quality %d\n",ARG_QUALITY);  
   }  
   if (argc>=5)  
   {     ARG_BITRATE = atoi(argv[4]);  
         if ( (ARG_BITRATE <= 0) )  
                 { fprintf(stderr,"Wrong Bitrate\n"); return -1; }  
         if ( (ARG_BITRATE <= 32) )  
                 { ARG_QUANTI = ARG_BITRATE;  
                   ARG_BITRATE=0;  
                   printf("Quantizer %d\n",ARG_QUANTI);  
                 }  
         else  
                   printf("Bitrate %d kbps\n",ARG_BITRATE);  
   }  
   if (argc>=6)  
   {     ARG_FRAMERATE = (float)atof(argv[5]);  
         if ( (ARG_FRAMERATE <= 0) )  
                 { fprintf(stderr,"Wrong Fraterate %s \n",argv[5]); return -1; }  
         printf("Framerate %6.3f fps\n",ARG_FRAMERATE);  
   }  
   
   if (argc>=7)  
   {     ARG_MAXFRAMENR = atoi(argv[6]);  
         if ( (ARG_MAXFRAMENR <= 0) )  
          { fprintf(stderr,"Wrong number of frames\n"); return -1; }  
         printf("max. Framenr. %d\n",ARG_MAXFRAMENR);  
   }  
   
 /* now we know the sizes, so allocate memory */  
   
   in_buffer = (unsigned char *) malloc(XDIM*YDIM);  
   if (!in_buffer)  
     goto free_all_memory;       // goto is one of the most underestimated instructions in C !!!  
   
   divx_buffer = (unsigned char *) malloc(XDIM*YDIM*2);  // this should really be enough memory!  
   if (!divx_buffer)  
     goto free_all_memory;  
   
   YDIM = YDIM*2/3; // PGM is YUV 4:2:0 format, so real image height is *2/3 of PGM picture  
   
   out_buffer = (unsigned char *) malloc(XDIM*YDIM*4);  
   if (!out_buffer)  
     goto free_all_memory;  
   
   
 /*********************************************************************/  
 /*                         XviD PART  Start                          */  
 /*********************************************************************/  
   
   
   status = enc_init(use_assembler);  
         if (status)  
         {  
                 printf("Encore INIT problem, return value %d\n", status);  
                 goto release_all;  
         }  
   
         status = dec_init(use_assembler);  
         if (status)  
         {  
                 printf("Decore INIT problem, return value %d\n", status);  
                 goto release_all;  
         }  
   
   
 /*********************************************************************/  
 /*                               Main loop                           */  
 /*********************************************************************/  
   
   do  
     {  
         if (pgmflag)  
               status = read_pgmdata(stdin, in_buffer);  // read PGM data (YUV-format)  
         else  
               status = read_yuvdata(stdin, in_buffer);  // read raw data (YUV-format)  
   
       if (status)  
         {  
           // Couldn't read image, most likely end-of-file  
           continue;  
         }  
   
   
       if (save_ref_flag)  
         {  
                 sprintf(filename, "%s%05d.pgm", filepath, filenr);  
                 write_pgm(filename,in_buffer);  
         }  
   
   
 /*********************************************************************/  
 /*               analyse this frame before encoding                  */  
 /*********************************************************************/  
   
 //      nothing is done here at the moment, but you could e.g. create  
 //      histograms or measure entropy or apply preprocessing filters...  
   
 /*********************************************************************/  
 /*               encode and decode this frame                        */  
 /*********************************************************************/  
   
         enctime = -msecond();  
         status = enc_main(in_buffer, divx_buffer, &m4v_size, &frame_type[filenr]);  
         enctime += msecond();  
   
         totalenctime += enctime;  
         totalsize += m4v_size;  
   
         printf("Frame %5d: intra %d, enctime =%6.1f ms length=%7d bytes ",  
                  filenr, frame_type[filenr], enctime*1000, m4v_size);  
   
         if (save_m4v_flag)  
         {  
                 sprintf(filename, "%sframe%05d.m4v", filepath, filenr);  
                 filehandle = fopen(filename, "wb");  
                 fwrite(divx_buffer, m4v_size, 1, filehandle);  
                 fclose(filehandle);  
         }  
   
         dectime = -msecond();  
         status = dec_main(divx_buffer, out_buffer, m4v_size);  
         dectime += msecond();  
   
         totaldectime += dectime;  
   
   
 /*********************************************************************/  
 /*        analyse the decoded frame and compare to original          */  
 /*********************************************************************/  
   
         framepsnr[filenr] = PSNR(XDIM,YDIM, in_buffer, XDIM, out_buffer, XDIM );  
   
         printf("dectime =%6.1f ms PSNR %5.2f\n",dectime*1000, framepsnr[filenr]);  
   
         if (save_dec_flag)  
         {  
                 sprintf(filename, "%sdec%05d.pgm", filepath, filenr);  
                 write_pgm(filename,out_buffer);  
         }  
   
         if (pgmflag)  
                 status = read_pgmheader(stdin);         // because if this was the last PGM, stop now  
   
         filenr++;  
   
    } while ( (!status) && (filenr<ARG_MAXFRAMENR) );  
   
   
   
 /*********************************************************************/  
 /*     calculate totals and averages for output, print results       */  
 /*********************************************************************/  
   
         totalsize    /= filenr;  
         totalenctime /= filenr;  
         totaldectime /= filenr;  
   
         for (i=0;i<filenr;i++)  
         {  
                 switch (frame_type[i])  
                 {  
                 case 0:  
                         Pframes++;  
                         Ppsnr += framepsnr[i];  
                         break;  
                 case 1:  
                         Iframes++;  
                         Ipsnr += framepsnr[i];  
                         break;  
                 case 2:  
                 default:  
                         Bframes++;  
                         Bpsnr += framepsnr[i];  
                         break;  
                 }  
         }  
   
         if (Pframes)  
                 Ppsnr /= Pframes;  
         if (Iframes)  
                 Ipsnr /= Iframes;  
         if (Bframes)  
                 Bpsnr /= Bframes;  
   
   
         for (i=0;i<filenr;i++)  // calculate statistics for every frametype: P,I (and B)  
         {  
                 switch (frame_type[i])  
                 {  
                 case 0:  
                         if (framepsnr[i] > Pmaxpsnr)  
                                 Pmaxpsnr = framepsnr[i];  
                         if (framepsnr[i] < Pminpsnr)  
                                 Pminpsnr = framepsnr[i];  
                         Pvarpsnr += (framepsnr[i] - Ppsnr)*(framepsnr[i] - Ppsnr) /Pframes;  
                         break;  
                 case 1:  
                         if (framepsnr[i] > Imaxpsnr)  
                                 Imaxpsnr = framepsnr[i];  
                         if (framepsnr[i] < Pminpsnr)  
                                 Iminpsnr = framepsnr[i];  
                         Ivarpsnr += (framepsnr[i] - Ipsnr)*(framepsnr[i] - Ipsnr) /Iframes;  
                         break;  
                 case 2:  
                         if (framepsnr[i] > Bmaxpsnr)  
                                 Bmaxpsnr = framepsnr[i];  
                         if (framepsnr[i] < Pminpsnr)  
                                 Bminpsnr = framepsnr[i];  
                         Bvarpsnr += (framepsnr[i] - Bpsnr)*(framepsnr[i] - Bpsnr) /Bframes;  
                         break;  
                 }  
         }  
   
         printf("Avg. Q%1d %2s ",ARG_QUALITY, (ARG_QUANTI ? " q" : "br"));  
         printf("%04d ",MAX(ARG_QUANTI,ARG_BITRATE));  
         printf("( %.2f bpp) ", (double)ARG_BITRATE*1000/XDIM/YDIM/ARG_FRAMERATE);  
         printf("size %6d ",totalsize);  
         printf("( %4d kbps ",(int)(totalsize*8*ARG_FRAMERATE/1000));  
         printf("/ %.2f bpp) ",(double)totalsize*8/XDIM/YDIM);  
         printf("enc: %6.1f fps, dec: %6.1f fps \n",1/totalenctime, 1/totaldectime);  
         printf("PSNR P(%d): %5.2f ( %5.2f , %5.2f ; %5.4f ) ",Pframes,Ppsnr,Pminpsnr,Pmaxpsnr,sqrt(Pvarpsnr/filenr));  
         printf("I(%d): %5.2f ( %5.2f , %5.2f ; %5.4f ) ",Iframes,Ipsnr,Iminpsnr,Imaxpsnr,sqrt(Ivarpsnr/filenr));  
         if (Bframes)  
                 printf("B(%d): %5.2f ( %5.2f , %5.2f ; %5.4f ) ",Bframes,Bpsnr,Bminpsnr,Bmaxpsnr,sqrt(Bvarpsnr/filenr));  
         printf("\n");  
   
 /*********************************************************************/  
 /*                         XviD PART  Stop                           */  
 /*********************************************************************/  
   
 release_all:  
   
         if (enc_handle)  
         {  
                 status = enc_stop();  
                 if (status)  
                         printf("Encore RELEASE problem return value %d\n", status);  
         }  
   
         if (dec_handle)  
         {  
                 status = dec_stop();  
                 if (status)  
                         printf("Decore RELEASE problem return value %d\n", status);  
         }  
   
   
 free_all_memory:  
         free(out_buffer);  
         free(divx_buffer);  
         free(in_buffer);  
   
   return 0;  
 }  

Legend:
Removed from v.211  
changed lines
  Added in v.728

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