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

Contents of /linuxsampler/trunk/src/linuxsampler.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2124 - (show annotations) (download)
Sat Sep 18 09:24:41 2010 UTC (13 years, 6 months ago) by schoenebeck
File size: 17908 byte(s)
* implemented support for internal LADSPA effects (work in progress)

1 /***************************************************************************
2 * *
3 * LinuxSampler - modular, streaming capable sampler *
4 * *
5 * Copyright (C) 2003-2004 by Benno Senoner and Christian Schoenebeck *
6 * Copyright (C) 2005-2009 Christian Schoenebeck *
7 * *
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 #include <sys/stat.h>
27
28 #if defined(WIN32)
29 // require at least Windows 2000 for the GlobalMemoryStatusEx() call
30 #if _WIN32_WINNT < 0x0500
31 #ifdef _WIN32_WINNT
32 #undef _WIN32_WINNT
33 #endif
34 #define _WIN32_WINNT 0x0500
35 #endif
36 #endif
37
38 #include "Sampler.h"
39 #include "common/global_private.h"
40 #include "engines/EngineFactory.h"
41 #include "plugins/InstrumentEditorFactory.h"
42 #include "drivers/midi/MidiInputDeviceFactory.h"
43 #include "drivers/audio/AudioOutputDeviceFactory.h"
44 #include "effects/EffectFactory.h"
45 #include "engines/gig/Profiler.h"
46 #include "network/lscpserver.h"
47 #include "common/stacktrace.h"
48 #include "common/Features.h"
49 #include "common/atomic.h"
50
51 using namespace LinuxSampler;
52
53 Sampler* pSampler = NULL;
54 LSCPServer* pLSCPServer = NULL;
55 #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 pid_t main_pid;
69 #endif
70 bool bPrintStatistics = false;
71 bool profile = false;
72 bool tune = true;
73 static bool bShowStackTrace = false;
74 unsigned long int lscp_addr;
75 unsigned short int lscp_port;
76
77 void parse_options(int argc, char **argv);
78 void signal_handler(int signal);
79 void kill_app();
80 static atomic_t running = ATOMIC_INIT(1);
81
82 int main(int argc, char **argv) {
83
84 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 // initialize the stack trace mechanism with our binary file
98 // (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
119 dmsg(1,("LinuxSampler %s\n", VERSION));
120 dmsg(1,("Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck\n"));
121 dmsg(1,("Copyright (C) 2005-2009 Christian Schoenebeck\n"));
122
123 #if defined(WIN32)
124 #if 0
125 // 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 dmsg(2,("page size=%d\n", siSysInfo.dwPageSize));
130
131 MEMORYSTATUSEX statex;
132 statex.dwLength = sizeof (statex);
133 GlobalMemoryStatusEx (&statex);
134 dmsg(2, ("There are %*I64d total Kbytes of physical memory.\n",
135 8, statex.ullTotalPhys));
136 dmsg(2, ("There are %*I64d free Kbytes of physical memory.\n",
137 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 dmsg(2,("AFTER GetProcessWorkingSetSize: res = %d MinimumWorkingSetSize=%d, MaximumWorkingSetSize=%d\n", res,MinimumWorkingSetSize, MaximumWorkingSetSize));
170 #endif
171 #endif // WIN32
172
173 if (tune) {
174 // detect and print system / CPU specific features
175 Features::detect();
176 dmsg(1,("Detected features: %s\n", Features::featuresAsString().c_str()));
177 // prevent slow denormal FPU modes
178 Features::enableDenormalsAreZeroMode();
179 }
180
181 dmsg(1,("Automatic Stacktrace: %s\n", (bShowStackTrace) ? "On" : "Off"));
182
183 // create LinuxSampler instance
184 dmsg(1,("Creating Sampler..."));
185 pSampler = new Sampler;
186 dmsg(1,("OK\n"));
187
188 dmsg(1,("Registered sampler engines: %s\n", EngineFactory::AvailableEngineTypesAsString().c_str()));
189 dmsg(1,("Registered MIDI input drivers: %s\n", MidiInputDeviceFactory::AvailableDriversAsString().c_str()));
190 dmsg(1,("Registered audio output drivers: %s\n", AudioOutputDeviceFactory::AvailableDriversAsString().c_str()));
191 dmsg(1,("Registered instrument editors: %s\n", InstrumentEditorFactory::AvailableEditorsAsString().c_str()));
192 dmsg(1,("Registered internal effect systems: %s\n", EffectFactory::AvailableEffectSystemsAsString().c_str()));
193 dmsg(1,("Registered internal effects: %d\n", EffectFactory::AvailableEffectsCount()));
194
195 // start LSCP network server
196 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 pLSCPServer->StartThread();
201 pLSCPServer->WaitUntilInitialized();
202 dmsg(1,("OK\n"));
203
204 if (profile)
205 {
206 dmsg(1,("Calibrating profiler..."));
207 LinuxSampler::gig::Profiler::Calibrate();
208 LinuxSampler::gig::Profiler::Reset();
209 LinuxSampler::gig::Profiler::enable();
210 dmsg(1,("OK\n"));
211 }
212
213 printf("LinuxSampler initialization completed. :-)\n\n");
214
215 while (atomic_read(&running)) {
216 if (bPrintStatistics) {
217 const std::set<Engine*>& engines = EngineFactory::EngineInstances();
218 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
229 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
241 pSampler->fireStatistics();
242 }
243 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 return EXIT_SUCCESS;
250 }
251
252 void signal_handler(int iSignal) {
253 switch (iSignal) {
254 case SIGINT:
255 atomic_set(&running, 0);
256 return;
257 #if defined(WIN32)
258 // FIXME: under WIN32 we ignore the signals below due to the missing sigaction call
259 #else
260 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 #endif
279 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 }
284 signal(iSignal, SIG_DFL); // Reinstall default handler to prevent race conditions
285 if (bShowStackTrace) {
286 std::cerr << "Showing stack trace...\n" << std::flush;
287 StackTrace();
288 sleep(2);
289 }
290 std::cerr << "Killing LinuxSampler...\n" << std::flush;
291 kill_app(); // Use abort() if we want to generate a core dump.
292 }
293
294 void kill_app() {
295 #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 kill(main_pid, SIGKILL);
300 #endif
301 }
302
303 void parse_options(int argc, char **argv) {
304 int res;
305 int option_index = 0;
306 static struct option long_options[] =
307 {
308 {"help",0,0,0},
309 {"version",0,0,0},
310 {"profile",0,0,0},
311 {"no-tune",0,0,0},
312 {"statistics",0,0,0},
313 {"instruments-db-location",1,0,0},
314 {"create-instruments-db",1,0,0},
315 {"lscp-addr",1,0,0},
316 {"lscp-port",1,0,0},
317 {"stacktrace",0,0,0},
318 {0,0,0,0}
319 };
320
321 while (true) {
322 /*
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 if(res == -1) break;
328 if (res == 0) {
329 switch(option_index) {
330 case 0: // --help
331 printf("usage: linuxsampler [OPTIONS]\n\n");
332 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 printf("--stacktrace automatically shows stacktrace if crashes\n");
342 printf(" (broken on most systems at the moment)\n");
343 exit(EXIT_SUCCESS);
344 break;
345 case 1: // --version
346 printf("LinuxSampler %s\n", VERSION);
347 exit(EXIT_SUCCESS);
348 break;
349 case 2: // --profile
350 profile = true;
351 //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 break;
355 case 3: // --no-tune
356 tune = false;
357 break;
358 case 4: // --statistics
359 bPrintStatistics = true;
360 break;
361 case 5: // --instruments-db-location
362 #if HAVE_SQLITE3
363 try {
364 if (optarg) {
365 struct stat statBuf;
366 int res = stat(optarg, &statBuf);
367
368 if (res) {
369 std::stringstream ss;
370 ss << "Failed to stat `" << optarg << "`: " << strerror(errno);
371 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 std::cerr << "Could not open instruments DB file: "
384 << e.Message() << std::endl;
385 exit(EXIT_FAILURE);
386 }
387 break;
388 #else
389 std::cerr << "LinuxSampler was not build with ";
390 std::cerr << "instruments database support!\n";
391 exit(EXIT_FAILURE);
392 break;
393 #endif
394 case 6: // --create-instruments-db
395 #if HAVE_SQLITE3
396 try {
397 if (optarg) {
398 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 std::cerr << "not build with instruments database support!\n";
413 exit(EXIT_FAILURE);
414 return;
415 #endif
416 case 7: { // --lscp-addr
417 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 break;
423 }
424 case 8: {// --lscp-port
425 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 break;
431 }
432 case 9: // --stacktrace
433 bShowStackTrace = true;
434 break;
435 }
436 }
437 }
438 }

  ViewVC Help
Powered by ViewVC