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;

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

    // 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
            String sFeatures;
            Features::detect();
#if ARCH_X86
            if (Features::supportsMMX()) sFeatures += " MMX";
            if (Features::supportsSSE()) sFeatures += " SSE";
#endif // ARCH_X86
            if (!sFeatures.size()) sFeatures = " None";
            dmsg(1,("Detected features:%s\n",sFeatures.c_str()));
    }

    // 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
    dmsg(1,("Starting LSCP network server (on TCP port %d)...", LSCP_PORT));
    pLSCPServer = new LSCPServer(pSampler);
    pLSCPServer->StartThread();
    pLSCPServer->WaitUntilInitialized();
    dmsg(1,("OK\n"));

    if (profile)
    {
            dmsg(1,("Calibrating profiler..."));
            gig::Profiler::Calibrate();
            gig::Profiler::Reset();
            dmsg(1,("OK\n"));
    }

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