diff options
Diffstat (limited to 'desiredata/src/s_audio.c')
| -rw-r--r-- | desiredata/src/s_audio.c | 586 |
1 files changed, 0 insertions, 586 deletions
diff --git a/desiredata/src/s_audio.c b/desiredata/src/s_audio.c deleted file mode 100644 index ffc2f9f9..00000000 --- a/desiredata/src/s_audio.c +++ /dev/null @@ -1,586 +0,0 @@ -/* Copyright (c) 2003, Miller Puckette and others. -* For information on usage and redistribution, and for a DISCLAIMER OF ALL -* WARRANTIES, see the file, "LICENSE.txt," in this distribution. */ - -/* machine-independent (well, mostly!) audio layer. Stores and recalls - audio settings from argparse routine and from dialog window. -*/ - -#define PD_PLUSPLUS_FACE -#include "desire.h" -using namespace desire; -#include "m_simd.h" -#include <stdio.h> -#ifdef UNISTD -#include <unistd.h> -#include <sys/time.h> -#include <sys/resource.h> -#endif -#include <stdlib.h> -#include <string.h> -#include <errno.h> -#include <sstream> -#define max std::max /* resolve "ambiguous" shit. */ -#define SYS_DEFAULTCH 2 -#define SYS_MAXCH 100 -typedef long t_pa_sample; -#define SYS_SAMPLEWIDTH sizeof(t_pa_sample) -#define SYS_BYTESPERCHAN (sys_dacblocksize * SYS_SAMPLEWIDTH) -#define SYS_XFERSAMPS (SYS_DEFAULTCH*sys_dacblocksize) -#define SYS_XFERSIZE (SYS_SAMPLEWIDTH * SYS_XFERSAMPS) -#define MAXNDEV 100 -#define DEVDESCSIZE 80 -#define INTARG(i) atom_getintarg(i,argc,argv) - -extern t_audioapi pa_api, jack_api, oss_api, alsa_api, sgi_api, mmio_api, asio_api; - -t_sample *sys_soundin; -t_sample *sys_soundout; -float sys_dacsr; - -using namespace std; - -static t_audioapi *sys_audio() { -#ifdef USEAPI_PORTAUDIO - if (sys_audioapi == API_PORTAUDIO) return &pa_api; -#endif -#ifdef USEAPI_JACK - if (sys_audioapi == API_JACK) return &jack_api; -#endif -#ifdef USEAPI_OSS - if (sys_audioapi == API_OSS) return &oss_api; -#endif -#ifdef USEAPI_ALSA - if (sys_audioapi == API_ALSA) return &alsa_api; -#endif -#ifdef USEAPI_MMIO - if (sys_audioapi == API_MMIO) return &mmio_api; -#endif -#ifdef USEAPI_ASIO - if (sys_audioapi == API_ASIO) return &asio_api; -#endif - post("sys_close_audio: unknown API %d", sys_audioapi); - sys_inchannels = sys_outchannels = 0; - sched_set_using_dacs(0); /* tb: dsp is switched off */ - return 0; -} - -static void audio_getdevs(char *idevlist, int *nidev, char *odevlist, int *nodev, int *canmulti, int maxndev, int devdescsize); - -/* these are set in this file when opening audio, but then may be reduced, - even to zero, in the system dependent open_audio routines. */ -int sys_inchannels; -int sys_outchannels; -int sys_advance_samples; /* scheduler advance in samples */ -int sys_blocksize = 0; /* audio I/O block size in sample frames */ -#ifndef API_DEFAULT -#define API_DEFAULT 0 -#endif -int sys_audioapi = API_DEFAULT; -int sys_dacblocksize; -int sys_schedblocksize; -int sys_meters; /* true if we're metering */ -static float sys_inmax; /* max input amplitude */ -static float sys_outmax; /* max output amplitude */ -int sys_schedadvance; /* scheduler advance in microseconds */ - -/* the "state" is normally one if we're open and zero otherwise; but if the state is one, - we still haven't necessarily opened the audio hardware; see audio_isopen() below. */ -static int audio_state; - -/* last requested parameters */ -static t_audiodevs audi; -static t_audiodevs audo; -static int audio_rate; -static int audio_dacblocksize; -static int audio_advance; -static int audio_scheduler; - -extern int sys_callbackscheduler; - -float peakvec(t_float* vec, t_int n, t_float cur_max); -static float (*peak_fp)(t_float*, t_int, t_float) = peakvec; - -static int audio_isopen() {return audio_state && ((audi.ndev > 0 && audi.chdev[0] > 0) || (audo.ndev > 0 && audo.chdev[0] > 0));} - -extern "C" void sys_get_audio_params(t_audiodevs *ai, t_audiodevs *ao, int *prate, int *pdacblocksize, int *padvance, int *pscheduler) { - ai->ndev=audi.ndev; for (int i=0; i< MAXAUDIOINDEV; i++) {ai->dev[i]=audi.dev[i]; ai->chdev[i]=audi.chdev[i];} - ao->ndev=audo.ndev; for (int i=0; i<MAXAUDIOOUTDEV; i++) {ao->dev[i]=audo.dev[i]; ao->chdev[i]=audo.chdev[i];} - *prate = audio_rate; - *pdacblocksize = audio_dacblocksize; - *padvance = audio_advance; - *pscheduler = audio_scheduler; -} - -void sys_save_audio_params( -int nidev, int *idev, int *ichdev, -int nodev, int *odev, int *ochdev, int rate, int dacblocksize, int advance, int scheduler) { - audi.ndev = nidev; - audo.ndev = nodev; - for (int i=0; i<MAXAUDIOINDEV; i++) {audi.dev[i]=idev[i]; audi.chdev[i]=ichdev[i];} - for (int i=0; i<MAXAUDIOOUTDEV; i++) {audo.dev[i]=odev[i]; audo.chdev[i]=ochdev[i];} - audio_rate = rate; - audio_dacblocksize = dacblocksize; - audio_advance = advance; - audio_scheduler = scheduler; -} - -extern "C" void sys_open_audio2(t_audiodevs *ai, t_audiodevs *ao, int rate, int dacblocksize, int advance, int scheduler) { - sys_open_audio(ai->ndev,ai->dev,ai->ndev,ai->chdev,ao->ndev,ao->dev,ao->ndev,ao->chdev,rate,dacblocksize,advance,scheduler,1); -} - -/* init routines for any API which needs to set stuff up before any other API gets used. This is only true of OSS so far. */ -#ifdef USEAPI_OSS -void oss_init(); -#endif - -static void audio_init() { - static int initted = 0; - if (initted) return; - initted = 1; -#ifdef USEAPI_OSS - oss_init(); -#endif -} - -/* set channels and sample rate. */ -void sys_setchsr(int chin, int chout, int sr, int dacblocksize) { - int inbytes = (chin ? chin : 2) * (sys_dacblocksize*sizeof(float)); - int outbytes = (chout ? chout : 2) * (sys_dacblocksize*sizeof(float)); - if (dacblocksize != (1<<ilog2(dacblocksize))) { - dacblocksize = 1<<ilog2(dacblocksize); - post("warning: adjusting dac~blocksize to power of 2: %d", dacblocksize); - } - sys_dacblocksize = dacblocksize; - sys_schedblocksize = dacblocksize; - sys_inchannels = chin; - sys_outchannels = chout; - sys_dacsr = double(sr); - sys_advance_samples = max(int(sys_schedadvance*sys_dacsr/1000000.),sys_dacblocksize); - if (sys_soundin) freealignedbytes(sys_soundin,inbytes); - sys_soundin = (t_float *)getalignedbytes(inbytes); - memset(sys_soundin, 0, inbytes); - if (sys_soundout) freealignedbytes(sys_soundout,outbytes); - sys_soundout = (t_float *)getalignedbytes(outbytes); - memset(sys_soundout, 0, outbytes); - /* tb: modification for simd-optimized peak finding */ - if (SIMD_CHKCNT(sys_inchannels * sys_dacblocksize) && - SIMD_CHKCNT(sys_outchannels * sys_dacblocksize)) - peak_fp = peakvec_simd; - else peak_fp = peakvec; - if (sys_verbose) post("input channels = %d, output channels = %d", sys_inchannels, sys_outchannels); - canvas_resume_dsp(canvas_suspend_dsp()); -} - -/* ----------------------- public routines ----------------------- */ - -/* open audio devices (after cleaning up the specified device and channel vectors). The audio devices are "zero based" - (i.e. "0" means the first one.) We also save the cleaned-up device specification so that we - can later re-open audio and/or show the settings on a dialog window. */ -void sys_open_audio( - int nidev, int *idev, int nichdev, int *ichdev, - int nodev, int *odev, int nochdev, int *ochdev, int rate, int dacblocksize, int advance, int schedmode, int enable) { - int defaultchannels = SYS_DEFAULTCH; - int realich[MAXAUDIOINDEV]; char idevlist[MAXNDEV*DEVDESCSIZE]; - int realoch[MAXAUDIOOUTDEV]; char odevlist[MAXNDEV*DEVDESCSIZE]; - int indevs = 0, outdevs = 0, canmulti = 0; - audio_getdevs(idevlist, &indevs, odevlist, &outdevs, &canmulti, MAXNDEV, DEVDESCSIZE); - if (sys_externalschedlib) return; - if (sys_inchannels || sys_outchannels) sys_close_audio(); - if (rate < 1) rate = DEFAULTSRATE; - if (dacblocksize < 1) dacblocksize = DEFDACBLKSIZE; - if (advance <= 0) advance = DEFAULTADVANCE; - audio_init(); - /* Since the channel vector might be longer than the audio device vector, or vice versa, we fill the shorter one - in to match the longer one. Also, if both are empty, we fill in one device (the default) and two channels. */ - if (nidev == -1) { /* no input audio devices specified */ - if (nichdev == -1) { - if (indevs >= 1) {nidev=nichdev=1; ichdev[0]=defaultchannels; idev[0]=DEFAULTAUDIODEV;} else nidev = nichdev=0; - } else for (int i=0; i<MAXAUDIOINDEV; i++) idev[i] = i; - } else { - if (nichdev == -1) {nichdev = nidev; for (int i=0; i<nidev; i++) ichdev[i] = defaultchannels; - } else if (nichdev > nidev) {for (int i=nidev; i<nichdev; i++) if (i==0) idev[i]=DEFAULTAUDIODEV; else idev[i]=idev[i-1]+1; - } else if (nichdev < nidev) {for (int i=nichdev; i<nidev; i++) if (i==0) ichdev[i]=defaultchannels; else ichdev[i]=ichdev[i-1];} - } - nidev = nichdev; - if (nodev == -1) { /* not set */ - if (nochdev == -1) { - if (outdevs >= 1) {nodev=nochdev=1; ochdev[0]=defaultchannels; odev[0]=DEFAULTAUDIODEV;} else nodev = nochdev=0; - } else for (int i=0; i<MAXAUDIOOUTDEV; i++) odev[i] = i; - } else { - if (nochdev == -1) {nochdev = nodev; for (int i=0; i<nodev; i++) ochdev[i] = defaultchannels; - } else if (nochdev > nodev) {for (int i=nodev; i<nochdev; i++) if (i==0) odev[0]=DEFAULTAUDIODEV; else odev[i]=odev[i-1]+1; - } else if (nochdev < nodev) {for (int i=nochdev; i<nodev; i++) if (i==0) ochdev[0]=defaultchannels; else ochdev[i]=ochdev[i-1];} - } - nodev = nochdev; - /* count total number of input and output channels */ - int inchans=0, outchans=0; - for (int i=0; i<nidev; i++) inchans += (realich[i] = (ichdev[i] > 0 ? ichdev[i] : 0)); - for (int i=0; i<nodev; i++) outchans += (realoch[i] = (ochdev[i] > 0 ? ochdev[i] : 0)); - /* if no input or output devices seem to have been specified, this really means just disable audio, which we now do. */ - if (!inchans && !outchans) enable = 0; - sys_schedadvance = advance * 1000; - sys_setchsr(inchans, outchans, rate, dacblocksize); - sys_log_error(ERR_NOTHING); - if (enable) { - /* for alsa, only one device is supported; it may be open for both input and output. */ -#ifdef USEAPI_PORTAUDIO - if (sys_audioapi == API_PORTAUDIO) - pa_open_audio(inchans, outchans, rate, advance, (nodev>0?idev[0]:0), (nodev>0?odev[0]:0), schedmode); - else -#endif -#ifdef USEAPI_JACK - if (sys_audioapi == API_JACK) - jack_open_audio((nidev>0?realich[0]:0), (nodev>0?realoch[0]:0), rate, schedmode); - else -#endif - if (sys_audioapi == API_OSS || sys_audioapi == API_ALSA || sys_audioapi == API_MMIO) - sys_audio()->open_audio(nidev, idev, nichdev, realich, nodev, odev, nochdev, realoch, rate, -42); - else if (sys_audioapi == API_ASIO) - sys_audio()->open_audio(nidev, idev, nichdev, ichdev, nodev, odev, nochdev, ochdev, rate, schedmode); - else post("unknown audio API specified"); - } - sys_save_audio_params(nidev, idev, ichdev, nodev, odev, ochdev, int(sys_dacsr), sys_dacblocksize, advance, schedmode); - if (sys_inchannels == 0 && sys_outchannels == 0) enable = 0; - audio_state = enable; - sys_vgui("set pd_whichapi %d\n", audio_isopen() ? sys_audioapi : 0); - sched_set_using_dacs(enable); - sys_update_sleepgrain(); - if (enable) { - t_atom argv[1]; - t_symbol *selector = gensym("audio_started"); - t_symbol *pd = gensym("pd"); - SETFLOAT(argv, 1.); - typedmess(pd->s_thing, selector, 1, argv); - } -} - -void sys_close_audio() { - /* jsarlo { (*/ - if (sys_externalschedlib) return; - /* } jsarlo */ - if (!audio_isopen()) return; - if (sys_audio()) sys_audio()->close_audio(); - else post("sys_close_audio: unknown API %d", sys_audioapi); - sys_inchannels = sys_outchannels = 0; - sched_set_using_dacs(0); /* tb: dsp is switched off */ -} - -/* open audio using whatever parameters were last used */ -void sys_reopen_audio() { - t_audiodevs ai,ao; - int rate, dacblocksize, advance, scheduler; - sys_close_audio(); - sys_get_audio_params(&ai,&ao,&rate,&dacblocksize,&advance,&scheduler); - sys_open_audio2( &ai,&ao, rate, dacblocksize, advance, scheduler); -} - -/* tb: default value of peak_fp {*/ -float peakvec(t_float* vec, t_int n, t_float cur_max) { - for (int i=0; i<n; i++) { - float f = *vec++; - if (+f > cur_max) cur_max = +f; - else if (-f > cur_max) cur_max = -f; - } - return cur_max; -} -/* } */ - -void sys_peakmeters() { - if (sys_inchannels) sys_inmax = peak_fp(sys_soundin, sys_inchannels * sys_dacblocksize, sys_inmax); - if (sys_outchannels) sys_outmax = peak_fp(sys_soundout,sys_outchannels * sys_dacblocksize, sys_outmax); -} - -int sys_send_dacs() { - if (sys_meters) sys_peakmeters(); - if (sys_audio()) return sys_audio()->send_dacs(); - post("unknown API"); - return 0; -} - -float sys_getsr() {return sys_dacsr;} -int sys_get_outchannels() {return sys_outchannels;} -int sys_get_inchannels() {return sys_inchannels;} - -void sys_getmeters(float *inmax, float *outmax) { - if (inmax) { - sys_meters = 1; - *inmax = sys_inmax; - *outmax = sys_outmax; - } else sys_meters = 0; - sys_inmax = sys_outmax = 0; -} - -static void audio_getdevs(char *idevlist, int *nidev, char *odevlist, int *nodev, int *canmulti, int maxndev, int devdescsize) { - audio_init(); - if (sys_audio()) sys_audio()->getdevs(idevlist, nidev, odevlist, nodev, canmulti, maxndev, devdescsize); - else {*nidev = *nodev = 0;} -} - -void sys_listdevs() { -#ifdef USEAPI_JACK - if (sys_audioapi == API_JACK) return jack_listdevs(); -#endif - char idevlist[MAXNDEV*DEVDESCSIZE], odevlist[MAXNDEV*DEVDESCSIZE]; - int nidev = 0, nodev = 0, canmulti = 0; - audio_getdevs(idevlist, &nidev, odevlist, &nodev, &canmulti, MAXNDEV, DEVDESCSIZE); - /* To agree with command line flags, normally start at 1; but microsoft "MMIO" device list starts at 0 (the "mapper"). */ - /* (see also sys_mmio variable in s_main.c) */ - if (!nidev) post("no audio input devices found"); else post("audio input devices:"); - for (int i=0; i<nidev; i++) post("%d. %s", i + (sys_audioapi != API_MMIO), idevlist + i*DEVDESCSIZE); - if (!nodev) post("no audio output devices found"); else post("audio output devices:"); - for (int i=0; i<nodev; i++) post("%d. %s", i + (sys_audioapi != API_MMIO), odevlist + i*DEVDESCSIZE); - post("API number %d", sys_audioapi); - sys_listmididevs(); -} - -/* start an audio settings dialog window */ -void glob_audio_properties(t_pd *, t_floatarg flongform) { - /* these are the devices you're using: */ - t_audiodevs ai,ao; - int rate, dacblocksize, advance, scheduler; - /* these are all the devices on your system: */ - char idevlist[MAXNDEV*DEVDESCSIZE], odevlist[MAXNDEV*DEVDESCSIZE]; - int nidev = 0, nodev = 0, canmulti = 0; - audio_getdevs(idevlist, &nidev, odevlist, &nodev, &canmulti, MAXNDEV, DEVDESCSIZE); - ostringstream idevliststring; for (int i=0; i<nidev; i++) idevliststring << " {" << (idevlist + i*DEVDESCSIZE) << "}"; - ostringstream odevliststring; for (int i=0; i<nodev; i++) odevliststring << " {" << (odevlist + i*DEVDESCSIZE) << "}"; - sys_get_audio_params(&ai,&ao,&rate,&dacblocksize,&advance,&scheduler); - if (ai.ndev > 1 || ao.ndev > 1) flongform = 1; - ostringstream idevs; for (int i=0; i<ai.ndev; i++) idevs << " " << ai. dev[i]; - ostringstream odevs; for (int i=0; i<ao.ndev; i++) odevs << " " << ao. dev[i]; - ostringstream ichans; for (int i=0; i<ai.ndev; i++) ichans << " " << ai.chdev[i]; - ostringstream ochans; for (int i=0; i<ao.ndev; i++) ochans << " " << ao.chdev[i]; - sys_vgui("pdtk_audio_dialog {%s} {%s} {%s} {%s} {%s} {%s} %d %d %d %d %d\n", - idevliststring.str().data()+1, idevs.str().data()+1, ichans.str().data()+1, - odevliststring.str().data()+1, odevs.str().data()+1, ochans.str().data()+1, - rate, dacblocksize, advance, canmulti, flongform!=0); -} - -/* new values from dialog window */ -void glob_audio_dialog(t_pd *, t_symbol *s, int argc, t_atom *argv) { - int nidev=0, nodev=0; - t_audiodevs ai,ao; - for (int i=0; i<4; i++) { - ai.dev [i] = INTARG(i ); - ai.chdev[i] = INTARG(i+4 ); - ao.dev [i] = INTARG(i+8 ); - ao.chdev[i] = INTARG(i+12); - } - for (int i=0; i<4; i++) if (ai.chdev[i]) {ai.dev[nidev] = ai.dev[i]; ai.chdev[nidev] = ai.chdev[i]; nidev++;} - for (int i=0; i<4; i++) if (ao.chdev[i]) {ao.dev[nodev] = ao.dev[i]; ao.chdev[nodev] = ao.chdev[i]; nodev++;} - sys_close_audio(); - sys_open_audio(nidev, ai.dev, nidev, ai.chdev, - nodev, ao.dev, nodev, ao.chdev, INTARG(16),INTARG(17),INTARG(18),INTARG(19), 1); -} - -void sys_setblocksize(int n) { - if (n < 1) n = 1; - if (n != (1 << ilog2(n))) post("warning: adjusting blocksize to power of 2: %d", (n = (1 << ilog2(n)))); - sys_blocksize = n; -} - -void sys_set_audio_api(int which) { - sys_audioapi = which; - if (sys_verbose) post("sys_audioapi %d", sys_audioapi); -} - -void glob_audio_setapi(t_pd *, t_floatarg f) { - int newapi = int(f); - if (newapi != sys_audioapi) { - if (newapi != sys_audioapi) { - sys_close_audio(); - sys_audioapi = newapi; - /* bash device params back to default */ - audi.ndev = audo.ndev = 1; - audi.dev[0] = audo.dev[0] = DEFAULTAUDIODEV; - audi.chdev[0] = audo.chdev[0] = SYS_DEFAULTCH; - } - sched_set_using_dacs(0); -/* glob_audio_properties(0, 0); */ - } -} - -/* start or stop the audio hardware */ -void sys_set_audio_state(int onoff) { - if (onoff) {if (!audio_isopen()) sys_reopen_audio();} - else {if ( audio_isopen()) sys_close_audio();} - sched_set_using_dacs(onoff); - sys_setscheduler(sys_getscheduler()); /* tb: reset scheduler */ - audio_state = onoff; -} - -void sys_get_audio_apis(char *buf) { - int n = 0; - strcpy(buf, "{ "); -#ifdef USEAPI_OSS - sprintf(buf + strlen(buf), "{OSS %d} ", API_OSS); n++; -#endif -#ifdef USEAPI_ASIO - sprintf(buf + strlen(buf), "{ASIO %d} ", API_ASIO); n++; -#endif -#ifdef USEAPI_MMIO - sprintf(buf + strlen(buf), "{\"standard (MMIO)\" %d} ", API_MMIO); n++; -#endif -#ifdef USEAPI_ALSA - sprintf(buf + strlen(buf), "{ALSA %d} ", API_ALSA); n++; -#endif -#ifdef USEAPI_PORTAUDIO -#ifdef __APPLE__ - sprintf(buf + strlen(buf), "{\"standard (portaudio)\" %d} ", API_PORTAUDIO); n++; -#else - sprintf(buf + strlen(buf), "{portaudio %d} ", API_PORTAUDIO); n++; -#endif -#endif -#ifdef USEAPI_JACK - sprintf(buf + strlen(buf), "{jack %d} ", API_JACK); n++; -#endif - strcat(buf, "}"); -} - -#ifdef USEAPI_ALSA -void alsa_putzeros(int iodev, int n); -void alsa_getzeros(int iodev, int n); -void alsa_printstate(); -#endif - -/* debugging */ -void glob_foo(void *, t_symbol *s, int argc, t_atom *argv) { - t_symbol *arg = atom_getsymbolarg(0, argc, argv); - if (arg == gensym("restart")) sys_reopen_audio(); -#ifdef USEAPI_ALSA - /* what's the matter here? what should be the value of iodev??? */ - else if (arg == gensym("alsawrite")) alsa_putzeros(0, INTARG(1)); - else if (arg == gensym("alsaread")) alsa_getzeros(0, INTARG(1)); - else if (arg == gensym("print")) alsa_printstate(); -#endif -} - -/* tb: message-based audio configuration */ -void glob_audio_api(t_pd *, t_float f) { - int newapi = (int)f; - sys_close_audio(); - sys_audioapi = newapi; -} -void glob_audio_samplerate( t_pd *, t_float f) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; if (f == sys_getsr()) return; - sys_get_audio_params(&ai,&ao,&rate, &dacblocksize, &advance, &scheduler); - sys_close_audio(); sys_open_audio2(&ai,&ao,(int)f, dacblocksize, advance, scheduler); -} -void glob_audio_delay( t_pd *, t_float f) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; if (int(f) == audio_advance) return; - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - sys_close_audio(); sys_open_audio2(&ai,&ao,rate,dacblocksize,int(f),scheduler); -} -void glob_audio_dacblocksize(t_pd *, t_float f) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; if (int(f) == audio_dacblocksize) return; - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - sys_close_audio(); sys_open_audio2(&ai,&ao,rate,(int)f,advance,scheduler); -} -void glob_audio_scheduler(t_pd *, t_float f) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; if (int(f) == sys_callbackscheduler) return; - scheduler = f!=0; - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - sys_close_audio(); - sys_open_audio2(&ai,&ao, rate, dacblocksize, advance, scheduler); - if (scheduler != sys_callbackscheduler) { - if (scheduler == 1) post("switched to callback-based scheduler"); - else post("switched to traditional scheduler"); - } else post("couldn't change scheduler"); -} - -void glob_audio_device(t_pd *, t_symbol *s, int argc, t_atom *argv) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - ao.ndev = ai.ndev = INTARG(0); - for (int i=0; i<MAXAUDIOINDEV; i++) { - ao.dev [i] = ai.dev [i] = INTARG(i*2+1); - ao.chdev[i] = ai.chdev[i] = INTARG(i*2+2); - } - sys_close_audio(); sys_open_audio2(&ai,&ao, rate, dacblocksize, advance, scheduler); -} - -void glob_audio_device_in( t_pd *, t_symbol *s, int argc, t_atom *argv) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - ai.ndev = INTARG(0); - for (int i=0; i<MAXAUDIOINDEV; i+=2) {ai.dev[i] = INTARG(i+1); ai.chdev[i] = INTARG(i+2);} - sys_close_audio(); sys_open_audio2(&ai,&ao,rate, dacblocksize, advance, scheduler); -} -void glob_audio_device_out(t_pd *, t_symbol *s, int argc, t_atom *argv) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - ao.ndev = INTARG(0); - for (int i=0; i<MAXAUDIOOUTDEV; i+=2) {ao.dev[i] = INTARG(i+1); ao.chdev[i] = INTARG(i+2);} - sys_close_audio(); sys_open_audio2(&ai,&ao, rate, dacblocksize, advance, scheduler); -} - -/* some general helper functions */ -void sys_update_sleepgrain() {sys_sleepgrain = clip(sys_schedadvance/4,1000,5000);} - -/* t_audiodevs are the ones you're using; char[] are all the devices available. */ -void glob_audio_getaudioindevices(t_pd *, t_symbol *s, int ac, t_atom *av) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; - int nidev=0, nodev=0, canmulti=0; t_atom argv[MAXNDEV]; int f = ac ? atom_getintarg(0,ac,av) : -1; - t_symbol *selector = gensym("audioindev"), *pd = gensym("pd"); - char idevlist[MAXNDEV*DEVDESCSIZE], odevlist[MAXNDEV*DEVDESCSIZE]; - audio_getdevs(idevlist, &nidev, odevlist, &nodev, &canmulti, MAXNDEV, DEVDESCSIZE); - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - if (f<0) { - for (int i=0; i<nidev; i++) SETSTRING(argv+i,idevlist+i*DEVDESCSIZE); - typedmess(pd->s_thing, selector, nidev, argv); - } else if (f < nidev) { - SETSTRING(argv, idevlist + f*DEVDESCSIZE); - typedmess(pd->s_thing, selector, 1, argv); - } -} -void glob_audio_getaudiooutdevices(t_pd *, t_symbol *s, int ac, t_atom *av) { - t_audiodevs ai,ao; int rate, dacblocksize, advance, scheduler; - int nidev=0, nodev=0, canmulti=0; t_atom argv[MAXNDEV]; int f = ac ? atom_getintarg(0,ac,av) : -1; - t_symbol *selector = gensym("audiooutdev"), *pd = gensym("pd"); - char idevlist[MAXNDEV*DEVDESCSIZE], odevlist[MAXNDEV*DEVDESCSIZE]; - audio_getdevs(idevlist, &nidev, odevlist, &nodev, &canmulti, MAXNDEV, DEVDESCSIZE); - sys_get_audio_params(&ai,&ao, &rate, &dacblocksize, &advance, &scheduler); - if (f<0) { - for (int i=0; i<nodev; i++) SETSYMBOL(argv+i, gensym(odevlist+i*DEVDESCSIZE)); - typedmess(pd->s_thing, selector, nodev, argv); - } else if (f < nodev) { - SETSTRING(argv, odevlist + f*DEVDESCSIZE); - typedmess(pd->s_thing, selector, 1, argv); - } -} - -/* some prototypes from s_audio_portaudio.c */ -extern void pa_getcurrent_devices(); -extern void pa_getaudioininfo(t_float f); -extern void pa_getaudiooutinfo(t_float f); -extern void pa_test_setting (int ac, t_atom *av); -extern void pa_get_asio_latencies(t_float f); - -void glob_audio_getaudioininfo(t_pd *, t_float f) { -#if defined(USEAPI_PORTAUDIO) && !defined(PABLIO) - if (sys_audioapi == API_PORTAUDIO) pa_getaudioininfo(f); -#endif -} -void glob_audio_getaudiooutinfo(t_pd *, t_float f) { -#if defined(USEAPI_PORTAUDIO) && !defined(PABLIO) - if (sys_audioapi == API_PORTAUDIO) pa_getaudiooutinfo(f); -#endif -} -void glob_audio_testaudiosetting(t_pd *, t_symbol *s, int ac, t_atom *av) { -#if defined(USEAPI_PORTAUDIO) && !defined(PABLIO) - if (sys_audioapi == API_PORTAUDIO) pa_test_setting (ac, av); -#endif -} -void glob_audio_getcurrent_devices() { -#if defined(USEAPI_PORTAUDIO) && !defined(PABLIO) - if (sys_audioapi == API_PORTAUDIO) pa_getcurrent_devices(); -#endif -} -void glob_audio_asio_latencies(t_pd *, t_float f) { -#if defined(USEAPI_PORTAUDIO) && !defined(PABLIO) - if (sys_audioapi == API_PORTAUDIO) pa_get_asio_latencies(f); -#endif -} - -/* tb } */ |