New directory tree, with preprocessor/ inside interpretor/.

[Faustine.git] / interpretor / preprocessor / faust-0.9.47mr3 / architecture / pa-qt.cpp

diff --git a/interpretor/preprocessor/faust-0.9.47mr3/architecture/pa-qt.cpp b/interpretor/preprocessor/faust-0.9.47mr3/architecture/pa-qt.cpp
new file mode 100644 (file)
index 0000000..0613277
--- /dev/null
+++ b/interpretor/preprocessor/faust-0.9.47mr3/architecture/pa-qt.cpp
@@ -0,0 +1,128 @@
+/************************************************************************
+
+       IMPORTANT NOTE : this file contains two clearly delimited sections :
+       the ARCHITECTURE section (in two parts) and the USER section. Each section
+       is governed by its own copyright and license. Please check individually
+       each section for license and copyright information.
+*************************************************************************/
+
+/*******************BEGIN ARCHITECTURE SECTION (part 1/2)****************/
+
+/************************************************************************
+    FAUST Architecture File
+       Copyright (C) 2003-2011 GRAME, Centre National de Creation Musicale
+    ---------------------------------------------------------------------
+    This Architecture section is free software; you can redistribute it
+    and/or modify it under the terms of the GNU General Public License
+       as published by the Free Software Foundation; either version 3 of
+       the License, or (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+       along with this program; If not, see <http://www.gnu.org/licenses/>.
+
+       EXCEPTION : As a special exception, you may create a larger work
+       that contains this FAUST architecture section and distribute
+       that work under terms of your choice, so long as this FAUST
+       architecture section is not modified.
+
+
+ ************************************************************************
+ ************************************************************************/
+
+#include <libgen.h>
+#include <iostream>
+
+#include "gui/FUI.h"
+#include "gui/faustqt.h"
+#include "misc.h"
+#include "audio/portaudio-dsp.h"
+
+#ifdef OSCCTRL
+#include "gui/OSCUI.h"
+#endif
+
+
+/******************************************************************************
+*******************************************************************************
+
+                                                              VECTOR INTRINSICS
+
+*******************************************************************************
+*******************************************************************************/
+
+<<includeIntrinsic>>
+
+
+/********************END ARCHITECTURE SECTION (part 1/2)****************/
+
+/**************************BEGIN USER SECTION **************************/
+
+<<includeclass>>
+
+/***************************END USER SECTION ***************************/
+
+/*******************BEGIN ARCHITECTURE SECTION (part 2/2)***************/
+
+mydsp          DSP;
+list<GUI*>     GUI::fGuiList;
+
+/******************************************************************************
+*******************************************************************************
+
+                                MAIN PLAY THREAD
+
+*******************************************************************************
+*******************************************************************************/
+
+
+long lopt(char *argv[], const char *name, long def)
+{
+       int     i;
+       for (i=0; argv[i]; i++) if (!strcmp(argv[i], name)) return atoi(argv[i+1]);
+       return def;
+}
+
+int main(int argc, char *argv[])
+{
+       char    appname[256];
+       char    rcfilename[256];
+       char*   home = getenv("HOME");
+
+       snprintf(appname, 255, "%s", basename(argv[0]));
+       snprintf(rcfilename, 255, "%s/.%src", home, appname);
+
+       GUI* interface  = new QTGUI(argc, argv);
+       FUI* finterface = new FUI();
+       DSP.buildUserInterface(interface);
+       DSP.buildUserInterface(finterface);
+
+#ifdef OSCCTRL
+       GUI* oscinterface = new OSCUI(appname, argc, argv);
+       DSP.buildUserInterface(oscinterface);
+#endif
+
+    long srate = (long)lopt(argv, "--frequency", 44100);
+    int        fpb = lopt(argv, "--buffer", 128);
+
+       portaudio audio (srate, fpb);
+       audio.init(appname, &DSP);
+       finterface->recallState(rcfilename);
+       audio.start();
+
+#ifdef OSCCTRL
+       oscinterface->run();
+#endif
+       interface->run();
+
+       audio.stop();
+       finterface->saveState(rcfilename);
+       return 0;
+}
+
+/********************END ARCHITECTURE SECTION (part 2/2)****************/
+