/* 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);
}
/* new values from dialog window */
void glob_midi_dialog(t_pd *dummy, t_symbol *s, int argc, t_atom *argv)
{
int nmidiindev, midiindev[MAXMIDIINDEV];
int nmidioutdev, midioutdev[MAXMIDIOUTDEV];
int i, nindev, noutdev;
int newmidiindev[4], newmidioutdev[4];
for (i = 0; i < 4; i++)
{
newmidiindev[i] = atom_getintarg(i, argc, argv);
newmidioutdev[i] = atom_getintarg(i+4, argc, argv);
}
for (i = 0, nindev = 0; i < 4; i++)
{
if (newmidiindev[i] > 0)
{
newmidiindev[nindev] = newmidiindev[i]-1;
nindev++;
}
}
for (i = 0, noutdev = 0; i < 4; i++)
{
if (newmidioutdev[i] > 0)
{
newmidioutdev[noutdev] = newmidioutdev[i]-1;
noutdev++;
}
}
sys_close_midi();
sys_open_midi(nindev, newmidiindev, noutdev, newmidioutdev);
}
/* 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 sys_loadpreferences( void)
{
int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV];
int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV];
int nmidiindev, midiindev[MAXMIDIINDEV];
int nmidioutdev, midioutdev[MAXMIDIOUTDEV];
int i, rate = 0, advance = 0, callback = 0, api, nolib, maxi;
char prefbuf[MAXPDSTRING], keybuf[80];
sys_initloadpreferences();
/* load audio preferences */
if (sys_getpreference("audioapi", prefbuf, MAXPDSTRING)
&& sscanf(prefbuf, "%d", &api) > 0)
sys_set_audio_api(api);
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("noaudioin", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
naudioindev = 0;
else
{
for (i = 0, naudioindev = 0; i < MAXAUDIOINDEV; i++)
{
sprintf(keybuf, "audioindev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d %d", &audioindev[i], &chindev[i]) < 2)
break;
naudioindev++;
}
/* if no preferences at all, set -1 for default behavior */
if (naudioindev == 0)
naudioindev = -1;
}
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("noaudioout", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
naudiooutdev = 0;
else
{
for (i = 0, naudiooutdev = 0; i < MAXAUDIOOUTDEV; i++)
{
sprintf(keybuf, "audiooutdev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d %d", &audiooutdev[i], &choutdev[i]) < 2)
break;
naudiooutdev++;
}
if (naudiooutdev == 0)
naudiooutdev = -1;
}
if (sys_getpreference("rate", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &rate);
if (sys_getpreference("audiobuf", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &advance);
if (sys_getpreference("callback", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &callback);
sys_set_audio_settings(naudioindev, audioindev, naudioindev, chindev,
naudiooutdev, audiooutdev, naudiooutdev, choutdev, rate, advance,
callback);
/* load MIDI preferences */
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("nomidiin", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
nmidiindev = 0;
else for (i = 0, nmidiindev = 0; i < MAXMIDIINDEV; i++)
{
sprintf(keybuf, "midiindev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d", &midiindev[i]) < 1)
break;
nmidiindev++;
}
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("nomidiout", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
nmidioutdev = 0;
else for (i = 0, nmidioutdev = 0; i < MAXMIDIOUTDEV; i++)
{
sprintf(keybuf, "midioutdev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d", &midioutdev[i]) < 1)
break;
nmidioutdev++;
}
sys_open_midi(nmidiindev, midiindev, nmidioutdev, midioutdev, 0);
/* search path */
if (sys_getpreference("npath", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &maxi);
else maxi = 0x7fffffff;
for (i = 0; i<maxi; i++)
{
sprintf(keybuf, "path%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
sys_searchpath = namelist_append_files(sys_searchpath, prefbuf);
}
if (sys_getpreference("standardpath", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &sys_usestdpath);
if (sys_getpreference("verbose", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &sys_verbose);
/* startup settings */
if (sys_getpreference("nloadlib", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &maxi);
else maxi = 0x7fffffff;
for (i = 0; i<maxi; i++)
{
sprintf(keybuf, "loadlib%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
sys_externlist = namelist_append_files(sys_externlist, prefbuf);
}
if (sys_getpreference("defeatrt", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &sys_defeatrt);
if (sys_getpreference("flags", prefbuf, MAXPDSTRING))
{
if (strcmp(prefbuf, "."))
sys_flags = gensym(prefbuf);
}
sys_doflags();
if (sys_defeatrt)
sys_hipriority = 0;
else
#ifdef UNIX
sys_hipriority = !geteuid();
#else
#ifdef MSW
sys_hipriority = 0;
#else
sys_hipriority = 1;
#endif
#endif
}
void sys_loadpreferences( void)
{
int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV];
int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV];
int nmidiindev, midiindev[MAXMIDIINDEV];
int nmidioutdev, midioutdev[MAXMIDIOUTDEV];
int i, rate = 0, advance = -1, callback = 0, blocksize = 0,
api, nolib, maxi;
char prefbuf[MAXPDSTRING], keybuf[80];
sys_initloadpreferences();
/* load audio preferences */
if (sys_getpreference("audioapi", prefbuf, MAXPDSTRING)
&& sscanf(prefbuf, "%d", &api) > 0)
sys_set_audio_api(api);
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("noaudioin", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
naudioindev = 0;
else
{
for (i = 0, naudioindev = 0; i < MAXAUDIOINDEV; i++)
{
/* first try to find a name - if that matches an existing
device use it. Otherwise fall back to device number. */
int devn;
/* read in device number and channel count */
sprintf(keybuf, "audioindev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d %d", &audioindev[i], &chindev[i]) < 2)
break;
/* possibly override device number if the device name was
also saved and if it matches one we have now */
sprintf(keybuf, "audioindevname%d", i+1);
if (sys_getpreference(keybuf, prefbuf, MAXPDSTRING)
&& (devn = sys_audiodevnametonumber(0, prefbuf)) >= 0)
audioindev[i] = devn;
naudioindev++;
}
/* if no preferences at all, set -1 for default behavior */
if (naudioindev == 0)
naudioindev = -1;
}
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("noaudioout", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
naudiooutdev = 0;
else
{
for (i = 0, naudiooutdev = 0; i < MAXAUDIOOUTDEV; i++)
{
int devn;
sprintf(keybuf, "audiooutdev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d %d", &audiooutdev[i], &choutdev[i]) < 2)
break;
sprintf(keybuf, "audiooutdevname%d", i+1);
if (sys_getpreference(keybuf, prefbuf, MAXPDSTRING)
&& (devn = sys_audiodevnametonumber(1, prefbuf)) >= 0)
audiooutdev[i] = devn;
naudiooutdev++;
}
if (naudiooutdev == 0)
naudiooutdev = -1;
}
if (sys_getpreference("rate", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &rate);
if (sys_getpreference("audiobuf", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &advance);
if (sys_getpreference("callback", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &callback);
if (sys_getpreference("blocksize", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &blocksize);
sys_set_audio_settings(naudioindev, audioindev, naudioindev, chindev,
naudiooutdev, audiooutdev, naudiooutdev, choutdev, rate, advance,
callback, blocksize);
/* load MIDI preferences */
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("nomidiin", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
nmidiindev = 0;
else for (i = 0, nmidiindev = 0; i < MAXMIDIINDEV; i++)
{
/* first try to find a name - if that matches an existing device
use it. Otherwise fall back to device number. */
int devn;
sprintf(keybuf, "midiindevname%d", i+1);
if (sys_getpreference(keybuf, prefbuf, MAXPDSTRING)
&& (devn = sys_mididevnametonumber(0, prefbuf)) >= 0)
midiindev[i] = devn;
else
{
sprintf(keybuf, "midiindev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d", &midiindev[i]) < 1)
break;
}
nmidiindev++;
}
/* JMZ/MB: brackets for initializing */
if (sys_getpreference("nomidiout", prefbuf, MAXPDSTRING) &&
(!strcmp(prefbuf, ".") || !strcmp(prefbuf, "True")))
nmidioutdev = 0;
else for (i = 0, nmidioutdev = 0; i < MAXMIDIOUTDEV; i++)
{
int devn;
sprintf(keybuf, "midioutdevname%d", i+1);
if (sys_getpreference(keybuf, prefbuf, MAXPDSTRING)
&& (devn = sys_mididevnametonumber(1, prefbuf)) >= 0)
midioutdev[i] = devn;
else
{
sprintf(keybuf, "midioutdev%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
if (sscanf(prefbuf, "%d", &midioutdev[i]) < 1)
break;
}
nmidioutdev++;
}
sys_open_midi(nmidiindev, midiindev, nmidioutdev, midioutdev, 0);
/* search path */
if (sys_getpreference("npath", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &maxi);
else maxi = 0x7fffffff;
for (i = 0; i<maxi; i++)
{
sprintf(keybuf, "path%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
sys_searchpath = namelist_append_files(sys_searchpath, prefbuf);
}
if (sys_getpreference("standardpath", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &sys_usestdpath);
if (sys_getpreference("verbose", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &sys_verbose);
/* startup settings */
if (sys_getpreference("nloadlib", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &maxi);
else maxi = 0x7fffffff;
for (i = 0; i<maxi; i++)
{
sprintf(keybuf, "loadlib%d", i+1);
if (!sys_getpreference(keybuf, prefbuf, MAXPDSTRING))
break;
sys_externlist = namelist_append_files(sys_externlist, prefbuf);
}
if (sys_getpreference("defeatrt", prefbuf, MAXPDSTRING))
sscanf(prefbuf, "%d", &sys_defeatrt);
if (sys_getpreference("flags", prefbuf, MAXPDSTRING))
{
if (strcmp(prefbuf, "."))
sys_flags = gensym(prefbuf);
}
sys_doflags();
if (sys_defeatrt)
sys_hipriority = 0;
else
#if defined(__linux__) || defined(__CYGWIN__)
sys_hipriority = 1;
#else
#if defined(_WIN32) || defined(ANDROID)
sys_hipriority = 0;
#else
sys_hipriority = 1;
#endif
#endif
}
