trunk/src/linuxsampler.cpp

/***************************************************************************
 *                                                                         *
 *   LinuxSampler - modular, streaming capable sampler                     *
 *                                                                         *
 *   Copyright (C) 2003-2004 by Benno Senoner and Christian Schoenebeck    *
 *   Copyright (C) 2005-2020 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  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the Free Software           *
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston,                 *
 *   MA  02111-1307  USA                                                   *
 ***************************************************************************/

#include <getopt.h>
#include <signal.h>
#include <sys/stat.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 "effects/EffectFactory.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

typedef unsigned long in_addr_t;

int inet_aton(const char *cp, struct in_addr *addr)
{
    addr->s_addr = inet_addr(cp);
    return (addr->s_addr == INADDR_NONE) ? 0 : 1;
}

#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;
String ExecAfterInit;

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) {

    Thread::setNameOfCaller("ls-main");

    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);

    // setting signal handler for catching SIGINT (thus e.g. <CTRL><C>)
    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
        #elif AC_APPLE_UNIVERSAL_BUILD
        // not used for Xcode
        #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,("LinuxSampler %s\n", VERSION));
    dmsg(1,("Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck\n"));
    dmsg(1,("Copyright (C) 2005-2020 Christian Schoenebeck\n"));
    dmsg(1,("Binary built: " __DATE__ "\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);

    RequestedMaximumWorkingSetSize = physical_memory - 2*1024*1024;
    RequestedMinimumWorkingSetSize = RequestedMaximumWorkingSetSize;

    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;
        }

        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"));

    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()));
    dmsg(1,("Registered internal effect systems: %s\n", EffectFactory::AvailableEffectSystemsAsString().c_str()));
    dmsg(1,("Registered internal effects: %d\n", EffectFactory::AvailableEffectsCount()));

    // start LSCP network server
    struct in_addr addr;
    addr.s_addr = (in_addr_t)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\n");
    
    if (ExecAfterInit != "") {
        printf("Executing command: %s\n\n", ExecAfterInit.c_str());
        if (system(ExecAfterInit.c_str()) == -1) {
            std::cerr << "Failed to execute the command" << std::endl;
        }
    }

//TODO: (hopefully) just a temporary nasty hack for launching gigedit on the main thread on Mac (see comments in gigedit.cpp for details)
#if defined(__APPLE__)
    g_mainThreadCallbackSupported = true;
#endif

    while (atomic_read(&running)) {
        if (bPrintStatistics) {
            const std::set<Engine*>& engines = EngineFactory::EngineInstances();
            std::set<Engine*>::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();
        
        //TODO: (hopefully) just a temporary nasty hack for launching gigedit on the main thread on Mac (see comments in gigedit.cpp for details)
        #if defined(__APPLE__)
        if (g_fireMainThreadCallback && g_mainThreadCallback) {
            void (*fn)(void* info) = g_mainThreadCallback;
            void* info = g_mainThreadCallbackInfo;
            g_mainThreadCallbackInfo = NULL;
            g_mainThreadCallback     = NULL;
            g_fireMainThreadCallback = false;
            printf("Received main thread callback, calling now ...\n"); fflush(stdout);
            (*fn)(info);
            printf("Main thread callback executed.\n"); fflush(stdout);
        }
        #endif
    }
//#endif
    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 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;
        #if !AC_APPLE_UNIVERSAL_BUILD
        StackTrace();
        #endif
        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) {
    int res;
    int option_index = 0;
    static struct option long_options[] =
        {
            {"help",no_argument,0,0},
            {"version",no_argument,0,0},
            {"profile",no_argument,0,0},
            {"no-tune",no_argument,0,0},
            {"statistics",no_argument,0,0},
            {"instruments-db-location",required_argument,0,0},
            {"create-instruments-db",optional_argument,0,0},
            {"lscp-addr",required_argument,0,0},
            {"lscp-port",required_argument,0,0},
            {"stacktrace",no_argument,0,0},
            {"exec-after-init",required_argument,0,0},
            {0,0,0,0}
        };

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