2007-02-09 10:06:53 +00:00
|
|
|
/* Copyright (C) 2002-2005 Jean-Marc Valin
|
|
|
|
File: misc.c
|
|
|
|
Various utility routines for Speex
|
|
|
|
|
|
|
|
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
|
2007-03-13 14:23:20 +00:00
|
|
|
#include "config-speex.h"
|
2007-02-09 10:06:53 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include "misc.h"
|
|
|
|
|
|
|
|
#ifdef USER_MISC
|
|
|
|
#include "user_misc.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef BFIN_ASM
|
|
|
|
#include "misc_bfin.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef RELEASE
|
|
|
|
void print_vec(float *vec, int len, char *name)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
int i;
|
2007-02-09 10:06:53 +00:00
|
|
|
printf ("%s ", name);
|
|
|
|
for (i=0;i<len;i++)
|
|
|
|
printf (" %f", vec[i]);
|
2007-02-10 11:44:26 +00:00
|
|
|
printf ("\n");
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef FIXED_DEBUG
|
|
|
|
long long spx_mips=0;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_ALLOC
|
|
|
|
void *speex_alloc (int size)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
return calloc(size,1);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_ALLOC_SCRATCH
|
|
|
|
void *speex_alloc_scratch (int size)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
return calloc(size,1);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_REALLOC
|
|
|
|
void *speex_realloc (void *ptr, int size)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
return realloc(ptr, size);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_FREE
|
|
|
|
void speex_free (void *ptr)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
free(ptr);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_FREE_SCRATCH
|
|
|
|
void speex_free_scratch (void *ptr)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
free(ptr);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_MOVE
|
|
|
|
void *speex_move (void *dest, void *src, int n)
|
|
|
|
{
|
|
|
|
return memmove(dest,src,n);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_ERROR
|
|
|
|
void speex_error(const char *str)
|
|
|
|
{
|
2007-05-22 09:50:31 +00:00
|
|
|
fprintf (stderr, "Fatal (internal) error: %s\n", str);
|
2007-02-10 11:44:26 +00:00
|
|
|
exit(1);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_WARNING
|
|
|
|
void speex_warning(const char *str)
|
|
|
|
{
|
2007-05-22 09:50:31 +00:00
|
|
|
#ifndef DISABLE_WARNINGS
|
2007-02-10 11:44:26 +00:00
|
|
|
fprintf (stderr, "warning: %s\n", str);
|
2007-05-22 09:50:31 +00:00
|
|
|
#endif
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_WARNING_INT
|
|
|
|
void speex_warning_int(const char *str, int val)
|
|
|
|
{
|
2007-05-22 09:50:31 +00:00
|
|
|
#ifndef DISABLE_WARNINGS
|
2007-02-10 11:44:26 +00:00
|
|
|
fprintf (stderr, "warning: %s %d\n", str, val);
|
2007-05-22 09:50:31 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_NOTIFY
|
|
|
|
void speex_notify(const char *str)
|
|
|
|
{
|
|
|
|
#ifndef DISABLE_NOTIFICATIONS
|
|
|
|
fprintf (stderr, "notification: %s\n", str);
|
|
|
|
#endif
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef FIXED_POINT
|
|
|
|
spx_word16_t speex_rand(spx_word16_t std, spx_int32_t *seed)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
spx_word32_t res;
|
|
|
|
*seed = 1664525 * *seed + 1013904223;
|
|
|
|
res = MULT16_16(EXTRACT16(SHR32(*seed,16)),std);
|
|
|
|
return EXTRACT16(PSHR32(SUB32(res, SHR32(res, 3)),14));
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#else
|
|
|
|
spx_word16_t speex_rand(spx_word16_t std, spx_int32_t *seed)
|
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
const unsigned int jflone = 0x3f800000;
|
|
|
|
const unsigned int jflmsk = 0x007fffff;
|
|
|
|
union {int i; float f;} ran;
|
|
|
|
*seed = 1664525 * *seed + 1013904223;
|
|
|
|
ran.i = jflone | (jflmsk & *seed);
|
|
|
|
ran.f -= 1.5;
|
|
|
|
return 3.4642*std*ran.f;
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
|
|
|
#endif
|
2007-02-10 11:44:26 +00:00
|
|
|
|
|
|
|
#ifndef OVERRIDE_SPEEX_PUTC
|
|
|
|
void _speex_putc(int ch, void *file)
|
2007-02-09 10:06:53 +00:00
|
|
|
{
|
2007-02-10 11:44:26 +00:00
|
|
|
FILE *f = (FILE *)file;
|
|
|
|
fprintf(f, "%c", ch);
|
2007-02-09 10:06:53 +00:00
|
|
|
}
|
2007-02-10 11:44:26 +00:00
|
|
|
#endif
|