Bug fixed in preprocessor for new primitives.
[Faustine.git] / interpretor / preprocessor / faust-0.9.47mr3 / architecture / jack-internal.cpp
1 /************************************************************************
2
3 IMPORTANT NOTE : this file contains two clearly delimited sections :
4 the ARCHITECTURE section (in two parts) and the USER section. Each section
5 is governed by its own copyright and license. Please check individually
6 each section for license and copyright information.
7 *************************************************************************/
8
9 /*******************BEGIN ARCHITECTURE SECTION (part 1/2)****************/
10
11 /************************************************************************
12 FAUST Architecture File
13 Copyright (C) 2003-2011 GRAME, Centre National de Creation Musicale
14 ---------------------------------------------------------------------
15 This Architecture section is free software; you can redistribute it
16 and/or modify it under the terms of the GNU General Public License
17 as published by the Free Software Foundation; either version 3 of
18 the License, or (at your option) any later version.
19
20 This program is distributed in the hope that it will be useful,
21 but WITHOUT ANY WARRANTY; without even the implied warranty of
22 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 GNU General Public License for more details.
24
25 You should have received a copy of the GNU General Public License
26 along with this program; If not, see <http://www.gnu.org/licenses/>.
27
28 EXCEPTION : As a special exception, you may create a larger work
29 that contains this FAUST architecture section and distribute
30 that work under terms of your choice, so long as this FAUST
31 architecture section is not modified.
32
33
34 ************************************************************************
35 ************************************************************************/
36
37
38 #include <stdlib.h>
39 #include <stdio.h>
40 #include <string.h>
41 #include <limits.h>
42 #include <math.h>
43 #include <errno.h>
44 #include <time.h>
45 #include <vector>
46 #include <stack>
47 #include <string>
48 #include <map>
49 #include <list>
50 #include <iostream>
51 #include <assert.h>
52
53 #include <libgen.h>
54 #include <jack/jack.h>
55 #include <jack/jslist.h>
56
57 using namespace std;
58
59 // On Intel set FZ (Flush to Zero) and DAZ (Denormals Are Zero)
60 // flags to avoid costly denormals
61 #ifdef __SSE__
62 #include <xmmintrin.h>
63 #ifdef __SSE2__
64 #define AVOIDDENORMALS _mm_setcsr(_mm_getcsr() | 0x8040)
65 #else
66 #define AVOIDDENORMALS _mm_setcsr(_mm_getcsr() | 0x8000)
67 #endif
68 #else
69 #define AVOIDDENORMALS
70 #endif
71
72 struct Meta : map<const char*, const char*>
73 {
74 void declare (const char* key, const char* value) { (*this)[key]=value; }
75 };
76
77 #define max(x,y) (((x)>(y)) ? (x) : (y))
78 #define min(x,y) (((x)<(y)) ? (x) : (y))
79
80 // abs is now predefined
81 //template<typename T> T abs (T a) { return (a<T(0)) ? -a : a; }
82
83 inline int lsr (int x, int n) { return int(((unsigned int)x) >> n); }
84
85 /******************************************************************************
86 *******************************************************************************
87
88 VECTOR INTRINSICS
89
90 *******************************************************************************
91 *******************************************************************************/
92
93 //inline void *aligned_calloc(size_t nmemb, size_t size) { return (void*)((unsigned)(calloc((nmemb*size)+15,sizeof(char)))+15 & 0xfffffff0); }
94 //inline void *aligned_calloc(size_t nmemb, size_t size) { return (void*)((size_t)(calloc((nmemb*size)+15,sizeof(char)))+15 & ~15); }
95
96 <<includeIntrinsic>>
97
98
99 /******************************************************************************
100 *******************************************************************************
101
102 GRAPHIC USER INTERFACE (v2)
103 abstract interfaces
104
105 *******************************************************************************
106 *******************************************************************************/
107
108 using namespace std;
109
110
111 struct uiItem;
112 typedef void (*uiCallback)(float val, void* data);
113
114 /**
115 * Graphic User Interface : abstract definition
116 */
117
118 class UI
119 {
120 typedef list<uiItem*> clist;
121 typedef map<float*, clist*> zmap;
122
123 private:
124 static list<UI*> fGuiList;
125 zmap fZoneMap;
126 bool fStopped;
127
128 public:
129
130 UI() : fStopped(false) {
131 fGuiList.push_back(this);
132 }
133
134 virtual ~UI() {
135 // suppression de this dans fGuiList
136 }
137
138 // -- zone management
139
140 void registerZone(float* z, uiItem* c)
141 {
142 if (fZoneMap.find(z) == fZoneMap.end()) fZoneMap[z] = new clist();
143 fZoneMap[z]->push_back(c);
144 }
145
146 void updateAllZones();
147
148 void updateZone(float* z);
149
150 static void updateAllGuis()
151 {
152 list<UI*>::iterator g;
153 for (g = fGuiList.begin(); g != fGuiList.end(); g++) {
154 (*g)->updateAllZones();
155 }
156 }
157
158 // -- active widgets
159
160 virtual void addButton(const char* label, float* zone) = 0;
161 virtual void addToggleButton(const char* label, float* zone) = 0;
162 virtual void addCheckButton(const char* label, float* zone) = 0;
163 virtual void addVerticalSlider(const char* label, float* zone, float init, float min, float max, float step) = 0;
164 virtual void addHorizontalSlider(const char* label, float* zone, float init, float min, float max, float step) = 0;
165 virtual void addNumEntry(const char* label, float* zone, float init, float min, float max, float step) = 0;
166
167 // -- passive widgets
168
169 virtual void addNumDisplay(const char* label, float* zone, int precision) = 0;
170 virtual void addTextDisplay(const char* label, float* zone, char* names[], float min, float max) = 0;
171 virtual void addHorizontalBargraph(const char* label, float* zone, float min, float max) = 0;
172 virtual void addVerticalBargraph(const char* label, float* zone, float min, float max) = 0;
173
174 void addCallback(float* zone, uiCallback foo, void* data);
175
176 // -- widget's layouts
177
178 virtual void openFrameBox(const char* label) = 0;
179 virtual void openTabBox(const char* label) = 0;
180 virtual void openHorizontalBox(const char* label) = 0;
181 virtual void openVerticalBox(const char* label) = 0;
182 virtual void closeBox() = 0;
183
184 virtual void declare(float* zone, const char* key, const char* value) {}
185 };
186
187 class OSCUI : public UI
188 {
189 public:
190
191 OSCUI() : UI()
192 {}
193
194 virtual ~OSCUI() {
195 // suppression de this dans fGuiList
196 }
197
198
199 // -- active widgets
200
201 virtual void addButton(const char* label, float* zone) {}
202 virtual void addToggleButton(const char* label, float* zone) {}
203 virtual void addCheckButton(const char* label, float* zone) {}
204 virtual void addVerticalSlider(const char* label, float* zone, float init, float min, float max, float step) {}
205 virtual void addHorizontalSlider(const char* label, float* zone, float init, float min, float max, float step) {}
206 virtual void addNumEntry(const char* label, float* zone, float init, float min, float max, float step) {}
207
208 // -- passive widgets
209
210 virtual void addNumDisplay(const char* label, float* zone, int precision) {}
211 virtual void addTextDisplay(const char* label, float* zone, char* names[], float min, float max) {}
212 virtual void addHorizontalBargraph(const char* label, float* zone, float min, float max) {}
213 virtual void addVerticalBargraph(const char* label, float* zone, float min, float max) {}
214
215 void addCallback(float* zone, uiCallback foo, void* data);
216
217 // -- widget's layouts
218
219 virtual void openFrameBox(const char* label) {}
220 virtual void openTabBox(const char* label) {}
221 virtual void openHorizontalBox(const char* label) {}
222 virtual void openVerticalBox(const char* label) {}
223 virtual void closeBox() {}
224
225 virtual void declare(float* zone, const char* key, const char* value) {}
226 };
227
228 list<UI*> UI::fGuiList;
229
230 /**
231 * User Interface Item: abstract definition
232 */
233
234 class uiItem
235 {
236 protected :
237
238 UI* fGUI;
239 float* fZone;
240 float fCache;
241
242 uiItem (UI* ui, float* zone) : fGUI(ui), fZone(zone), fCache(-123456.654321)
243 {
244 ui->registerZone(zone, this);
245 }
246
247 public :
248
249 virtual ~uiItem() {}
250
251 void modifyZone(float v)
252 {
253 fCache = v;
254 if (*fZone != v) {
255 *fZone = v;
256 fGUI->updateZone(fZone);
257 }
258 }
259
260 float cache() { return fCache; }
261 virtual void reflectZone() = 0;
262 };
263
264
265 /**
266 * Callback Item
267 */
268
269 struct uiCallbackItem : public uiItem
270 {
271 uiCallback fCallback;
272 void* fData;
273
274 uiCallbackItem(UI* ui, float* zone, uiCallback foo, void* data)
275 : uiItem(ui, zone), fCallback(foo), fData(data) {}
276
277 virtual void reflectZone() {
278 float v = *fZone;
279 fCache = v;
280 fCallback(v, fData);
281 }
282 };
283
284 /**
285 * Update all user items reflecting zone z
286 */
287
288 inline void UI::updateZone(float* z)
289 {
290 float v = *z;
291 clist* l = fZoneMap[z];
292 for (clist::iterator c = l->begin(); c != l->end(); c++) {
293 if ((*c)->cache() != v) (*c)->reflectZone();
294 }
295 }
296
297 /**
298 * Update all user items not up to date
299 */
300
301 inline void UI::updateAllZones()
302 {
303 for (zmap::iterator m = fZoneMap.begin(); m != fZoneMap.end(); m++) {
304 float* z = m->first;
305 clist* l = m->second;
306 float v = *z;
307 for (clist::iterator c = l->begin(); c != l->end(); c++) {
308 if ((*c)->cache() != v) (*c)->reflectZone();
309 }
310 }
311 }
312
313 inline void UI::addCallback(float* zone, uiCallback foo, void* data)
314 {
315 new uiCallbackItem(this, zone, foo, data);
316 };
317
318 //----------------------------------------------------------------
319 // definition du processeur de signal
320 //----------------------------------------------------------------
321
322 class dsp {
323 protected:
324 int fSamplingFreq;
325 public:
326 dsp() {}
327 virtual ~dsp() {}
328
329 virtual int getNumInputs() = 0;
330 virtual int getNumOutputs() = 0;
331 virtual void buildUserInterface(UI* interface) = 0;
332 virtual void init(int samplingRate) = 0;
333 virtual void compute(int len, float** inputs, float** outputs) = 0;
334 virtual void conclude() {}
335 };
336
337
338 /********************END ARCHITECTURE SECTION (part 1/2)****************/
339
340 /**************************BEGIN USER SECTION **************************/
341
342 <<includeclass>>
343
344 /***************************END USER SECTION ***************************/
345
346 /*******************BEGIN ARCHITECTURE SECTION (part 2/2)***************/
347
348
349 /******************************************************************************
350 *******************************************************************************
351
352 JACK AUDIO INTERFACE
353
354 *******************************************************************************
355 *******************************************************************************/
356
357 #define JACK_DRIVER_NAME_MAX 15
358 #define JACK_DRIVER_PARAM_NAME_MAX 15
359 #define JACK_DRIVER_PARAM_STRING_MAX 63
360 #define JACK_DRIVER_PARAM_DESC 255
361 #define JACK_PATH_MAX 511
362
363 /** Driver parameter types */
364 typedef enum
365 {
366 JackDriverParamInt = 1,
367 JackDriverParamUInt,
368 JackDriverParamChar,
369 JackDriverParamString,
370 JackDriverParamBool
371 } jack_driver_param_type_t;
372
373 /** Driver parameter value */
374 typedef union
375 {
376 uint32_t ui;
377 int32_t i;
378 char c;
379 char str[JACK_DRIVER_PARAM_STRING_MAX + 1];
380 } jack_driver_param_value_t;
381
382
383 /** A driver parameter descriptor */
384 typedef struct {
385 char name[JACK_DRIVER_NAME_MAX + 1]; /**< The parameter's name */
386 char character; /**< The parameter's character (for getopt, etc) */
387 jack_driver_param_type_t type; /**< The parameter's type */
388 jack_driver_param_value_t value; /**< The parameter's (default) value */
389 char short_desc[64]; /**< A short (~30 chars) description for the user */
390 char long_desc[1024]; /**< A longer description for the user */
391 }
392 jack_driver_param_desc_t;
393
394 /** A driver parameter */
395 typedef struct {
396 char character;
397 jack_driver_param_value_t value;
398 }
399 jack_driver_param_t;
400
401 /** A struct for describing a jack driver */
402 typedef struct {
403 char name[JACK_DRIVER_NAME_MAX + 1]; /**< The driver's canonical name */
404 char desc[JACK_DRIVER_PARAM_DESC + 1]; /**< The driver's extended description */
405 char file[JACK_PATH_MAX + 1]; /**< The filename of the driver's shared object file */
406 uint32_t nparams; /**< The number of parameters the driver has */
407 jack_driver_param_desc_t * params; /**< An array of parameter descriptors */
408 }
409 jack_driver_desc_t;
410
411 // class JackArgParser ***************************************************
412 class JackArgParser
413 {
414 private:
415
416 std::string fArgString;
417 int fArgc;
418 std::vector<std::string> fArgv;
419
420 public:
421
422 JackArgParser (const char* arg);
423 ~JackArgParser();
424 std::string GetArgString();
425 int GetNumArgv();
426 int GetArgc();
427 int GetArgv (std::vector<std::string>& argv);
428 int GetArgv (char** argv);
429 void DeleteArgv (const char** argv);
430 void ParseParams (jack_driver_desc_t* desc, JSList** param_list);
431 void FreeParams (JSList* param_list);
432 };
433
434 JackArgParser::JackArgParser (const char* arg)
435 {
436 printf ("JackArgParser::JackArgParser, arg_string : '%s' \n", arg);
437
438 fArgc = 0;
439 //if empty string
440 if (strlen(arg) == 0)
441 return;
442 fArgString = string(arg);
443 //else parse the arg string
444 const size_t arg_len = fArgString.length();
445 unsigned int i = 0;
446 size_t pos = 0;
447 size_t start = 0;
448 size_t copy_start = 0;
449 size_t copy_length = 0;
450 //we need a 'space terminated' string
451 fArgString += " ";
452 //first fill a vector with args
453 do {
454 //find the first non-space character from the actual position
455 start = fArgString.find_first_not_of (' ', start);
456 //get the next quote or space position
457 pos = fArgString.find_first_of (" \"" , start);
458 //no more quotes or spaces, consider the end of the string
459 if (pos == string::npos)
460 pos = arg_len;
461 //if double quote
462 if (fArgString[pos] == '\"') {
463 //first character : copy the substring
464 if (pos == start) {
465 copy_start = start + 1;
466 pos = fArgString.find ('\"', ++pos);
467 copy_length = pos - copy_start;
468 start = pos + 1;
469 }
470 //else there is someting before the quote, first copy that
471 else {
472 copy_start = start;
473 copy_length = pos - copy_start;
474 start = pos;
475 }
476 }
477 //if space
478 if (fArgString[pos] == ' ') {
479 //short option descriptor
480 if ((fArgString[start] == '-') && (fArgString[start + 1] != '-')) {
481 copy_start = start;
482 copy_length = 2;
483 start += copy_length;
484 }
485 //else copy all the space delimitated string
486 else {
487 copy_start = start;
488 copy_length = pos - copy_start;
489 start = pos + 1;
490 }
491 }
492 //then push the substring to the args vector
493 fArgv.push_back (fArgString.substr (copy_start, copy_length));
494 printf("JackArgParser::JackArgParser, add : '%s' \n", (*fArgv.rbegin()).c_str());
495 } while (start < arg_len);
496
497 //finally count the options
498 for (i = 0; i < fArgv.size(); i++)
499 if (fArgv[i].at(0) == '-')
500 fArgc++;
501 }
502
503 JackArgParser::~JackArgParser()
504 {}
505
506 string JackArgParser::GetArgString()
507 {
508 return fArgString;
509 }
510
511 int JackArgParser::GetNumArgv()
512 {
513 return fArgv.size();
514 }
515
516 int JackArgParser::GetArgc()
517 {
518 return fArgc;
519 }
520
521 int JackArgParser::GetArgv(vector<string>& argv)
522 {
523 argv = fArgv;
524 return 0;
525 }
526
527 int JackArgParser::GetArgv(char** argv)
528 {
529 //argv must be NULL
530 if (argv)
531 return -1;
532 //else allocate and fill it
533 argv = (char**)calloc(fArgv.size(), sizeof(char*));
534 for (unsigned int i = 0; i < fArgv.size(); i++) {
535 argv[i] = (char*)calloc(fArgv[i].length(), sizeof(char));
536 fill_n(argv[i], fArgv[i].length() + 1, 0);
537 fArgv[i].copy(argv[i], fArgv[i].length());
538 }
539 return 0;
540 }
541
542 void JackArgParser::DeleteArgv(const char** argv)
543 {
544 unsigned int i;
545 for (i = 0; i < fArgv.size(); i++)
546 free((void*)argv[i]);
547 free((void*)argv);
548 }
549
550 void JackArgParser::ParseParams(jack_driver_desc_t* desc, JSList** param_list)
551 {
552 string options_list;
553 unsigned long i = 0;
554 unsigned int param = 0;
555 size_t param_id = 0;
556 JSList* params = NULL;
557 jack_driver_param_t* intclient_param;
558
559 for (i = 0; i < desc->nparams; i++)
560 options_list += desc->params[i].character;
561
562 for (param = 0; param < fArgv.size(); param++)
563 {
564 if (fArgv[param][0] == '-')
565 {
566 //valid option
567 if ((param_id = options_list.find_first_of(fArgv[param].at(1))) != string::npos)
568 {
569 intclient_param = static_cast<jack_driver_param_t*>(calloc(1, sizeof(jack_driver_param_t)));
570 intclient_param->character = desc->params[param_id].character;
571
572 switch (desc->params[param_id].type)
573 {
574 case JackDriverParamInt:
575 if (param + 1 < fArgv.size()) // something to parse
576 intclient_param->value.i = atoi(fArgv[param + 1].c_str());
577 break;
578
579 case JackDriverParamUInt:
580 if (param + 1 < fArgv.size()) // something to parse
581 intclient_param->value.ui = strtoul(fArgv[param + 1].c_str(), NULL, 10);
582 break;
583
584 case JackDriverParamChar:
585 if (param + 1 < fArgv.size()) // something to parse
586 intclient_param->value.c = fArgv[param + 1][0];
587 break;
588
589 case JackDriverParamString:
590 if (param + 1 < fArgv.size()) // something to parse
591 fArgv[param + 1].copy(intclient_param->value.str, min(static_cast<int>(fArgv[param + 1].length()), JACK_DRIVER_PARAM_STRING_MAX));
592 break;
593
594 case JackDriverParamBool:
595 intclient_param->value.i = true;
596 break;
597 }
598 //add to the list
599 params = jack_slist_append(params, intclient_param);
600 }
601 //invalid option
602 else
603 printf("Invalid option '%c'\n", fArgv[param][1]);
604 }
605 }
606
607 assert(param_list);
608 *param_list = params;
609 }
610
611 void JackArgParser::FreeParams(JSList* param_list)
612 {
613 JSList *node_ptr = param_list;
614 JSList *next_node_ptr;
615
616 while (node_ptr) {
617 next_node_ptr = node_ptr->next;
618 free(node_ptr->data);
619 free(node_ptr);
620 node_ptr = next_node_ptr;
621 }
622 }
623
624 struct JackFaustInternal {
625
626 //----------------------------------------------------------------------------
627 // number of input and output channels
628 //----------------------------------------------------------------------------
629
630 int fNumInChans;
631 int fNumOutChans;
632
633 //----------------------------------------------------------------------------
634 // Jack ports
635 //----------------------------------------------------------------------------
636
637 jack_port_t* fInputPorts[256];
638 jack_port_t* fOutputPorts[256];
639
640 //----------------------------------------------------------------------------
641 // tables of noninterleaved input and output channels for FAUST
642 //----------------------------------------------------------------------------
643
644 float* fInChannel[256];
645 float* fOutChannel[256];
646
647 jack_client_t* fClient;
648 UI* fInterface;
649 mydsp fDSP;
650
651 JackFaustInternal(jack_client_t* client, const JSList* params)
652 :fClient(client)
653 {}
654
655 ~JackFaustInternal()
656 {
657 delete fInterface;
658 }
659
660 int Open()
661 {
662 char** physicalInPorts;
663 char** physicalOutPorts;
664
665 fInterface = new OSCUI();
666 fDSP.buildUserInterface(fInterface);
667
668 jack_set_process_callback(fClient, process, this);
669 jack_set_sample_rate_callback(fClient, srate, this);
670
671 fNumInChans = fDSP.getNumInputs();
672 fNumOutChans = fDSP.getNumOutputs();
673
674 for (int i = 0; i < fNumInChans; i++) {
675 char buf[256];
676 snprintf(buf, 256, "in_%d", i);
677 fInputPorts[i] = jack_port_register(fClient, buf, JACK_DEFAULT_AUDIO_TYPE, JackPortIsInput, 0);
678 }
679 for (int i = 0; i < fNumOutChans; i++) {
680 char buf[256];
681 snprintf(buf, 256, "out_%d", i);
682 fOutputPorts[i] = jack_port_register(fClient, buf, JACK_DEFAULT_AUDIO_TYPE, JackPortIsOutput, 0);
683 }
684
685 fDSP.init(jack_get_sample_rate(fClient));
686
687 physicalInPorts = (char **)jack_get_ports(fClient, NULL, NULL, JackPortIsPhysical|JackPortIsInput);
688 physicalOutPorts = (char **)jack_get_ports(fClient, NULL, NULL, JackPortIsPhysical|JackPortIsOutput);
689
690 if (jack_activate(fClient)) {
691 fprintf(stderr, "cannot activate client");
692 return -1;
693 }
694
695 if (physicalOutPorts != NULL) {
696 for (int i = 0; i < fNumInChans && physicalOutPorts[i]; i++) {
697 jack_connect(fClient, physicalOutPorts[i], jack_port_name(fInputPorts[i]));
698 }
699 }
700
701 if (physicalInPorts != NULL) {
702 for (int i = 0; i < fNumOutChans && physicalInPorts[i]; i++) {
703 jack_connect(fClient, jack_port_name(fOutputPorts[i]), physicalInPorts[i]);
704 }
705 }
706
707 return 0;
708 }
709
710 //----------------------------------------------------------------------------
711 // Jack Callbacks
712 //----------------------------------------------------------------------------
713
714 static int srate(jack_nframes_t nframes, void *arg)
715 {
716 printf("the sample rate is now %u/sec\n", nframes);
717 return 0;
718 }
719
720 static int process(jack_nframes_t nframes, void *arg)
721 {
722 JackFaustInternal* obj = (JackFaustInternal*)arg;
723 AVOIDDENORMALS;
724
725 for (int i = 0; i < obj->fNumInChans; i++) {
726 obj->fInChannel[i] = (float *)jack_port_get_buffer(obj->fInputPorts[i], nframes);
727 }
728 for (int i = 0; i < obj->fNumOutChans; i++) {
729 obj->fOutChannel[i] = (float *)jack_port_get_buffer(obj->fOutputPorts[i], nframes);
730 }
731 obj->fDSP.compute(nframes, obj->fInChannel, obj->fOutChannel);
732
733 return 0;
734 }
735
736 };
737
738 #ifdef __cplusplus
739 extern "C"
740 {
741 #endif
742
743 jack_driver_desc_t* jack_get_descriptor()
744 {
745 jack_driver_desc_t *desc;
746 unsigned int i;
747 desc = (jack_driver_desc_t*)calloc(1, sizeof(jack_driver_desc_t));
748
749 strcpy(desc->name, "faust"); // size MUST be less then JACK_DRIVER_NAME_MAX + 1
750 strcpy(desc->desc, " Faust generated internal"); // size MUST be less then JACK_DRIVER_PARAM_DESC + 1
751
752 desc->nparams = 0;
753 /*
754 desc->nparams = 2;
755 desc->params = (jack_driver_param_desc_t*)calloc(desc->nparams, sizeof(jack_driver_param_desc_t));
756
757 i = 0;
758 strcpy(desc->params[i].name, "channels");
759 desc->params[i].character = 'c';
760 desc->params[i].type = JackDriverParamInt;
761 desc->params[i].value.ui = 0;
762 strcpy(desc->params[i].short_desc, "Maximum number of channels");
763 strcpy(desc->params[i].long_desc, desc->params[i].short_desc);
764
765 i++;
766 strcpy(desc->params[i].name, "inchannels");
767 desc->params[i].character = 'i';
768 desc->params[i].type = JackDriverParamInt;
769 desc->params[i].value.ui = 0;
770 strcpy(desc->params[i].short_desc, "Maximum number of input channels");
771 strcpy(desc->params[i].long_desc, desc->params[i].short_desc);
772 */
773
774 return desc;
775 }
776
777 int jack_internal_initialize(jack_client_t* client, const JSList* params)
778 {
779 try {
780
781 JackFaustInternal* internal = new JackFaustInternal(client, params);
782 if (internal->Open() == 0) {
783 return 0;
784 } else {
785 delete internal;
786 return 1;
787 }
788
789 } catch (...) {
790 return 1;
791 }
792 }
793
794 int jack_initialize(jack_client_t* client, const char* load_init)
795 {
796 JSList* params = NULL;
797 jack_driver_desc_t *desc = jack_get_descriptor();
798
799 JackArgParser parser(load_init);
800 if (parser.GetArgc() > 0)
801 parser.ParseParams(desc, &params);
802
803 int res = jack_internal_initialize(client, params);
804 parser.FreeParams(params);
805 return res;
806 }
807
808 void jack_finish(void* arg)
809 {
810 JackFaustInternal* internal = static_cast<JackFaustInternal*>(arg);
811
812 if (internal) {
813 printf("Unloading internal\n");
814 delete internal;
815 }
816 }
817
818 #ifdef __cplusplus
819 }
820 #endif
821
822
823 /********************END ARCHITECTURE SECTION (part 2/2)****************/
824
825