163 lines
3.1 KiB
C
163 lines
3.1 KiB
C
/*
|
|
* sndstream.c - sound interface functions
|
|
*
|
|
* include LICENSE
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
// #include <stdlib.h>
|
|
#include <float.h>
|
|
|
|
#include <sndstream.h>
|
|
|
|
#ifdef TRACE_MEM
|
|
#include <tracemem.h>
|
|
#endif
|
|
|
|
|
|
#ifdef HAVE_LIBASOUND
|
|
|
|
/*
|
|
*** \brief Allocates memory for a new SoundStream object.
|
|
*/
|
|
|
|
SoundStream *sound_new( SoundParams *params, WaveTable *wt )
|
|
{
|
|
SoundStream *snd;
|
|
|
|
snd = app_new0(SoundStream, 1);
|
|
sound_construct( snd, params, wt );
|
|
app_class_overload_destroy( (AppClass *) snd, sound_destroy );
|
|
return snd;
|
|
}
|
|
|
|
/** \brief Constructor for the SoundStream object. */
|
|
|
|
void sound_construct( SoundStream *snd, SoundParams *params, WaveTable *wt )
|
|
{
|
|
app_class_construct( (AppClass *) snd );
|
|
|
|
snd->sndParams = params ;
|
|
snd->wt = wt;
|
|
wavetable_set_funcs( wt, (AppClass *) snd, sound_rdhr, sound_read_rows,
|
|
sound_destroy );
|
|
snd->ncols = snd->sndParams->channels + 1;
|
|
}
|
|
|
|
/** \brief Destructor for the SoundStream object. */
|
|
|
|
void sound_destroy(void *snd)
|
|
{
|
|
// SoundStream *this = (SoundStream *) snd;
|
|
|
|
if (snd == NULL) {
|
|
return;
|
|
}
|
|
|
|
app_class_destroy( snd );
|
|
}
|
|
|
|
|
|
/*
|
|
* Initialize stream - sound pcm format
|
|
* return 1 OK
|
|
* 0 EOF (not used)
|
|
* -1 error
|
|
*/
|
|
|
|
int sound_rdhr( AppClass *ss )
|
|
{
|
|
SoundStream *snd = (SoundStream *) ss;
|
|
char signam[16];
|
|
int i;
|
|
|
|
if ( sound_init_soundCard(snd->sndParams) ) {
|
|
msg_error(_("Can't initialize sound card"));
|
|
return -1;
|
|
}
|
|
snd->wds = wavetable_get_cur_dataset(snd->wt); /* curent wds */
|
|
|
|
dataset_var_add( snd->wds, "time", TIME, 1 );
|
|
|
|
for ( i = 0; i < snd->ncols - 1 ; i++) {
|
|
sprintf( signam, _("channel_%d"), i );
|
|
dataset_var_add( snd->wds, signam, VOLTAGE, 1 );
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
/*
|
|
* Read row of values from sound card : n channels.
|
|
*
|
|
* Returns:
|
|
* 1 on success. also fills in *ivar scalar and *dvars vector
|
|
* 0 on EOF
|
|
* -1 on error (may change some ivar/dvar values)
|
|
*/
|
|
int sound_readrow(SoundStream *snd)
|
|
{
|
|
int i;
|
|
double val;
|
|
|
|
dataset_val_add( snd->wds, (double) snd->nrows + 1);
|
|
|
|
for (i = 0; i < snd->ncols - 1; i++) {
|
|
if ( sound_getval_sound(snd->sndParams, &val) != 1) {
|
|
if (i > 0 ) {
|
|
msg_warning(_("EOF or error reading data field %d in row %d; file is incomplete."),
|
|
i, snd->nrows);
|
|
}
|
|
return 0;
|
|
}
|
|
// msg_dbg ( "sound val = %f", val);
|
|
dataset_val_add( snd->wds, val);
|
|
}
|
|
snd->nrows++;
|
|
return 1;
|
|
}
|
|
|
|
|
|
/*
|
|
* row is read in temp storage ss->rowData because
|
|
* we do not known if we have multiple set in the file
|
|
* indicated by a decreseing order of iv
|
|
*/
|
|
int sound_read_rows( AppClass *sss )
|
|
{
|
|
SoundStream *snd = (SoundStream *) sss;
|
|
int ret;
|
|
int row = 0;
|
|
|
|
while ((ret = sound_readrow(snd)) > 0) {
|
|
row++;
|
|
}
|
|
msg_dbg("Read %d rows %d", row, snd->nrows );
|
|
return ret;
|
|
}
|
|
|
|
#else /* HAVE_LIBASOUND */
|
|
|
|
SoundStream *sound_new( SoundParams *params, WaveTable *wt )
|
|
{
|
|
return NULL;
|
|
}
|
|
|
|
int sound_rdhr( AppClass *ss )
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
int sound_readrow(SoundStream *snd)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
#endif /* HAVE_LIBASOUND */
|