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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2162 - (hide annotations) (download)
Tue Feb 8 18:22:50 2011 UTC (13 years, 1 month ago) by persson
File size: 17908 byte(s)
* bugfix: playing a note while changing the instrument could cause a
  crash, or give "Handing back unknown region" error messages

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

  ViewVC Help
Powered by ViewVC