annotate src/libvorbis-1.3.3/test/util.c @ 22:b07fe9e906dc

Portaudio: add missed file
author Chris Cannam
date Tue, 26 Mar 2013 12:14:11 +0000
parents 05aa0afa9217
children
rev   line source
Chris@1 1 /********************************************************************
Chris@1 2 * *
Chris@1 3 * THIS FILE IS PART OF THE OggVorbis SOFTWARE CODEC SOURCE CODE. *
Chris@1 4 * USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS *
Chris@1 5 * GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE *
Chris@1 6 * IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. *
Chris@1 7 * *
Chris@1 8 * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2007 *
Chris@1 9 * by the Xiph.Org Foundation http://www.xiph.org/ *
Chris@1 10 * *
Chris@1 11 ********************************************************************
Chris@1 12
Chris@1 13 function: utility functions for vorbis codec test suite.
Chris@1 14 last mod: $Id: util.c 13293 2007-07-24 00:09:47Z erikd $
Chris@1 15
Chris@1 16 ********************************************************************/
Chris@1 17
Chris@1 18 #include <stdio.h>
Chris@1 19 #include <stdlib.h>
Chris@1 20 #include <math.h>
Chris@1 21 #include <string.h>
Chris@1 22 #include <errno.h>
Chris@1 23
Chris@1 24 #include <vorbis/codec.h>
Chris@1 25 #include <vorbis/vorbisenc.h>
Chris@1 26
Chris@1 27 #include "util.h"
Chris@1 28
Chris@1 29 void
Chris@1 30 gen_windowed_sine (float *data, int len, float maximum)
Chris@1 31 { int k ;
Chris@1 32
Chris@1 33 memset (data, 0, len * sizeof (float)) ;
Chris@1 34
Chris@1 35 len /= 2 ;
Chris@1 36
Chris@1 37 for (k = 0 ; k < len ; k++)
Chris@1 38 { data [k] = sin (2.0 * k * M_PI * 1.0 / 32.0 + 0.4) ;
Chris@1 39
Chris@1 40 /* Apply Hanning Window. */
Chris@1 41 data [k] *= maximum * (0.5 - 0.5 * cos (2.0 * M_PI * k / ((len) - 1))) ;
Chris@1 42 }
Chris@1 43
Chris@1 44 return ;
Chris@1 45 }
Chris@1 46
Chris@1 47 void
Chris@1 48 set_data_in (float * data, unsigned len, float value)
Chris@1 49 { unsigned k ;
Chris@1 50
Chris@1 51 for (k = 0 ; k < len ; k++)
Chris@1 52 data [k] = value ;
Chris@1 53 }