static void sys_listaudiodevs(void )
{
char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE];
int nindevs = 0, noutdevs = 0, i, canmulti = 0, cancallback = 0;
audio_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, &canmulti,
&cancallback, MAXNDEV, DEVDESCSIZE);
if (!nindevs)
post("no audio input devices found");
else
{
/* 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) */
post("audio input devices:");
for (i = 0; i < nindevs; i++)
post("%d. %s", i + (sys_audioapi != API_MMIO),
indevlist + i * DEVDESCSIZE);
}
if (!noutdevs)
post("no audio output devices found");
else
{
post("audio output devices:");
for (i = 0; i < noutdevs; i++)
post("%d. %s", i + (sys_audioapi != API_MMIO),
outdevlist + i * DEVDESCSIZE);
}
post("API number %d\n", sys_audioapi);
}
static void sys_listaudiodevs(void )
{
char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE];
int nindevs = 0, noutdevs = 0, i, canmulti = 0;
audio_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, &canmulti,
MAXNDEV, DEVDESCSIZE);
if (!nindevs)
post("no audio input devices found");
else
{
post("input devices:");
for (i = 0; i < nindevs; i++)
post("%d. %s", i+1, indevlist + i * DEVDESCSIZE);
}
if (!noutdevs)
post("no audio output devices found");
else
{
post("output devices:");
for (i = 0; i < noutdevs; i++)
post("%d. %s", i + DEVONSET, outdevlist + i * DEVDESCSIZE);
}
post("API number %d\n", sys_audioapi);
}
void sys_get_audio_devs(char *indevlist, int *nindevs,
char *outdevlist, int *noutdevs, int *canmulti, int *cancallback,
int maxndev, int devdescsize)
{
audio_getdevs(indevlist, nindevs,
outdevlist, noutdevs,
canmulti, cancallback,
maxndev, devdescsize);
}
/* start an audio settings dialog window */
void glob_audio_properties(t_pd *dummy, t_floatarg flongform)
{
char buf[1024 + 2 * MAXNDEV*(DEVDESCSIZE+4)];
/* these are the devices you're using: */
int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV];
int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV];
int audioindev1, audioindev2, audioindev3, audioindev4,
audioinchan1, audioinchan2, audioinchan3, audioinchan4,
audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4,
audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4;
int rate, advance, callback, blocksize;
/* these are all the devices on your system: */
char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE];
int nindevs = 0, noutdevs = 0, canmulti = 0, cancallback = 0, i;
audio_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, &canmulti,
&cancallback, MAXNDEV, DEVDESCSIZE);
sys_gui("global audio_indevlist; set audio_indevlist {}\n");
for (i = 0; i < nindevs; i++)
sys_vgui("lappend audio_indevlist {%s}\n",
indevlist + i * DEVDESCSIZE);
sys_gui("global audio_outdevlist; set audio_outdevlist {}\n");
for (i = 0; i < noutdevs; i++)
sys_vgui("lappend audio_outdevlist {%s}\n",
outdevlist + i * DEVDESCSIZE);
sys_get_audio_params(&naudioindev, audioindev, chindev,
&naudiooutdev, audiooutdev, choutdev, &rate, &advance, &callback,
&blocksize);
/* post("naudioindev %d naudiooutdev %d longform %f",
naudioindev, naudiooutdev, flongform); */
if (naudioindev > 1 || naudiooutdev > 1)
flongform = 1;
audioindev1 = (naudioindev > 0 && audioindev[0]>= 0 ? audioindev[0] : 0);
audioindev2 = (naudioindev > 1 && audioindev[1]>= 0 ? audioindev[1] : 0);
audioindev3 = (naudioindev > 2 && audioindev[2]>= 0 ? audioindev[2] : 0);
audioindev4 = (naudioindev > 3 && audioindev[3]>= 0 ? audioindev[3] : 0);
audioinchan1 = (naudioindev > 0 ? chindev[0] : 0);
audioinchan2 = (naudioindev > 1 ? chindev[1] : 0);
audioinchan3 = (naudioindev > 2 ? chindev[2] : 0);
audioinchan4 = (naudioindev > 3 ? chindev[3] : 0);
audiooutdev1 = (naudiooutdev > 0 && audiooutdev[0]>=0 ? audiooutdev[0] : 0);
audiooutdev2 = (naudiooutdev > 1 && audiooutdev[1]>=0 ? audiooutdev[1] : 0);
audiooutdev3 = (naudiooutdev > 2 && audiooutdev[2]>=0 ? audiooutdev[2] : 0);
audiooutdev4 = (naudiooutdev > 3 && audiooutdev[3]>=0 ? audiooutdev[3] : 0);
audiooutchan1 = (naudiooutdev > 0 ? choutdev[0] : 0);
audiooutchan2 = (naudiooutdev > 1 ? choutdev[1] : 0);
audiooutchan3 = (naudiooutdev > 2 ? choutdev[2] : 0);
audiooutchan4 = (naudiooutdev > 3 ? choutdev[3] : 0);
sprintf(buf,
"pdtk_audio_dialog %%s \
%d %d %d %d %d %d %d %d \
%d %d %d %d %d %d %d %d \
%d %d %d %d %d %d\n",
audioindev1, audioindev2, audioindev3, audioindev4,
audioinchan1, audioinchan2, audioinchan3, audioinchan4,
audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4,
audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4,
rate, advance, canmulti, (cancallback ? callback : -1),
(flongform != 0), blocksize);
gfxstub_deleteforkey(0);
gfxstub_new(&glob_pdobject, (void *)glob_audio_properties, buf);
}
void sys_set_audio_settings(int naudioindev, int *audioindev, int nchindev,
int *chindev, int naudiooutdev, int *audiooutdev, int nchoutdev,
int *choutdev, int rate, int advance, int callback, int blocksize)
{
int i;
int defaultchannels = SYS_DEFAULTCH;
int inchans, outchans, nrealindev, nrealoutdev;
int realindev[MAXAUDIOINDEV], realoutdev[MAXAUDIOOUTDEV];
int realinchans[MAXAUDIOINDEV], realoutchans[MAXAUDIOOUTDEV];
char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE];
int indevs = 0, outdevs = 0, canmulti = 0, cancallback = 0;
/* initialize device-arrays */
for(i=0; i<MAXAUDIOINDEV; i++)
realindev[i] = realinchans[i] = 0;
for(i=0; i<MAXAUDIOOUTDEV; i++)
realoutdev[i] = realoutchans[i] = 0;
for(i=0; i<MAXNDEV*DEVDESCSIZE; i++)
indevlist[i] = outdevlist[i] = 0;
audio_getdevs(indevlist, &indevs, outdevlist, &outdevs, &canmulti,
&cancallback, MAXNDEV, DEVDESCSIZE);
if (rate < 1)
rate = DEFAULTSRATE;
if (advance < 0)
advance = DEFAULTADVANCE;
if (blocksize != (1 << ilog2(blocksize)) || blocksize < DEFDACBLKSIZE)
blocksize = DEFDACBLKSIZE;
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 (naudioindev == -1)
{ /* no input audio devices specified */
if (nchindev == -1)
{
if (indevs >= 1)
{
nchindev=1;
chindev[0] = defaultchannels;
naudioindev = 1;
audioindev[0] = DEFAULTAUDIODEV;
}
else naudioindev = nchindev = 0;
}
else
{
for (i = 0; i < MAXAUDIOINDEV; i++)
audioindev[i] = i;
naudioindev = nchindev;
}
}
else
{
if (nchindev == -1)
{
nchindev = naudioindev;
for (i = 0; i < naudioindev; i++)
chindev[i] = defaultchannels;
}
else if (nchindev > naudioindev)
{
for (i = naudioindev; i < nchindev; i++)
{
if (i == 0)
audioindev[0] = DEFAULTAUDIODEV;
else audioindev[i] = audioindev[i-1] + 1;
}
naudioindev = nchindev;
}
else if (nchindev < naudioindev)
{
for (i = nchindev; i < naudioindev; i++)
{
if (i == 0)
chindev[0] = defaultchannels;
else chindev[i] = chindev[i-1];
}
naudioindev = nchindev;
}
}
if (naudiooutdev == -1)
{ /* not set */
if (nchoutdev == -1)
{
if (outdevs >= 1)
{
nchoutdev=1;
choutdev[0]=defaultchannels;
naudiooutdev=1;
audiooutdev[0] = DEFAULTAUDIODEV;
}
else nchoutdev = naudiooutdev = 0;
}
else
{
for (i = 0; i < MAXAUDIOOUTDEV; i++)
audiooutdev[i] = i;
naudiooutdev = nchoutdev;
}
}
else
{
if (nchoutdev == -1)
{
nchoutdev = naudiooutdev;
for (i = 0; i < naudiooutdev; i++)
choutdev[i] = defaultchannels;
}
else if (nchoutdev > naudiooutdev)
{
for (i = naudiooutdev; i < nchoutdev; i++)
{
if (i == 0)
audiooutdev[0] = DEFAULTAUDIODEV;
else audiooutdev[i] = audiooutdev[i-1] + 1;
}
naudiooutdev = nchoutdev;
}
else if (nchoutdev < naudiooutdev)
{
for (i = nchoutdev; i < naudiooutdev; i++)
{
if (i == 0)
choutdev[0] = defaultchannels;
else choutdev[i] = choutdev[i-1];
}
naudiooutdev = nchoutdev;
}
}
/* count total number of input and output channels */
for (i = nrealindev = inchans = 0; i < naudioindev; i++)
if (chindev[i] > 0)
{
realinchans[nrealindev] = chindev[i];
realindev[nrealindev] = audioindev[i];
inchans += chindev[i];
nrealindev++;
}
for (i = nrealoutdev = outchans = 0; i < naudiooutdev; i++)
if (choutdev[i] > 0)
{
realoutchans[nrealoutdev] = choutdev[i];
realoutdev[nrealoutdev] = audiooutdev[i];
outchans += choutdev[i];
nrealoutdev++;
}
sys_schedadvance = advance * 1000;
sys_log_error(ERR_NOTHING);
audio_nextinchans = inchans;
audio_nextoutchans = outchans;
sys_setchsr(audio_nextinchans, audio_nextoutchans, rate);
sys_save_audio_params(nrealindev, realindev, realinchans,
nrealoutdev, realoutdev, realoutchans, rate, advance, callback,
blocksize);
}
void glob_audio_properties(t_pd *dummy, t_floatarg flongform)
{
char buf[1024 + 2 * MAXNDEV*(DEVDESCSIZE+4)];
/* these are the devices you're using: */
int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV];
int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV];
int audioindev1, audioindev2, audioindev3, audioindev4,
audioinchan1, audioinchan2, audioinchan3, audioinchan4,
audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4,
audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4;
int rate, advance;
/* these are all the devices on your system: */
char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE];
int nindevs = 0, noutdevs = 0, canmulti = 0, i;
char indevliststring[MAXNDEV*(DEVDESCSIZE+4)+80],
outdevliststring[MAXNDEV*(DEVDESCSIZE+4)+80];
audio_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, &canmulti,
MAXNDEV, DEVDESCSIZE);
strcpy(indevliststring, "{");
for (i = 0; i < nindevs; i++)
{
strcat(indevliststring, "\"");
strcat(indevliststring, indevlist + i * DEVDESCSIZE);
strcat(indevliststring, "\" ");
}
strcat(indevliststring, "}");
strcpy(outdevliststring, "{");
for (i = 0; i < noutdevs; i++)
{
strcat(outdevliststring, "\"");
strcat(outdevliststring, outdevlist + i * DEVDESCSIZE);
strcat(outdevliststring, "\" ");
}
strcat(outdevliststring, "}");
sys_get_audio_params(&naudioindev, audioindev, chindev,
&naudiooutdev, audiooutdev, choutdev, &rate, &advance);
/* post("naudioindev %d naudiooutdev %d longform %f",
naudioindev, naudiooutdev, flongform); */
if (naudioindev > 1 || naudiooutdev > 1)
flongform = 1;
audioindev1 = (naudioindev > 0 && audioindev[0]>= 0 ? audioindev[0] : 0);
audioindev2 = (naudioindev > 1 && audioindev[1]>= 0 ? audioindev[1] : 0);
audioindev3 = (naudioindev > 2 && audioindev[2]>= 0 ? audioindev[2] : 0);
audioindev4 = (naudioindev > 3 && audioindev[3]>= 0 ? audioindev[3] : 0);
audioinchan1 = (naudioindev > 0 ? chindev[0] : 0);
audioinchan2 = (naudioindev > 1 ? chindev[1] : 0);
audioinchan3 = (naudioindev > 2 ? chindev[2] : 0);
audioinchan4 = (naudioindev > 3 ? chindev[3] : 0);
audiooutdev1 = (naudiooutdev > 0 && audiooutdev[0]>=0 ? audiooutdev[0] : 0);
audiooutdev2 = (naudiooutdev > 1 && audiooutdev[1]>=0 ? audiooutdev[1] : 0);
audiooutdev3 = (naudiooutdev > 2 && audiooutdev[2]>=0 ? audiooutdev[2] : 0);
audiooutdev4 = (naudiooutdev > 3 && audiooutdev[3]>=0 ? audiooutdev[3] : 0);
audiooutchan1 = (naudiooutdev > 0 ? choutdev[0] : 0);
audiooutchan2 = (naudiooutdev > 1 ? choutdev[1] : 0);
audiooutchan3 = (naudiooutdev > 2 ? choutdev[2] : 0);
audiooutchan4 = (naudiooutdev > 3 ? choutdev[3] : 0);
sprintf(buf,
"pdtk_audio_dialog %%s \
%s %d %d %d %d %d %d %d %d \
%s %d %d %d %d %d %d %d %d \
%d %d %d %d\n",
indevliststring,
audioindev1, audioindev2, audioindev3, audioindev4,
audioinchan1, audioinchan2, audioinchan3, audioinchan4,
outdevliststring,
audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4,
audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4,
rate, advance, canmulti, (flongform != 0));
gfxstub_deleteforkey(0);
gfxstub_new(&glob_pdobject, glob_audio_properties, buf);
}
