X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/1059e1cc0c2ecfa237406949aa26155b6a5b9154..66f23d4fabf89ad09adbd4dfc15ac6b5b2b7da83:/interpreter/preprocessor/faust-0.9.47mr3/architecture/unsupported-arch/jack-wx.cpp diff --git a/interpreter/preprocessor/faust-0.9.47mr3/architecture/unsupported-arch/jack-wx.cpp b/interpreter/preprocessor/faust-0.9.47mr3/architecture/unsupported-arch/jack-wx.cpp new file mode 100644 index 0000000..e55f44b --- /dev/null +++ b/interpreter/preprocessor/faust-0.9.47mr3/architecture/unsupported-arch/jack-wx.cpp @@ -0,0 +1,763 @@ +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +//#include +#include +#include +#include +#include +#include +#include +#include +#include + +#include "wx/wx.h" +#include "wx/statbox.h" +#include "wx/notebook.h" +#include "wx/spinctrl.h" + + +#include +#include + +// linux : g++ -O3 -lm -ljack `wx-config --cflags --libs` ex2.cpp +// macosx: g++ karplus-strong.cpp -D__WXMAC__ -DWXMAKINGDLL -lwx_mac-2.4 -ljack -o karplus + +using namespace std ; + + +#ifdef __GNUC__ + +//------------------------------------------------------------------- +// Generic min and max using gcc extensions +//------------------------------------------------------------------- + +#define max(x,y) ((x)>?(y)) +#define min(x,y) ((x)b) ? a : b; } +inline int max (int a, int b) { return (a>b) ? a : b; } + +inline long max (long a, long b) { return (a>b) ? a : b; } +inline long max (int a, long b) { return (a>b) ? a : b; } +inline long max (long a, int b) { return (a>b) ? a : b; } + +inline float max (float a, float b) { return (a>b) ? a : b; } +inline float max (int a, float b) { return (a>b) ? a : b; } +inline float max (float a, int b) { return (a>b) ? a : b; } +inline float max (long a, float b) { return (a>b) ? a : b; } +inline float max (float a, long b) { return (a>b) ? a : b; } + +inline double max (double a, double b) { return (a>b) ? a : b; } +inline double max (int a, double b) { return (a>b) ? a : b; } +inline double max (double a, int b) { return (a>b) ? a : b; } +inline double max (long a, double b) { return (a>b) ? a : b; } +inline double max (double a, long b) { return (a>b) ? a : b; } +inline double max (float a, double b) { return (a>b) ? a : b; } +inline double max (double a, float b) { return (a>b) ? a : b; } + + +inline int min (int a, int b) { return (a T abs (T a) { return (a> n); } + +inline int int2pow2 (int x) { int r=0; while ((1<> + + +/****************************************************************************** +******************************************************************************* + + USER INTERFACE + +******************************************************************************* +*******************************************************************************/ + +class UI +{ + bool fStopped; +public: + + UI() : fStopped(false) {} + virtual ~UI() {} + + virtual void addButton(char* label, float* zone) = 0; + virtual void addToggleButton(char* label, float* zone) = 0; + virtual void addCheckButton(char* label, float* zone) = 0; + virtual void addVerticalSlider(char* label, float* zone, float init, float min, float max, float step) = 0; + virtual void addHorizontalSlider(char* label, float* zone, float init, float min, float max, float step) = 0; + virtual void addNumEntry(char* label, float* zone, float init, float min, float max, float step) = 0; + + virtual void openFrameBox(char* label) = 0; + virtual void openTabBox(char* label) = 0; + virtual void openHorizontalBox(char* label) = 0; + virtual void openVerticalBox(char* label) = 0; + virtual void closeBox() = 0; + + virtual void run() {}; + + void stop() { fStopped = true; } + bool stopped() { return fStopped; } +}; + + + +/****************************************************************************** +******************************************************************************* + + FAUST DSP + +******************************************************************************* +*******************************************************************************/ + + + +//---------------------------------------------------------------- +// définition du processeur de signal +//---------------------------------------------------------------- + +class dsp { + protected: + int fSamplingFreq; + public: + dsp() {} + virtual int getNumInputs() = 0; + virtual int getNumOutputs() = 0; + virtual void buildUserInterface(UI* interface) = 0; + virtual void init(int samplingRate) = 0; + virtual void compute(int len, float** inputs, float** outputs) = 0; +}; + + +<> + + +mydsp DSP; + + + +/****************************************************************************** +******************************************************************************* + + JACK AUDIO INTERFACE + +******************************************************************************* +*******************************************************************************/ + + + +//---------------------------------------------------------------------------- +// number of input and output channels +//---------------------------------------------------------------------------- + +int gNumInChans; +int gNumOutChans; + + +//---------------------------------------------------------------------------- +// Jack ports +//---------------------------------------------------------------------------- + +jack_port_t *input_ports[256]; +jack_port_t *output_ports[256]; + +//---------------------------------------------------------------------------- +// tables of noninterleaved input and output channels for FAUST +//---------------------------------------------------------------------------- + +float* gInChannel[256]; +float* gOutChannel[256]; + + +//---------------------------------------------------------------------------- +// Jack Callbacks +//---------------------------------------------------------------------------- + +int srate(jack_nframes_t nframes, void *arg) +{ + printf("the sample rate is now %lu/sec\n", nframes); + return 0; +} + +void jack_shutdown(void *arg) +{ + exit(1); +} + +int process (jack_nframes_t nframes, void *arg) +{ + // ATTENTION: en vectoriel il faut s'assurer que gInChannel et gOutChannel soit align�s sur une fronti�re de 128 bits + + for (int i = 0; i < gNumInChans; i++) { + gInChannel[i] = (float *)jack_port_get_buffer(input_ports[i], nframes); + } + for (int i = 0; i < gNumOutChans; i++) { + gOutChannel[i] = (float *)jack_port_get_buffer(output_ports[i], nframes); + } + DSP.compute(nframes, gInChannel, gOutChannel); + return 0; +} + + +/****************************************************************************** +******************************************************************************* + + WXWINDOWS USER INTERFACE + +******************************************************************************* +*******************************************************************************/ + + +// les modes d'insertion + +#define kNormalState 0 +#define kNotebookState 1 +#define kAutoPageState 2 + +#define kProp 0 +#define kBorder 5 +#define kFlag wxALL|wxGROW + + +// faustButton : a wxButton for FAUST. +class faustButton : public wxButton +{ + float* fZone; + public : + faustButton(wxWindow* parent, const wxString& label, float* zone) + : wxButton(parent, -1, label, wxPoint(-1, -1)), fZone(zone) + { + *fZone = 0.0; + } + +#ifdef MACOSX + void clickdown (wxCommandEvent& ev) { *fZone = 1.0; /*printf("click down : zone (at %p) = %f\n", fZone, *fZone); ev.Skip();*/} + void clickup (wxCommandEvent& ev) { *fZone = 0.0; /*printf("click up : zone (at %p) = %f\n", fZone, *fZone);ev.Skip();*/ } +#else + void clickdown (wxCommandEvent& ev) { *fZone = 1.0; /*printf("click down : zone (at %p) = %f\n", fZone, *fZone);*/ ev.Skip();} + void clickup (wxCommandEvent& ev) { *fZone = 0.0; /*printf("click up : zone (at %p) = %f\n", fZone, *fZone);*/ ev.Skip(); } +#endif + private: + DECLARE_EVENT_TABLE() +}; + +BEGIN_EVENT_TABLE(faustButton, wxButton) + EVT_LEFT_DOWN(faustButton::clickdown) + EVT_LEFT_UP(faustButton::clickup) +END_EVENT_TABLE() + + +class faustCheckBox : public wxCheckBox +{ + float* fZone; + public : + faustCheckBox(wxWindow* parent, const wxString& label, float* zone) + : wxCheckBox(parent, -1, label, wxPoint(-1, -1)), fZone(zone) + { + *fZone = 0.0; + } + + void toggle (wxCommandEvent& ev) { + *fZone = (ev.IsChecked()) ? 1.0 : 0.0; + //printf("toogle : zone (at %p) = %f\n", fZone, *fZone); + } + + private: + DECLARE_EVENT_TABLE() +}; + +BEGIN_EVENT_TABLE(faustCheckBox, wxCheckBox) + EVT_CHECKBOX(-1, faustCheckBox::toggle) +END_EVENT_TABLE() + + +class faustHorizontalSlider : public wxSlider +{ + float fStep; + float* fZone; + public : + faustHorizontalSlider(wxWindow* parent, float* zone, float init , float min, float max, float step) + : wxSlider(parent, -1, int(init/step), int(min/step), int(max/step), wxDefaultPosition, wxSize(120,30), wxSL_HORIZONTAL), fStep(step), fZone(zone) + { + *fZone = init; + } + + void update (wxCommandEvent& ev) { + *fZone = GetValue()*fStep; + //printf("horizontal slider update : zone (at %p) = %f\n", fZone, *fZone); + } + + private: + DECLARE_EVENT_TABLE() +}; + +BEGIN_EVENT_TABLE(faustHorizontalSlider, wxSlider) + EVT_SLIDER (-1, faustHorizontalSlider::update) +END_EVENT_TABLE() + + +class faustVerticalSlider : public wxSlider +{ + float fStep; + float* fZone; + public : + faustVerticalSlider(wxWindow* parent, float* zone, float init , float min, float max, float step) + : wxSlider(parent, -1, int((max+min-init)/step), int(min/step), int(max/step), wxDefaultPosition, wxSize(30,120), wxSL_VERTICAL), fStep(step), fZone(zone) + { + *fZone = init; + } + + void update (wxCommandEvent& ev) { + *fZone = (GetMin()+GetMax()-GetValue())*fStep; + //printf("vertical slider update : zone (at %p) = %f\n", fZone, *fZone); + } + + private: + DECLARE_EVENT_TABLE() +}; + +BEGIN_EVENT_TABLE(faustVerticalSlider, wxSlider) + EVT_SLIDER (-1, faustVerticalSlider::update) +END_EVENT_TABLE() + + +//-------------------------------- +// faustSpinCtrl* b = new faustSpinCtrl(topPanel(), zone, init, min, max, step); +// wxSpinCtrl* b = new wxSpinCtrl( topPanel(), -1, "", wxPoint(200, 160), wxSize(80, -1) ); +// b->SetRange(int(min),int(max)); +// b->SetValue(int(init)); + + +class faustSpinCtrl : public wxSpinCtrl +{ + float fStep; + float* fZone; + public : + faustSpinCtrl(wxWindow* parent, float* zone, float init , float min, float max, float step) + : wxSpinCtrl(parent), fStep(step), fZone(zone) + { + SetRange(int(min),int(max)); + SetValue(int(init)); + *fZone = init; + } + + void update (wxCommandEvent& ev) { *fZone = GetValue(); printf("spin ctrl update : zone (at %p) = %f\n", fZone, *fZone); } + + private: + DECLARE_EVENT_TABLE() +}; + +BEGIN_EVENT_TABLE(faustSpinCtrl, wxSpinCtrl) + EVT_SPINCTRL (-1, faustSpinCtrl::update) +END_EVENT_TABLE() + + + +class WXUI : public UI // user interface +{ + + class State + { + int const fType; + wxWindow* const fPanel; + wxSizer* const fSizer; + + public: + State (int t, wxWindow* p, wxSizer* z) : fType(t), fPanel(p), fSizer(z) {} + int type() const { return fType; } + wxWindow* panel() const { return fPanel; } + wxSizer* sizer() const { return fSizer; } + }; + + stack lState; + wxFrame* frame; + wxSizer* fSizer; + + // gestion de l'etat courant du constructeur + + void push (int t, wxWindow* p, wxSizer* z) + { + printf("push %d of %d, %p, %p\n", lState.size(), t, p, z); + lState.push(State(t,p,z)); + } + + int topType() { return lState.top().type(); } + wxWindow* topPanel() { return lState.top().panel(); } + wxSizer* topSizer() { return lState.top().sizer(); } + + void pop () + { + printf("pop %d", lState.size()-1); + lState.pop(); + printf(" ok\n"); + } + + void openAutoPage(char* label) + { + if (topType() == kNotebookState) { + + if (!label) label = ""; + + wxNotebook* nb = (wxNotebook*) topPanel(); + wxPanel* p = new wxPanel( nb, -1 ); + wxBoxSizer* z = new wxBoxSizer( wxVERTICAL ); + + nb->AddPage(p, label); + p->SetAutoLayout(TRUE); + p->SetSizer(z); + + push(kAutoPageState, p, z); + } + } + + void closeAutoPage() + { + if (topType() == kAutoPageState) pop(); + } + + void openOrientedBox(char* label, int orientation) + { + openAutoPage(label); + + wxSizer* z = (label == 0) ? new wxBoxSizer(orientation) + : new wxStaticBoxSizer(new wxStaticBox(topPanel(), -1, label), orientation); + + topSizer()->Add(z, 1, kFlag, kBorder); + push(kNormalState, topPanel(), z); + } + + public: + + + WXUI(){} + + virtual ~WXUI() {} + + void openFrame(wxFrame* f) + { + frame = f; + fSizer = new wxBoxSizer(wxVERTICAL); + frame->SetSizer(fSizer); + push(kNormalState, frame, fSizer); + } + + wxFrame* closeFrame() + { + fSizer->Fit(frame); + fSizer->SetSizeHints(frame); + return frame; + } + + virtual void openHorizontalBox(char* label) { openOrientedBox(label, wxHORIZONTAL); } + virtual void openVerticalBox(char* label) { openOrientedBox(label, wxVERTICAL); } + + virtual void openTabBox(char* label) + { + openAutoPage(label); + + wxNotebook* nb = new wxNotebook( topPanel(), -1 ); + wxNotebookSizer* z = new wxNotebookSizer( nb ); + + topSizer()->Add(z, 1, kFlag, kBorder); + push(kNotebookState, nb, z); + } + + virtual void closeBox() + { + pop(); + closeAutoPage(); + } + + //--------------------------------- les elements ------------------------------------------ + + virtual void addButton(char* label, float* zone) + { + openAutoPage(label); + faustButton* b = new faustButton(topPanel(), label, zone); + topSizer()->Add(b, kProp, kFlag, kBorder); + closeAutoPage(); + } + + virtual void addCheckButton(char* label, float* zone) + { + openAutoPage(label); + faustCheckBox* b = new faustCheckBox(topPanel(), label, zone); + topSizer()->Add(b, kProp, kFlag, kBorder); + closeAutoPage(); + } + + virtual void addVerticalSlider(char* label, float* zone, float init, float min, float max, float step) + { + openAutoPage(label); + if (label) { + wxSizer* z = new wxStaticBoxSizer(new wxStaticBox(topPanel(), -1, label), wxHORIZONTAL); + topSizer()->Add(z, 1, kFlag, kBorder); + faustVerticalSlider* b = new faustVerticalSlider(topPanel(), zone, init, min, max, step); + b->SetToolTip(label); + z->Add(b, 1, kFlag|wxALIGN_CENTER_VERTICAL, kBorder); + } else { + faustVerticalSlider* b = new faustVerticalSlider(topPanel(), zone, init, min, max, step); + topSizer()->Add(b, kProp, kFlag, kBorder); + } + closeAutoPage(); + } + + virtual void addHorizontalSlider(char* label, float* zone, float init, float min, float max, float step) + { + openAutoPage(label); + if (label) { + wxSizer* z = new wxStaticBoxSizer(new wxStaticBox(topPanel(), -1, label), wxVERTICAL); + topSizer()->Add(z, 1, kFlag, kBorder); + faustHorizontalSlider* b = new faustHorizontalSlider(topPanel(), zone, init, min, max, step); + b->SetToolTip(label); + z->Add(b, 1, kFlag|wxALIGN_CENTER_HORIZONTAL, kBorder); + } else { + faustHorizontalSlider* b = new faustHorizontalSlider(topPanel(), zone, init, min, max, step); + topSizer()->Add(b, kProp, kFlag, kBorder); + } + closeAutoPage(); + } + + virtual void addToggleButton(char* label, float* zone) {} + virtual void addNumEntry(char* label, float* zone, float init, float min, float max, float step) + { + openAutoPage(label); + if (label) { + wxSizer* z = new wxStaticBoxSizer(new wxStaticBox(topPanel(), -1, label), wxVERTICAL); + topSizer()->Add(z, 0, kFlag, kBorder); + faustSpinCtrl* b = new faustSpinCtrl(topPanel(), zone, init, min, max, step); +// wxSpinCtrl* b = new wxSpinCtrl( topPanel(), -1, "", wxPoint(200, 160), wxSize(80, -1) ); +// b->SetRange(int(min),int(max)); +// b->SetValue(int(init)); + b->SetToolTip(label); + z->Add(b, 0, kFlag, kBorder); + } else { + faustSpinCtrl* b = new faustSpinCtrl(topPanel(), zone, init, min, max, step); +// wxSpinCtrl* b = new wxSpinCtrl( topPanel(), -1, "", wxPoint(200, 160), wxSize(80, -1) ); +// b->SetRange(int(min),int(max)); +// b->SetValue(int(init)); + topSizer()->Add(b, kProp, kFlag, kBorder); + } + closeAutoPage(); + } + virtual void openFrameBox(char* label) {} +}; + + + +/****************************************************************************** +******************************************************************************* + + WXWINDOWS TOP FRAME + +******************************************************************************* +*******************************************************************************/ + + +enum { ID_QUIT=1, ID_ABOUT }; + + +class MyFrame : public wxFrame +{ + public: + MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size) + : wxFrame(0, -1, title, pos, size) + { + wxMenu* m = new wxMenu; + m->Append(ID_ABOUT, "&About..."); + m->AppendSeparator(); + m->Append(ID_QUIT, "E&xit"); + + wxMenuBar* b = new wxMenuBar; + b->Append(m, "&File"); + SetMenuBar(b); + CreateStatusBar(); + SetStatusText("hello..."); + } + + void OnQuit(wxCommandEvent& event) + { + Close(TRUE); + } + + void OnAbout(wxCommandEvent& event) + { + wxMessageBox("message 1", "message 2", wxOK|wxICON_INFORMATION); + } + + private: + DECLARE_EVENT_TABLE() +}; + + + BEGIN_EVENT_TABLE(MyFrame, wxFrame) + EVT_MENU(ID_QUIT, MyFrame::OnQuit) + EVT_MENU(ID_ABOUT, MyFrame::OnAbout) + END_EVENT_TABLE() + + + +/****************************************************************************** +******************************************************************************* + + WXWINDOWS MAIN APPLICATION + +******************************************************************************* +*******************************************************************************/ + +// Scan Command Line Arguments + +class MyApp : public wxApp +{ + jack_client_t* client; + char jackname[256]; + char** physicalInPorts; + char** physicalOutPorts; + + virtual bool OnInit() + { + MyFrame* frame = new MyFrame(argv[0], wxPoint(50,50), wxSize(-1, -1)); +/* + wxMenu* m = new wxMenu; + m->Append(ID_ABOUT, "&About..."); + m->AppendSeparator(); + m->Append(ID_QUIT, "E&xit"); + + wxMenuBar* b = new wxMenuBar; + b->Append(m, "&File"); + + frame->SetMenuBar(b); + frame->CreateStatusBar(); + frame->SetStatusText("Faust dsp..."); +*/ + WXUI* ui = new WXUI(); + ui->openFrame(frame); + DSP.buildUserInterface((UI*)ui); + ui->closeFrame(); + + frame->Show(TRUE); + SetTopWindow(frame); + + snprintf(jackname, 256, "faust_%s", basename(argv[0])); + + if ((client = jack_client_open(jackname, JackNullOption, NULL)) == 0) { + fprintf(stderr, "jack server not running?\n"); + return 1; + } + + jack_set_process_callback(client, process, 0); + jack_set_sample_rate_callback(client, srate, 0); + jack_on_shutdown(client, jack_shutdown, 0); + + gNumInChans = DSP.getNumInputs(); + gNumOutChans = DSP.getNumOutputs(); + + for (int i = 0; i < gNumInChans; i++) { + char buf[256]; + snprintf(buf, 256, "in_%d", i); + input_ports[i] = jack_port_register(client, buf, JACK_DEFAULT_AUDIO_TYPE, JackPortIsInput, 0); + } + for (int i = 0; i < gNumOutChans; i++) { + char buf[256]; + snprintf(buf, 256, "out_%d", i); + output_ports[i] = jack_port_register(client, buf, JACK_DEFAULT_AUDIO_TYPE, JackPortIsOutput, 0); + } + + DSP.init(jack_get_sample_rate(client)); + + physicalInPorts = (char **)jack_get_ports(client, NULL, NULL, JackPortIsPhysical|JackPortIsInput); + physicalOutPorts = (char **)jack_get_ports(client, NULL, NULL, JackPortIsPhysical|JackPortIsOutput); + + if (jack_activate(client)) { + fprintf(stderr, "cannot activate client"); + return 1; + } + + if (physicalOutPorts != NULL) { + for (int i = 0; i < gNumInChans && physicalOutPorts[i]; i++) { + jack_connect(client, physicalOutPorts[i], jack_port_name(input_ports[i])); + } + free(physicalOutPorts); + } + + if (physicalInPorts != NULL) { + for (int i = 0; i < gNumOutChans && physicalInPorts[i]; i++) { + jack_connect(client, jack_port_name(output_ports[i]), physicalInPorts[i]); + } + free(physicalInPorts); + } + + return TRUE; + } + + virtual int OnExit() + { + jack_deactivate(client); + + for (int i = 0; i < gNumInChans; i++) { + jack_port_unregister(client, input_ports[i]); + } + for (int i = 0; i < gNumOutChans; i++) { + jack_port_unregister(client, output_ports[i]); + } + + jack_client_close(client); + return 0; + } +}; + + +IMPLEMENT_APP(MyApp) +