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 |
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_encraw.c,v 1.3 2002-09-28 14:53:40 edgomez Exp $ |
|
|
|
|
/************************************************************************ |
|
23 |
* |
* |
24 |
* Speed test routine for XviD using the XviD-API |
****************************************************************************/ |
25 |
* (C) Christoph Lampert, 2002/08/17 |
|
26 |
|
/***************************************************************************** |
27 |
|
* Application notes : |
28 |
* |
* |
29 |
* A sequence of YUV pics in PGM or RAW file format is encoded and the |
* A sequence of YUV pics in PGM file format is encoded and decoded |
30 |
* raw MPEG-4 stream is written to stdout. |
* The speed is measured and PSNR of decoded picture is calculated. |
|
* The encoding speed of this is measured, too. |
|
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_encraw.c -lxvidcore -lm -o xvid_encraw |
|
|
* |
|
|
* 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 |
|
|
* |
|
|
* FRAMERATE is a float (with or without decimal dot), default is 25.00 |
|
|
* |
|
|
* input/output and m4v-output is saved, if corresponding flags are set |
|
|
* |
|
|
* PGM input must in a very specific format, see read_pgmheader |
|
|
* it can be generated e.g. from MPEG2 by mpeg2dec -o pgmpipe |
|
|
* |
|
|
************************************************************************/ |
|
|
|
|
|
/************************************************************************ |
|
|
* |
|
|
* For EXAMPLES how to use this, see the seperate file xvid_stat.examples |
|
34 |
* |
* |
35 |
************************************************************************/ |
************************************************************************/ |
36 |
|
|
37 |
#include <stdio.h> |
#include <stdio.h> |
38 |
#include <stdlib.h> |
#include <stdlib.h> |
39 |
#include <math.h> // needed for log10 |
#include <math.h> |
40 |
#include <sys/time.h> // only needed for gettimeofday |
#ifndef _MSC_VER |
41 |
|
#include <sys/time.h> |
42 |
|
#else |
43 |
|
#include <time.h> |
44 |
|
#endif |
45 |
|
|
46 |
#include "../src/xvid.h" /* comes with XviD */ |
#include "xvid.h" |
47 |
|
|
48 |
int motion_presets[7] = { |
/***************************************************************************** |
49 |
|
* Quality presets |
50 |
|
****************************************************************************/ |
51 |
|
|
52 |
|
static int const motion_presets[7] = { |
53 |
0, // Q 0 |
0, // Q 0 |
54 |
PMV_EARLYSTOP16, // Q 1 |
PMV_EARLYSTOP16, // Q 1 |
55 |
PMV_EARLYSTOP16, // Q 2 |
PMV_EARLYSTOP16, // Q 2 |
56 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16, // Q 3 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16, // Q 3 |
57 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16, // Q 4 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16, // Q 4 |
58 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EARLYSTOP8 // Q 5 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EARLYSTOP8 | // Q 5 |
59 |
| PMV_HALFPELREFINE8, |
PMV_HALFPELREFINE8, |
60 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EXTSEARCH16 // Q 6 |
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EXTSEARCH16 | // Q 6 |
61 |
| PMV_USESQUARES16 | PMV_EARLYSTOP8 | PMV_HALFPELREFINE8 |
PMV_USESQUARES16 | PMV_EARLYSTOP8 | PMV_HALFPELREFINE8 |
62 |
}; |
}; |
63 |
|
|
64 |
int general_presets[7] = { |
static int const general_presets[7] = { |
65 |
XVID_H263QUANT, /* or use XVID_MPEGQUANT */ // Q 0 |
XVID_H263QUANT, // Q 0 |
66 |
XVID_MPEGQUANT, // Q 1 |
XVID_MPEGQUANT, // Q 1 |
67 |
XVID_H263QUANT, // Q 2 |
XVID_H263QUANT, // Q 2 |
68 |
XVID_H263QUANT | XVID_HALFPEL, // Q 3 |
XVID_H263QUANT | XVID_HALFPEL, // Q 3 |
69 |
XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V, // Q 4 |
XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V, // Q 4 |
70 |
XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V, // Q 5 |
XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V, // Q 5 |
71 |
XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V }; // Q 6 |
XVID_H263QUANT | XVID_HALFPEL | XVID_INTER4V // Q 6 |
72 |
|
}; |
73 |
|
|
74 |
|
|
75 |
/* my default values for encoding */ |
/***************************************************************************** |
76 |
|
* Command line global variables |
77 |
|
****************************************************************************/ |
78 |
|
|
79 |
|
/* Maximum number of frames to encode */ |
80 |
|
#define ABS_MAXFRAMENR 9999 |
81 |
|
|
82 |
|
static int ARG_BITRATE = 900; |
83 |
|
static int ARG_QUANTI = 0; |
84 |
|
static int ARG_QUALITY = 6; |
85 |
|
static int ARG_MINQUANT = 1; |
86 |
|
static int ARG_MAXQUANT = 31; |
87 |
|
static float ARG_FRAMERATE = 25.00f; |
88 |
|
static int ARG_MAXFRAMENR = ABS_MAXFRAMENR; |
89 |
|
static char *ARG_INPUTFILE = NULL; |
90 |
|
static int ARG_INPUTTYPE = 0; |
91 |
|
static int ARG_SAVEMPEGSTREAM = 0; |
92 |
|
static int ARG_OUTPUTTYPE = 0; |
93 |
|
static char *ARG_OUTPUTFILE = NULL; |
94 |
|
static int XDIM = 0; |
95 |
|
static int YDIM = 0; |
96 |
|
#define IMAGE_SIZE(x,y) ((x)*(y)*3/2) |
97 |
|
|
98 |
#define ABS_MAXFRAMENR 9999 // max number of frames |
#define MAX(A,B) ( ((A)>(B)) ? (A) : (B) ) |
99 |
|
#define SMALL_EPS 1e-10 |
100 |
|
|
101 |
int ARG_BITRATE=900; |
#define LONG_PACK(a,b,c,d) ((long) (((long)(a))<<24) | (((long)(b))<<16) | \ |
102 |
int ARG_QUANTI=0; |
(((long)(c))<<8) |((long)(d))) |
103 |
|
|
104 |
int ARG_QUALITY =6; |
#define SWAP(a) ( (((a)&0x000000ff)<<24) | (((a)&0x0000ff00)<<8) | \ |
105 |
int ARG_MINQUANT=1; |
(((a)&0x00ff0000)>>8) | (((a)&0xff000000)>>24) ) |
|
int ARG_MAXQUANT=31; |
|
|
float ARG_FRAMERATE=25.00; |
|
106 |
|
|
107 |
int ARG_MAXFRAMENR=ABS_MAXFRAMENR; |
/**************************************************************************** |
108 |
|
* Nasty global vars ;-) |
109 |
|
***************************************************************************/ |
110 |
|
|
111 |
#ifdef BFRAMES |
static int i,filenr = 0; |
112 |
|
|
113 |
int ARG_MAXBFRAMES=1; |
/* the path where to save output */ |
114 |
int ARG_BQUANTRATIO=200; |
static char filepath[256] = "./"; |
115 |
|
|
116 |
#endif |
/* Internal structures (handles) for encoding and decoding */ |
117 |
|
static void *enc_handle = NULL; |
118 |
|
|
119 |
#define MAX(A,B) ( ((A)>(B)) ? (A) : (B) ) |
/***************************************************************************** |
120 |
#define SMALL_EPS 1e-10 |
* Local prototypes |
121 |
|
****************************************************************************/ |
122 |
|
|
123 |
|
/* Prints program usage message */ |
124 |
|
static void usage(); |
125 |
|
|
126 |
|
/* Statistical functions */ |
127 |
|
static double msecond(); |
128 |
|
|
129 |
|
/* PGM related functions */ |
130 |
|
static int read_pgmheader(FILE* handle); |
131 |
|
static int read_pgmdata(FILE* handle, unsigned char *image); |
132 |
|
static int read_yuvdata(FILE* handle, unsigned char *image); |
133 |
|
|
134 |
|
/* Encoder related functions */ |
135 |
|
static int enc_init(int use_assembler); |
136 |
|
static int enc_stop(); |
137 |
|
static int enc_main(unsigned char* image, unsigned char* bitstream, |
138 |
|
int *streamlength, int* frametype); |
139 |
|
|
140 |
|
/***************************************************************************** |
141 |
|
* Main function |
142 |
|
****************************************************************************/ |
143 |
|
|
144 |
|
int main(int argc, char *argv[]) |
145 |
|
{ |
146 |
|
|
147 |
|
unsigned char *mp4_buffer = NULL; |
148 |
|
unsigned char *in_buffer = NULL; |
149 |
|
unsigned char *out_buffer = NULL; |
150 |
|
|
151 |
|
double enctime; |
152 |
|
double totalenctime=0.; |
153 |
|
|
154 |
|
long totalsize; |
155 |
|
int status; |
156 |
|
int frame_type; |
157 |
|
int bigendian; |
158 |
|
|
159 |
|
int m4v_size; |
160 |
|
int use_assembler=0; |
161 |
|
|
162 |
|
char filename[256]; |
163 |
|
|
164 |
|
FILE *in_file = stdin; |
165 |
|
FILE *out_file = NULL; |
166 |
|
|
167 |
|
printf("xvid_decraw - raw mpeg4 bitstream encoder "); |
168 |
|
printf("written by Christoph Lampert 2002\n\n"); |
169 |
|
|
170 |
|
/***************************************************************************** |
171 |
|
* Command line parsing |
172 |
|
****************************************************************************/ |
173 |
|
|
174 |
|
for (i=1; i< argc; i++) { |
175 |
|
|
176 |
|
if (strcmp("-asm", argv[i]) == 0 ) { |
177 |
|
use_assembler = 1; |
178 |
|
} |
179 |
|
else if (strcmp("-w", argv[i]) == 0 && i < argc - 1 ) { |
180 |
|
i++; |
181 |
|
XDIM = atoi(argv[i]); |
182 |
|
} |
183 |
|
else if (strcmp("-h", argv[i]) == 0 && i < argc - 1 ) { |
184 |
|
i++; |
185 |
|
YDIM = atoi(argv[i]); |
186 |
|
} |
187 |
|
else if (strcmp("-b", argv[i]) == 0 && i < argc - 1 ) { |
188 |
|
i++; |
189 |
|
ARG_BITRATE = atoi(argv[i]); |
190 |
|
} |
191 |
|
else if (strcmp("-q", argv[i]) == 0 && i < argc - 1 ) { |
192 |
|
i++; |
193 |
|
ARG_QUALITY = atoi(argv[i]); |
194 |
|
} |
195 |
|
else if (strcmp("-f", argv[i]) == 0 && i < argc - 1 ) { |
196 |
|
i++; |
197 |
|
ARG_FRAMERATE = (float)atof(argv[i]); |
198 |
|
} |
199 |
|
else if (strcmp("-i", argv[i]) == 0 && i < argc - 1 ) { |
200 |
|
i++; |
201 |
|
ARG_INPUTFILE = argv[i]; |
202 |
|
} |
203 |
|
else if (strcmp("-t", argv[i]) == 0 && i < argc - 1 ) { |
204 |
|
i++; |
205 |
|
ARG_INPUTTYPE = atoi(argv[i]); |
206 |
|
} |
207 |
|
else if(strcmp("-n", argv[i]) == 0 && i < argc - 1 ) { |
208 |
|
i++; |
209 |
|
ARG_MAXFRAMENR = atoi(argv[i]); |
210 |
|
} |
211 |
|
else if (strcmp("-quant", argv[i]) == 0 && i < argc - 1 ) { |
212 |
|
i++; |
213 |
|
ARG_QUANTI = atoi(argv[i]); |
214 |
|
} |
215 |
|
else if (strcmp("-m", argv[i]) == 0 && i < argc - 1 ) { |
216 |
|
i++; |
217 |
|
ARG_SAVEMPEGSTREAM = atoi(argv[i]); |
218 |
|
} |
219 |
|
else if (strcmp("-mt", argv[i]) == 0 && i < argc - 1 ) { |
220 |
|
i++; |
221 |
|
ARG_OUTPUTTYPE = atoi(argv[i]); |
222 |
|
} |
223 |
|
else if (strcmp("-o", argv[i]) == 0 && i < argc - 1 ) { |
224 |
|
i++; |
225 |
|
ARG_OUTPUTFILE = argv[i]; |
226 |
|
} |
227 |
|
else if (strcmp("-help", argv[i])) { |
228 |
|
usage(); |
229 |
|
return(0); |
230 |
|
} |
231 |
|
else { |
232 |
|
usage(); |
233 |
|
exit(-1); |
234 |
|
} |
235 |
|
|
236 |
|
} |
237 |
|
|
238 |
|
/***************************************************************************** |
239 |
|
* Arguments checking |
240 |
|
****************************************************************************/ |
241 |
|
|
242 |
|
if (XDIM <= 0 || XDIM >= 2048 || YDIM <=0 || YDIM >= 2048 ) { |
243 |
|
fprintf(stderr, "Trying to retreive width and height from PGM header\n"); |
244 |
|
ARG_INPUTTYPE = 1; /* pgm */ |
245 |
|
} |
246 |
|
|
247 |
|
if ( ARG_QUALITY < 0 || ARG_QUALITY > 6) { |
248 |
|
fprintf(stderr,"Wrong Quality\n"); |
249 |
|
return -1; |
250 |
|
} |
251 |
|
|
252 |
|
if ( ARG_BITRATE <= 0 && ARG_QUANTI == 0) { |
253 |
|
fprintf(stderr,"Wrong Bitrate\n"); |
254 |
|
return -1; |
255 |
|
} |
256 |
|
|
257 |
|
if ( ARG_FRAMERATE <= 0) { |
258 |
|
fprintf(stderr,"Wrong Framerate %s \n",argv[5]); |
259 |
|
return -1; |
260 |
|
} |
261 |
|
|
262 |
|
if ( ARG_MAXFRAMENR <= 0) { |
263 |
|
fprintf(stderr,"Wrong number of frames\n"); |
264 |
|
return -1; |
265 |
|
} |
266 |
|
|
267 |
|
if ( ARG_INPUTFILE == NULL || strcmp(ARG_INPUTFILE, "stdin") == 0) { |
268 |
|
in_file = stdin; |
269 |
|
} |
270 |
|
else { |
271 |
|
|
272 |
|
in_file = fopen(ARG_INPUTFILE, "rb"); |
273 |
|
if (in_file == NULL) { |
274 |
|
fprintf(stderr, "Error opening input file %s\n", ARG_INPUTFILE); |
275 |
|
return -1; |
276 |
|
} |
277 |
|
} |
278 |
|
|
279 |
|
if (ARG_INPUTTYPE) { |
280 |
|
if (read_pgmheader(in_file)) { |
281 |
|
fprintf(stderr, "Wrong input format, I want YUV encapsulated in PGM\n"); |
282 |
|
return -1; |
283 |
|
} |
284 |
|
} |
285 |
|
|
286 |
|
/* now we know the sizes, so allocate memory */ |
287 |
|
|
288 |
|
in_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM)); |
289 |
|
if (!in_buffer) |
290 |
|
goto free_all_memory; |
291 |
|
|
292 |
|
/* this should really be enough memory ! */ |
293 |
|
mp4_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM)*2); |
294 |
|
if (!mp4_buffer) |
295 |
|
goto free_all_memory; |
296 |
|
|
297 |
|
/***************************************************************************** |
298 |
|
* XviD PART Start |
299 |
|
****************************************************************************/ |
300 |
|
|
301 |
|
|
302 |
|
status = enc_init(use_assembler); |
303 |
|
if (status) |
304 |
|
{ |
305 |
|
fprintf(stderr, "Encore INIT problem, return value %d\n", status); |
306 |
|
goto release_all; |
307 |
|
} |
308 |
|
|
309 |
|
/***************************************************************************** |
310 |
|
* Main loop |
311 |
|
****************************************************************************/ |
312 |
|
|
313 |
|
totalsize = LONG_PACK('M','P','4','U'); |
314 |
|
if(*((char *)(&totalsize)) == 'M') |
315 |
|
bigendian = 1; |
316 |
|
else |
317 |
|
bigendian = 0; |
318 |
|
|
319 |
|
if (ARG_SAVEMPEGSTREAM && (ARG_OUTPUTTYPE || ARG_OUTPUTFILE)) { |
320 |
|
|
321 |
|
if (ARG_OUTPUTFILE == NULL && ARG_OUTPUTTYPE) |
322 |
|
ARG_OUTPUTFILE = "stream.mp4u"; |
323 |
|
else if(ARG_OUTPUTFILE == NULL && !ARG_OUTPUTTYPE) |
324 |
|
ARG_OUTPUTFILE = "stream.m4v"; |
325 |
|
|
326 |
|
if((out_file = fopen(ARG_OUTPUTFILE, "w+b")) == NULL) { |
327 |
|
fprintf(stderr, "Error opening output file %s\n", ARG_OUTPUTFILE); |
328 |
|
goto release_all; |
329 |
|
} |
330 |
|
|
331 |
|
/* Write header */ |
332 |
|
if (ARG_OUTPUTTYPE) { |
333 |
|
|
334 |
|
long test = LONG_PACK('M','P','4','U'); |
335 |
|
|
336 |
|
test = (!bigendian)?SWAP(test):test; |
337 |
|
|
338 |
|
fwrite(&test, sizeof(test), 1, out_file); |
339 |
|
|
340 |
|
} |
341 |
|
|
342 |
|
} |
343 |
|
else { |
344 |
|
out_file = NULL; |
345 |
|
} |
346 |
|
|
347 |
|
/***************************************************************************** |
348 |
|
* Encoding loop |
349 |
|
****************************************************************************/ |
350 |
|
|
351 |
|
totalsize = 0; |
352 |
|
|
353 |
/* these are global variables. Not very elegant, but easy, and this is an easy program */ |
do { |
354 |
|
|
355 |
|
if (ARG_INPUTTYPE) |
356 |
|
status = read_pgmdata(in_file, in_buffer); // read PGM data (YUV-format) |
357 |
|
else |
358 |
|
status = read_yuvdata(in_file, in_buffer); // read raw data (YUV-format) |
359 |
|
|
360 |
|
if (status) |
361 |
|
{ |
362 |
|
/* Couldn't read image, most likely end-of-file */ |
363 |
|
continue; |
364 |
|
} |
365 |
|
|
366 |
|
/***************************************************************************** |
367 |
|
* Encode and decode this frame |
368 |
|
****************************************************************************/ |
369 |
|
|
370 |
|
enctime = msecond(); |
371 |
|
status = enc_main(in_buffer, mp4_buffer, &m4v_size, &frame_type); |
372 |
|
enctime = msecond() - enctime; |
373 |
|
|
374 |
|
totalenctime += enctime; |
375 |
|
totalsize += m4v_size; |
376 |
|
|
377 |
|
printf("Frame %5d: intra %1d, enctime=%6.1f ms, size=%6dbytes\n", |
378 |
|
(int)filenr, (int)frame_type, (float)enctime, (int)m4v_size); |
379 |
|
|
380 |
|
if (ARG_SAVEMPEGSTREAM) |
381 |
|
{ |
382 |
|
/* Save single files */ |
383 |
|
if (out_file == NULL) { |
384 |
|
sprintf(filename, "%sframe%05d.m4v", filepath, filenr); |
385 |
|
out_file = fopen(filename, "wb"); |
386 |
|
fwrite(mp4_buffer, m4v_size, 1, out_file); |
387 |
|
fclose(out_file); |
388 |
|
out_file = NULL; |
389 |
|
} |
390 |
|
else { |
391 |
|
/* Using mp4u container */ |
392 |
|
if (ARG_OUTPUTTYPE) { |
393 |
|
long size = m4v_size; |
394 |
|
size = (!bigendian)?SWAP(size):size; |
395 |
|
fwrite(&size, sizeof(size), 1, out_file); |
396 |
|
} |
397 |
|
|
398 |
|
/* Write mp4 data */ |
399 |
|
fwrite(mp4_buffer, m4v_size, 1, out_file); |
400 |
|
|
401 |
|
} |
402 |
|
} |
403 |
|
|
404 |
|
/* Read the header if it's pgm stream */ |
405 |
|
if (ARG_INPUTTYPE) |
406 |
|
status = read_pgmheader(in_file); |
407 |
|
|
408 |
|
filenr++; |
409 |
|
|
410 |
|
} while ( (!status) && (filenr<ARG_MAXFRAMENR) ); |
411 |
|
|
412 |
|
|
413 |
|
|
414 |
|
/***************************************************************************** |
415 |
|
* Calculate totals and averages for output, print results |
416 |
|
****************************************************************************/ |
417 |
|
|
418 |
|
totalsize /= filenr; |
419 |
|
totalenctime /= filenr; |
420 |
|
|
421 |
|
printf("Avg: enctime %5.2f ms, %5.2f fps, filesize %7d bytes\n", |
422 |
|
totalenctime, 1000/totalenctime, (int)totalsize); |
423 |
|
|
424 |
|
/***************************************************************************** |
425 |
|
* XviD PART Stop |
426 |
|
****************************************************************************/ |
427 |
|
|
428 |
|
release_all: |
429 |
|
|
430 |
|
if (enc_handle) |
431 |
|
{ |
432 |
|
status = enc_stop(); |
433 |
|
if (status) |
434 |
|
fprintf(stderr, "Encore RELEASE problem return value %d\n", status); |
435 |
|
} |
436 |
|
|
437 |
int XDIM=0; |
fclose(in_file); |
438 |
int YDIM=0; // will be set when reading first image |
if(out_file) |
439 |
int i,filenr = 0; |
fclose(out_file); |
440 |
|
|
441 |
int save_m4v_flag = 1; // output MPEG4-bytestream? |
free_all_memory: |
442 |
int save_ref_flag = 0; // save input image |
free(out_buffer); |
443 |
|
free(mp4_buffer); |
444 |
|
free(in_buffer); |
445 |
|
|
446 |
int pgmflag = 0; // a flag, if input is in PGM format, overwritten in init-phase |
return 0; |
|
char filepath[256] = "./"; // the path where to save output |
|
447 |
|
|
448 |
void *enc_handle = NULL; // internal structures (handles) for encoding |
} |
449 |
|
|
450 |
|
|
451 |
/*********************************************************************/ |
/***************************************************************************** |
452 |
/* "statistical" functions */ |
* "statistical" functions |
453 |
/* */ |
* |
454 |
/* these are not needed for encoding or decoding, but for measuring */ |
* these are not needed for encoding or decoding, but for measuring |
455 |
/* time and quality, there in nothing specific to XviD in these */ |
* time and quality, there in nothing specific to XviD in these |
456 |
/* */ |
* |
457 |
/*********************************************************************/ |
*****************************************************************************/ |
458 |
|
|
459 |
double msecond() |
/* Return time elapsed time in miliseconds since the program started */ |
460 |
/* return the current time in seconds(!) */ |
static double msecond() |
461 |
{ |
{ |
462 |
|
#ifndef _MSC_VER |
463 |
struct timeval tv; |
struct timeval tv; |
464 |
gettimeofday(&tv, 0); |
gettimeofday(&tv, 0); |
465 |
return tv.tv_sec + tv.tv_usec * 1.0e-6; |
return tv.tv_sec*1.0e3 + tv.tv_usec * 1.0e-3; |
466 |
|
#else |
467 |
|
clock_t clk; |
468 |
|
clk = clock(); |
469 |
|
return clk * 1000 / CLOCKS_PER_SEC; |
470 |
|
#endif |
471 |
} |
} |
472 |
|
|
473 |
/*********************************************************************/ |
/***************************************************************************** |
474 |
/* input and output functions */ |
* Usage message |
475 |
/* */ |
*****************************************************************************/ |
476 |
/* the are small and simple routines to read and write PGM and YUV */ |
|
477 |
/* image. It's just for convenience, again nothing specific to XviD */ |
static void usage() |
478 |
/* */ |
{ |
479 |
/*********************************************************************/ |
|
480 |
|
fprintf(stderr, "Usage : xvid_stat [OPTIONS]\n"); |
481 |
|
fprintf(stderr, "Options :\n"); |
482 |
|
fprintf(stderr, " -w integer : frame width ([1.2048])\n"); |
483 |
|
fprintf(stderr, " -h integer : frame height ([1.2048])\n"); |
484 |
|
fprintf(stderr, " -b integer : target bitrate (>0 | default=900kbit)\n"); |
485 |
|
fprintf(stderr, " -f float : target framerate (>0)\n"); |
486 |
|
fprintf(stderr, " -i string : input filename (default=stdin)\n"); |
487 |
|
fprintf(stderr, " -t integer : input data type (yuv=0, pgm=1)\n"); |
488 |
|
fprintf(stderr, " -n integer : number of frames to encode\n"); |
489 |
|
fprintf(stderr, " -q integer : quality ([0..5])\n"); |
490 |
|
fprintf(stderr, " -d boolean : save decoder output (0 False*, !=0 True)\n"); |
491 |
|
fprintf(stderr, " -m boolean : save mpeg4 raw stream (0 False*, !=0 True)\n"); |
492 |
|
fprintf(stderr, " -o string : output container filename (only usefull when -m 1 is used) :\n"); |
493 |
|
fprintf(stderr, " When this option is not used : one file per encoded frame\n"); |
494 |
|
fprintf(stderr, " When this option is used :\n"); |
495 |
|
fprintf(stderr, " + stream.m4v with -mt 0\n"); |
496 |
|
fprintf(stderr, " + stream.mp4u with -mt 1\n"); |
497 |
|
fprintf(stderr, " -mt integer : output type (m4v=0, mp4u=1)\n"); |
498 |
|
fprintf(stderr, " -help : prints this help message\n"); |
499 |
|
fprintf(stderr, " -quant integer : fixed quantizer (disables -b setting)\n"); |
500 |
|
fprintf(stderr, " (* means default)\n"); |
501 |
|
|
502 |
int read_pgmheader(FILE* handle) |
} |
503 |
|
|
504 |
|
/***************************************************************************** |
505 |
|
* Input and output functions |
506 |
|
* |
507 |
|
* the are small and simple routines to read and write PGM and YUV |
508 |
|
* image. It's just for convenience, again nothing specific to XviD |
509 |
|
* |
510 |
|
*****************************************************************************/ |
511 |
|
|
512 |
|
static int read_pgmheader(FILE* handle) |
513 |
{ |
{ |
514 |
int bytes,xsize,ysize,depth; |
int bytes,xsize,ysize,depth; |
515 |
char dummy[2]; |
char dummy[2]; |
518 |
|
|
519 |
if ( (bytes < 2) || (dummy[0] != 'P') || (dummy[1] != '5' )) |
if ( (bytes < 2) || (dummy[0] != 'P') || (dummy[1] != '5' )) |
520 |
return 1; |
return 1; |
521 |
|
|
522 |
fscanf(handle,"%d %d %d",&xsize,&ysize,&depth); |
fscanf(handle,"%d %d %d",&xsize,&ysize,&depth); |
523 |
if ( (xsize > 1440) || (ysize > 2880 ) || (depth != 255) ) |
if ( (xsize > 1440) || (ysize > 2880 ) || (depth != 255) ) |
524 |
{ |
{ |
525 |
|
fprintf(stderr,"%d %d %d\n",xsize,ysize,depth); |
526 |
return 2; |
return 2; |
527 |
} |
} |
528 |
if ( (XDIM==0) || (YDIM==0) ) |
if ( (XDIM==0) || (YDIM==0) ) |
529 |
{ XDIM=xsize; |
{ |
530 |
YDIM=ysize; |
XDIM=xsize; |
531 |
|
YDIM=ysize*2/3; |
532 |
} |
} |
533 |
|
|
534 |
return 0; |
return 0; |
535 |
} |
} |
536 |
|
|
537 |
int read_pgmdata(FILE* handle, unsigned char *image) |
static int read_pgmdata(FILE* handle, unsigned char *image) |
538 |
{ |
{ |
539 |
int i,status; |
int i; |
540 |
char dummy; |
char dummy; |
541 |
|
|
542 |
unsigned char* buff1_ptr2 = image + XDIM*YDIM; |
unsigned char *y = image; |
543 |
unsigned char* buff1_ptr3 = image + XDIM*YDIM + XDIM/2*YDIM/2; |
unsigned char *u = image + XDIM*YDIM; |
544 |
|
unsigned char *v = image + XDIM*YDIM + XDIM/2*YDIM/2; |
545 |
|
|
546 |
fread(image,XDIM*YDIM,1,stdin); // read Y component of picture |
/* read Y component of picture */ |
547 |
|
fread(y, 1, XDIM*YDIM, handle); |
548 |
|
|
549 |
for (i=0;i<YDIM/2;i++) |
for (i=0;i<YDIM/2;i++) |
550 |
{ |
{ |
551 |
fread(buff1_ptr2,XDIM/2,1,stdin); // read U |
/* read U */ |
552 |
buff1_ptr2 += XDIM/2; |
fread(u, 1, XDIM/2, handle); |
|
fread(buff1_ptr3,XDIM/2,1,stdin); // read V |
|
|
buff1_ptr3 += XDIM/2; |
|
|
} |
|
|
fread(&dummy,1,1,handle); // I don't know why, but this seems needed |
|
|
return 0; |
|
|
} |
|
553 |
|
|
554 |
int read_yuvdata(FILE* handle, unsigned char *image) |
/* read V */ |
555 |
{ int i; |
fread(v, 1, XDIM/2, handle); |
|
char dummy; |
|
556 |
|
|
557 |
unsigned char* buff1_ptr2 = image + XDIM*YDIM; |
/* Update pointers */ |
558 |
unsigned char* buff1_ptr3 = image + XDIM*YDIM + XDIM/2*YDIM/2; |
u += XDIM/2; |
559 |
|
v += XDIM/2; |
560 |
|
} |
561 |
|
|
562 |
|
/* I don't know why, but this seems needed */ |
563 |
|
fread(&dummy, 1, 1, handle); |
564 |
|
|
|
if (fread(image,XDIM,YDIM*3/2,stdin) != YDIM*3/2) |
|
|
return 1; |
|
|
else |
|
565 |
return 0; |
return 0; |
566 |
} |
} |
567 |
|
|
568 |
int write_pgm(char *filename, unsigned char *image) |
static int read_yuvdata(FILE* handle, unsigned char *image) |
569 |
{ |
{ |
570 |
FILE *filehandle; |
|
571 |
filehandle=fopen(filename,"wb"); |
if (fread(image, 1, IMAGE_SIZE(XDIM, YDIM), handle) != (unsigned int)IMAGE_SIZE(XDIM, YDIM)) |
|
if (filehandle) |
|
|
{ |
|
|
fprintf(filehandle,"P5\n\n"); // |
|
|
fprintf(filehandle,"%d %d 255\n",XDIM,YDIM*3/2); |
|
|
fwrite(image,XDIM,YDIM*3/2,filehandle); |
|
|
fclose(filehandle); |
|
|
return 0; |
|
|
} |
|
|
else |
|
572 |
return 1; |
return 1; |
573 |
|
else |
574 |
|
return 0; |
575 |
} |
} |
576 |
|
|
577 |
/*********************************************************************/ |
/***************************************************************************** |
578 |
/* Routines for encoding: init encoder, frame step, release encoder */ |
* Routines for encoding: init encoder, frame step, release encoder |
579 |
/*********************************************************************/ |
****************************************************************************/ |
580 |
|
|
581 |
#define FRAMERATE_INCR 1001 |
#define FRAMERATE_INCR 1001 |
582 |
|
|
583 |
|
/* Initialize encoder for first use, pass all needed parameters to the codec */ |
584 |
int enc_init(int use_assembler) |
static int enc_init(int use_assembler) |
585 |
{ /* initialize encoder for first use, pass all needed parameters to the codec */ |
{ |
586 |
int xerr; |
int xerr; |
587 |
|
|
588 |
XVID_INIT_PARAM xinit; |
XVID_INIT_PARAM xinit; |
589 |
XVID_ENC_PARAM xparam; |
XVID_ENC_PARAM xparam; |
590 |
|
|
591 |
if(use_assembler) |
if(use_assembler) { |
592 |
|
|
593 |
#ifdef ARCH_IA64 |
#ifdef ARCH_IA64 |
594 |
xinit.cpu_flags = XVID_CPU_FORCE | XVID_CPU_IA64; |
xinit.cpu_flags = XVID_CPU_FORCE | XVID_CPU_IA64; |
595 |
#else |
#else |
596 |
xinit.cpu_flags = 0; |
xinit.cpu_flags = 0; |
597 |
#endif |
#endif |
598 |
|
} |
599 |
else |
else { |
600 |
xinit.cpu_flags = XVID_CPU_FORCE; |
xinit.cpu_flags = XVID_CPU_FORCE; |
601 |
|
} |
602 |
|
|
603 |
xvid_init(NULL, 0, &xinit, NULL); |
xvid_init(NULL, 0, &xinit, NULL); |
604 |
|
|
618 |
xparam.rc_averaging_period = 100; |
xparam.rc_averaging_period = 100; |
619 |
xparam.rc_buffer = 10; |
xparam.rc_buffer = 10; |
620 |
xparam.rc_bitrate = ARG_BITRATE*1000; |
xparam.rc_bitrate = ARG_BITRATE*1000; |
621 |
xparam.min_quantizer = 1; |
xparam.min_quantizer = ARG_MINQUANT; |
622 |
xparam.max_quantizer = 31; |
xparam.max_quantizer = ARG_MAXQUANT; |
623 |
xparam.max_key_interval = (int)ARG_FRAMERATE*10; |
xparam.max_key_interval = (int)ARG_FRAMERATE*10; |
624 |
|
|
625 |
#ifdef BFRAMES |
/* I use a small value here, since will not encode whole movies, but short clips */ |
|
xparam.global = XVID_GLOBAL_DX50BVOP; |
|
|
xparam.max_bframes = ARG_MAXBFRAMES; |
|
|
xparam.bquant_ratio = ARG_BQUANTRATIO; |
|
|
xparam.frame_drop_ratio=0; |
|
|
#endif |
|
|
|
|
|
/* I use a small value here, since will not encode whole movies, |
|
|
but short clips */ |
|
626 |
|
|
627 |
xerr = xvid_encore(NULL, XVID_ENC_CREATE, &xparam, NULL); |
xerr = xvid_encore(NULL, XVID_ENC_CREATE, &xparam, NULL); |
628 |
enc_handle=xparam.handle; |
enc_handle=xparam.handle; |
630 |
return xerr; |
return xerr; |
631 |
} |
} |
632 |
|
|
633 |
int enc_stop() |
static int enc_stop() |
634 |
{ int xerr; |
{ |
635 |
|
int xerr; |
636 |
|
|
637 |
xerr = xvid_encore(enc_handle, XVID_ENC_DESTROY, NULL, NULL); |
xerr = xvid_encore(enc_handle, XVID_ENC_DESTROY, NULL, NULL); |
638 |
return xerr; |
return xerr; |
639 |
|
|
640 |
} |
} |
641 |
|
|
642 |
int enc_main(unsigned char* image, unsigned char* bitstream, int *streamlength, int* frametype) |
static int enc_main(unsigned char* image, unsigned char* bitstream, |
643 |
{ int xerr; |
int *streamlength, int* frametype) |
644 |
|
{ |
645 |
|
int xerr; |
646 |
|
|
647 |
XVID_ENC_FRAME xframe; |
XVID_ENC_FRAME xframe; |
648 |
XVID_ENC_STATS xstats; |
XVID_ENC_STATS xstats; |
661 |
xframe.general = general_presets[ARG_QUALITY]; |
xframe.general = general_presets[ARG_QUALITY]; |
662 |
xframe.quant_intra_matrix = xframe.quant_inter_matrix = NULL; |
xframe.quant_intra_matrix = xframe.quant_inter_matrix = NULL; |
663 |
|
|
|
#ifdef BFRAMES |
|
|
xframe.bquant = 0; |
|
|
#endif |
|
|
|
|
664 |
xerr = xvid_encore(enc_handle, XVID_ENC_ENCODE, &xframe, &xstats); |
xerr = xvid_encore(enc_handle, XVID_ENC_ENCODE, &xframe, &xstats); |
665 |
|
|
666 |
/* enc_result->is_key_frame = xframe.intra; |
/* |
667 |
enc_result->quantizer = xframe.quant; |
* This is statictical data, e.g. for 2-pass. If you are not |
668 |
enc_result->total_bits = xframe.length * 8; |
* interested in any of this, you can use NULL instead of &xstats |
|
enc_result->motion_bits = xstats.hlength * 8; |
|
|
enc_result->texture_bits = enc_result->total_bits - enc_result->motion_bits; |
|
|
*/ |
|
|
|
|
|
/* This is statictical data, e.g. for 2-pass. |
|
|
If you are not interested in any of this, you can use |
|
|
NULL instead of &xstats |
|
669 |
*/ |
*/ |
670 |
*frametype = xframe.intra; |
*frametype = xframe.intra; |
671 |
*streamlength = xframe.length; |
*streamlength = xframe.length; |
672 |
|
|
673 |
return xerr; |
return xerr; |
674 |
} |
} |
|
|
|
|
/*********************************************************************/ |
|
|
/* Main program */ |
|
|
/*********************************************************************/ |
|
|
|
|
|
int main(int argc, char *argv[]) |
|
|
{ |
|
|
unsigned char *divx_buffer = NULL; |
|
|
unsigned char *in_buffer = NULL; |
|
|
|
|
|
double enctime; |
|
|
double totalenctime=0.; |
|
|
|
|
|
long totalsize=0; |
|
|
int status; |
|
|
|
|
|
int m4v_size; |
|
|
int frame_type[ABS_MAXFRAMENR]; |
|
|
int Iframes=0, Pframes=0, Bframes=0; |
|
|
int use_assembler=1; |
|
|
|
|
|
char filename[256]; |
|
|
|
|
|
FILE *filehandle; |
|
|
|
|
|
/* read YUV in pgm format from stdin */ |
|
|
if (!pgmflag) |
|
|
{ |
|
|
pgmflag = 1; |
|
|
|
|
|
// if (argc==2 && !strcmp(argv[1],"-noasm")) |
|
|
// use_assembler = 0; |
|
|
|
|
|
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)) |
|
|
{ |
|
|
fprintf(stderr,"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 |
|
|
fprintf(stderr,"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; |
|
|
fprintf(stderr,"Quantizer %d\n",ARG_QUANTI); |
|
|
} |
|
|
else |
|
|
fprintf(stderr,"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; } |
|
|
fprintf(stderr,"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; } |
|
|
fprintf(stderr,"max. Framenr. %d\n",ARG_MAXFRAMENR); |
|
|
} |
|
|
|
|
|
#ifdef BFRAMES |
|
|
if (argc>=8) |
|
|
{ ARG_MAXBFRAMES = atoi(argv[7]); |
|
|
if ( (ARG_MAXBFRAMES < -1) || ( ARG_MAXBFRAMES > ARG_FRAMERATE) ) |
|
|
{ fprintf(stderr,"Wrong maximumnumber of bframes\n"); return -1; } |
|
|
fprintf(stderr,"max. B-frames %d\n",ARG_MAXBFRAMES); |
|
|
} |
|
|
|
|
|
if (argc>=9) |
|
|
{ ARG_MAXFRAMENR = atoi(argv[8]); |
|
|
if ( (ARG_BQUANTRATIO <= 0) ) |
|
|
{ fprintf(stderr,"Wrong B-frames Quantizer ratio \n"); return -1; } |
|
|
fprintf(stderr,"B-frames quant-ratio %d\n",ARG_BQUANTRATIO); |
|
|
} |
|
|
#endif |
|
|
|
|
|
/* now we know the sizes, so allocate memory */ |
|
|
|
|
|
in_buffer = (unsigned char *) malloc(XDIM*YDIM); |
|
|
if (!in_buffer) |
|
|
goto free_all_memory; |
|
|
|
|
|
divx_buffer = (unsigned char *) malloc(XDIM*YDIM*2); |
|
|
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 |
|
|
|
|
|
/*********************************************************************/ |
|
|
/* XviD PART Start */ |
|
|
/*********************************************************************/ |
|
|
|
|
|
status = enc_init(use_assembler); |
|
|
if (status) |
|
|
{ |
|
|
fprintf(stderr,"Encore 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; |
|
|
|
|
|
fprintf(stderr,"Frame %5d: intra %d, enctime =%6.1f ms length=%7d bytes\n", |
|
|
filenr, frame_type[filenr], enctime*1000, m4v_size); |
|
|
|
|
|
if (save_m4v_flag) |
|
|
{ |
|
|
fwrite(divx_buffer, m4v_size, 1, stdout); |
|
|
} |
|
|
|
|
|
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; |
|
|
|
|
|
for (i=0;i<filenr;i++) |
|
|
{ |
|
|
switch (frame_type[i]) |
|
|
{ |
|
|
case 0: |
|
|
Pframes++; |
|
|
break; |
|
|
case 1: |
|
|
Iframes++; |
|
|
break; |
|
|
case 2: |
|
|
default: |
|
|
Bframes++; |
|
|
break; |
|
|
} |
|
|
} |
|
|
|
|
|
fprintf(stderr,"Avg: enctime %5.2f ms, %5.2f fps, filesize =%d\n", |
|
|
1000*totalenctime, 1./totalenctime, totalsize); |
|
|
|
|
|
/*********************************************************************/ |
|
|
/* XviD PART Stop */ |
|
|
/*********************************************************************/ |
|
|
|
|
|
release_all: |
|
|
|
|
|
if (enc_handle) |
|
|
{ |
|
|
status = enc_stop(); |
|
|
if (status) |
|
|
fprintf(stderr,"Encore RELEASE problem return value %d\n", status); |
|
|
} |
|
|
|
|
|
free_all_memory: |
|
|
free(divx_buffer); |
|
|
free(in_buffer); |
|
|
|
|
|
return 0; |
|
|
} |
|