From c1ae4414d4ac6504992434b949b252c30daf0c48 Mon Sep 17 00:00:00 2001 From: Wincent Balin Date: Thu, 3 Jun 2010 00:39:13 +0000 Subject: pdbox: Source cleanup. Removed unneeded files. git-svn-id: svn://svn.rockbox.org/rockbox/trunk@26497 a1c6a512-1295-4272-9138-f99709370657 --- apps/plugins/pdbox/PDa/src/s_main.c | 839 ------------------------------------ 1 file changed, 839 deletions(-) delete mode 100644 apps/plugins/pdbox/PDa/src/s_main.c (limited to 'apps/plugins/pdbox/PDa/src/s_main.c') diff --git a/apps/plugins/pdbox/PDa/src/s_main.c b/apps/plugins/pdbox/PDa/src/s_main.c deleted file mode 100644 index b77f804e9f..0000000000 --- a/apps/plugins/pdbox/PDa/src/s_main.c +++ /dev/null @@ -1,839 +0,0 @@ -/* Copyright (c) 1997-1999 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. */ - -/* IOhannes : - * hacked the code to add advanced multidevice-support - * 1311:forum::für::umläute:2001 - */ - -char pd_version[] = "Pd version 0.37.4\n"; -char pd_compiletime[] = __TIME__; -char pd_compiledate[] = __DATE__; - -#include "m_pd.h" -#include "m_imp.h" -#include "s_stuff.h" -#include -#include -#include -#include -#include -#include -#include - -#ifdef UNIX -#include -#endif -#ifdef MSW -#include -#include -#include -#endif - -void pd_init(void); -int sys_argparse(int argc, char **argv); -void sys_findprogdir(char *progname); -int sys_startgui(const char *guipath); -int sys_rcfile(void); -int m_scheduler(void); -void sys_addhelppath(char *p); -void alsa_adddev(char *name); - -int sys_debuglevel; -int sys_verbose; -int sys_noloadbang; -int sys_nogui; -int sys_stdin = 0; -char *sys_guicmd; -t_symbol *sys_libdir; -static t_symbol *sys_guidir; -static t_namelist *sys_externlist; -static t_namelist *sys_openlist; -static t_namelist *sys_messagelist; -static int sys_version; -int sys_oldtclversion; /* hack to warn g_rtext.c about old text sel */ - -int sys_nmidiout = 1; -#ifdef MSW -int sys_nmidiin = 0; -#else -int sys_nmidiin = 1; -#endif -int sys_midiindevlist[MAXMIDIINDEV] = {1}; -int sys_midioutdevlist[MAXMIDIOUTDEV] = {1}; - -static int sys_main_srate = DEFAULTSRATE; -static int sys_main_advance = DEFAULTADVANCE; - -/* IOhannes { */ - - /* here the "-1" counts signify that the corresponding vector hasn't been - specified in command line arguments; sys_open_audio will detect this - and fill things in. */ -int sys_nsoundin = -1; -int sys_nsoundout = -1; -int sys_soundindevlist[MAXAUDIOINDEV]; -int sys_soundoutdevlist[MAXAUDIOOUTDEV]; - -int sys_nchin = -1; -int sys_nchout = -1; -int sys_chinlist[MAXAUDIOINDEV]; -int sys_choutlist[MAXAUDIOOUTDEV]; -/* } IOhannes */ - - -typedef struct _fontinfo -{ - int fi_fontsize; - int fi_maxwidth; - int fi_maxheight; - int fi_hostfontsize; - int fi_width; - int fi_height; -} t_fontinfo; - - /* these give the nominal point size and maximum height of the characters - in the six fonts. */ - -static t_fontinfo sys_fontlist[] = { - {8, 5, 9, 0, 0, 0}, {10, 7, 13, 0, 0, 0}, {12, 9, 16, 0, 0, 0}, - {16, 10, 20, 0, 0, 0}, {24, 15, 25, 0, 0, 0}, {36, 25, 45, 0, 0, 0}}; -#define NFONT (sizeof(sys_fontlist)/sizeof(*sys_fontlist)) - -/* here are the actual font size structs on msp's systems: -MSW: -font 8 5 9 8 5 11 -font 10 7 13 10 6 13 -font 12 9 16 14 8 16 -font 16 10 20 16 10 18 -font 24 15 25 16 10 18 -font 36 25 42 36 22 41 - -linux: -font 8 5 9 8 5 9 -font 10 7 13 12 7 13 -font 12 9 16 14 9 15 -font 16 10 20 16 10 19 -font 24 15 25 24 15 24 -font 36 25 42 36 22 41 -*/ - -static t_fontinfo *sys_findfont(int fontsize) -{ - unsigned int i; - t_fontinfo *fi; - for (i = 0, fi = sys_fontlist; i < (NFONT-1); i++, fi++) - if (fontsize < fi[1].fi_fontsize) return (fi); - return (sys_fontlist + (NFONT-1)); -} - -int sys_nearestfontsize(int fontsize) -{ - return (sys_findfont(fontsize)->fi_fontsize); -} - -int sys_hostfontsize(int fontsize) -{ - return (sys_findfont(fontsize)->fi_hostfontsize); -} - -int sys_fontwidth(int fontsize) -{ - return (sys_findfont(fontsize)->fi_width); -} - -int sys_fontheight(int fontsize) -{ - return (sys_findfont(fontsize)->fi_height); -} - -int sys_defaultfont; -#ifdef MSW -#define DEFAULTFONT 12 -#else -#define DEFAULTFONT 10 -#endif - -static void openit(const char *dirname, const char *filename) -{ - char dirbuf[MAXPDSTRING], *nameptr; - int fd = open_via_path(dirname, filename, "", dirbuf, &nameptr, - MAXPDSTRING, 0); - if (fd) - { - close (fd); - glob_evalfile(0, gensym(nameptr), gensym(dirbuf)); - } - else - error("%s: can't open", filename); -} - -#define NHOSTFONT 7 - -/* this is called from the gui process. The first argument is the cwd, and -succeeding args give the widths and heights of known fonts. We wait until -these are known to open files and send messages specified on the command line. -We ask the GUI to specify the "cwd" in case we don't have a local OS to get it -from; for instance we could be some kind of RT embedded system. However, to -really make this make sense we would have to implement -open(), read(), etc, calls to be served somehow from the GUI too. */ - -void glob_initfromgui(void *dummy, t_symbol *s, int argc, t_atom *argv) -{ - char *cwd = atom_getsymbolarg(0, argc, argv)->s_name; - t_namelist *nl; - unsigned int i, j; - if (argc != 2 + 3 * NHOSTFONT) bug("glob_initfromgui"); - for (i = 0; i < NFONT; i++) - { - int wantheight = sys_fontlist[i].fi_maxheight; - for (j = 0; j < NHOSTFONT-1; j++) - { - if (atom_getintarg(3 * (j + 1) + 3, argc, argv) > wantheight) - break; - } - /* j is now the "real" font index for the desired font index i. */ - sys_fontlist[i].fi_hostfontsize = atom_getintarg(3 * j + 1, argc, argv); - sys_fontlist[i].fi_width = atom_getintarg(3 * j + 2, argc, argv); - sys_fontlist[i].fi_height = atom_getintarg(3 * j + 3, argc, argv); - } -#if 0 - for (i = 0; i < 6; i++) - fprintf(stderr, "font %d %d %d %d %d\n", - sys_fontlist[i].fi_fontsize, - sys_fontlist[i].fi_maxheight, - sys_fontlist[i].fi_hostfontsize, - sys_fontlist[i].fi_width, - sys_fontlist[i].fi_height); -#endif - /* load dynamic libraries specified with "-lib" args */ - for (nl = sys_externlist; nl; nl = nl->nl_next) - if (!sys_load_lib(cwd, nl->nl_string)) - post("%s: can't load library", nl->nl_string); - namelist_free(sys_externlist); - sys_externlist = 0; - /* open patches specifies with "-open" args */ - for (nl = sys_openlist; nl; nl = nl->nl_next) - openit(cwd, nl->nl_string); - namelist_free(sys_openlist); - sys_openlist = 0; - /* send messages specified with "-send" args */ - for (nl = sys_messagelist; nl; nl = nl->nl_next) - { - t_binbuf *b = binbuf_new(); - binbuf_text(b, nl->nl_string, strlen(nl->nl_string)); - binbuf_eval(b, 0, 0, 0); - binbuf_free(b); - } - namelist_free(sys_messagelist); - sys_messagelist = 0; - sys_oldtclversion = atom_getfloatarg(1 + 3 * NHOSTFONT, argc, argv); -} - -static void sys_afterargparse(void); - -/* this is called from main() in s_entry.c */ -int sys_main(int argc, char **argv) -{ -#ifdef PD_DEBUG - fprintf(stderr, "Pd: COMPILED FOR DEBUGGING\n"); -#endif - pd_init(); - sys_findprogdir(argv[0]); /* set sys_progname, guipath */ -#ifdef UNIX - sys_rcfile(); /* parse the startup file */ -#endif - if (sys_argparse(argc, argv)) /* parse cmd line */ - return (1); - sys_afterargparse(); /* post-argparse settings */ - if (sys_verbose || sys_version) fprintf(stderr, "%scompiled %s %s\n", - pd_version, pd_compiletime, pd_compiledate); - if (sys_version) /* if we were just asked our version, exit here. */ - return (0); - if (sys_startgui(sys_guidir->s_name)) /* start the gui */ - return(1); - /* open audio and MIDI */ - sys_open_midi(sys_nmidiin, sys_midiindevlist, - sys_nmidiout, sys_midioutdevlist); - sys_open_audio(sys_nsoundin, sys_soundindevlist, sys_nchin, sys_chinlist, - sys_nsoundout, sys_soundoutdevlist, sys_nchout, sys_choutlist, - sys_main_srate, sys_main_advance, 1); - /* run scheduler until it quits */ - - return (m_scheduler_pda()); - return (m_scheduler()); -} - -static char *(usagemessage[]) = { -"usage: pd [-flags] [file]...\n", -"\naudio configuration flags:\n", -"-r -- specify sample rate\n", -"-audioindev ... -- audio in devices; e.g., \"1,3\" for first and third\n", -"-audiooutdev ... -- audio out devices (same)\n", -"-audiodev ... -- specify input and output together\n", -"-inchannels ... -- audio input channels (by device, like \"2\" or \"16,8\")\n", -"-outchannels ... -- number of audio out channels (same)\n", -"-channels ... -- specify both input and output channels\n", -"-audiobuf -- specify size of audio buffer in msec\n", -"-blocksize -- specify audio I/O block size in sample frames\n", -"-sleepgrain -- specify number of milliseconds to sleep when idle\n", -"-nodac -- suppress audio output\n", -"-noadc -- suppress audio input\n", -"-noaudio -- suppress audio input and output (-nosound is synonym) \n", -"-listdev -- list audio and MIDI devices\n", - -#ifdef USEAPI_OSS -"-oss -- use OSS audio API\n", -"-32bit ----- allow 32 bit OSS audio (for RME Hammerfall)\n", -#endif - -#ifdef USEAPI_ALSA -"-alsa -- use ALSA audio API\n", -"-alsaadd -- add an ALSA device name to list\n", -"-alsadev ----- obsolete: use -audiodev\n", -#endif - -#ifdef USEAPI_JACK -"-jack -- use JACK audio API\n", -#endif - -#ifdef USEAPI_PORTAUDIO -#ifdef MSW -"-asio -- use ASIO audio driver (via Portaudio)\n", -"-pa -- synonym for -asio\n", -#else -"-pa -- use Portaudio API\n", -#endif -#endif - -#ifdef USEAPI_MMIO -"-mmio -- use MMIO audio API (default for Windows)\n", -#endif -" (default audio API for this platform: ", API_DEFSTRING, ")\n\n", - -"\nMIDI configuration flags:\n", -"-midiindev ... -- midi in device list; e.g., \"1,3\" for first and third\n", -"-midioutdev ... -- midi out device list, same format\n", -"-mididev ... -- specify -midioutdev and -midiindev together\n", -"-nomidiin -- suppress MIDI input\n", -"-nomidiout -- suppress MIDI output\n", -"-nomidi -- suppress MIDI input and output\n", - -"\nother flags:\n", -"-path -- add to file search path\n", -"-helppath -- add to help file search path\n", -"-open -- open file(s) on startup\n", -"-lib -- load object library(s)\n", -"-font -- specify default font size in points\n", -"-verbose -- extra printout on startup and when searching for files\n", -"-version -- don't run Pd; just print out which version it is \n", -"-d -- specify debug level\n", -"-noloadbang -- suppress all loadbangs\n", -"-nogui -- suppress starting the GUI\n", -"-stdin -- scan stdin for keypresses\n", -"-guicmd \"cmd...\" -- substitute another GUI program (e.g., rsh)\n", -"-send \"msg...\" -- send a message at startup (after patches are loaded)\n", -#ifdef UNIX -"-rt or -realtime -- use real-time priority\n", -"-nrt -- don't use real-time priority\n", -#endif -}; - -static void sys_parsedevlist(int *np, int *vecp, int max, char *str) -{ - int n = 0; - while (n < max) - { - if (!*str) break; - else - { - char *endp; - vecp[n] = strtol(str, &endp, 10); - if (endp == str) - break; - n++; - if (!endp) - break; - str = endp + 1; - } - } - *np = n; -} - -static int sys_getmultidevchannels(int n, int *devlist) -{ - int sum = 0; - if (n<0)return(-1); - if (n==0)return 0; - while(n--)sum+=*devlist++; - return sum; -} - - - /* this routine tries to figure out where to find the auxilliary files - Pd will need to run. This is either done by looking at the command line - invokation for Pd, or if that fails, by consulting the variable - INSTALL_PREFIX. In MSW, we don't try to use INSTALL_PREFIX. */ -void sys_findprogdir(char *progname) -{ - char sbuf[MAXPDSTRING], sbuf2[MAXPDSTRING], *sp; - char *lastslash; -#ifdef UNIX - struct stat statbuf; -#endif - - /* find out by what string Pd was invoked; put answer in "sbuf". */ -#ifdef MSW - GetModuleFileName(NULL, sbuf2, sizeof(sbuf2)); - sbuf2[MAXPDSTRING-1] = 0; - sys_unbashfilename(sbuf2, sbuf); -#endif /* MSW */ -#ifdef UNIX - strncpy(sbuf, progname, MAXPDSTRING); - sbuf[MAXPDSTRING-1] = 0; -#endif - lastslash = strrchr(sbuf, '/'); - if (lastslash) - { - /* bash last slash to zero so that sbuf is directory pd was in, - e.g., ~/pd/bin */ - *lastslash = 0; - /* go back to the parent from there, e.g., ~/pd */ - lastslash = strrchr(sbuf, '/'); - if (lastslash) - { - strncpy(sbuf2, sbuf, lastslash-sbuf); - sbuf2[lastslash-sbuf] = 0; - } - else strcpy(sbuf2, ".."); - } - else - { - /* no slashes found. Try INSTALL_PREFIX. */ -#ifdef INSTALL_PREFIX - strcpy(sbuf2, INSTALL_PREFIX); -#else - strcpy(sbuf2, "."); -#endif - } - /* now we believe sbuf2 holds the parent directory of the directory - pd was found in. We now want to infer the "lib" directory and the - "gui" directory. In "simple" UNIX installations, the layout is - .../bin/pd - .../bin/pd-gui - .../doc - and in "complicated" UNIX installations, it's: - .../bin/pd - .../lib/pd/bin/pd-gui - .../lib/pd/doc - To decide which, we stat .../lib/pd; if that exists, we assume it's - the complicated layout. In MSW, it's the "simple" layout, but - the gui program is straight wish80: - .../bin/pd - .../bin/wish80.exe - .../doc - */ -#ifdef UNIX - strncpy(sbuf, sbuf2, MAXPDSTRING-30); - sbuf[MAXPDSTRING-30] = 0; - strcat(sbuf, "/lib/pd"); - if (stat(sbuf, &statbuf) >= 0) - { - /* complicated layout: lib dir is the one we just stat-ed above */ - sys_libdir = gensym(sbuf); - /* gui lives in .../lib/pd/bin */ - strncpy(sbuf, sbuf2, MAXPDSTRING-30); - sbuf[MAXPDSTRING-30] = 0; - strcat(sbuf, "/lib/pd/bin"); - sys_guidir = gensym(sbuf); - } - else - { - /* simple layout: lib dir is the parent */ - sys_libdir = gensym(sbuf2); - /* gui lives in .../bin */ - strncpy(sbuf, sbuf2, MAXPDSTRING-30); - sbuf[MAXPDSTRING-30] = 0; - strcat(sbuf, "/bin"); - sys_guidir = gensym(sbuf); - } -#endif -#ifdef MSW - sys_libdir = gensym(sbuf2); - sys_guidir = &s_; /* in MSW the guipath just depends on the libdir */ -#endif -} - -#ifdef MSW -static int sys_mmio = 1; -#else -static int sys_mmio = 0; -#endif - -int sys_argparse(int argc, char **argv) -{ - char sbuf[MAXPDSTRING]; - int i; - argc--; argv++; - while ((argc > 0) && **argv == '-') - { - if (!strcmp(*argv, "-r") && argc > 1 && - sscanf(argv[1], "%d", &sys_main_srate) >= 1) - { - argc -= 2; - argv += 2; - } - else if (!strcmp(*argv, "-inchannels")) - { /* IOhannes */ - sys_parsedevlist(&sys_nchin, - sys_chinlist, MAXAUDIOINDEV, argv[1]); - - if (!sys_nchin) - goto usage; - - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-outchannels")) - { /* IOhannes */ - sys_parsedevlist(&sys_nchout, sys_choutlist, - MAXAUDIOOUTDEV, argv[1]); - - if (!sys_nchout) - goto usage; - - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-channels")) - { - sys_parsedevlist(&sys_nchin, sys_chinlist,MAXAUDIOINDEV, - argv[1]); - sys_parsedevlist(&sys_nchout, sys_choutlist,MAXAUDIOOUTDEV, - argv[1]); - - if (!sys_nchout) - goto usage; - - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-soundbuf") || !strcmp(*argv, "-audiobuf")) - { - sys_main_advance = atoi(argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-blocksize")) - { - sys_setblocksize(atoi(argv[1])); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-sleepgrain")) - { - sys_sleepgrain = 1000 * atoi(argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-nodac")) - { /* IOhannes */ - sys_nsoundout=0; - sys_nchout = 0; - argc--; argv++; - } - else if (!strcmp(*argv, "-noadc")) - { /* IOhannes */ - sys_nsoundin=0; - sys_nchin = 0; - argc--; argv++; - } - else if (!strcmp(*argv, "-nosound") || !strcmp(*argv, "-noaudio")) - { /* IOhannes */ - sys_nsoundin=sys_nsoundout = 0; - sys_nchin = sys_nchout = 0; - argc--; argv++; - } -#ifdef USEAPI_OSS - else if (!strcmp(*argv, "-oss")) - { - sys_set_audio_api(API_OSS); - argc--; argv++; - } - else if (!strcmp(*argv, "-32bit")) - { - sys_set_audio_api(API_OSS); - oss_set32bit(); - argc--; argv++; - } -#endif -#ifdef USEAPI_ALSA - else if (!strcmp(*argv, "-alsa")) - { - sys_set_audio_api(API_ALSA); - argc--; argv++; - } - else if (!strcmp(*argv, "-alsaadd")) - { - if (argc > 1) - alsa_adddev(argv[1]); - else goto usage; - argc -= 2; argv +=2; - } - /* obsolete flag for setting ALSA device number or name */ - else if (!strcmp(*argv, "-alsadev")) - { - int devno = 0; - if (argv[1][0] >= '1' && argv[1][0] <= '9') - devno = 1 + 2 * (atoi(argv[1]) - 1); - else if (!strncmp(argv[1], "hw:", 3)) - devno = 1 + 2 * atoi(argv[1]+3); - else if (!strncmp(argv[1], "plughw:", 7)) - devno = 2 + 2 * atoi(argv[1]+7); - else goto usage; - sys_nsoundin = sys_nsoundout = 1; - sys_soundindevlist[0] = sys_soundoutdevlist[0] = devno; - sys_set_audio_api(API_ALSA); - argc -= 2; argv +=2; - } -#endif -#ifdef USEAPI_JACK - else if (!strcmp(*argv, "-jack")) - { - sys_set_audio_api(API_JACK); - argc--; argv++; - } -#endif -#ifdef USEAPI_PORTAUDIO - else if (!strcmp(*argv, "-pa") || !strcmp(*argv, "-portaudio") -#ifdef MSW - || !strcmp(*argv, "-asio") -#endif - ) - { - sys_set_audio_api(API_PORTAUDIO); - sys_mmio = 0; - argc--; argv++; - } -#endif -#ifdef USEAPI_MMIO - else if (!strcmp(*argv, "-mmio")) - { - sys_set_audio_api(API_MMIO); - sys_mmio = 1; - argc--; argv++; - } -#endif - else if (!strcmp(*argv, "-nomidiin")) - { - sys_nmidiin = 0; - argc--; argv++; - } - else if (!strcmp(*argv, "-nomidiout")) - { - sys_nmidiout = 0; - argc--; argv++; - } - else if (!strcmp(*argv, "-nomidi")) - { - sys_nmidiin = sys_nmidiout = 0; - argc--; argv++; - } - else if (!strcmp(*argv, "-midiindev")) - { - sys_parsedevlist(&sys_nmidiin, sys_midiindevlist, MAXMIDIINDEV, - argv[1]); - if (!sys_nmidiin) - goto usage; - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-midioutdev")) - { - sys_parsedevlist(&sys_nmidiout, sys_midioutdevlist, MAXMIDIOUTDEV, - argv[1]); - if (!sys_nmidiout) - goto usage; - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-mididev")) - { - sys_parsedevlist(&sys_nmidiin, sys_midiindevlist, MAXMIDIINDEV, - argv[1]); - sys_parsedevlist(&sys_nmidiout, sys_midioutdevlist, MAXMIDIOUTDEV, - argv[1]); - if (!sys_nmidiout) - goto usage; - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-path")) - { - sys_addpath(argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-helppath")) - { - sys_addhelppath(argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-open") && argc > 1) - { - sys_openlist = namelist_append(sys_openlist, argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-lib") && argc > 1) - { - sys_externlist = namelist_append(sys_externlist, argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-font") && argc > 1) - { - sys_defaultfont = sys_nearestfontsize(atoi(argv[1])); - argc -= 2; - argv += 2; - } - else if (!strcmp(*argv, "-verbose")) - { - sys_verbose = 1; - argc--; argv++; - } - else if (!strcmp(*argv, "-version")) - { - sys_version = 1; - argc--; argv++; - } - else if (!strcmp(*argv, "-d") && argc > 1 && - sscanf(argv[1], "%d", &sys_debuglevel) >= 1) - { - argc -= 2; - argv += 2; - } - else if (!strcmp(*argv, "-noloadbang")) - { - sys_noloadbang = 1; - argc--; argv++; - } - else if (!strcmp(*argv, "-nogui")) - { - sys_nogui = 1; - argc--; argv++; - } - else if (!strcmp(*argv, "-stdin")) - { - sys_stdin = 1; - argc--; argv++; - } - else if (!strcmp(*argv, "-guicmd") && argc > 1) - { - sys_guicmd = argv[1]; - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-send") && argc > 1) - { - sys_messagelist = namelist_append(sys_messagelist, argv[1]); - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-listdev")) - { - sys_listdevs(); - argc--; argv++; - } -#ifdef UNIX - else if (!strcmp(*argv, "-rt") || !strcmp(*argv, "-realtime")) - { - sys_hipriority = 1; - argc--; argv++; - } - else if (!strcmp(*argv, "-nrt")) - { - sys_hipriority = 0; - argc--; argv++; - } -#endif - else if (!strcmp(*argv, "-soundindev") || - !strcmp(*argv, "-audioindev")) - { /* IOhannes */ - sys_parsedevlist(&sys_nsoundin, sys_soundindevlist, - MAXAUDIOINDEV, argv[1]); - if (!sys_nsoundin) - goto usage; - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-soundoutdev") || - !strcmp(*argv, "-audiooutdev")) - { /* IOhannes */ - sys_parsedevlist(&sys_nsoundout, sys_soundoutdevlist, - MAXAUDIOOUTDEV, argv[1]); - if (!sys_nsoundout) - goto usage; - argc -= 2; argv += 2; - } - else if (!strcmp(*argv, "-sounddev") || !strcmp(*argv, "-audiodev")) - { - sys_parsedevlist(&sys_nsoundin, sys_soundindevlist, - MAXAUDIOINDEV, argv[1]); - sys_parsedevlist(&sys_nsoundout, sys_soundoutdevlist, - MAXAUDIOOUTDEV, argv[1]); - if (!sys_nsoundout) - goto usage; - argc -= 2; argv += 2; - } - else - { - unsigned int i; - usage: - for (i = 0; i < sizeof(usagemessage)/sizeof(*usagemessage); i++) - fprintf(stderr, "%s", usagemessage[i]); - return (1); - } - } - if (!sys_defaultfont) - sys_defaultfont = DEFAULTFONT; - for (; argc > 0; argc--, argv++) - sys_openlist = namelist_append(sys_openlist, *argv); - - - return (0); -} - -int sys_getblksize(void) -{ - return (DEFDACBLKSIZE); -} - - /* stuff to do, once, after calling sys_argparse() -- which may itself - be called twice because of the .pdrc hack. */ -static void sys_afterargparse(void) -{ - char sbuf[MAXPDSTRING]; - int i; - /* add "extra" library to path */ - strncpy(sbuf, sys_libdir->s_name, MAXPDSTRING-30); - sbuf[MAXPDSTRING-30] = 0; - strcat(sbuf, "/extra"); - sys_addpath(sbuf); - strncpy(sbuf, sys_libdir->s_name, MAXPDSTRING-30); - sbuf[MAXPDSTRING-30] = 0; - strcat(sbuf, "/intern"); - sys_addpath(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_addhelppath(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]--; -} - -static void sys_addreferencepath(void) -{ - char sbuf[MAXPDSTRING]; -} - -- cgit v1.2.3