/[svn]/linuxsampler/trunk/src/linuxsampler.cpp
ViewVC logotype

Annotation of /linuxsampler/trunk/src/linuxsampler.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1908 - (hide annotations) (download)
Mon Jun 1 18:50:06 2009 UTC (14 years, 10 months ago) by persson
File size: 17419 byte(s)
* VST: avoid opening Fantasia more than once for each VST instance
* VST: export main function as "main" on Linux too (fix for energyXT)
* VST: prepare code for multiple output channels
* work-around for missing fnmatch function on Windows to make
  instrument database compilable

1 schoenebeck 9 /***************************************************************************
2     * *
3     * LinuxSampler - modular, streaming capable sampler *
4     * *
5 persson 1644 * Copyright (C) 2003-2004 by Benno Senoner and Christian Schoenebeck *
6 schoenebeck 1830 * Copyright (C) 2005-2009 Christian Schoenebeck *
7 schoenebeck 9 * *
8     * This program is free software; you can redistribute it and/or modify *
9     * it under the terms of the GNU General Public License as published by *
10     * the Free Software Foundation; either version 2 of the License, or *
11     * (at your option) any later version. *
12     * *
13     * This program is distributed in the hope that it will be useful, *
14     * but WITHOUT ANY WARRANTY; without even the implied warranty of *
15     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
16     * GNU General Public License for more details. *
17     * *
18     * You should have received a copy of the GNU General Public License *
19     * along with this program; if not, write to the Free Software *
20     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
21     * MA 02111-1307 USA *
22     ***************************************************************************/
23    
24     #include <getopt.h>
25     #include <signal.h>
26 persson 1908 #include <sys/stat.h>
27 schoenebeck 9
28 senoner 1502 #if defined(WIN32)
29     // require at least Windows 2000 for the GlobalMemoryStatusEx() call
30 persson 1895 #if _WIN32_WINNT < 0x0500
31     #ifdef _WIN32_WINNT
32     #undef _WIN32_WINNT
33     #endif
34 senoner 1502 #define _WIN32_WINNT 0x0500
35     #endif
36 persson 1895 #endif
37 senoner 1502
38 schoenebeck 53 #include "Sampler.h"
39 schoenebeck 1424 #include "common/global_private.h"
40 schoenebeck 420 #include "engines/EngineFactory.h"
41 schoenebeck 1375 #include "plugins/InstrumentEditorFactory.h"
42 schoenebeck 207 #include "drivers/midi/MidiInputDeviceFactory.h"
43 schoenebeck 203 #include "drivers/audio/AudioOutputDeviceFactory.h"
44 senkov 325 #include "engines/gig/Profiler.h"
45 schoenebeck 35 #include "network/lscpserver.h"
46 schoenebeck 271 #include "common/stacktrace.h"
47 schoenebeck 319 #include "common/Features.h"
48 persson 1534 #include "common/atomic.h"
49 schoenebeck 9
50 schoenebeck 53 using namespace LinuxSampler;
51    
52 schoenebeck 211 Sampler* pSampler = NULL;
53     LSCPServer* pLSCPServer = NULL;
54 senoner 1502 #if defined(WIN32)
55     // inet_aton seems missing under WIN32
56     #ifndef INADDR_NONE
57     #define INADDR_NONE 0xffffffff
58     #endif
59    
60     int inet_aton(const char *cp, struct in_addr *addr)
61     {
62     addr->s_addr = inet_addr(cp);
63     return (addr->s_addr == INADDR_NONE) ? 0 : 1;
64     }
65    
66     #else
67 wylder 816 pid_t main_pid;
68 senoner 1502 #endif
69 schoenebeck 420 bool bPrintStatistics = false;
70 senkov 325 bool profile = false;
71     bool tune = true;
72 schoenebeck 1830 static bool bShowStackTrace = false;
73 senkov 667 unsigned long int lscp_addr;
74     unsigned short int lscp_port;
75 schoenebeck 9
76     void parse_options(int argc, char **argv);
77     void signal_handler(int signal);
78 schoenebeck 271 void kill_app();
79 persson 1534 static atomic_t running = ATOMIC_INIT(1);
80 schoenebeck 9
81     int main(int argc, char **argv) {
82    
83 schoenebeck 1830 lscp_addr = htonl(LSCP_ADDR);
84     lscp_port = htons(LSCP_PORT);
85    
86     #if !defined(WIN32)
87     main_pid = getpid();
88     #endif
89    
90     // parse and assign command line options
91     parse_options(argc, argv);
92    
93     // setting signal handler for catching SIGINT (thus e.g. <CTRL><C>)
94     signal(SIGINT, signal_handler);
95    
96 schoenebeck 271 // initialize the stack trace mechanism with our binary file
97 schoenebeck 1830 // (if requested by command line option)
98     if (bShowStackTrace) {
99     #if defined(WIN32)
100     // FIXME: sigaction() not supported on WIN32, we ignore it for now
101     #else
102     StackTraceInit(argv[0], -1);
103     // register signal handler for all unusual signals
104     // (we will print the stack trace and exit)
105     struct sigaction sact;
106     sigemptyset(&sact.sa_mask);
107     sact.sa_flags = 0;
108     sact.sa_handler = signal_handler;
109     sigaction(SIGSEGV, &sact, NULL);
110     sigaction(SIGBUS, &sact, NULL);
111     sigaction(SIGILL, &sact, NULL);
112     sigaction(SIGFPE, &sact, NULL);
113     sigaction(SIGUSR1, &sact, NULL);
114     sigaction(SIGUSR2, &sact, NULL);
115     #endif
116     }
117 schoenebeck 271
118 schoenebeck 1830 dmsg(1,("LinuxSampler %s\n", VERSION));
119     dmsg(1,("Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck\n"));
120     dmsg(1,("Copyright (C) 2005-2009 Christian Schoenebeck\n"));
121    
122 senoner 1502 #if defined(WIN32)
123 persson 1888 #if 0
124 senoner 1502 // some WIN32 memory info code which tries to determine the maximum lockable amount of memory (for debug purposes)
125     SYSTEM_INFO siSysInfo;
126     long physical_memory;
127     GetSystemInfo(&siSysInfo);
128 persson 1888 dmsg(2,("page size=%d\n", siSysInfo.dwPageSize));
129 senoner 1502
130     MEMORYSTATUSEX statex;
131     statex.dwLength = sizeof (statex);
132     GlobalMemoryStatusEx (&statex);
133 persson 1888 dmsg(2, ("There are %*I64d total Kbytes of physical memory.\n",
134 senoner 1502 8, statex.ullTotalPhys));
135 persson 1888 dmsg(2, ("There are %*I64d free Kbytes of physical memory.\n",
136 senoner 1502 8, statex.ullAvailPhys));
137     physical_memory = statex.ullTotalPhys;
138    
139     HANDLE hProcess = GetCurrentProcess();
140    
141     unsigned long MinimumWorkingSetSize, MaximumWorkingSetSize;
142     unsigned long DefaultMinimumWorkingSetSize, DefaultMaximumWorkingSetSize;
143     unsigned long RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize;
144     int res;
145    
146     res = GetProcessWorkingSetSize(hProcess, &DefaultMinimumWorkingSetSize, &DefaultMaximumWorkingSetSize);
147    
148     RequestedMaximumWorkingSetSize = physical_memory - 2*1024*1024;
149     RequestedMinimumWorkingSetSize = RequestedMaximumWorkingSetSize;
150    
151     for(;;) {
152     dmsg(2,("TRYING VALUES RequestedMinimumWorkingSetSize=%d, RequestedMaximumWorkingSetSize=%d\n", RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize));
153     res = SetProcessWorkingSetSize(hProcess, RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize);
154     dmsg(2,("AFTER SET: res = %d RequestedMinimumWorkingSetSize=%d, RequestedMaximumWorkingSetSize=%d\n", res,RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize));
155    
156     res = GetProcessWorkingSetSize(hProcess, &MinimumWorkingSetSize, &MaximumWorkingSetSize);
157     dmsg(2,("AFTER GET: res = %d MinimumWorkingSetSize=%d, MaximumWorkingSetSize=%d\n", res,MinimumWorkingSetSize, MaximumWorkingSetSize));
158    
159     if( RequestedMinimumWorkingSetSize == MinimumWorkingSetSize ) {
160     dmsg(2,("RequestedMinimumWorkingSetSize == MinimumWorkingSetSize. OK !\n"));
161     break;
162     }
163    
164     RequestedMinimumWorkingSetSize -= 10*1024*1024;
165     if(RequestedMinimumWorkingSetSize < DefaultMinimumWorkingSetSize) break;
166     }
167    
168 persson 1888 dmsg(2,("AFTER GetProcessWorkingSetSize: res = %d MinimumWorkingSetSize=%d, MaximumWorkingSetSize=%d\n", res,MinimumWorkingSetSize, MaximumWorkingSetSize));
169     #endif
170 schoenebeck 1830 #endif // WIN32
171 senoner 1502
172 schoenebeck 579 if (tune) {
173 persson 425 // detect and print system / CPU specific features
174     Features::detect();
175 schoenebeck 579 dmsg(1,("Detected features: %s\n", Features::featuresAsString().c_str()));
176     // prevent slow denormal FPU modes
177     Features::enableDenormalsAreZeroMode();
178 senkov 325 }
179 schoenebeck 319
180 schoenebeck 1830 dmsg(1,("Automatic Stacktrace: %s\n", (bShowStackTrace) ? "On" : "Off"));
181    
182 schoenebeck 53 // create LinuxSampler instance
183 schoenebeck 123 dmsg(1,("Creating Sampler..."));
184 schoenebeck 53 pSampler = new Sampler;
185 schoenebeck 123 dmsg(1,("OK\n"));
186 schoenebeck 53
187 schoenebeck 900 dmsg(1,("Registered sampler engines: %s\n", EngineFactory::AvailableEngineTypesAsString().c_str()));
188 schoenebeck 207 dmsg(1,("Registered MIDI input drivers: %s\n", MidiInputDeviceFactory::AvailableDriversAsString().c_str()));
189 schoenebeck 123 dmsg(1,("Registered audio output drivers: %s\n", AudioOutputDeviceFactory::AvailableDriversAsString().c_str()));
190 schoenebeck 1212 dmsg(1,("Registered instrument editors: %s\n", InstrumentEditorFactory::AvailableEditorsAsString().c_str()));
191 schoenebeck 123
192 schoenebeck 53 // start LSCP network server
193 senkov 667 struct in_addr addr;
194     addr.s_addr = lscp_addr;
195     dmsg(1,("Starting LSCP network server (%s:%d)...", inet_ntoa(addr), ntohs(lscp_port)));
196     pLSCPServer = new LSCPServer(pSampler, lscp_addr, lscp_port);
197 schoenebeck 53 pLSCPServer->StartThread();
198 schoenebeck 211 pLSCPServer->WaitUntilInitialized();
199 schoenebeck 12 dmsg(1,("OK\n"));
200 schoenebeck 9
201 senkov 325 if (profile)
202     {
203 persson 425 dmsg(1,("Calibrating profiler..."));
204 iliev 1161 LinuxSampler::gig::Profiler::Calibrate();
205     LinuxSampler::gig::Profiler::Reset();
206     LinuxSampler::gig::Profiler::enable();
207 persson 425 dmsg(1,("OK\n"));
208 senkov 325 }
209    
210 schoenebeck 563 printf("LinuxSampler initialization completed. :-)\n\n");
211 schoenebeck 9
212 persson 1534 while (atomic_read(&running)) {
213 schoenebeck 420 if (bPrintStatistics) {
214 persson 840 const std::set<Engine*>& engines = EngineFactory::EngineInstances();
215 schoenebeck 420 std::set<Engine*>::iterator itEngine = engines.begin();
216     for (int i = 0; itEngine != engines.end(); itEngine++, i++) {
217     Engine* pEngine = *itEngine;
218     printf("Engine %d) Voices: %3.3d (Max: %3.3d) Streams: %3.3d (Max: %3.3d)\n", i,
219     pEngine->VoiceCount(), pEngine->VoiceCountMax(),
220     pEngine->DiskStreamCount(), pEngine->DiskStreamCountMax()
221     );
222     fflush(stdout);
223     }
224     }
225 persson 425
226 persson 1534 sleep(1);
227     if (profile)
228     {
229     unsigned int samplingFreq = 48000; //FIXME: hardcoded for now
230     unsigned int bv = LinuxSampler::gig::Profiler::GetBogoVoices(samplingFreq);
231     if (bv != 0)
232     {
233     printf(" BogoVoices: %i \r", bv);
234     fflush(stdout);
235     }
236     }
237 persson 425
238 persson 1765 pSampler->fireStatistics();
239 senoner 10 }
240 persson 1534 if (pLSCPServer) pLSCPServer->StopThread();
241     // the delete order here is important: the Sampler
242     // destructor sends notifications to the lscpserver
243     if (pSampler) delete pSampler;
244     if (pLSCPServer) delete pLSCPServer;
245     printf("LinuxSampler stopped due to SIGINT.\n");
246 schoenebeck 9 return EXIT_SUCCESS;
247     }
248    
249 schoenebeck 271 void signal_handler(int iSignal) {
250     switch (iSignal) {
251 persson 1534 case SIGINT:
252     atomic_set(&running, 0);
253 schoenebeck 271 return;
254 senoner 1502 #if defined(WIN32)
255     // FIXME: under WIN32 we ignore the signals below due to the missing sigaction call
256     #else
257 schoenebeck 271 case SIGSEGV:
258     std::cerr << ">>> FATAL ERROR: Segmentation fault (SIGSEGV) occured! <<<\n" << std::flush;
259     break;
260     case SIGBUS:
261     std::cerr << ">>> FATAL ERROR: Access to undefined portion of a memory object (SIGBUS) occured! <<<\n" << std::flush;
262     break;
263     case SIGILL:
264     std::cerr << ">>> FATAL ERROR: Illegal instruction (SIGILL) occured! <<<\n" << std::flush;
265     break;
266     case SIGFPE:
267     std::cerr << ">>> FATAL ERROR: Erroneous arithmetic operation (SIGFPE) occured! <<<\n" << std::flush;
268     break;
269     case SIGUSR1:
270     std::cerr << ">>> User defined signal 1 (SIGUSR1) received <<<\n" << std::flush;
271     break;
272     case SIGUSR2:
273     std::cerr << ">>> User defined signal 2 (SIGUSR2) received <<<\n" << std::flush;
274     break;
275 senoner 1502 #endif
276 schoenebeck 271 default: { // this should never happen, as we register for the signals we want
277     std::cerr << ">>> FATAL ERROR: Unknown signal received! <<<\n" << std::flush;
278     break;
279     }
280 schoenebeck 9 }
281 schoenebeck 271 signal(iSignal, SIG_DFL); // Reinstall default handler to prevent race conditions
282 schoenebeck 1830 if (bShowStackTrace) {
283     std::cerr << "Showing stack trace...\n" << std::flush;
284     StackTrace();
285     sleep(2);
286     }
287 schoenebeck 271 std::cerr << "Killing LinuxSampler...\n" << std::flush;
288     kill_app(); // Use abort() if we want to generate a core dump.
289 schoenebeck 9 }
290    
291 schoenebeck 271 void kill_app() {
292 senoner 1502 #if defined(WIN32)
293     // FIXME: do we need to do anything at this point under WIN32 ? is exit(0) ok ?
294     exit(0);
295     #else
296 wylder 816 kill(main_pid, SIGKILL);
297 senoner 1502 #endif
298 schoenebeck 271 }
299    
300 senkov 325 void parse_options(int argc, char **argv) {
301 schoenebeck 9 int res;
302     int option_index = 0;
303     static struct option long_options[] =
304     {
305     {"help",0,0,0},
306 senkov 325 {"version",0,0,0},
307     {"profile",0,0,0},
308     {"no-tune",0,0,0},
309 schoenebeck 420 {"statistics",0,0,0},
310 iliev 1208 {"instruments-db-location",1,0,0},
311 iliev 1187 {"create-instruments-db",1,0,0},
312 senkov 667 {"lscp-addr",1,0,0},
313     {"lscp-port",1,0,0},
314 schoenebeck 1830 {"stacktrace",0,0,0},
315 schoenebeck 9 {0,0,0,0}
316     };
317    
318     while (true) {
319 schoenebeck 361 /*
320     Stephane Letz : letz@grame.fr
321     getopt_long_only does not exist on OSX : replaced by getopt_long for now.
322     */
323     res = getopt_long(argc, argv, "", long_options, &option_index);
324 schoenebeck 9 if(res == -1) break;
325     if (res == 0) {
326     switch(option_index) {
327 senkov 325 case 0: // --help
328     printf("usage: linuxsampler [OPTIONS]\n\n");
329 iliev 1208 printf("--help prints this message\n");
330     printf("--version prints version information\n");
331     printf("--profile profile synthesis algorithms\n");
332     printf("--no-tune disable assembly optimization\n");
333     printf("--statistics periodically prints statistics\n");
334     printf("--lscp-addr set LSCP address (default: any)\n");
335     printf("--lscp-port set LSCP port (default: 8888)\n");
336     printf("--create-instruments-db creates an instruments DB\n");
337     printf("--instruments-db-location specifies the instruments DB file\n");
338 schoenebeck 1830 printf("--stacktrace automatically shows stacktrace if crashes\n");
339     printf(" (broken on most systems at the moment)\n");
340 senkov 325 exit(EXIT_SUCCESS);
341 schoenebeck 9 break;
342 senkov 325 case 1: // --version
343 schoenebeck 328 printf("LinuxSampler %s\n", VERSION);
344     exit(EXIT_SUCCESS);
345 schoenebeck 9 break;
346 senkov 325 case 2: // --profile
347 persson 425 profile = true;
348 schoenebeck 20 break;
349 senkov 325 case 3: // --no-tune
350 persson 425 tune = false;
351 schoenebeck 9 break;
352 schoenebeck 420 case 4: // --statistics
353     bPrintStatistics = true;
354     break;
355 iliev 1208 case 5: // --instruments-db-location
356 iliev 1187 #if HAVE_SQLITE3
357     try {
358     if (optarg) {
359 iliev 1208 struct stat statBuf;
360     int res = stat(optarg, &statBuf);
361    
362     if (res) {
363     std::stringstream ss;
364 schoenebeck 1364 ss << "Failed to stat `" << optarg << "`: " << strerror(errno);
365 iliev 1208 throw Exception(ss.str());
366     }
367    
368     if (!S_ISREG(statBuf.st_mode)) {
369     std::stringstream ss;
370     ss << "`" << optarg << "` is not a regular file";
371     throw Exception(ss.str());
372     }
373    
374     InstrumentsDb::GetInstrumentsDb()->SetDbFile(String(optarg));
375     }
376     } catch(Exception e) {
377 schoenebeck 1364 std::cerr << "Could not open instruments DB file: "
378     << e.Message() << std::endl;
379     exit(EXIT_FAILURE);
380 iliev 1208 }
381 schoenebeck 1364 break;
382 iliev 1208 #else
383     std::cerr << "LinuxSampler was not build with ";
384 schoenebeck 1364 std::cerr << "instruments database support!\n";
385     exit(EXIT_FAILURE);
386     break;
387     #endif
388 iliev 1208 case 6: // --create-instruments-db
389     #if HAVE_SQLITE3
390     try {
391     if (optarg) {
392 iliev 1187 std::cout << "Creating instruments database..." << std::endl;
393     InstrumentsDb::CreateInstrumentsDb(String(optarg));
394     std::cout << "Done" << std::endl;
395     }
396     } catch(Exception e) {
397     std::cerr << e.Message() << std::endl;
398     exit(EXIT_FAILURE);
399     return;
400     }
401    
402     exit(EXIT_SUCCESS);
403     return;
404     #else
405     std::cerr << "Failed to create the database. LinuxSampler was ";
406 schoenebeck 1364 std::cerr << "not build with instruments database support!\n";
407 iliev 1187 exit(EXIT_FAILURE);
408     return;
409 schoenebeck 1364 #endif
410 schoenebeck 1830 case 7: { // --lscp-addr
411 iliev 1187 struct in_addr addr;
412     if (inet_aton(optarg, &addr) == 0)
413     printf("WARNING: Failed to parse lscp-addr argument, ignoring!\n");
414     else
415     lscp_addr = addr.s_addr;
416 senkov 667 break;
417 schoenebeck 1830 }
418     case 8: {// --lscp-port
419 iliev 1187 long unsigned int port = 0;
420     if ((sscanf(optarg, "%u", &port) != 1) || (port == 0) || (port > 65535))
421     printf("WARNING: Failed to parse lscp-port argument, ignoring!\n");
422     else
423     lscp_port = htons(port);
424 senkov 667 break;
425 schoenebeck 1830 }
426     case 9: // --stacktrace
427     bShowStackTrace = true;
428     break;
429 schoenebeck 9 }
430     }
431     }
432 senkov 325 }

  ViewVC Help
Powered by ViewVC