www.pudn.com > xvidcore-0.9.2.zip > xvid_encraw.c
/*****************************************************************************
*
* XVID MPEG-4 VIDEO CODEC
* - Console based test application -
*
* Copyright(C) 2002 Christoph Lampert
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* $Id: xvid_encraw.c,v 1.9 2003/02/11 21:56:31 edgomez Exp $
*
****************************************************************************/
/*****************************************************************************
* Application notes :
*
* A sequence of YUV pics in PGM file format is encoded and decoded
* The speed is measured and PSNR of decoded picture is calculated.
*
* The program is plain C and needs no libraries except for libxvidcore,
* and maths-lib.
*
************************************************************************/
#include
#include
#include
#include
#ifndef _MSC_VER
#include
#else
#include
#endif
#include "xvid.h"
/*****************************************************************************
* Quality presets
****************************************************************************/
static int const motion_presets[7] = {
0, /* Q 0 */
PMV_EARLYSTOP16, /* Q 1 */
PMV_EARLYSTOP16, /* Q 2 */
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16, /* Q 3 */
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16, /* Q 4 */
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EARLYSTOP8 | /* Q 5 */
PMV_HALFPELREFINE8,
PMV_EARLYSTOP16 | PMV_HALFPELREFINE16 | PMV_EXTSEARCH16 | /* Q 6 */
PMV_USESQUARES16 | PMV_EARLYSTOP8 | PMV_HALFPELREFINE8
};
static int const general_presets[7] = {
XVID_H263QUANT, /* 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 */
};
/*****************************************************************************
* Command line global variables
****************************************************************************/
/* Maximum number of frames to encode */
#define ABS_MAXFRAMENR 9999
/* HINTMODEs */
#define HINT_MODE_NONE 0
#define HINT_MODE_GET 1
#define HINT_MODE_SET 2
#define HINT_FILE "hints.mv"
static int ARG_BITRATE = 900;
static int ARG_QUANTI = 0;
static int ARG_QUALITY = 6;
static int ARG_MINQUANT = 1;
static int ARG_MAXQUANT = 31;
static float ARG_FRAMERATE = 25.00f;
static int ARG_MAXFRAMENR = ABS_MAXFRAMENR;
static char *ARG_INPUTFILE = NULL;
static int ARG_INPUTTYPE = 0;
static int ARG_SAVEMPEGSTREAM = 0;
static int ARG_OUTPUTTYPE = 0;
static char *ARG_OUTPUTFILE = NULL;
static int ARG_HINTMODE = HINT_MODE_NONE;
static int XDIM = 0;
static int YDIM = 0;
#define IMAGE_SIZE(x,y) ((x)*(y)*3/2)
#define MAX(A,B) ( ((A)>(B)) ? (A) : (B) )
#define SMALL_EPS 1e-10
#define LONG_PACK(a,b,c,d) ((long) (((long)(a))<<24) | (((long)(b))<<16) | \
(((long)(c))<<8) |((long)(d)))
#define SWAP(a) ( (((a)&0x000000ff)<<24) | (((a)&0x0000ff00)<<8) | \
(((a)&0x00ff0000)>>8) | (((a)&0xff000000)>>24) )
/****************************************************************************
* Nasty global vars ;-)
***************************************************************************/
static int i,filenr = 0;
/* the path where to save output */
static char filepath[256] = "./";
/* Internal structures (handles) for encoding and decoding */
static void *enc_handle = NULL;
/*****************************************************************************
* Local prototypes
****************************************************************************/
/* Prints program usage message */
static void usage();
/* Statistical functions */
static double msecond();
/* PGM related functions */
static int read_pgmheader(FILE* handle);
static int read_pgmdata(FILE* handle, unsigned char *image);
static int read_yuvdata(FILE* handle, unsigned char *image);
/* Encoder related functions */
static int enc_init(int use_assembler);
static int enc_stop();
static int enc_main(unsigned char* image, unsigned char* bitstream,
unsigned char *hints_buffer,
long *streamlength, long* frametype, long *hints_size);
/*****************************************************************************
* Main function
****************************************************************************/
int main(int argc, char *argv[])
{
unsigned char *mp4_buffer = NULL;
unsigned char *in_buffer = NULL;
unsigned char *out_buffer = NULL;
unsigned char *hints_buffer = NULL;
double enctime;
double totalenctime=0.;
long totalsize;
long hints_size;
int status;
long frame_type;
long bigendian;
long m4v_size;
int use_assembler=0;
char filename[256];
FILE *in_file = stdin;
FILE *out_file = NULL;
FILE *hints_file = NULL;
printf("xvid_encraw - raw mpeg4 bitstream encoder ");
printf("written by Christoph Lampert 2002\n\n");
/*****************************************************************************
* Command line parsing
****************************************************************************/
for (i=1; i< argc; i++) {
if (strcmp("-asm", argv[i]) == 0 ) {
use_assembler = 1;
}
else if (strcmp("-w", argv[i]) == 0 && i < argc - 1 ) {
i++;
XDIM = atoi(argv[i]);
}
else if (strcmp("-h", argv[i]) == 0 && i < argc - 1 ) {
i++;
YDIM = atoi(argv[i]);
}
else if (strcmp("-b", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_BITRATE = atoi(argv[i]);
}
else if (strcmp("-q", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_QUALITY = atoi(argv[i]);
}
else if (strcmp("-f", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_FRAMERATE = (float)atof(argv[i]);
}
else if (strcmp("-i", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_INPUTFILE = argv[i];
}
else if (strcmp("-t", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_INPUTTYPE = atoi(argv[i]);
}
else if(strcmp("-n", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_MAXFRAMENR = atoi(argv[i]);
}
else if (strcmp("-quant", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_QUANTI = atoi(argv[i]);
}
else if (strcmp("-m", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_SAVEMPEGSTREAM = atoi(argv[i]);
}
else if (strcmp("-mt", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_OUTPUTTYPE = atoi(argv[i]);
}
else if (strcmp("-mv", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_HINTMODE = atoi(argv[i]);
}
else if (strcmp("-o", argv[i]) == 0 && i < argc - 1 ) {
i++;
ARG_OUTPUTFILE = argv[i];
}
else if (strcmp("-help", argv[i])) {
usage();
return(0);
}
else {
usage();
exit(-1);
}
}
/*****************************************************************************
* Arguments checking
****************************************************************************/
if (XDIM <= 0 || XDIM >= 2048 || YDIM <=0 || YDIM >= 2048 ) {
fprintf(stderr, "Trying to retreive width and height from PGM header\n");
ARG_INPUTTYPE = 1; /* pgm */
}
if ( ARG_QUALITY < 0 || ARG_QUALITY > 6) {
fprintf(stderr,"Wrong Quality\n");
return -1;
}
if ( ARG_BITRATE <= 0 && ARG_QUANTI == 0) {
fprintf(stderr,"Wrong Bitrate\n");
return -1;
}
if ( ARG_FRAMERATE <= 0) {
fprintf(stderr,"Wrong Framerate %s \n",argv[5]);
return -1;
}
if ( ARG_MAXFRAMENR <= 0) {
fprintf(stderr,"Wrong number of frames\n");
return -1;
}
if ( ARG_HINTMODE != HINT_MODE_NONE &&
ARG_HINTMODE != HINT_MODE_GET &&
ARG_HINTMODE != HINT_MODE_SET)
ARG_HINTMODE = HINT_MODE_NONE;
if( ARG_HINTMODE != HINT_MODE_NONE) {
char *rights = "rb";
/*
* If we are getting hints from core, we will have to write them to
* hint file
*/
if(ARG_HINTMODE == HINT_MODE_GET)
rights = "w+b";
/* Open the hint file */
hints_file = fopen(HINT_FILE, rights);
if(hints_file == NULL) {
fprintf(stderr, "Error opening input file %s\n", HINT_FILE);
return -1;
}
/* Allocate hint memory space, we will be using rawhints */
/* NB : Hope 1Mb is enough */
if((hints_buffer = malloc(1024*1024)) == NULL) {
fprintf(stderr, "Memory allocation error\n");
return -1;
}
}
if ( ARG_INPUTFILE == NULL || strcmp(ARG_INPUTFILE, "stdin") == 0) {
in_file = stdin;
}
else {
in_file = fopen(ARG_INPUTFILE, "rb");
if (in_file == NULL) {
fprintf(stderr, "Error opening input file %s\n", ARG_INPUTFILE);
return -1;
}
}
if (ARG_INPUTTYPE) {
if (read_pgmheader(in_file)) {
fprintf(stderr, "Wrong input format, I want YUV encapsulated in PGM\n");
return -1;
}
}
/* now we know the sizes, so allocate memory */
in_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM));
if (!in_buffer)
goto free_all_memory;
/* this should really be enough memory ! */
mp4_buffer = (unsigned char *) malloc(IMAGE_SIZE(XDIM,YDIM)*2);
if (!mp4_buffer)
goto free_all_memory;
/*****************************************************************************
* 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
****************************************************************************/
totalsize = LONG_PACK('M','P','4','U');
if(*((char *)(&totalsize)) == 'M')
bigendian = 1;
else
bigendian = 0;
if (ARG_SAVEMPEGSTREAM && (ARG_OUTPUTTYPE || ARG_OUTPUTFILE)) {
if (ARG_OUTPUTFILE == NULL && ARG_OUTPUTTYPE)
ARG_OUTPUTFILE = "stream.mp4u";
else if(ARG_OUTPUTFILE == NULL && !ARG_OUTPUTTYPE)
ARG_OUTPUTFILE = "stream.m4v";
if((out_file = fopen(ARG_OUTPUTFILE, "w+b")) == NULL) {
fprintf(stderr, "Error opening output file %s\n", ARG_OUTPUTFILE);
goto release_all;
}
/* Write header */
if (ARG_OUTPUTTYPE) {
long test = LONG_PACK('M','P','4','U');
test = (!bigendian)?SWAP(test):test;
fwrite(&test, sizeof(test), 1, out_file);
}
}
else {
out_file = NULL;
}
/*****************************************************************************
* Encoding loop
****************************************************************************/
totalsize = 0;
do {
if (ARG_INPUTTYPE)
status = read_pgmdata(in_file, in_buffer); /* read PGM data (YUV-format) */
else
status = read_yuvdata(in_file, in_buffer); /* read raw data (YUV-format) */
if (status)
{
/* Couldn't read image, most likely end-of-file */
continue;
}
/*****************************************************************************
* Read hints from file
****************************************************************************/
if(ARG_HINTMODE == HINT_MODE_SET) {
fread(&hints_size, 1, sizeof(long), hints_file);
hints_size = (!bigendian)?SWAP(hints_size):hints_size;
fread(hints_buffer, 1, hints_size, hints_file);
}
/*****************************************************************************
* Encode and decode this frame
****************************************************************************/
enctime = msecond();
status = enc_main(in_buffer, mp4_buffer, hints_buffer,
&m4v_size, &frame_type, &hints_size);
enctime = msecond() - enctime;
totalenctime += enctime;
totalsize += m4v_size;
printf("Frame %5d: intra %1d, enctime=%6.1f ms, size=%6dbytes\n",
(int)filenr, (int)frame_type, (float)enctime, (int)m4v_size);
/*****************************************************************************
* Save hints to file
****************************************************************************/
if(ARG_HINTMODE == HINT_MODE_GET) {
hints_size = (!bigendian)?SWAP(hints_size):hints_size;
fwrite(&hints_size, 1, sizeof(long), hints_file);
hints_size = (!bigendian)?SWAP(hints_size):hints_size;
fwrite(hints_buffer, 1, hints_size, hints_file);
}
/*****************************************************************************
* Save stream to file
****************************************************************************/
if (ARG_SAVEMPEGSTREAM)
{
/* Save single files */
if (out_file == NULL) {
sprintf(filename, "%sframe%05d.m4v", filepath, filenr);
out_file = fopen(filename, "wb");
fwrite(mp4_buffer, m4v_size, 1, out_file);
fclose(out_file);
out_file = NULL;
}
else {
/* Using mp4u container */
if (ARG_OUTPUTTYPE) {
long size = m4v_size;
size = (!bigendian)?SWAP(size):size;
fwrite(&size, sizeof(size), 1, out_file);
}
/* Write mp4 data */
fwrite(mp4_buffer, m4v_size, 1, out_file);
}
}
/* Read the header if it's pgm stream */
if (ARG_INPUTTYPE)
status = read_pgmheader(in_file);
filenr++;
} while ( (!status) && (filenr0 | default=900kbit)\n");
fprintf(stderr, " -f float : target framerate (>0)\n");
fprintf(stderr, " -i string : input filename (default=stdin)\n");
fprintf(stderr, " -t integer : input data type (yuv=0, pgm=1)\n");
fprintf(stderr, " -n integer : number of frames to encode\n");
fprintf(stderr, " -q integer : quality ([0..5])\n");
fprintf(stderr, " -m boolean : save mpeg4 raw stream (0 False*, !=0 True)\n");
fprintf(stderr, " -o string : output container filename (only usefull when -m 1 is used) :\n");
fprintf(stderr, " When this option is not used : one file per encoded frame\n");
fprintf(stderr, " When this option is used :\n");
fprintf(stderr, " + stream.m4v with -mt 0\n");
fprintf(stderr, " + stream.mp4u with -mt 1\n");
fprintf(stderr, " -mt integer : output type (m4v=0, mp4u=1)\n");
fprintf(stderr, " -mv integer : Use motion vector hints (no hints=0, get hints=1, set hints=2)\n");
fprintf(stderr, " -help : prints this help message\n");
fprintf(stderr, " -quant integer : fixed quantizer (disables -b setting)\n");
fprintf(stderr, " (* means default)\n");
}
/*****************************************************************************
* Input and output functions
*
* the are small and simple routines to read and write PGM and YUV
* image. It's just for convenience, again nothing specific to XviD
*
*****************************************************************************/
static int read_pgmheader(FILE* handle)
{
int bytes,xsize,ysize,depth;
char dummy[2];
bytes = fread(dummy,1,2,handle);
if ( (bytes < 2) || (dummy[0] != 'P') || (dummy[1] != '5' ))
return 1;
fscanf(handle,"%d %d %d",&xsize,&ysize,&depth);
if ( (xsize > 1440) || (ysize > 2880 ) || (depth != 255) )
{
fprintf(stderr,"%d %d %d\n",xsize,ysize,depth);
return 2;
}
if ( (XDIM==0) || (YDIM==0) )
{
XDIM=xsize;
YDIM=ysize*2/3;
}
return 0;
}
static int read_pgmdata(FILE* handle, unsigned char *image)
{
int i;
char dummy;
unsigned char *y = image;
unsigned char *u = image + XDIM*YDIM;
unsigned char *v = image + XDIM*YDIM + XDIM/2*YDIM/2;
/* read Y component of picture */
fread(y, 1, XDIM*YDIM, handle);
for (i=0;i */
xframe.intra = -1; /* let the codec decide between I-frame (1) and P-frame (0) */
xframe.quant = ARG_QUANTI; /* is quant != 0, use a fixed quant (and ignore bitrate) */
xframe.motion = motion_presets[ARG_QUALITY];
xframe.general = general_presets[ARG_QUALITY];
xframe.quant_intra_matrix = xframe.quant_inter_matrix = NULL;
xframe.hint.hintstream = hints_buffer;
if(ARG_HINTMODE == HINT_MODE_SET) {
xframe.hint.hintlength = *hints_size;
xframe.hint.rawhints = 0;
xframe.general |= XVID_HINTEDME_SET;
}
if(ARG_HINTMODE == HINT_MODE_GET) {
xframe.hint.rawhints = 0;
xframe.general |= XVID_HINTEDME_GET;
}
xerr = xvid_encore(enc_handle, XVID_ENC_ENCODE, &xframe, &xstats);
if(ARG_HINTMODE == HINT_MODE_GET)
*hints_size = xframe.hint.hintlength;
/*
* 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
*/
*frametype = xframe.intra;
*streamlength = xframe.length;
return xerr;
}