/* open midi using whatever parameters were last used */
void sys_reopen_midi( void)
{
int nmidiindev, midiindev[MAXMIDIINDEV];
int nmidioutdev, midioutdev[MAXMIDIOUTDEV];
sys_get_midi_params(&nmidiindev, midiindev, &nmidioutdev, midioutdev);
sys_open_midi(nmidiindev, midiindev, nmidioutdev, midioutdev);
}
/* stuff to do, once, after calling sys_argparse() -- which may itself
be called more than once (first from "settings, second from .pdrc, then
from command-line arguments */
static void sys_afterargparse(void)
{
char sbuf[MAXPDSTRING];
int i;
int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV];
int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV];
int nchindev, nchoutdev, rate, advance, callback, blocksize;
int nmidiindev = 0, midiindev[MAXMIDIINDEV];
int nmidioutdev = 0, midioutdev[MAXMIDIOUTDEV];
/* add "extra" library to path */
strncpy(sbuf, sys_libdir->s_name, MAXPDSTRING-30);
sbuf[MAXPDSTRING-30] = 0;
strcat(sbuf, "/extra");
sys_setextrapath(sbuf);
/* add "doc/5.reference" library to helppath */
strncpy(sbuf, sys_libdir->s_name, MAXPDSTRING-30);
sbuf[MAXPDSTRING-30] = 0;
strcat(sbuf, "/doc/5.reference");
sys_helppath = namelist_append_files(sys_helppath, sbuf);
/* correct to make audio and MIDI device lists zero based. On
MMIO, however, "1" really means the second device (the first one
is "mapper" which is was not included when the command args were
set up, so we leave it that way for compatibility. */
if (!sys_mmio)
{
for (i = 0; i < sys_nsoundin; i++)
sys_soundindevlist[i]--;
for (i = 0; i < sys_nsoundout; i++)
sys_soundoutdevlist[i]--;
}
for (i = 0; i < sys_nmidiin; i++)
sys_midiindevlist[i]--;
for (i = 0; i < sys_nmidiout; i++)
sys_midioutdevlist[i]--;
if (sys_listplease)
sys_listdevs();
/* get the current audio parameters. These are set
by the preferences mechanism (sys_loadpreferences()) or
else are the default. Overwrite them with any results
of argument parsing, and store them again. */
sys_get_audio_params(&naudioindev, audioindev, chindev,
&naudiooutdev, audiooutdev, choutdev, &rate, &advance,
&callback, &blocksize);
if (sys_nchin >= 0)
{
nchindev = sys_nchin;
for (i = 0; i < nchindev; i++)
chindev[i] = sys_chinlist[i];
}
else nchindev = naudioindev;
if (sys_nsoundin >= 0)
{
naudioindev = sys_nsoundin;
for (i = 0; i < naudioindev; i++)
audioindev[i] = sys_soundindevlist[i];
}
if (sys_nchout >= 0)
{
nchoutdev = sys_nchout;
for (i = 0; i < nchoutdev; i++)
choutdev[i] = sys_choutlist[i];
}
else nchoutdev = naudiooutdev;
if (sys_nsoundout >= 0)
{
naudiooutdev = sys_nsoundout;
for (i = 0; i < naudiooutdev; i++)
audiooutdev[i] = sys_soundoutdevlist[i];
}
sys_get_midi_params(&nmidiindev, midiindev, &nmidioutdev, midioutdev);
if (sys_nmidiin >= 0)
{
post("sys_nmidiin %d, nmidiindev %d", sys_nmidiin, nmidiindev);
nmidiindev = sys_nmidiin;
for (i = 0; i < nmidiindev; i++)
midiindev[i] = sys_midiindevlist[i];
}
if (sys_nmidiout >= 0)
{
nmidioutdev = sys_nmidiout;
for (i = 0; i < nmidioutdev; i++)
midioutdev[i] = sys_midioutdevlist[i];
}
if (sys_main_advance)
advance = sys_main_advance;
if (sys_main_srate)
rate = sys_main_srate;
if (sys_main_callback)
callback = sys_main_callback;
if (sys_main_blocksize)
blocksize = sys_main_blocksize;
sys_set_audio_settings(naudioindev, audioindev, nchindev, chindev,
naudiooutdev, audiooutdev, nchoutdev, choutdev, rate, advance,
callback, blocksize);
sys_open_midi(nmidiindev, midiindev, nmidioutdev, midioutdev, 0);
}
void glob_savepreferences(t_pd *dummy)
{
int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV];
int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV];
int i, rate, advance, callback;
char buf1[MAXPDSTRING], buf2[MAXPDSTRING];
int nmidiindev, midiindev[MAXMIDIINDEV];
int nmidioutdev, midioutdev[MAXMIDIOUTDEV];
sys_initsavepreferences();
/* audio settings */
sprintf(buf1, "%d", sys_audioapi);
sys_putpreference("audioapi", buf1);
sys_get_audio_params(&naudioindev, audioindev, chindev,
&naudiooutdev, audiooutdev, choutdev, &rate, &advance, &callback);
sys_putpreference("noaudioin", (naudioindev <= 0 ? "True" : "False"));
for (i = 0; i < naudioindev; i++)
{
sprintf(buf1, "audioindev%d", i+1);
sprintf(buf2, "%d %d", audioindev[i], chindev[i]);
sys_putpreference(buf1, buf2);
}
sys_putpreference("noaudioout", (naudiooutdev <= 0 ? "True" : "False"));
for (i = 0; i < naudiooutdev; i++)
{
sprintf(buf1, "audiooutdev%d", i+1);
sprintf(buf2, "%d %d", audiooutdev[i], choutdev[i]);
sys_putpreference(buf1, buf2);
}
sprintf(buf1, "%d", advance);
sys_putpreference("audiobuf", buf1);
sprintf(buf1, "%d", rate);
sys_putpreference("rate", buf1);
sprintf(buf1, "%d", callback);
sys_putpreference("callback", buf1);
/* MIDI settings */
sys_get_midi_params(&nmidiindev, midiindev, &nmidioutdev, midioutdev);
sys_putpreference("nomidiin", (nmidiindev <= 0 ? "True" : "False"));
for (i = 0; i < nmidiindev; i++)
{
sprintf(buf1, "midiindev%d", i+1);
sprintf(buf2, "%d", midiindev[i]);
sys_putpreference(buf1, buf2);
}
sys_putpreference("nomidiout", (nmidioutdev <= 0 ? "True" : "False"));
for (i = 0; i < nmidioutdev; i++)
{
sprintf(buf1, "midioutdev%d", i+1);
sprintf(buf2, "%d", midioutdev[i]);
sys_putpreference(buf1, buf2);
}
/* file search path */
for (i = 0; 1; i++)
{
char *pathelem = namelist_get(sys_searchpath, i);
if (!pathelem)
break;
sprintf(buf1, "path%d", i+1);
sys_putpreference(buf1, pathelem);
}
sprintf(buf1, "%d", i);
sys_putpreference("npath", buf1);
sprintf(buf1, "%d", sys_usestdpath);
sys_putpreference("standardpath", buf1);
sprintf(buf1, "%d", sys_verbose);
sys_putpreference("verbose", buf1);
/* startup */
for (i = 0; 1; i++)
{
char *pathelem = namelist_get(sys_externlist, i);
if (!pathelem)
break;
sprintf(buf1, "loadlib%d", i+1);
sys_putpreference(buf1, pathelem);
}
sprintf(buf1, "%d", i);
sys_putpreference("nloadlib", buf1);
sprintf(buf1, "%d", sys_defeatrt);
sys_putpreference("defeatrt", buf1);
sys_putpreference("flags",
(sys_flags ? sys_flags->s_name : ""));
sys_donesavepreferences();
}
/* start an midi settings dialog window */
void glob_midi_properties(t_pd *dummy, t_floatarg flongform)
{
char buf[1024 + 2 * MAXNDEV*(DEVDESCSIZE+4)];
/* these are the devices you're using: */
int nindev, midiindev[MAXMIDIINDEV];
int noutdev, midioutdev[MAXMIDIOUTDEV];
int midiindev1, midiindev2, midiindev3, midiindev4,
midioutdev1, midioutdev2, midioutdev3, midioutdev4;
/* these are all the devices on your system: */
char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE];
int nindevs = 0, noutdevs = 0, i;
char indevliststring[MAXNDEV*(DEVDESCSIZE+4)+80],
outdevliststring[MAXNDEV*(DEVDESCSIZE+4)+80];
midi_getdevs(indevlist, &nindevs, outdevlist, &noutdevs,
MAXNDEV, DEVDESCSIZE);
strcpy(indevliststring, "{ {none} ");
for (i = 0; i < nindevs; i++)
{
strcat(indevliststring, "\"");
strcat(indevliststring, indevlist + i * DEVDESCSIZE);
strcat(indevliststring, "\" ");
}
strcat(indevliststring, "}");
strcpy(outdevliststring, "{ {none} ");
for (i = 0; i < noutdevs; i++)
{
strcat(outdevliststring, "\"");
strcat(outdevliststring, outdevlist + i * DEVDESCSIZE);
strcat(outdevliststring, "\" ");
}
strcat(outdevliststring, "}");
sys_get_midi_params(&nindev, midiindev, &noutdev, midioutdev);
if (nindev > 1 || noutdev > 1)
flongform = 1;
midiindev1 = (nindev > 0 && midiindev[0]>= 0 ? midiindev[0]+1 : 0);
midiindev2 = (nindev > 1 && midiindev[1]>= 0 ? midiindev[1]+1 : 0);
midiindev3 = (nindev > 2 && midiindev[2]>= 0 ? midiindev[2]+1 : 0);
midiindev4 = (nindev > 3 && midiindev[3]>= 0 ? midiindev[3]+1 : 0);
midioutdev1 = (noutdev > 0 && midioutdev[0]>=0 ? midioutdev[0]+1 : 0);
midioutdev2 = (noutdev > 1 && midioutdev[1]>=0 ? midioutdev[1]+1 : 0);
midioutdev3 = (noutdev > 2 && midioutdev[2]>=0 ? midioutdev[2]+1 : 0);
midioutdev4 = (noutdev > 3 && midioutdev[3]>=0 ? midioutdev[3]+1 : 0);
sprintf(buf,
"pdtk_midi_dialog %%s \
%s %d %d %d %d %s %d %d %d %d \
%d\n",
indevliststring,
midiindev1, midiindev2, midiindev3, midiindev4,
outdevliststring,
midioutdev1, midioutdev2, midioutdev3, midioutdev4,
(flongform != 0));
gfxstub_deleteforkey(0);
gfxstub_new(&glob_pdobject, glob_midi_properties, buf);
}
