summaryrefslogtreecommitdiffhomepage
path: root/contrib/vorbis/lib/tone.c
blob: 5b8b0206040ebd507b5ccc85cee3be50cf5c33d1 (plain)
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
#include <stdlib.h>
#include <stdio.h>
#include <math.h>
#include <string.h>

void usage(){
  fprintf(stderr,"tone <frequency_Hz>,[<amplitude>] [<frequency_Hz>,[<amplitude>]...]\n");
  exit(1);
}

int main (int argc,char *argv[]){
  int i,j;
  double *f;
  double *amp;

  if(argc<2)usage();

  f=alloca(sizeof(*f)*(argc-1));
  amp=alloca(sizeof(*amp)*(argc-1));

  i=0;
  while(argv[i+1]){
    char *pos=strchr(argv[i+1],',');

    f[i]=atof(argv[i+1]);
    if(pos)
      amp[i]=atof(pos+1)*32767.f;
    else
      amp[i]=32767.f;

    fprintf(stderr,"%g Hz, %g amp\n",f[i],amp[i]);

    i++;
  }

  for(i=0;i<44100*10;i++){
    float val=0;
    int ival;
    for(j=0;j<argc-1;j++)
      val+=amp[j]*sin(i/44100.f*f[j]*2*M_PI);
    ival=rint(val);

    if(ival>32767.f)ival=32767.f;
    if(ival<-32768.f)ival=-32768.f;

    fprintf(stdout,"%c%c%c%c",
            (char)(ival&0xff),
            (char)((ival>>8)&0xff),
            (char)(ival&0xff),
            (char)((ival>>8)&0xff));
  }
  return(0);
}