trunk/src/linuxsampler.cpp

/***************************************************************************
 *                                                                         *
 *   LinuxSampler - modular, streaming capable sampler                     *
 *                                                                         *
 *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
 *   Copyright (C) 2005 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 "Sampler.h"
#include "engines/EngineFactory.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"

using namespace LinuxSampler;

Sampler*    pSampler    = NULL;
LSCPServer* pLSCPServer = NULL;
pthread_t   main_thread;
bool bPrintStatistics = false;
bool profile = false;
bool tune = true;
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();

int main(int argc, char **argv) {

    // initialize the stack trace mechanism with our binary file
    StackTraceInit(argv[0], -1);

    main_thread = pthread_self();

    // setting signal handler for catching SIGINT (thus e.g. <CTRL><C>)
    signal(SIGINT, signal_handler);

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

    lscp_addr = htonl(LSCP_ADDR);
    lscp_port = htons(LSCP_PORT);

    // parse and assign command line options
    parse_options(argc, argv);

    dmsg(1,("LinuxSampler %s\n", VERSION));
    dmsg(1,("Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck\n"));
    dmsg(1,("Copyright (C) 2005 Christian Schoenebeck\n"));

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

    // create LinuxSampler instance
    dmsg(1,("Creating Sampler..."));
    pSampler = new Sampler;
    dmsg(1,("OK\n"));

    dmsg(1,("Registered MIDI input drivers: %s\n", MidiInputDeviceFactory::AvailableDriversAsString().c_str()));
    dmsg(1,("Registered audio output drivers: %s\n", AudioOutputDeviceFactory::AvailableDriversAsString().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..."));
        gig::Profiler::Calibrate();
        gig::Profiler::Reset();
        gig::Profiler::enable();
        dmsg(1,("OK\n"));
    }

    printf("LinuxSampler initialization completed. :-)\n\n");

    std::list<LSCPEvent::event_t> rtEvents;
    rtEvents.push_back(LSCPEvent::event_voice_count);
    rtEvents.push_back(LSCPEvent::event_stream_count);
    rtEvents.push_back(LSCPEvent::event_buffer_fill);

    while (true) {
        if (bPrintStatistics) {
            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 = gig::Profiler::GetBogoVoices(samplingFreq);
          if (bv != 0)
          {
              printf("       BogoVoices: %i         \r", bv);
              fflush(stdout);
          }
      }

      if (LSCPServer::EventSubscribers(rtEvents))
      {
          LSCPServer::LockRTNotify();
          std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
          std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
          for (; iter != channels.end(); iter++) {
              SamplerChannel* pSamplerChannel = iter->second;
              EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
              if (!pEngineChannel) continue;
              Engine* pEngine = pEngineChannel->GetEngine();
              if (!pEngine) continue;
              LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_voice_count, iter->first, pEngine->VoiceCount()));
              LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_stream_count, iter->first, pEngine->DiskStreamCount()));
              LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_buffer_fill, iter->first, pEngine->DiskStreamBufferFillPercentage()));
          }
          LSCPServer::UnlockRTNotify();
      }

    }

    return EXIT_SUCCESS;
}

void signal_handler(int iSignal) {
    switch (iSignal) {
        case SIGINT: {
            if (pthread_equal(pthread_self(), main_thread)) {
                if (pLSCPServer) {
                    pLSCPServer->StopThread();
                    delete pLSCPServer;
                }
                if (pSampler) delete pSampler;
                printf("LinuxSampler stopped due to SIGINT.\n");
                exit(EXIT_SUCCESS);
            }
            return;
        }
        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;
        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
    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() {
    kill(main_thread, SIGKILL);
}

void parse_options(int argc, char **argv) {
    int res;
    int option_index = 0;
    static struct option long_options[] =
        {
            {"help",0,0,0},
            {"version",0,0,0},
            {"profile",0,0,0},
            {"no-tune",0,0,0},
            {"statistics",0,0,0},
            {"lscp-addr",1,0,0},
            {"lscp-port",1,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");
                    exit(EXIT_SUCCESS);
                    break;
                case 1: // --version
                    printf("LinuxSampler %s\n", VERSION);
                    exit(EXIT_SUCCESS);
                    break;
                case 2: // --profile
                    profile = true;
                    break;
                case 3: // --no-tune
                    tune = false;
                    break;
                case 4: // --statistics
                    bPrintStatistics = true;
                    break;
                case 5: // --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 6: // --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;
            }
        }
    }
}
1	schoenebeck	9	/***************************************************************************
2			* *
3			* LinuxSampler - modular, streaming capable sampler *
4			* *
5	schoenebeck	61	* Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6	schoenebeck	411	* Copyright (C) 2005 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
27	schoenebeck	53	#include "Sampler.h"
28	schoenebeck	420	#include "engines/EngineFactory.h"
29	schoenebeck	207	#include "drivers/midi/MidiInputDeviceFactory.h"
30	schoenebeck	203	#include "drivers/audio/AudioOutputDeviceFactory.h"
31	senkov	325	#include "engines/gig/Profiler.h"
32	schoenebeck	35	#include "network/lscpserver.h"
33	schoenebeck	271	#include "common/stacktrace.h"
34	schoenebeck	319	#include "common/Features.h"
35	schoenebeck	9
36	schoenebeck	53	using namespace LinuxSampler;
37
38	schoenebeck	211	Sampler* pSampler = NULL;
39			LSCPServer* pLSCPServer = NULL;
40	schoenebeck	271	pthread_t main_thread;
41	schoenebeck	420	bool bPrintStatistics = false;
42	senkov	325	bool profile = false;
43			bool tune = true;
44	senkov	667	unsigned long int lscp_addr;
45			unsigned short int lscp_port;
46	schoenebeck	9
47			void parse_options(int argc, char **argv);
48			void signal_handler(int signal);
49	schoenebeck	271	void kill_app();
50	schoenebeck	9
51			int main(int argc, char **argv) {
52
53	schoenebeck	271	// initialize the stack trace mechanism with our binary file
54			StackTraceInit(argv[0], -1);
55
56			main_thread = pthread_self();
57
58	schoenebeck	9	// setting signal handler for catching SIGINT (thus e.g. <CTRL><C>)
59			signal(SIGINT, signal_handler);
60
61	schoenebeck	271	// register signal handler for all unusual signals
62			// (we will print the stack trace and exit)
63			struct sigaction sact;
64			sigemptyset(&sact.sa_mask);
65			sact.sa_flags = 0;
66			sact.sa_handler = signal_handler;
67			sigaction(SIGSEGV, &sact, NULL);
68			sigaction(SIGBUS, &sact, NULL);
69			sigaction(SIGILL, &sact, NULL);
70			sigaction(SIGFPE, &sact, NULL);
71			sigaction(SIGUSR1, &sact, NULL);
72			sigaction(SIGUSR2, &sact, NULL);
73
74	senkov	667	lscp_addr = htonl(LSCP_ADDR);
75			lscp_port = htons(LSCP_PORT);
76
77	schoenebeck	9	// parse and assign command line options
78	senkov	325	parse_options(argc, argv);
79	schoenebeck	9
80	schoenebeck	207	dmsg(1,("LinuxSampler %s\n", VERSION));
81			dmsg(1,("Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck\n"));
82	schoenebeck	411	dmsg(1,("Copyright (C) 2005 Christian Schoenebeck\n"));
83	schoenebeck	123
84	schoenebeck	579	if (tune) {
85	persson	425	// detect and print system / CPU specific features
86			Features::detect();
87	schoenebeck	579	dmsg(1,("Detected features: %s\n", Features::featuresAsString().c_str()));
88			// prevent slow denormal FPU modes
89			Features::enableDenormalsAreZeroMode();
90	senkov	325	}
91	schoenebeck	319
92	schoenebeck	53	// create LinuxSampler instance
93	schoenebeck	123	dmsg(1,("Creating Sampler..."));
94	schoenebeck	53	pSampler = new Sampler;
95	schoenebeck	123	dmsg(1,("OK\n"));
96	schoenebeck	53
97	schoenebeck	207	dmsg(1,("Registered MIDI input drivers: %s\n", MidiInputDeviceFactory::AvailableDriversAsString().c_str()));
98	schoenebeck	123	dmsg(1,("Registered audio output drivers: %s\n", AudioOutputDeviceFactory::AvailableDriversAsString().c_str()));
99
100	schoenebeck	53	// start LSCP network server
101	senkov	667	struct in_addr addr;
102			addr.s_addr = lscp_addr;
103			dmsg(1,("Starting LSCP network server (%s:%d)...", inet_ntoa(addr), ntohs(lscp_port)));
104			pLSCPServer = new LSCPServer(pSampler, lscp_addr, lscp_port);
105	schoenebeck	53	pLSCPServer->StartThread();
106	schoenebeck	211	pLSCPServer->WaitUntilInitialized();
107	schoenebeck	12	dmsg(1,("OK\n"));
108	schoenebeck	9
109	senkov	325	if (profile)
110			{
111	persson	425	dmsg(1,("Calibrating profiler..."));
112			gig::Profiler::Calibrate();
113			gig::Profiler::Reset();
114	schoenebeck	770	gig::Profiler::enable();
115	persson	425	dmsg(1,("OK\n"));
116	senkov	325	}
117
118	schoenebeck	563	printf("LinuxSampler initialization completed. :-)\n\n");
119	schoenebeck	9
120	senkov	360	std::list<LSCPEvent::event_t> rtEvents;
121			rtEvents.push_back(LSCPEvent::event_voice_count);
122			rtEvents.push_back(LSCPEvent::event_stream_count);
123			rtEvents.push_back(LSCPEvent::event_buffer_fill);
124
125	schoenebeck	420	while (true) {
126			if (bPrintStatistics) {
127			std::set<Engine*> engines = EngineFactory::EngineInstances();
128			std::set<Engine*>::iterator itEngine = engines.begin();
129			for (int i = 0; itEngine != engines.end(); itEngine++, i++) {
130			Engine* pEngine = *itEngine;
131			printf("Engine %d) Voices: %3.3d (Max: %3.3d) Streams: %3.3d (Max: %3.3d)\n", i,
132			pEngine->VoiceCount(), pEngine->VoiceCountMax(),
133			pEngine->DiskStreamCount(), pEngine->DiskStreamCountMax()
134			);
135			fflush(stdout);
136			}
137			}
138	persson	425
139	senkov	325	sleep(1);
140			if (profile)
141			{
142	persson	425	unsigned int samplingFreq = 48000; //FIXME: hardcoded for now
143			unsigned int bv = gig::Profiler::GetBogoVoices(samplingFreq);
144			if (bv != 0)
145			{
146			printf(" BogoVoices: %i \r", bv);
147			fflush(stdout);
148			}
149	senkov	325	}
150	persson	425
151	senkov	360	if (LSCPServer::EventSubscribers(rtEvents))
152			{
153	persson	425	LSCPServer::LockRTNotify();
154			std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
155			std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
156			for (; iter != channels.end(); iter++) {
157			SamplerChannel* pSamplerChannel = iter->second;
158			EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
159			if (!pEngineChannel) continue;
160			Engine* pEngine = pEngineChannel->GetEngine();
161			if (!pEngine) continue;
162			LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_voice_count, iter->first, pEngine->VoiceCount()));
163			LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_stream_count, iter->first, pEngine->DiskStreamCount()));
164			LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_buffer_fill, iter->first, pEngine->DiskStreamBufferFillPercentage()));
165			}
166			LSCPServer::UnlockRTNotify();
167	senkov	360	}
168
169	senoner	10	}
170
171	schoenebeck	9	return EXIT_SUCCESS;
172			}
173
174	schoenebeck	271	void signal_handler(int iSignal) {
175			switch (iSignal) {
176			case SIGINT: {
177			if (pthread_equal(pthread_self(), main_thread)) {
178			if (pLSCPServer) {
179			pLSCPServer->StopThread();
180			delete pLSCPServer;
181			}
182			if (pSampler) delete pSampler;
183			printf("LinuxSampler stopped due to SIGINT.\n");
184			exit(EXIT_SUCCESS);
185			}
186			return;
187	schoenebeck	53	}
188	schoenebeck	271	case SIGSEGV:
189			std::cerr << ">>> FATAL ERROR: Segmentation fault (SIGSEGV) occured! <<<\n" << std::flush;
190			break;
191			case SIGBUS:
192			std::cerr << ">>> FATAL ERROR: Access to undefined portion of a memory object (SIGBUS) occured! <<<\n" << std::flush;
193			break;
194			case SIGILL:
195			std::cerr << ">>> FATAL ERROR: Illegal instruction (SIGILL) occured! <<<\n" << std::flush;
196			break;
197			case SIGFPE:
198			std::cerr << ">>> FATAL ERROR: Erroneous arithmetic operation (SIGFPE) occured! <<<\n" << std::flush;
199			break;
200			case SIGUSR1:
201			std::cerr << ">>> User defined signal 1 (SIGUSR1) received <<<\n" << std::flush;
202			break;
203			case SIGUSR2:
204			std::cerr << ">>> User defined signal 2 (SIGUSR2) received <<<\n" << std::flush;
205			break;
206			default: { // this should never happen, as we register for the signals we want
207			std::cerr << ">>> FATAL ERROR: Unknown signal received! <<<\n" << std::flush;
208			break;
209			}
210	schoenebeck	9	}
211	schoenebeck	271	signal(iSignal, SIG_DFL); // Reinstall default handler to prevent race conditions
212			std::cerr << "Showing stack trace...\n" << std::flush;
213			StackTrace();
214			sleep(2);
215			std::cerr << "Killing LinuxSampler...\n" << std::flush;
216			kill_app(); // Use abort() if we want to generate a core dump.
217	schoenebeck	9	}
218
219	schoenebeck	271	void kill_app() {
220			kill(main_thread, SIGKILL);
221			}
222
223	senkov	325	void parse_options(int argc, char **argv) {
224	schoenebeck	9	int res;
225			int option_index = 0;
226			static struct option long_options[] =
227			{
228			{"help",0,0,0},
229	senkov	325	{"version",0,0,0},
230			{"profile",0,0,0},
231			{"no-tune",0,0,0},
232	schoenebeck	420	{"statistics",0,0,0},
233	senkov	667	{"lscp-addr",1,0,0},
234			{"lscp-port",1,0,0},
235	schoenebeck	9	{0,0,0,0}
236			};
237
238			while (true) {
239	schoenebeck	361	/*
240			Stephane Letz : letz@grame.fr
241			getopt_long_only does not exist on OSX : replaced by getopt_long for now.
242			*/
243			res = getopt_long(argc, argv, "", long_options, &option_index);
244	schoenebeck	9	if(res == -1) break;
245			if (res == 0) {
246			switch(option_index) {
247	senkov	325	case 0: // --help
248			printf("usage: linuxsampler [OPTIONS]\n\n");
249			printf("--help prints this message\n");
250			printf("--version prints version information\n");
251			printf("--profile profile synthesis algorithms\n");
252			printf("--no-tune disable assembly optimization\n");
253	senkov	667	printf("--statistics periodically prints statistics\n");
254			printf("--lscp-addr set LSCP address (default: any)\n");
255			printf("--lscp-port set LSCP port (default: 8888)\n");
256	senkov	325	exit(EXIT_SUCCESS);
257	schoenebeck	9	break;
258	senkov	325	case 1: // --version
259	schoenebeck	328	printf("LinuxSampler %s\n", VERSION);
260			exit(EXIT_SUCCESS);
261	schoenebeck	9	break;
262	senkov	325	case 2: // --profile
263	persson	425	profile = true;
264	schoenebeck	20	break;
265	senkov	325	case 3: // --no-tune
266	persson	425	tune = false;
267	schoenebeck	9	break;
268	schoenebeck	420	case 4: // --statistics
269			bPrintStatistics = true;
270			break;
271	senkov	667	case 5: // --lscp-addr
272			struct in_addr addr;
273			if (inet_aton(optarg, &addr) == 0)
274			printf("WARNING: Failed to parse lscp-addr argument, ignoring!\n");
275			else
276			lscp_addr = addr.s_addr;
277			break;
278			case 6: // --lscp-port
279			long unsigned int port = 0;
280			if ((sscanf(optarg, "%u", &port) != 1) \|\| (port == 0) \|\| (port > 65535))
281			printf("WARNING: Failed to parse lscp-port argument, ignoring!\n");
282			else
283			lscp_port = htons(port);
284			break;
285	schoenebeck	9	}
286			}
287			}
288	senkov	325	}