199 lines
5.7 KiB
C
199 lines
5.7 KiB
C
/* (C) 2007 Jean-Marc Valin, CSIRO
|
|
*/
|
|
/*
|
|
Redistribution and use in source and binary forms, with or without
|
|
modification, are permitted provided that the following conditions
|
|
are met:
|
|
|
|
- Redistributions of source code must retain the above copyright
|
|
notice, this list of conditions and the following disclaimer.
|
|
|
|
- Redistributions in binary form must reproduce the above copyright
|
|
notice, this list of conditions and the following disclaimer in the
|
|
documentation and/or other materials provided with the distribution.
|
|
|
|
- Neither the name of the Xiph.org Foundation nor the names of its
|
|
contributors may be used to endorse or promote products derived from
|
|
this software without specific prior written permission.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
|
``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
|
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
|
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR
|
|
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
|
EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
|
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
|
|
PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
|
|
LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
|
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "celt.h"
|
|
#include "arch.h"
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <math.h>
|
|
#include <string.h>
|
|
|
|
#define MAX_PACKET 1024
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
char *inFile, *outFile;
|
|
FILE *fin, *fout;
|
|
CELTMode *mode=NULL;
|
|
CELTEncoder *enc;
|
|
CELTDecoder *dec;
|
|
int len;
|
|
celt_int32_t frame_size, channels;
|
|
int bytes_per_packet;
|
|
unsigned char data[MAX_PACKET];
|
|
int rate;
|
|
int complexity;
|
|
#if !(defined (FIXED_POINT) && defined(STATIC_MODES))
|
|
int i;
|
|
double rmsd = 0;
|
|
#endif
|
|
int count = 0;
|
|
celt_int32_t skip;
|
|
celt_int16_t *in, *out;
|
|
if (argc != 9 && argc != 8 && argc != 7)
|
|
{
|
|
fprintf (stderr, "Usage: testcelt <rate> <channels> <frame size> "
|
|
" <bytes per packet> [<complexity> [packet loss rate]] "
|
|
"<input> <output>\n");
|
|
return 1;
|
|
}
|
|
|
|
rate = atoi(argv[1]);
|
|
channels = atoi(argv[2]);
|
|
frame_size = atoi(argv[3]);
|
|
mode = celt_mode_create(rate, channels, frame_size, NULL);
|
|
celt_mode_info(mode, CELT_GET_LOOKAHEAD, &skip);
|
|
|
|
if (mode == NULL)
|
|
{
|
|
fprintf(stderr, "failed to create a mode\n");
|
|
return 1;
|
|
}
|
|
|
|
bytes_per_packet = atoi(argv[4]);
|
|
if (bytes_per_packet < 0 || bytes_per_packet > MAX_PACKET)
|
|
{
|
|
fprintf (stderr, "bytes per packet must be between 0 and %d\n",
|
|
MAX_PACKET);
|
|
return 1;
|
|
}
|
|
|
|
inFile = argv[argc-2];
|
|
fin = fopen(inFile, "rb");
|
|
if (!fin)
|
|
{
|
|
fprintf (stderr, "Could not open input file %s\n", argv[argc-2]);
|
|
return 1;
|
|
}
|
|
outFile = argv[argc-1];
|
|
fout = fopen(outFile, "wb+");
|
|
if (!fout)
|
|
{
|
|
fprintf (stderr, "Could not open output file %s\n", argv[argc-1]);
|
|
return 1;
|
|
}
|
|
|
|
enc = celt_encoder_create(mode);
|
|
dec = celt_decoder_create(mode);
|
|
|
|
if (argc>7)
|
|
{
|
|
complexity=atoi(argv[5]);
|
|
celt_encoder_ctl(enc,CELT_SET_COMPLEXITY(complexity));
|
|
}
|
|
|
|
celt_mode_info(mode, CELT_GET_FRAME_SIZE, &frame_size);
|
|
celt_mode_info(mode, CELT_GET_NB_CHANNELS, &channels);
|
|
in = (celt_int16_t*)malloc(frame_size*channels*sizeof(celt_int16_t));
|
|
out = (celt_int16_t*)malloc(frame_size*channels*sizeof(celt_int16_t));
|
|
while (!feof(fin))
|
|
{
|
|
fread(in, sizeof(short), frame_size*channels, fin);
|
|
if (feof(fin))
|
|
break;
|
|
len = celt_encode(enc, in, in, data, bytes_per_packet);
|
|
if (len <= 0)
|
|
{
|
|
fprintf (stderr, "celt_encode() returned %d\n", len);
|
|
return 1;
|
|
}
|
|
/* This is for simulating bit errors */
|
|
#if 0
|
|
int errors = 0;
|
|
int eid = 0;
|
|
/* This simulates random bit error */
|
|
for (i=0;i<len*8;i++)
|
|
{
|
|
if (rand()%atoi(argv[8])==0)
|
|
{
|
|
if (i<64)
|
|
{
|
|
errors++;
|
|
eid = i;
|
|
}
|
|
data[i/8] ^= 1<<(7-(i%8));
|
|
}
|
|
}
|
|
if (errors == 1)
|
|
data[eid/8] ^= 1<<(7-(eid%8));
|
|
else if (errors%2 == 1)
|
|
data[rand()%8] ^= 1<<rand()%8;
|
|
#endif
|
|
#if 1 /* Set to zero to use the encoder's output instead */
|
|
/* This is to simulate packet loss */
|
|
if (argc==9 && rand()%1000<atoi(argv[argc-3]))
|
|
/*if (errors && (errors%2==0))*/
|
|
celt_decode(dec, NULL, len, out);
|
|
else
|
|
celt_decode(dec, data, len, out);
|
|
#else
|
|
for (i=0;i<frame_size*channels;i++)
|
|
out[i] = in[i];
|
|
#endif
|
|
#if !(defined (FIXED_POINT) && defined(STATIC_MODES))
|
|
for (i=0;i<frame_size*channels;i++)
|
|
{
|
|
rmsd += (in[i]-out[i])*1.0*(in[i]-out[i]);
|
|
/*out[i] -= in[i];*/
|
|
}
|
|
#endif
|
|
count++;
|
|
fwrite(out+skip, sizeof(short), (frame_size-skip)*channels, fout);
|
|
skip = 0;
|
|
}
|
|
PRINT_MIPS(stderr);
|
|
|
|
celt_encoder_destroy(enc);
|
|
celt_decoder_destroy(dec);
|
|
fclose(fin);
|
|
fclose(fout);
|
|
#if !(defined (FIXED_POINT) && defined(STATIC_MODES))
|
|
if (rmsd > 0)
|
|
{
|
|
rmsd = sqrt(rmsd/(1.0*frame_size*channels*count));
|
|
fprintf (stderr, "Error: encoder doesn't match decoder\n");
|
|
fprintf (stderr, "RMS mismatch is %f\n", rmsd);
|
|
return 1;
|
|
} else {
|
|
fprintf (stderr, "Encoder matches decoder!!\n");
|
|
}
|
|
#endif
|
|
celt_mode_destroy(mode);
|
|
free(in);
|
|
free(out);
|
|
return 0;
|
|
}
|
|
|