1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
/********************************************************************
* *
* THIS FILE IS PART OF THE OggVorbis SOFTWARE CODEC SOURCE CODE. *
* USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS *
* GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE *
* IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. *
* *
* THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2002 *
* by the XIPHOPHORUS Company http://www.xiph.org/ *
* *
********************************************************************
function: window functions
last mod: $Id: window.c,v 1.17 2002/03/23 03:17:34 xiphmont Exp $
********************************************************************/
#include <stdlib.h>
#include <math.h>
#include "os.h"
#include "misc.h"
float *_vorbis_window(int type, int left){
float *ret=_ogg_calloc(left,sizeof(*ret));
int i;
switch(type){
case 0:
/* The 'vorbis window' (window 0) is sin(sin(x)*sin(x)*2pi) */
{
for(i=0;i<left;i++){
float x=(i+.5f)/left*M_PI/2.;
x=sin(x);
x*=x;
x*=M_PI/2.f;
x=sin(x);
ret[i]=x;
}
}
break;
default:
_ogg_free(ret);
return(NULL);
}
return(ret);
}
void _vorbis_apply_window(float *d,float *window[2],long *blocksizes,
int lW,int W,int nW){
lW=(W?lW:0);
nW=(W?nW:0);
{
long n=blocksizes[W];
long ln=blocksizes[lW];
long rn=blocksizes[nW];
long leftbegin=n/4-ln/4;
long leftend=leftbegin+ln/2;
long rightbegin=n/2+n/4-rn/4;
long rightend=rightbegin+rn/2;
int i,p;
for(i=0;i<leftbegin;i++)
d[i]=0.f;
for(p=0;i<leftend;i++,p++)
d[i]*=window[lW][p];
for(i=rightbegin,p=rn/2-1;i<rightend;i++,p--)
d[i]*=window[nW][p];
for(;i<n;i++)
d[i]=0.f;
}
}
|