forked from Mirrors/freeswitch
314ae8b6f3
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@11535 d0543943-73ff-0310-b7d9-9358b9ac24b2
329 lines
9.9 KiB
C
329 lines
9.9 KiB
C
/*
|
|
* SpanDSP - a series of DSP components for telephony
|
|
*
|
|
* g711_tests.c
|
|
*
|
|
* Written by Steve Underwood <steveu@coppice.org>
|
|
*
|
|
* Copyright (C) 2006 Steve Underwood
|
|
*
|
|
* All rights reserved.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License version 2, as
|
|
* published by the Free Software Foundation.
|
|
*
|
|
* 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., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*
|
|
* $Id: g711_tests.c,v 1.15 2008/11/30 10:17:31 steveu Exp $
|
|
*/
|
|
|
|
/*! \page g711_tests_page A-law and u-law conversion tests
|
|
\section g711_tests_page_sec_1 What does it do?
|
|
|
|
\section g711_tests_page_sec_2 How is it used?
|
|
*/
|
|
|
|
#if defined(HAVE_CONFIG_H)
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#include <audiofile.h>
|
|
|
|
//#if defined(WITH_SPANDSP_INTERNALS)
|
|
#define SPANDSP_EXPOSE_INTERNAL_STRUCTURES
|
|
//#endif
|
|
|
|
#include "spandsp.h"
|
|
#include "spandsp-sim.h"
|
|
|
|
#define OUT_FILE_NAME "g711.wav"
|
|
|
|
int16_t amp[65536];
|
|
uint8_t ulaw_data[65536];
|
|
uint8_t alaw_data[65536];
|
|
|
|
const uint8_t alaw_1khz_sine[] = {0x34, 0x21, 0x21, 0x34, 0xB4, 0xA1, 0xA1, 0xB4};
|
|
const uint8_t ulaw_1khz_sine[] = {0x1E, 0x0B, 0x0B, 0x1E, 0x9E, 0x8B, 0x8B, 0x9E};
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
AFfilehandle outhandle;
|
|
power_meter_t power_meter;
|
|
int outframes;
|
|
int i;
|
|
int block;
|
|
int pre;
|
|
int post;
|
|
int post_post;
|
|
int alaw_failures;
|
|
int ulaw_failures;
|
|
float worst_alaw;
|
|
float worst_ulaw;
|
|
float tmp;
|
|
int len;
|
|
g711_state_t *encode;
|
|
g711_state_t *transcode;
|
|
g711_state_t *decode;
|
|
|
|
if ((outhandle = afOpenFile_telephony_write(OUT_FILE_NAME, 1)) == AF_NULL_FILEHANDLE)
|
|
{
|
|
fprintf(stderr, " Cannot create wave file '%s'\n", OUT_FILE_NAME);
|
|
exit(2);
|
|
}
|
|
|
|
printf("Conversion accuracy tests.\n");
|
|
alaw_failures = 0;
|
|
ulaw_failures = 0;
|
|
worst_alaw = 0.0;
|
|
worst_ulaw = 0.0;
|
|
for (block = 0; block < 1; block++)
|
|
{
|
|
for (i = 0; i < 65536; i++)
|
|
{
|
|
pre = i - 32768;
|
|
post = alaw_to_linear(linear_to_alaw(pre));
|
|
if (abs(pre) > 140)
|
|
{
|
|
tmp = (float) abs(post - pre)/(float) abs(pre);
|
|
if (tmp > 0.10)
|
|
{
|
|
printf("A-law: Excessive error at %d (%d)\n", pre, post);
|
|
alaw_failures++;
|
|
}
|
|
if (tmp > worst_alaw)
|
|
worst_alaw = tmp;
|
|
}
|
|
else
|
|
{
|
|
/* Small values need different handling for sensible measurement */
|
|
if (abs(post - pre) > 15)
|
|
{
|
|
printf("A-law: Excessive error at %d (%d)\n", pre, post);
|
|
alaw_failures++;
|
|
}
|
|
}
|
|
amp[i] = post;
|
|
}
|
|
outframes = afWriteFrames(outhandle,
|
|
AF_DEFAULT_TRACK,
|
|
amp,
|
|
65536);
|
|
if (outframes != 65536)
|
|
{
|
|
fprintf(stderr, " Error writing wave file\n");
|
|
exit(2);
|
|
}
|
|
for (i = 0; i < 65536; i++)
|
|
{
|
|
pre = i - 32768;
|
|
post = ulaw_to_linear(linear_to_ulaw(pre));
|
|
if (abs(pre) > 40)
|
|
{
|
|
tmp = (float) abs(post - pre)/(float) abs(pre);
|
|
if (tmp > 0.10)
|
|
{
|
|
printf("u-law: Excessive error at %d (%d)\n", pre, post);
|
|
ulaw_failures++;
|
|
}
|
|
if (tmp > worst_ulaw)
|
|
worst_ulaw = tmp;
|
|
}
|
|
else
|
|
{
|
|
/* Small values need different handling for sensible measurement */
|
|
if (abs(post - pre) > 4)
|
|
{
|
|
printf("u-law: Excessive error at %d (%d)\n", pre, post);
|
|
ulaw_failures++;
|
|
}
|
|
}
|
|
amp[i] = post;
|
|
}
|
|
outframes = afWriteFrames(outhandle,
|
|
AF_DEFAULT_TRACK,
|
|
amp,
|
|
65536);
|
|
if (outframes != 65536)
|
|
{
|
|
fprintf(stderr, " Error writing wave file\n");
|
|
exit(2);
|
|
}
|
|
}
|
|
printf("Worst A-law error (ignoring small values) %f%%\n", worst_alaw*100.0);
|
|
printf("Worst u-law error (ignoring small values) %f%%\n", worst_ulaw*100.0);
|
|
if (alaw_failures || ulaw_failures)
|
|
{
|
|
printf("%d A-law values with excessive error\n", alaw_failures);
|
|
printf("%d u-law values with excessive error\n", ulaw_failures);
|
|
printf("Tests failed\n");
|
|
exit(2);
|
|
}
|
|
|
|
printf("Cyclic conversion repeatability tests.\n");
|
|
/* Find what happens to every possible linear value after a round trip. */
|
|
for (i = 0; i < 65536; i++)
|
|
{
|
|
pre = i - 32768;
|
|
/* Make a round trip */
|
|
post = alaw_to_linear(linear_to_alaw(pre));
|
|
/* A second round trip should cause no further change */
|
|
post_post = alaw_to_linear(linear_to_alaw(post));
|
|
if (post_post != post)
|
|
{
|
|
printf("A-law second round trip mismatch - at %d, %d != %d\n", pre, post, post_post);
|
|
printf("Tests failed\n");
|
|
exit(2);
|
|
}
|
|
/* Make a round trip */
|
|
post = ulaw_to_linear(linear_to_ulaw(pre));
|
|
/* A second round trip should cause no further change */
|
|
post_post = ulaw_to_linear(linear_to_ulaw(post));
|
|
if (post_post != post)
|
|
{
|
|
printf("u-law round trip mismatch - at %d, %d != %d\n", pre, post, post_post);
|
|
printf("Tests failed\n");
|
|
exit(2);
|
|
}
|
|
}
|
|
|
|
printf("Reference power level tests.\n");
|
|
power_meter_init(&power_meter, 7);
|
|
|
|
for (i = 0; i < 8000; i++)
|
|
{
|
|
amp[i] = ulaw_to_linear(ulaw_1khz_sine[i & 7]);
|
|
power_meter_update(&power_meter, amp[i]);
|
|
}
|
|
printf("Reference u-law 1kHz tone is %fdBm0\n", power_meter_current_dbm0(&power_meter));
|
|
outframes = afWriteFrames(outhandle,
|
|
AF_DEFAULT_TRACK,
|
|
amp,
|
|
8000);
|
|
if (outframes != 8000)
|
|
{
|
|
fprintf(stderr, " Error writing wave file\n");
|
|
exit(2);
|
|
}
|
|
if (0.1f < fabs(power_meter_current_dbm0(&power_meter)))
|
|
{
|
|
printf("Test failed.\n");
|
|
exit(2);
|
|
}
|
|
|
|
for (i = 0; i < 8000; i++)
|
|
{
|
|
amp[i] = alaw_to_linear(alaw_1khz_sine[i & 7]);
|
|
power_meter_update(&power_meter, amp[i]);
|
|
}
|
|
printf("Reference A-law 1kHz tone is %fdBm0\n", power_meter_current_dbm0(&power_meter));
|
|
outframes = afWriteFrames(outhandle,
|
|
AF_DEFAULT_TRACK,
|
|
amp,
|
|
8000);
|
|
if (outframes != 8000)
|
|
{
|
|
fprintf(stderr, " Error writing wave file\n");
|
|
exit(2);
|
|
}
|
|
if (0.1f < fabs(power_meter_current_dbm0(&power_meter)))
|
|
{
|
|
printf("Test failed.\n");
|
|
exit(2);
|
|
}
|
|
|
|
/* Check the transcoding functions. */
|
|
printf("Testing transcoding A-law -> u-law -> A-law\n");
|
|
for (i = 0; i < 256; i++)
|
|
{
|
|
if (alaw_to_ulaw(ulaw_to_alaw(i)) != i)
|
|
{
|
|
if (abs(alaw_to_ulaw(ulaw_to_alaw(i)) - i) > 1)
|
|
{
|
|
printf("u-law -> A-law -> u-law gave %d -> %d\n", i, alaw_to_ulaw(ulaw_to_alaw(i)));
|
|
printf("Test failed\n");
|
|
exit(2);
|
|
}
|
|
}
|
|
}
|
|
|
|
printf("Testing transcoding u-law -> A-law -> u-law\n");
|
|
for (i = 0; i < 256; i++)
|
|
{
|
|
if (ulaw_to_alaw(alaw_to_ulaw(i)) != i)
|
|
{
|
|
if (abs(alaw_to_ulaw(ulaw_to_alaw(i)) - i) > 1)
|
|
{
|
|
printf("A-law -> u-law -> A-law gave %d -> %d\n", i, ulaw_to_alaw(alaw_to_ulaw(i)));
|
|
printf("Test failed\n");
|
|
exit(2);
|
|
}
|
|
}
|
|
}
|
|
|
|
encode = g711_init(NULL, G711_ALAW);
|
|
transcode = g711_init(NULL, G711_ALAW);
|
|
decode = g711_init(NULL, G711_ULAW);
|
|
|
|
len = 65536;
|
|
for (i = 0; i < len; i++)
|
|
amp[i] = i - 32768;
|
|
len = g711_encode(encode, alaw_data, amp, len);
|
|
len = g711_transcode(transcode, ulaw_data, alaw_data, len);
|
|
len = g711_decode(decode, amp, ulaw_data, len);
|
|
if (len != 65536)
|
|
{
|
|
printf("Block coding gave the wrong length - %d instead of %d\n", len, 65536);
|
|
printf("Test failed\n");
|
|
exit(2);
|
|
}
|
|
for (i = 0; i < len; i++)
|
|
{
|
|
pre = i - 32768;
|
|
post = amp[i];
|
|
if (abs(pre) > 140)
|
|
{
|
|
tmp = (float) abs(post - pre)/(float) abs(pre);
|
|
if (tmp > 0.10)
|
|
{
|
|
printf("Block: Excessive error at %d (%d)\n", pre, post);
|
|
exit(2);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* Small values need different handling for sensible measurement */
|
|
if (abs(post - pre) > 15)
|
|
{
|
|
printf("Block: Excessive error at %d (%d)\n", pre, post);
|
|
exit(2);
|
|
}
|
|
}
|
|
}
|
|
g711_release(encode);
|
|
g711_release(transcode);
|
|
g711_release(decode);
|
|
|
|
if (afCloseFile(outhandle))
|
|
{
|
|
fprintf(stderr, " Cannot close wave file '%s'\n", OUT_FILE_NAME);
|
|
exit(2);
|
|
}
|
|
|
|
printf("Tests passed.\n");
|
|
return 0;
|
|
}
|
|
/*- End of function --------------------------------------------------------*/
|
|
/*- End of file ------------------------------------------------------------*/
|