--- linuxsampler/trunk/src/linuxsampler.cpp 2004/03/31 10:28:42 41 +++ linuxsampler/trunk/src/linuxsampler.cpp 2009/06/01 18:50:06 1908 @@ -2,7 +2,8 @@ * * * LinuxSampler - modular, streaming capable sampler * * * - * Copyright (C) 2003 by Benno Senoner and Christian Schoenebeck * + * Copyright (C) 2003-2004 by Benno Senoner and Christian Schoenebeck * + * Copyright (C) 2005-2009 Christian Schoenebeck * * * * This program is free software; you can redistribute it and/or modify * * it under the terms of the GNU General Public License as published by * @@ -22,134 +23,278 @@ #include #include +#include -#include "global.h" -#include "diskthread.h" -#include "audiothread.h" -#include "alsaio.h" -#include "jackio.h" -#include "midiin.h" -#include "stream.h" -#include "RIFF.h" -#include "gig.h" +#if defined(WIN32) +// require at least Windows 2000 for the GlobalMemoryStatusEx() call +#if _WIN32_WINNT < 0x0500 +#ifdef _WIN32_WINNT +#undef _WIN32_WINNT +#endif +#define _WIN32_WINNT 0x0500 +#endif +#endif + +#include "Sampler.h" +#include "common/global_private.h" +#include "engines/EngineFactory.h" +#include "plugins/InstrumentEditorFactory.h" +#include "drivers/midi/MidiInputDeviceFactory.h" +#include "drivers/audio/AudioOutputDeviceFactory.h" +#include "engines/gig/Profiler.h" #include "network/lscpserver.h" +#include "common/stacktrace.h" +#include "common/Features.h" +#include "common/atomic.h" + +using namespace LinuxSampler; + +Sampler* pSampler = NULL; +LSCPServer* pLSCPServer = NULL; +#if defined(WIN32) +// inet_aton seems missing under WIN32 +#ifndef INADDR_NONE +#define INADDR_NONE 0xffffffff +#endif + +int inet_aton(const char *cp, struct in_addr *addr) +{ + addr->s_addr = inet_addr(cp); + return (addr->s_addr == INADDR_NONE) ? 0 : 1; +} -#define AUDIO_CHANNELS 2 // stereo -#define AUDIO_FRAGMENTS 3 // 3 fragments, if it does not work set it to 2 -#define AUDIO_FRAGMENTSIZE 512 // each fragment has 512 frames -#define AUDIO_SAMPLERATE 44100 // Hz - -enum patch_format_t { - patch_format_unknown, - patch_format_gig, - patch_format_dls -} patch_format = patch_format_unknown; - -AudioIO* pAudioIO = NULL; -MidiIn* pMidiInThread = NULL; -LSCPServer* pLSCPServer = NULL; -AudioThread* pEngine = NULL; -uint instrument_index = 0; -double volume = 0.25; -int num_fragments = AUDIO_FRAGMENTS; -int fragmentsize = AUDIO_FRAGMENTSIZE; -uint samplerate = AUDIO_SAMPLERATE; -String input_client; -String alsaout = "0,0"; // default card -String jack_playback[2] = { "", "" }; -bool use_jack = true; -bool run_server = false; -pthread_t signalhandlerthread; +#else +pid_t main_pid; +#endif +bool bPrintStatistics = false; +bool profile = false; +bool tune = true; +static bool bShowStackTrace = false; +unsigned long int lscp_addr; +unsigned short int lscp_port; void parse_options(int argc, char **argv); void signal_handler(int signal); +void kill_app(); +static atomic_t running = ATOMIC_INIT(1); int main(int argc, char **argv) { - // setting signal handler for catching SIGINT (thus e.g. ) - signalhandlerthread = pthread_self(); - signal(SIGINT, signal_handler); + lscp_addr = htonl(LSCP_ADDR); + lscp_port = htons(LSCP_PORT); + + #if !defined(WIN32) + main_pid = getpid(); + #endif // parse and assign command line options parse_options(argc, argv); - if (patch_format != patch_format_gig) { - printf("Sorry only Gigasampler loading migrated in LinuxSampler so far, use --gig to load a .gig file!\n"); - printf("Use 'linuxsampler --help' to see all available options.\n"); - return EXIT_FAILURE; - } - - int error = 1; -#if HAVE_JACK - if (use_jack) { - dmsg(1,("Initializing audio output (Jack)...")); - pAudioIO = new JackIO(); - error = ((JackIO*)pAudioIO)->Initialize(AUDIO_CHANNELS, jack_playback); - if (error) dmsg(1,("Trying Alsa output instead.\n")); - } -#endif // HAVE_JACK - if (error) { - dmsg(1,("Initializing audio output (Alsa)...")); - pAudioIO = new AlsaIO(); - int error = ((AlsaIO*)pAudioIO)->Initialize(AUDIO_CHANNELS, samplerate, num_fragments, fragmentsize, alsaout); - if (error) return EXIT_FAILURE; + // setting signal handler for catching SIGINT (thus e.g. ) + signal(SIGINT, signal_handler); + + // initialize the stack trace mechanism with our binary file + // (if requested by command line option) + if (bShowStackTrace) { + #if defined(WIN32) + // FIXME: sigaction() not supported on WIN32, we ignore it for now + #else + StackTraceInit(argv[0], -1); + // register signal handler for all unusual signals + // (we will print the stack trace and exit) + struct sigaction sact; + sigemptyset(&sact.sa_mask); + sact.sa_flags = 0; + sact.sa_handler = signal_handler; + sigaction(SIGSEGV, &sact, NULL); + sigaction(SIGBUS, &sact, NULL); + sigaction(SIGILL, &sact, NULL); + sigaction(SIGFPE, &sact, NULL); + sigaction(SIGUSR1, &sact, NULL); + sigaction(SIGUSR2, &sact, NULL); + #endif } - dmsg(1,("OK\n")); - AudioThread* pEngine = new AudioThread(pAudioIO); - MidiIn* pMidiInThread = new MidiIn(pEngine); + dmsg(1,("LinuxSampler %s\n", VERSION)); + dmsg(1,("Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck\n")); + dmsg(1,("Copyright (C) 2005-2009 Christian Schoenebeck\n")); + + #if defined(WIN32) + #if 0 + // some WIN32 memory info code which tries to determine the maximum lockable amount of memory (for debug purposes) + SYSTEM_INFO siSysInfo; + long physical_memory; + GetSystemInfo(&siSysInfo); + dmsg(2,("page size=%d\n", siSysInfo.dwPageSize)); + + MEMORYSTATUSEX statex; + statex.dwLength = sizeof (statex); + GlobalMemoryStatusEx (&statex); + dmsg(2, ("There are %*I64d total Kbytes of physical memory.\n", + 8, statex.ullTotalPhys)); + dmsg(2, ("There are %*I64d free Kbytes of physical memory.\n", + 8, statex.ullAvailPhys)); + physical_memory = statex.ullTotalPhys; + + HANDLE hProcess = GetCurrentProcess(); + + unsigned long MinimumWorkingSetSize, MaximumWorkingSetSize; + unsigned long DefaultMinimumWorkingSetSize, DefaultMaximumWorkingSetSize; + unsigned long RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize; + int res; + + res = GetProcessWorkingSetSize(hProcess, &DefaultMinimumWorkingSetSize, &DefaultMaximumWorkingSetSize); - // Loading gig file - result_t result = pEngine->LoadInstrument(argv[argc - 1], instrument_index); - if (result.type == result_type_error) return EXIT_FAILURE; - pEngine->Volume = volume; - - dmsg(1,("Starting MIDI in thread...")); - if (input_client.size() > 0) pMidiInThread->SubscribeToClient(input_client.c_str()); - pMidiInThread->StartThread(); - dmsg(1,("OK\n")); + RequestedMaximumWorkingSetSize = physical_memory - 2*1024*1024; + RequestedMinimumWorkingSetSize = RequestedMaximumWorkingSetSize; - sleep(1); + for(;;) { + dmsg(2,("TRYING VALUES RequestedMinimumWorkingSetSize=%d, RequestedMaximumWorkingSetSize=%d\n", RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize)); + res = SetProcessWorkingSetSize(hProcess, RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize); + dmsg(2,("AFTER SET: res = %d RequestedMinimumWorkingSetSize=%d, RequestedMaximumWorkingSetSize=%d\n", res,RequestedMinimumWorkingSetSize, RequestedMaximumWorkingSetSize)); + + res = GetProcessWorkingSetSize(hProcess, &MinimumWorkingSetSize, &MaximumWorkingSetSize); + dmsg(2,("AFTER GET: res = %d MinimumWorkingSetSize=%d, MaximumWorkingSetSize=%d\n", res,MinimumWorkingSetSize, MaximumWorkingSetSize)); + + if( RequestedMinimumWorkingSetSize == MinimumWorkingSetSize ) { + dmsg(2,("RequestedMinimumWorkingSetSize == MinimumWorkingSetSize. OK !\n")); + break; + } - dmsg(1,("Starting audio thread...")); - pAudioIO->AssignEngine(pEngine); - pAudioIO->Activate(); + RequestedMinimumWorkingSetSize -= 10*1024*1024; + if(RequestedMinimumWorkingSetSize < DefaultMinimumWorkingSetSize) break; + } + + dmsg(2,("AFTER GetProcessWorkingSetSize: res = %d MinimumWorkingSetSize=%d, MaximumWorkingSetSize=%d\n", res,MinimumWorkingSetSize, MaximumWorkingSetSize)); + #endif + #endif // WIN32 + + if (tune) { + // detect and print system / CPU specific features + Features::detect(); + dmsg(1,("Detected features: %s\n", Features::featuresAsString().c_str())); + // prevent slow denormal FPU modes + Features::enableDenormalsAreZeroMode(); + } + + dmsg(1,("Automatic Stacktrace: %s\n", (bShowStackTrace) ? "On" : "Off")); + + // create LinuxSampler instance + dmsg(1,("Creating Sampler...")); + pSampler = new Sampler; dmsg(1,("OK\n")); - if (run_server) { - dmsg(1,("Starting network server...")); - pLSCPServer = new LSCPServer(pEngine); - pLSCPServer->StartThread(); + dmsg(1,("Registered sampler engines: %s\n", EngineFactory::AvailableEngineTypesAsString().c_str())); + dmsg(1,("Registered MIDI input drivers: %s\n", MidiInputDeviceFactory::AvailableDriversAsString().c_str())); + dmsg(1,("Registered audio output drivers: %s\n", AudioOutputDeviceFactory::AvailableDriversAsString().c_str())); + dmsg(1,("Registered instrument editors: %s\n", InstrumentEditorFactory::AvailableEditorsAsString().c_str())); + + // start LSCP network server + struct in_addr addr; + addr.s_addr = lscp_addr; + dmsg(1,("Starting LSCP network server (%s:%d)...", inet_ntoa(addr), ntohs(lscp_port))); + pLSCPServer = new LSCPServer(pSampler, lscp_addr, lscp_port); + pLSCPServer->StartThread(); + pLSCPServer->WaitUntilInitialized(); + dmsg(1,("OK\n")); + + if (profile) + { + dmsg(1,("Calibrating profiler...")); + LinuxSampler::gig::Profiler::Calibrate(); + LinuxSampler::gig::Profiler::Reset(); + LinuxSampler::gig::Profiler::enable(); dmsg(1,("OK\n")); } - printf("LinuxSampler initialization completed.\n"); + printf("LinuxSampler initialization completed. :-)\n\n"); - while(true) { - printf("Voices: %3.3d (Max: %3.3d) Streams: %3.3d (Max: %3.3d, Unused: %3.3d)\r", - pEngine->ActiveVoiceCount, pEngine->ActiveVoiceCountMax, - pEngine->pDiskThread->ActiveStreamCount, pEngine->pDiskThread->ActiveStreamCountMax, Stream::GetUnusedStreams()); - fflush(stdout); - usleep(500000); - } + while (atomic_read(&running)) { + if (bPrintStatistics) { + const std::set& engines = EngineFactory::EngineInstances(); + std::set::iterator itEngine = engines.begin(); + for (int i = 0; itEngine != engines.end(); itEngine++, i++) { + Engine* pEngine = *itEngine; + printf("Engine %d) Voices: %3.3d (Max: %3.3d) Streams: %3.3d (Max: %3.3d)\n", i, + pEngine->VoiceCount(), pEngine->VoiceCountMax(), + pEngine->DiskStreamCount(), pEngine->DiskStreamCountMax() + ); + fflush(stdout); + } + } + sleep(1); + if (profile) + { + unsigned int samplingFreq = 48000; //FIXME: hardcoded for now + unsigned int bv = LinuxSampler::gig::Profiler::GetBogoVoices(samplingFreq); + if (bv != 0) + { + printf(" BogoVoices: %i \r", bv); + fflush(stdout); + } + } + + pSampler->fireStatistics(); + } + if (pLSCPServer) pLSCPServer->StopThread(); + // the delete order here is important: the Sampler + // destructor sends notifications to the lscpserver + if (pSampler) delete pSampler; + if (pLSCPServer) delete pLSCPServer; + printf("LinuxSampler stopped due to SIGINT.\n"); return EXIT_SUCCESS; } -void signal_handler(int signal) { - if (pthread_equal(pthread_self(), signalhandlerthread) && signal == SIGINT) { - // stop all threads - if (pAudioIO) pAudioIO->Close(); - if (pMidiInThread) pMidiInThread->StopThread(); - - // free all resources - if (pMidiInThread) delete pMidiInThread; - if (pEngine) delete pEngine; - if (pAudioIO) delete pAudioIO; - - printf("LinuxSampler stopped due to SIGINT\n"); - exit(EXIT_SUCCESS); +void signal_handler(int iSignal) { + switch (iSignal) { + case SIGINT: + atomic_set(&running, 0); + return; + #if defined(WIN32) + // FIXME: under WIN32 we ignore the signals below due to the missing sigaction call + #else + case SIGSEGV: + std::cerr << ">>> FATAL ERROR: Segmentation fault (SIGSEGV) occured! <<<\n" << std::flush; + break; + case SIGBUS: + std::cerr << ">>> FATAL ERROR: Access to undefined portion of a memory object (SIGBUS) occured! <<<\n" << std::flush; + break; + case SIGILL: + std::cerr << ">>> FATAL ERROR: Illegal instruction (SIGILL) occured! <<<\n" << std::flush; + break; + case SIGFPE: + std::cerr << ">>> FATAL ERROR: Erroneous arithmetic operation (SIGFPE) occured! <<<\n" << std::flush; + break; + case SIGUSR1: + std::cerr << ">>> User defined signal 1 (SIGUSR1) received <<<\n" << std::flush; + break; + case SIGUSR2: + std::cerr << ">>> User defined signal 2 (SIGUSR2) received <<<\n" << std::flush; + break; + #endif + default: { // this should never happen, as we register for the signals we want + std::cerr << ">>> FATAL ERROR: Unknown signal received! <<<\n" << std::flush; + break; + } } + signal(iSignal, SIG_DFL); // Reinstall default handler to prevent race conditions + if (bShowStackTrace) { + std::cerr << "Showing stack trace...\n" << std::flush; + StackTrace(); + sleep(2); + } + std::cerr << "Killing LinuxSampler...\n" << std::flush; + kill_app(); // Use abort() if we want to generate a core dump. +} + +void kill_app() { + #if defined(WIN32) + // FIXME: do we need to do anything at this point under WIN32 ? is exit(0) ok ? + exit(0); + #else + kill(main_pid, SIGKILL); + #endif } void parse_options(int argc, char **argv) { @@ -157,99 +302,129 @@ int option_index = 0; static struct option long_options[] = { - {"numfragments",1,0,0}, - {"fragmentsize",1,0,0}, - {"volume",1,0,0}, - {"dls",0,0,0}, - {"gig",0,0,0}, - {"instrument",1,0,0}, - {"inputclient",1,0,0}, - {"alsaout",1,0,0}, - {"jackout",1,0,0}, - {"samplerate",1,0,0}, - {"server",0,0,0}, {"help",0,0,0}, + {"version",0,0,0}, + {"profile",0,0,0}, + {"no-tune",0,0,0}, + {"statistics",0,0,0}, + {"instruments-db-location",1,0,0}, + {"create-instruments-db",1,0,0}, + {"lscp-addr",1,0,0}, + {"lscp-port",1,0,0}, + {"stacktrace",0,0,0}, {0,0,0,0} }; while (true) { - res = getopt_long_only(argc, argv, "", long_options, &option_index); + /* + Stephane Letz : letz@grame.fr + getopt_long_only does not exist on OSX : replaced by getopt_long for now. + */ + res = getopt_long(argc, argv, "", long_options, &option_index); if(res == -1) break; if (res == 0) { switch(option_index) { - case 0: // --numfragments - num_fragments = atoi(optarg); - break; - case 1: // --fragmentsize - fragmentsize = atoi(optarg); - break; - case 2: // --volume - volume = atof(optarg); - break; - case 3: // --dls - patch_format = patch_format_dls; + case 0: // --help + printf("usage: linuxsampler [OPTIONS]\n\n"); + printf("--help prints this message\n"); + printf("--version prints version information\n"); + printf("--profile profile synthesis algorithms\n"); + printf("--no-tune disable assembly optimization\n"); + printf("--statistics periodically prints statistics\n"); + printf("--lscp-addr set LSCP address (default: any)\n"); + printf("--lscp-port set LSCP port (default: 8888)\n"); + printf("--create-instruments-db creates an instruments DB\n"); + printf("--instruments-db-location specifies the instruments DB file\n"); + printf("--stacktrace automatically shows stacktrace if crashes\n"); + printf(" (broken on most systems at the moment)\n"); + exit(EXIT_SUCCESS); break; - case 4: // --gig - patch_format = patch_format_gig; + case 1: // --version + printf("LinuxSampler %s\n", VERSION); + exit(EXIT_SUCCESS); break; - case 5: // --instrument - instrument_index = atoi(optarg); + case 2: // --profile + profile = true; break; - case 6: // --inputclient - input_client = optarg; + case 3: // --no-tune + tune = false; break; - case 7: // --alsaout - alsaout = optarg; - use_jack = false; // If this option is specified do not connect to jack + case 4: // --statistics + bPrintStatistics = true; break; - case 8: { // --jackout + case 5: // --instruments-db-location +#if HAVE_SQLITE3 try { - String arg(optarg); - // remove outer apostrophes - arg = arg.substr(arg.find('\'') + 1, arg.rfind('\'') - (arg.find('\'') + 1)); - // split in two arguments - jack_playback[0] = arg.substr(0, arg.find("\' ")); - jack_playback[1] = arg.substr(arg.find("\' ") + 2, arg.size() - (arg.find("\' ") + 2)); - // remove inner apostrophes - jack_playback[0] = jack_playback[0].substr(0, jack_playback[0].find('\'')); - jack_playback[1] = jack_playback[1].substr(jack_playback[1].find('\'') + 1, jack_playback[1].size() - jack_playback[1].find('\'')); - // this is the default but set it up anyway in case alsa_card was also used. - use_jack = true; + if (optarg) { + struct stat statBuf; + int res = stat(optarg, &statBuf); + + if (res) { + std::stringstream ss; + ss << "Failed to stat `" << optarg << "`: " << strerror(errno); + throw Exception(ss.str()); + } + + if (!S_ISREG(statBuf.st_mode)) { + std::stringstream ss; + ss << "`" << optarg << "` is not a regular file"; + throw Exception(ss.str()); + } + + InstrumentsDb::GetInstrumentsDb()->SetDbFile(String(optarg)); + } + } catch(Exception e) { + std::cerr << "Could not open instruments DB file: " + << e.Message() << std::endl; + exit(EXIT_FAILURE); } - catch (...) { - fprintf(stderr, "Invalid argument '%s' for parameter --jackout\n", optarg); + break; +#else + std::cerr << "LinuxSampler was not build with "; + std::cerr << "instruments database support!\n"; + exit(EXIT_FAILURE); + break; +#endif + case 6: // --create-instruments-db +#if HAVE_SQLITE3 + try { + if (optarg) { + std::cout << "Creating instruments database..." << std::endl; + InstrumentsDb::CreateInstrumentsDb(String(optarg)); + std::cout << "Done" << std::endl; + } + } catch(Exception e) { + std::cerr << e.Message() << std::endl; exit(EXIT_FAILURE); + return; } + + exit(EXIT_SUCCESS); + return; +#else + std::cerr << "Failed to create the database. LinuxSampler was "; + std::cerr << "not build with instruments database support!\n"; + exit(EXIT_FAILURE); + return; +#endif + case 7: { // --lscp-addr + struct in_addr addr; + if (inet_aton(optarg, &addr) == 0) + printf("WARNING: Failed to parse lscp-addr argument, ignoring!\n"); + else + lscp_addr = addr.s_addr; break; } - case 9: // --samplerate - samplerate = atoi(optarg); - break; - case 10: // --server - run_server = true; + case 8: {// --lscp-port + long unsigned int port = 0; + if ((sscanf(optarg, "%u", &port) != 1) || (port == 0) || (port > 65535)) + printf("WARNING: Failed to parse lscp-port argument, ignoring!\n"); + else + lscp_port = htons(port); break; - case 11: // --help - printf("usage: linuxsampler [OPTIONS] \n\n"); - printf("--gig loads a Gigasampler instrument\n"); - printf("--dls loads a DLS instrument\n"); - printf("--instrument index of the instrument in the instrument file if it\n"); - printf(" contains more than one (default: 0)\n"); - printf("--numfragments sets the number of audio fragments\n"); - printf("--fragmentsize sets the fragment size\n"); - printf("--volume sets global volume gain factor (a value > 1.0 means\n"); - printf(" amplification, a value < 1.0 means attenuation,\n"); - printf(" default: 0.25)\n"); - printf("--inputclient connects to an Alsa sequencer input client on startup\n"); - printf(" (e.g. 64:0 to connect to a client with ID 64 and port 0)\n"); - printf("--alsaout connects to the given Alsa sound device on startup\n"); - printf(" (e.g. 0,0 to connect to hw:0,0 or plughw:0,0)\n"); - printf("--jackout connects to the given Jack playback ports on startup\n"); - printf(" (e.g. \"\'alsa_pcm:playback_1\' \'alsa_pcm:playback_2\'\"\n"); - printf(" in case of stereo output)\n"); - printf("--samplerate sets sample rate if supported by audio output system\n"); - printf(" (e.g. 44100)\n"); - printf("--server launch network server for remote control\n"); - exit(EXIT_SUCCESS); + } + case 9: // --stacktrace + bShowStackTrace = true; break; } }