120 lines
2.5 KiB
C
120 lines
2.5 KiB
C
# include "stdio.h"
|
|
# include "stdlib.h"
|
|
# include "string.h"
|
|
# include "math.h"
|
|
# include "wave_stuff.h"
|
|
# ifndef M_PI
|
|
# define M_PI 3.14159265358979323846
|
|
# endif
|
|
# define TAILLE_MAX 100
|
|
|
|
char **str_split (char *s, const char *ct)
|
|
{
|
|
char **tab = NULL;
|
|
|
|
if (s != NULL && ct != NULL)
|
|
{
|
|
int i;
|
|
char *cs = NULL;
|
|
size_t size = 1;
|
|
|
|
/* (1) */
|
|
for (i = 0; (cs = strtok (s, ct)); i++)
|
|
{
|
|
if (size <= i + 1)
|
|
{
|
|
void *tmp = NULL;
|
|
|
|
/* (2) */
|
|
size <<= 1;
|
|
tmp = realloc (tab, sizeof (*tab) * size);
|
|
if (tmp != NULL)
|
|
{
|
|
tab = tmp;
|
|
}
|
|
else
|
|
{
|
|
fprintf (stderr, "Memoire insuffisante\n");
|
|
free (tab);
|
|
tab = NULL;
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
}
|
|
/* (3) */
|
|
tab[i] = cs;
|
|
s = NULL;
|
|
}
|
|
tab[i] = NULL;
|
|
}
|
|
return tab;
|
|
}
|
|
|
|
void generer_note(int freq, int note, int duree, float *xd, int start)
|
|
{
|
|
int i;
|
|
|
|
for (i = start; i < start+duree; i++)
|
|
{
|
|
xd[i] += (int)(32767 *sin(2*M_PI*note*i/freq));
|
|
}
|
|
}
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
if (argc < 5)
|
|
{
|
|
fprintf(stderr,"Usage: %s partition output.wav bpm silence\n",argv[0]);
|
|
return 0;
|
|
}
|
|
|
|
float *xd;
|
|
int nx = 0, freq = 44100, canal = 0, verbose = 0, BitsPerSample = 16, dureeNote = 0, start = 0, n = 0, silence, Split1, Split2;
|
|
float time = 1./atof(argv[3])*60.;
|
|
char ligne[TAILLE_MAX];
|
|
FILE* partition = NULL;
|
|
|
|
partition = fopen(argv[1], "r");
|
|
fgets(ligne, TAILLE_MAX, partition);
|
|
n = atoi(ligne);
|
|
silence = atoi(argv[4]);
|
|
|
|
if(silence == 1)
|
|
{
|
|
nx = (int)(freq*time*(n+n/8));
|
|
}
|
|
else
|
|
{
|
|
nx = (int)(freq*time*n);
|
|
}
|
|
|
|
dureeNote = (int)(freq*time);
|
|
xd = (float*)calloc(nx,sizeof(float));
|
|
|
|
while(fgets(ligne, TAILLE_MAX, partition) != NULL)
|
|
{
|
|
if(strchr(ligne, ':')!=NULL)
|
|
{
|
|
char** Split=str_split(ligne, ":");
|
|
Split1=atoi(Split[0]);
|
|
Split2=atoi(Split[1]);
|
|
}
|
|
else
|
|
{
|
|
Split1=atoi(ligne);
|
|
Split2=1;
|
|
}
|
|
|
|
generer_note(freq, Split1, Split2*dureeNote, xd, start);
|
|
start += Split2*dureeNote;
|
|
|
|
if(silence == 1)
|
|
{
|
|
generer_note(freq, 0, (int)(Split2*dureeNote/8), xd, start);
|
|
start += (int)(Split2*dureeNote/8);
|
|
}
|
|
}
|
|
|
|
save_wave_from_array(xd, nx, argv[2], freq, BitsPerSample);
|
|
return 0;
|
|
}
|