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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 225 - (show annotations) (download)
Sun Aug 22 14:46:47 2004 UTC (19 years, 7 months ago) by schoenebeck
File size: 58817 byte(s)
* set default volume to 1.0 in Gigasampler engine (was 0.0)
* implemented "SET CHANNEL AUDIO_OUTPUT_CHANNEL" LSCP command
* fixed "GET ENGINE INFO" LSCP command
* fixed "GET CHANNEL INFO" LSCP command
* src/network/lscp.y: fixed 'stringval' rule (returned string with formal
  apostrophes), fixed 'dotnum' rule (ignored position after decimal point)

1 /***************************************************************************
2 * *
3 * LinuxSampler - modular, streaming capable sampler *
4 * *
5 * Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6 * *
7 * This program is free software; you can redistribute it and/or modify *
8 * it under the terms of the GNU General Public License as published by *
9 * the Free Software Foundation; either version 2 of the License, or *
10 * (at your option) any later version. *
11 * *
12 * This program is distributed in the hope that it will be useful, *
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
15 * GNU General Public License for more details. *
16 * *
17 * You should have received a copy of the GNU General Public License *
18 * along with this program; if not, write to the Free Software *
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
20 * MA 02111-1307 USA *
21 ***************************************************************************/
22
23 #include "lscpserver.h"
24 #include "lscpresultset.h"
25 #include "lscpevent.h"
26
27 #include "../engines/gig/Engine.h"
28 #include "../drivers/audio/AudioOutputDeviceFactory.h"
29 #include "../drivers/midi/MidiInputDeviceFactory.h"
30
31 /**
32 * Below are a few static members of the LSCPServer class.
33 * The big assumption here is that LSCPServer is going to remain a singleton.
34 * These members are used to support client connections.
35 * Class handles multiple connections at the same time using select() and non-blocking recv()
36 * Commands are processed by a single LSCPServer thread.
37 * Notifications are delivered either by the thread that originated them
38 * or (if the resultset is currently in progress) by the LSCPServer thread
39 * after the resultset was sent out.
40 * This makes sure that resultsets can not be interrupted by notifications.
41 * This also makes sure that the thread sending notification is not blocked
42 * by the LSCPServer thread.
43 */
44 fd_set LSCPServer::fdSet;
45 int LSCPServer::currentSocket = -1;
46 std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();
47 std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();
48 std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();
49 std::map< LSCPEvent::event_t, std::list<int> > LSCPServer::eventSubscriptions = std::map< LSCPEvent::event_t, std::list<int> >();
50 Mutex LSCPServer::NotifyMutex = Mutex();
51 Mutex LSCPServer::NotifyBufferMutex = Mutex();
52 Mutex LSCPServer::SubscriptionMutex = Mutex();
53
54 LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) {
55 this->pSampler = pSampler;
56 LSCPEvent::RegisterEvent(LSCPEvent::event_channels, "CHANNELS");
57 LSCPEvent::RegisterEvent(LSCPEvent::event_voice_count, "VOICE_COUNT");
58 LSCPEvent::RegisterEvent(LSCPEvent::event_stream_count, "STREAM_COUNT");
59 LSCPEvent::RegisterEvent(LSCPEvent::event_buffer_fill, "BUFFER_FILL");
60 LSCPEvent::RegisterEvent(LSCPEvent::event_info, "INFO");
61 LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");
62 }
63
64 /**
65 * Blocks the calling thread until the LSCP Server is initialized and
66 * accepting socket connections, if the server is already initialized then
67 * this method will return immediately.
68 * @param TimeoutSeconds - optional: max. wait time in seconds
69 * (default: 0s)
70 * @param TimeoutNanoSeconds - optional: max wait time in nano seconds
71 * (default: 0ns)
72 * @returns 0 on success, a value less than 0 if timeout exceeded
73 */
74 int LSCPServer::WaitUntilInitialized(long TimeoutSeconds, long TimeoutNanoSeconds) {
75 return Initialized.WaitAndUnlockIf(false, TimeoutSeconds, TimeoutNanoSeconds);
76 }
77
78 int LSCPServer::Main() {
79 int hSocket = socket(AF_INET, SOCK_STREAM, 0);
80 if (hSocket < 0) {
81 std::cerr << "LSCPServer: Could not create server socket." << std::endl;
82 //return -1;
83 exit(EXIT_FAILURE);
84 }
85
86 SocketAddress.sin_family = AF_INET;
87 SocketAddress.sin_port = htons(LSCP_PORT);
88 SocketAddress.sin_addr.s_addr = htonl(INADDR_ANY);
89
90 if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {
91 std::cerr << "LSCPServer: Could not bind server socket." << std::endl;
92 close(hSocket);
93 //return -1;
94 exit(EXIT_FAILURE);
95 }
96
97 listen(hSocket, 1);
98 Initialized.Set(true);
99
100 // now wait for client connections and handle their requests
101 sockaddr_in client;
102 int length = sizeof(client);
103 FD_ZERO(&fdSet);
104 FD_SET(hSocket, &fdSet);
105 int maxSessions = hSocket;
106
107 while (true) {
108 fd_set selectSet = fdSet;
109 int retval = select(maxSessions+1, &selectSet, NULL, NULL, NULL);
110 if (retval == 0)
111 continue; //Nothing try again
112 if (retval == -1) {
113 std::cerr << "LSCPServer: Socket select error." << std::endl;
114 close(hSocket);
115 exit(EXIT_FAILURE);
116 }
117
118 //Accept new connections now (if any)
119 if (FD_ISSET(hSocket, &selectSet)) {
120 int socket = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length);
121 if (socket < 0) {
122 std::cerr << "LSCPServer: Client connection failed." << std::endl;
123 exit(EXIT_FAILURE);
124 }
125
126 if (fcntl(socket, F_SETFL, O_NONBLOCK)) {
127 std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;
128 exit(EXIT_FAILURE);
129 }
130
131 // Parser initialization
132 yyparse_param_t yyparse_param;
133 yyparse_param.pServer = this;
134 yyparse_param.hSession = socket;
135
136 Sessions.push_back(yyparse_param);
137 FD_SET(socket, &fdSet);
138 if (socket > maxSessions)
139 maxSessions = socket;
140 dmsg(1,("LSCPServer: Client connection established on socket:%d.\n", socket));
141 LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection established on socket", socket));
142 continue; //Maybe this was the only selected socket, better select again
143 }
144
145 //Something was selected and it was not the hSocket, so it must be some command(s) coming.
146 for (std::vector<yyparse_param_t>::iterator iter = Sessions.begin(); iter != Sessions.end(); iter++) {
147 if (FD_ISSET((*iter).hSession, &selectSet)) { //Was it this socket?
148 if (GetLSCPCommand(iter)) { //Have we read the entire command?
149 dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket));
150 int dummy; // just a temporary hack to fulfill the restart() function prototype
151 restart(NULL, dummy); // restart the 'scanner'
152 currentSocket = (*iter).hSession; //a hack
153 if ((*iter).bVerbose) { // if echo mode enabled
154 AnswerClient(bufferedCommands[currentSocket]);
155 }
156 int result = yyparse(&(*iter));
157 currentSocket = -1; //continuation of a hack
158 dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket));
159 if (result == LSCP_QUIT) { //Was it a quit command by any chance?
160 CloseConnection(iter);
161 }
162 }
163 //socket may have been closed, iter may be invalid, get out of the loop for now.
164 //we'll be back if there is data.
165 break;
166 }
167 }
168
169 //Now let's deliver late notifies (if any)
170 NotifyBufferMutex.Lock();
171 for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {
172 send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);
173 bufferedNotifies.erase(iterNotify);
174 }
175 NotifyBufferMutex.Unlock();
176 }
177 }
178
179 void LSCPServer::CloseConnection( std::vector<yyparse_param_t>::iterator iter ) {
180 int socket = (*iter).hSession;
181 dmsg(1,("LSCPServer: Client connection terminated on socket:%d.\n",socket));
182 LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));
183 Sessions.erase(iter);
184 FD_CLR(socket, &fdSet);
185 SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any)
186 for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {
187 iter->second.remove(socket);
188 }
189 SubscriptionMutex.Unlock();
190 NotifyMutex.Lock();
191 bufferedCommands.erase(socket);
192 bufferedNotifies.erase(socket);
193 close(socket);
194 NotifyMutex.Unlock();
195 }
196
197 void LSCPServer::SendLSCPNotify( LSCPEvent event ) {
198 SubscriptionMutex.Lock();
199 if (eventSubscriptions.count(event.GetType()) == 0) {
200 SubscriptionMutex.Unlock(); //Nobody is subscribed to this event
201 return;
202 }
203 std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();
204 std::list<int>::iterator end = eventSubscriptions[event.GetType()].end();
205 String notify = event.Produce();
206
207 while (true) {
208 if (NotifyMutex.Trylock()) {
209 for(;iter != end; iter++)
210 send(*iter, notify.c_str(), notify.size(), 0);
211 NotifyMutex.Unlock();
212 break;
213 } else {
214 if (NotifyBufferMutex.Trylock()) {
215 for(;iter != end; iter++)
216 bufferedNotifies[*iter] += notify;
217 NotifyBufferMutex.Unlock();
218 break;
219 }
220 }
221 }
222 SubscriptionMutex.Unlock();
223 }
224
225 extern int GetLSCPCommand( void *buf, int max_size ) {
226 String command = LSCPServer::bufferedCommands[LSCPServer::currentSocket];
227 if (command.size() == 0) { //Parser wants input but we have nothing.
228 strcpy((char*) buf, "\n"); //So give it an empty command
229 return 1; //to keep it happy.
230 }
231
232 if (max_size < command.size()) {
233 std::cerr << "getLSCPCommand: Flex buffer too small, ignoring the command." << std::endl;
234 return 0; //This will never happen
235 }
236
237 strcpy((char*) buf, command.c_str());
238 LSCPServer::bufferedCommands.erase(LSCPServer::currentSocket);
239 return command.size();
240 }
241
242 /**
243 * Will be called to try to read the command from the socket
244 * If command is read, it will return true. Otherwise false is returned.
245 * In any case the received portion (complete or incomplete) is saved into bufferedCommand map.
246 */
247 bool LSCPServer::GetLSCPCommand( std::vector<yyparse_param_t>::iterator iter ) {
248 int socket = (*iter).hSession;
249 char c;
250 int i = 0;
251 while (true) {
252 int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now
253 if (result == 0) { //socket was selected, so 0 here means client has closed the connection
254 CloseConnection(iter);
255 break;
256 }
257 if (result == 1) {
258 if (c == '\r')
259 continue; //Ignore CR
260 if (c == '\n') {
261 LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket));
262 bufferedCommands[socket] += "\n";
263 return true; //Complete command was read
264 }
265 bufferedCommands[socket] += c;
266 }
267 if (result == -1) {
268 if (errno == EAGAIN) //Would block, try again later.
269 return false;
270 switch(errno) {
271 case EBADF:
272 dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n"));
273 break;
274 case ECONNREFUSED:
275 dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n"));
276 break;
277 case ENOTCONN:
278 dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n"));
279 break;
280 case ENOTSOCK:
281 dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n"));
282 break;
283 case EAGAIN:
284 dmsg(2,("LSCPScanner: The socket is marked non-blocking and the receive operation would block, or a receive timeout had been set and the timeout expired before data was received.\n"));
285 break;
286 case EINTR:
287 dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n"));
288 break;
289 case EFAULT:
290 dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n"));
291 break;
292 case EINVAL:
293 dmsg(2,("LSCPScanner: Invalid argument passed.\n"));
294 break;
295 case ENOMEM:
296 dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n"));
297 break;
298 default:
299 dmsg(2,("LSCPScanner: Unknown recv() error.\n"));
300 break;
301 }
302 CloseConnection(iter);
303 break;
304 }
305 }
306 return false;
307 }
308
309 /**
310 * Will be called by the parser whenever it wants to send an answer to the
311 * client / frontend.
312 *
313 * @param ReturnMessage - message that will be send to the client
314 */
315 void LSCPServer::AnswerClient(String ReturnMessage) {
316 dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));
317 if (currentSocket != -1) {
318 NotifyMutex.Lock();
319 send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);
320 NotifyMutex.Unlock();
321 }
322 }
323
324 /**
325 * Find a created audio output device index.
326 */
327 int LSCPServer::GetAudioOutputDeviceIndex ( AudioOutputDevice *pDevice )
328 {
329 // Search for the created device to get its index
330 std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
331 std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
332 for (; iter != devices.end(); iter++) {
333 if (iter->second == pDevice)
334 return iter->first;
335 }
336 // Not found.
337 return -1;
338 }
339
340 /**
341 * Find a created midi input device index.
342 */
343 int LSCPServer::GetMidiInputDeviceIndex ( MidiInputDevice *pDevice )
344 {
345 // Search for the created device to get its index
346 std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
347 std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
348 for (; iter != devices.end(); iter++) {
349 if (iter->second == pDevice)
350 return iter->first;
351 }
352 // Not found.
353 return -1;
354 }
355
356 String LSCPServer::CreateAudioOutputDevice(String Driver, std::map<String,String> Parameters) {
357 dmsg(2,("LSCPServer: CreateAudioOutputDevice(Driver=%s)\n", Driver.c_str()));
358 LSCPResultSet result;
359 try {
360 AudioOutputDevice* pDevice = pSampler->CreateAudioOutputDevice(Driver, Parameters);
361 // search for the created device to get its index
362 int index = GetAudioOutputDeviceIndex(pDevice);
363 if (index == -1) throw LinuxSamplerException("Internal error: could not find created audio output device.");
364 result = index; // success
365 }
366 catch (LinuxSamplerException e) {
367 result.Error(e);
368 }
369 return result.Produce();
370 }
371
372 String LSCPServer::CreateMidiInputDevice(String Driver, std::map<String,String> Parameters) {
373 dmsg(2,("LSCPServer: CreateMidiInputDevice(Driver=%s)\n", Driver.c_str()));
374 LSCPResultSet result;
375 try {
376 MidiInputDevice* pDevice = pSampler->CreateMidiInputDevice(Driver, Parameters);
377 // search for the created device to get its index
378 int index = GetMidiInputDeviceIndex(pDevice);
379 if (index == -1) throw LinuxSamplerException("Internal error: could not find created midi input device.");
380 result = index; // success
381 }
382 catch (LinuxSamplerException e) {
383 result.Error(e);
384 }
385 return result.Produce();
386 }
387
388 String LSCPServer::DestroyAudioOutputDevice(uint DeviceIndex) {
389 dmsg(2,("LSCPServer: DestroyAudioOutputDevice(DeviceIndex=%d)\n", DeviceIndex));
390 LSCPResultSet result;
391 try {
392 std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
393 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
394 AudioOutputDevice* pDevice = devices[DeviceIndex];
395 pSampler->DestroyAudioOutputDevice(pDevice);
396 }
397 catch (LinuxSamplerException e) {
398 result.Error(e);
399 }
400 return result.Produce();
401 }
402
403 String LSCPServer::DestroyMidiInputDevice(uint DeviceIndex) {
404 dmsg(2,("LSCPServer: DestroyMidiInputDevice(DeviceIndex=%d)\n", DeviceIndex));
405 LSCPResultSet result;
406 try {
407 std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
408 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
409 MidiInputDevice* pDevice = devices[DeviceIndex];
410 pSampler->DestroyMidiInputDevice(pDevice);
411 }
412 catch (LinuxSamplerException e) {
413 result.Error(e);
414 }
415 return result.Produce();
416 }
417
418 /**
419 * Will be called by the parser to load an instrument.
420 */
421 String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel, bool bBackground) {
422 dmsg(2,("LSCPServer: LoadInstrument(Filename=%s,Instrument=%d,SamplerChannel=%d)\n", Filename.c_str(), uiInstrument, uiSamplerChannel));
423 LSCPResultSet result;
424 try {
425 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
426 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
427 Engine* pEngine = pSamplerChannel->GetEngine();
428 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
429 if (!pSamplerChannel->GetAudioOutputDevice())
430 throw LinuxSamplerException("No audio output device on channel");
431 if (bBackground) {
432 LSCPLoadInstrument *pLoadInstrument = new LSCPLoadInstrument(pEngine, Filename.c_str(), uiInstrument);
433 pLoadInstrument->StartThread();
434 }
435 else pEngine->LoadInstrument(Filename.c_str(), uiInstrument);
436 }
437 catch (LinuxSamplerException e) {
438 result.Error(e);
439 }
440 return result.Produce();
441 }
442
443 /**
444 * Will be called by the parser to load and deploy an engine.
445 */
446 String LSCPServer::LoadEngine(String EngineName, uint uiSamplerChannel) {
447 dmsg(2,("LSCPServer: LoadEngine(EngineName=%s,SamplerChannel=%d)\n", EngineName.c_str(), uiSamplerChannel));
448 LSCPResultSet result;
449 try {
450 Engine::type_t type;
451 if ((EngineName == "GigEngine") || (EngineName == "gig")) type = Engine::type_gig;
452 else throw LinuxSamplerException("Unknown engine type");
453 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
454 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
455 pSamplerChannel->LoadEngine(type);
456 }
457 catch (LinuxSamplerException e) {
458 result.Error(e);
459 }
460 return result.Produce();
461 }
462
463 /**
464 * Will be called by the parser to get the amount of sampler channels.
465 */
466 String LSCPServer::GetChannels() {
467 dmsg(2,("LSCPServer: GetChannels()\n"));
468 LSCPResultSet result;
469 result.Add(pSampler->SamplerChannels());
470 return result.Produce();
471 }
472
473 /**
474 * Will be called by the parser to get the list of sampler channels.
475 */
476 String LSCPServer::ListChannels() {
477 dmsg(2,("LSCPServer: ListChannels()\n"));
478 String list;
479 std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
480 std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
481 for (; iter != channels.end(); iter++) {
482 if (list != "") list += ",";
483 list += ToString(iter->first);
484 }
485 LSCPResultSet result;
486 result.Add(list);
487 return result.Produce();
488 }
489
490 /**
491 * Will be called by the parser to add a sampler channel.
492 */
493 String LSCPServer::AddChannel() {
494 dmsg(2,("LSCPServer: AddChannel()\n"));
495 SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();
496 LSCPResultSet result(pSamplerChannel->Index());
497 return result.Produce();
498 }
499
500 /**
501 * Will be called by the parser to remove a sampler channel.
502 */
503 String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
504 dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
505 LSCPResultSet result;
506 pSampler->RemoveSamplerChannel(uiSamplerChannel);
507 return result.Produce();
508 }
509
510 /**
511 * Will be called by the parser to get all available engines.
512 */
513 String LSCPServer::GetAvailableEngines() {
514 dmsg(2,("LSCPServer: GetAvailableEngines()\n"));
515 LSCPResultSet result("GigEngine");
516 return result.Produce();
517 }
518
519 /**
520 * Will be called by the parser to get descriptions for a particular engine.
521 */
522 String LSCPServer::GetEngineInfo(String EngineName) {
523 dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
524 LSCPResultSet result;
525 try {
526 if ((EngineName == "GigEngine") || (EngineName == "gig")) {
527 Engine* pEngine = new LinuxSampler::gig::Engine;
528 result.Add("DESCRIPTION", pEngine->Description());
529 result.Add("VERSION", pEngine->Version());
530 delete pEngine;
531 }
532 else throw LinuxSamplerException("Unknown engine type");
533 }
534 catch (LinuxSamplerException e) {
535 result.Error(e);
536 }
537 return result.Produce();
538 }
539
540 /**
541 * Will be called by the parser to get informations about a particular
542 * sampler channel.
543 */
544 String LSCPServer::GetChannelInfo(uint uiSamplerChannel) {
545 dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel));
546 LSCPResultSet result;
547 try {
548 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
549 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
550 Engine* pEngine = pSamplerChannel->GetEngine();
551
552 //Defaults values
553 String EngineName = "NONE";
554 float Volume = 0.0f;
555 String InstrumentFileName = "NONE";
556 int InstrumentIndex = -1;
557 int InstrumentStatus = -1;
558 int AudioOutputChannels = 0;
559 String AudioRouting;
560
561 if (pEngine) {
562 EngineName = pEngine->EngineName();
563 AudioOutputChannels = pEngine->Channels();
564 Volume = pEngine->Volume();
565 InstrumentStatus = pEngine->InstrumentStatus();
566 InstrumentIndex = pEngine->InstrumentIndex();
567 if (InstrumentIndex != -1)
568 InstrumentFileName = pEngine->InstrumentFileName();
569 for (int chan = 0; chan < pEngine->Channels(); chan++) {
570 if (AudioRouting != "") AudioRouting += ",";
571 AudioRouting += ToString(pEngine->OutputChannel(chan));
572 }
573 }
574
575 result.Add("ENGINE_NAME", EngineName);
576 result.Add("VOLUME", Volume);
577
578 //Some not-so-hardcoded stuff to make GUI look good
579 result.Add("AUDIO_OUTPUT_DEVICE", GetAudioOutputDeviceIndex(pSamplerChannel->GetAudioOutputDevice()));
580 result.Add("AUDIO_OUTPUT_CHANNELS", AudioOutputChannels);
581 result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
582
583 result.Add("MIDI_INPUT_DEVICE", GetMidiInputDeviceIndex(pSamplerChannel->GetMidiInputDevice()));
584 result.Add("MIDI_INPUT_PORT", pSamplerChannel->GetMidiInputPort());
585 if (pSamplerChannel->GetMidiInputChannel()) result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel());
586 else result.Add("MIDI_INPUT_CHANNEL", "ALL");
587
588 result.Add("INSTRUMENT_FILE", InstrumentFileName);
589 result.Add("INSTRUMENT_NR", InstrumentIndex);
590 result.Add("INSTRUMENT_STATUS", InstrumentStatus);
591 }
592 catch (LinuxSamplerException e) {
593 result.Error(e);
594 }
595 return result.Produce();
596 }
597
598 /**
599 * Will be called by the parser to get the amount of active voices on a
600 * particular sampler channel.
601 */
602 String LSCPServer::GetVoiceCount(uint uiSamplerChannel) {
603 dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
604 LSCPResultSet result;
605 try {
606 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
607 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
608 Engine* pEngine = pSamplerChannel->GetEngine();
609 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
610 result.Add(pEngine->VoiceCount());
611 }
612 catch (LinuxSamplerException e) {
613 result.Error(e);
614 }
615 return result.Produce();
616 }
617
618 /**
619 * Will be called by the parser to get the amount of active disk streams on a
620 * particular sampler channel.
621 */
622 String LSCPServer::GetStreamCount(uint uiSamplerChannel) {
623 dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
624 LSCPResultSet result;
625 try {
626 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
627 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
628 Engine* pEngine = pSamplerChannel->GetEngine();
629 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
630 result.Add(pEngine->DiskStreamCount());
631 }
632 catch (LinuxSamplerException e) {
633 result.Error(e);
634 }
635 return result.Produce();
636 }
637
638 /**
639 * Will be called by the parser to get the buffer fill states of all disk
640 * streams on a particular sampler channel.
641 */
642 String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) {
643 dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
644 LSCPResultSet result;
645 try {
646 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
647 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
648 Engine* pEngine = pSamplerChannel->GetEngine();
649 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
650 if (!pEngine->DiskStreamSupported())
651 result.Add("NA");
652 else {
653 switch (ResponseType) {
654 case fill_response_bytes:
655 result.Add(pEngine->DiskStreamBufferFillBytes());
656 break;
657 case fill_response_percentage:
658 result.Add(pEngine->DiskStreamBufferFillPercentage());
659 break;
660 default:
661 throw LinuxSamplerException("Unknown fill response type");
662 }
663 }
664 }
665 catch (LinuxSamplerException e) {
666 result.Error(e);
667 }
668 return result.Produce();
669 }
670
671 String LSCPServer::GetAvailableAudioOutputDrivers() {
672 dmsg(2,("LSCPServer: GetAvailableAudioOutputDrivers()\n"));
673 LSCPResultSet result;
674 try {
675 String s = AudioOutputDeviceFactory::AvailableDriversAsString();
676 result.Add(s);
677 }
678 catch (LinuxSamplerException e) {
679 result.Error(e);
680 }
681 return result.Produce();
682 }
683
684 String LSCPServer::GetAvailableMidiInputDrivers() {
685 dmsg(2,("LSCPServer: GetAvailableMidiInputDrivers()\n"));
686 LSCPResultSet result;
687 try {
688 String s = MidiInputDeviceFactory::AvailableDriversAsString();
689 result.Add(s);
690 }
691 catch (LinuxSamplerException e) {
692 result.Error(e);
693 }
694 return result.Produce();
695 }
696
697 String LSCPServer::GetMidiInputDriverInfo(String Driver) {
698 dmsg(2,("LSCPServer: GetMidiInputDriverInfo(Driver=%s)\n",Driver.c_str()));
699 LSCPResultSet result;
700 try {
701 result.Add("DESCRIPTION", MidiInputDeviceFactory::GetDriverDescription(Driver));
702 result.Add("VERSION", MidiInputDeviceFactory::GetDriverVersion(Driver));
703
704 std::map<String,DeviceCreationParameter*> parameters = MidiInputDeviceFactory::GetAvailableDriverParameters(Driver);
705 if (parameters.size()) { // if there are parameters defined for this driver
706 String s;
707 std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
708 for (;iter != parameters.end(); iter++) {
709 if (s != "") s += ",";
710 s += iter->first;
711 }
712 result.Add("PARAMETERS", s);
713 }
714 }
715 catch (LinuxSamplerException e) {
716 result.Error(e);
717 }
718 return result.Produce();
719 }
720
721 String LSCPServer::GetAudioOutputDriverInfo(String Driver) {
722 dmsg(2,("LSCPServer: GetAudioOutputDriverInfo(Driver=%s)\n",Driver.c_str()));
723 LSCPResultSet result;
724 try {
725 result.Add("DESCRIPTION", AudioOutputDeviceFactory::GetDriverDescription(Driver));
726 result.Add("VERSION", AudioOutputDeviceFactory::GetDriverVersion(Driver));
727
728 std::map<String,DeviceCreationParameter*> parameters = AudioOutputDeviceFactory::GetAvailableDriverParameters(Driver);
729 if (parameters.size()) { // if there are parameters defined for this driver
730 String s;
731 std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
732 for (;iter != parameters.end(); iter++) {
733 if (s != "") s += ",";
734 s += iter->first;
735 }
736 result.Add("PARAMETERS", s);
737 }
738 }
739 catch (LinuxSamplerException e) {
740 result.Error(e);
741 }
742 return result.Produce();
743 }
744
745 String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
746 dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s)\n",Driver.c_str(),Parameter.c_str()));
747 LSCPResultSet result;
748 try {
749 DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter);
750 result.Add("TYPE", pParameter->Type());
751 result.Add("DESCRIPTION", pParameter->Description());
752 result.Add("MANDATORY", pParameter->Mandatory());
753 result.Add("FIX", pParameter->Fix());
754 result.Add("MULTIPLICITY", pParameter->Multiplicity());
755 if (pParameter->Depends()) result.Add("DEPENDS", *pParameter->Depends());
756 if (pParameter->Default()) result.Add("DEFAULT", *pParameter->Default());
757 if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
758 if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
759 if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
760 }
761 catch (LinuxSamplerException e) {
762 result.Error(e);
763 }
764 return result.Produce();
765 }
766
767 String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
768 dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s)\n",Driver.c_str(),Parameter.c_str()));
769 LSCPResultSet result;
770 try {
771 DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter);
772 result.Add("TYPE", pParameter->Type());
773 result.Add("DESCRIPTION", pParameter->Description());
774 result.Add("MANDATORY", pParameter->Mandatory());
775 result.Add("FIX", pParameter->Fix());
776 result.Add("MULTIPLICITY", pParameter->Multiplicity());
777 if (pParameter->Depends()) result.Add("DEPENDS", *pParameter->Depends());
778 if (pParameter->Default()) result.Add("DEFAULT", *pParameter->Default());
779 if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
780 if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
781 if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
782 }
783 catch (LinuxSamplerException e) {
784 result.Error(e);
785 }
786 return result.Produce();
787 }
788
789 String LSCPServer::GetAudioOutputDeviceCount() {
790 dmsg(2,("LSCPServer: GetAudioOutputDeviceCount()\n"));
791 LSCPResultSet result;
792 try {
793 uint count = pSampler->AudioOutputDevices();
794 result.Add(count); // success
795 }
796 catch (LinuxSamplerException e) {
797 result.Error(e);
798 }
799 return result.Produce();
800 }
801
802 String LSCPServer::GetMidiInputDeviceCount() {
803 dmsg(2,("LSCPServer: GetMidiInputDeviceCount()\n"));
804 LSCPResultSet result;
805 try {
806 uint count = pSampler->MidiInputDevices();
807 result.Add(count); // success
808 }
809 catch (LinuxSamplerException e) {
810 result.Error(e);
811 }
812 return result.Produce();
813 }
814
815 String LSCPServer::GetAudioOutputDevices() {
816 dmsg(2,("LSCPServer: GetAudioOutputDevices()\n"));
817 LSCPResultSet result;
818 try {
819 String s;
820 std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
821 std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
822 for (; iter != devices.end(); iter++) {
823 if (s != "") s += ",";
824 s += ToString(iter->first);
825 }
826 result.Add(s);
827 }
828 catch (LinuxSamplerException e) {
829 result.Error(e);
830 }
831 return result.Produce();
832 }
833
834 String LSCPServer::GetMidiInputDevices() {
835 dmsg(2,("LSCPServer: GetMidiInputDevices()\n"));
836 LSCPResultSet result;
837 try {
838 String s;
839 std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
840 std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
841 for (; iter != devices.end(); iter++) {
842 if (s != "") s += ",";
843 s += ToString(iter->first);
844 }
845 result.Add(s);
846 }
847 catch (LinuxSamplerException e) {
848 result.Error(e);
849 }
850 return result.Produce();
851 }
852
853 String LSCPServer::GetAudioOutputDeviceInfo(uint DeviceIndex) {
854 dmsg(2,("LSCPServer: GetAudioOutputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
855 LSCPResultSet result;
856 try {
857 std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
858 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
859 AudioOutputDevice* pDevice = devices[DeviceIndex];
860 result.Add("DRIVER", pDevice->Driver());
861 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
862 std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
863 for (; iter != parameters.end(); iter++) {
864 result.Add(iter->first, iter->second->Value());
865 }
866 }
867 catch (LinuxSamplerException e) {
868 result.Error(e);
869 }
870 return result.Produce();
871 }
872
873 String LSCPServer::GetMidiInputDeviceInfo(uint DeviceIndex) {
874 dmsg(2,("LSCPServer: GetMidiInputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
875 LSCPResultSet result;
876 try {
877 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
878 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
879 MidiInputDevice* pDevice = devices[DeviceIndex];
880 result.Add("DRIVER", pDevice->Driver());
881 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
882 std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
883 for (; iter != parameters.end(); iter++) {
884 result.Add(iter->first, iter->second->Value());
885 }
886 }
887 catch (LinuxSamplerException e) {
888 result.Error(e);
889 }
890 return result.Produce();
891 }
892 String LSCPServer::GetMidiInputPortInfo(uint DeviceIndex, uint PortIndex) {
893 dmsg(2,("LSCPServer: GetMidiInputPortInfo(DeviceIndex=%d, PortIndex=%d)\n",DeviceIndex, PortIndex));
894 LSCPResultSet result;
895 try {
896 // get MIDI input device
897 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
898 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
899 MidiInputDevice* pDevice = devices[DeviceIndex];
900
901 // get MIDI port
902 MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
903 if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + ".");
904
905 // return the values of all MIDI port parameters
906 std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
907 std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
908 for (; iter != parameters.end(); iter++) {
909 result.Add(iter->first, iter->second->Value());
910 }
911 }
912 catch (LinuxSamplerException e) {
913 result.Error(e);
914 }
915 return result.Produce();
916 }
917
918 String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) {
919 dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%d,ChannelId)\n",DeviceId,ChannelId));
920 LSCPResultSet result;
921 try {
922 // get audio output device
923 std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
924 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
925 AudioOutputDevice* pDevice = devices[DeviceId];
926
927 // get audio channel
928 AudioChannel* pChannel = pDevice->Channel(ChannelId);
929 if (!pChannel) throw LinuxSamplerException("Audio ouotput device does not have channel " + ToString(ChannelId) + ".");
930
931 // return the values of all audio channel parameters
932 std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
933 std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
934 for (; iter != parameters.end(); iter++) {
935 result.Add(iter->first, iter->second->Value());
936 }
937 }
938 catch (LinuxSamplerException e) {
939 result.Error(e);
940 }
941 return result.Produce();
942 }
943
944 String LSCPServer::GetMidiInputPortParameterInfo(uint DeviceId, uint PortId, String ParameterName) {
945 dmsg(2,("LSCPServer: GetMidiInputPortParameterInfo(DeviceId=%d,PortId=%d,ParameterName=%s)\n",DeviceId,PortId,ParameterName.c_str()));
946 LSCPResultSet result;
947 try {
948 // get MIDI input device
949 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
950 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no midi input device with index " + ToString(DeviceId) + ".");
951 MidiInputDevice* pDevice = devices[DeviceId];
952
953 // get midi port
954 MidiInputPort* pPort = pDevice->GetPort(PortId);
955 if (!pPort) throw LinuxSamplerException("Midi input device does not have port " + ToString(PortId) + ".");
956
957 // get desired port parameter
958 std::map<String,DeviceRuntimeParameter*> parameters = pPort->PortParameters();
959 if (!parameters.count(ParameterName)) throw LinuxSamplerException("Midi port does not provide a parameter '" + ParameterName + "'.");
960 DeviceRuntimeParameter* pParameter = parameters[ParameterName];
961
962 // return all fields of this audio channel parameter
963 result.Add("TYPE", pParameter->Type());
964 result.Add("DESCRIPTION", pParameter->Description());
965 result.Add("FIX", pParameter->Fix());
966 result.Add("MULTIPLICITY", pParameter->Multiplicity());
967 if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
968 if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
969 if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
970 }
971 catch (LinuxSamplerException e) {
972 result.Error(e);
973 }
974 return result.Produce();
975 }
976
977 String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) {
978 dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str()));
979 LSCPResultSet result;
980 try {
981 // get audio output device
982 std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
983 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
984 AudioOutputDevice* pDevice = devices[DeviceId];
985
986 // get audio channel
987 AudioChannel* pChannel = pDevice->Channel(ChannelId);
988 if (!pChannel) throw LinuxSamplerException("Audio output device does not have channel " + ToString(ChannelId) + ".");
989
990 // get desired audio channel parameter
991 std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
992 if (!parameters.count(ParameterName)) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParameterName + "'.");
993 DeviceRuntimeParameter* pParameter = parameters[ParameterName];
994
995 // return all fields of this audio channel parameter
996 result.Add("TYPE", pParameter->Type());
997 result.Add("DESCRIPTION", pParameter->Description());
998 result.Add("FIX", pParameter->Fix());
999 result.Add("MULTIPLICITY", pParameter->Multiplicity());
1000 if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
1001 if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
1002 if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
1003 }
1004 catch (LinuxSamplerException e) {
1005 result.Error(e);
1006 }
1007 return result.Produce();
1008 }
1009
1010 String LSCPServer::SetAudioOutputChannelParameter(uint DeviceId, uint ChannelId, String ParamKey, String ParamVal) {
1011 dmsg(2,("LSCPServer: SetAudioOutputChannelParameter(DeviceId=%d,ChannelId=%d,ParamKey=%s,ParamVal=%s)\n",DeviceId,ChannelId,ParamKey.c_str(),ParamVal.c_str()));
1012 LSCPResultSet result;
1013 try {
1014 // get audio output device
1015 std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1016 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
1017 AudioOutputDevice* pDevice = devices[DeviceId];
1018
1019 // get audio channel
1020 AudioChannel* pChannel = pDevice->Channel(ChannelId);
1021 if (!pChannel) throw LinuxSamplerException("Audio output device does not have channel " + ToString(ChannelId) + ".");
1022
1023 // get desired audio channel parameter
1024 std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1025 if (!parameters.count(ParamKey)) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParamKey + "'.");
1026 DeviceRuntimeParameter* pParameter = parameters[ParamKey];
1027
1028 // set new channel parameter value
1029 pParameter->SetValue(ParamVal);
1030 }
1031 catch (LinuxSamplerException e) {
1032 result.Error(e);
1033 }
1034 return result.Produce();
1035 }
1036
1037 String LSCPServer::SetAudioOutputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1038 dmsg(2,("LSCPServer: SetAudioOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1039 LSCPResultSet result;
1040 try {
1041 std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1042 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
1043 AudioOutputDevice* pDevice = devices[DeviceIndex];
1044 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1045 if (!parameters.count(ParamKey)) throw LinuxSamplerException("Audio output device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1046 parameters[ParamKey]->SetValue(ParamVal);
1047 }
1048 catch (LinuxSamplerException e) {
1049 result.Error(e);
1050 }
1051 return result.Produce();
1052 }
1053
1054 String LSCPServer::SetMidiInputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1055 dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1056 LSCPResultSet result;
1057 try {
1058 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1059 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1060 MidiInputDevice* pDevice = devices[DeviceIndex];
1061 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1062 if (!parameters.count(ParamKey)) throw LinuxSamplerException("MIDI input device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1063 parameters[ParamKey]->SetValue(ParamVal);
1064 }
1065 catch (LinuxSamplerException e) {
1066 result.Error(e);
1067 }
1068 return result.Produce();
1069 }
1070
1071 String LSCPServer::SetMidiInputPortParameter(uint DeviceIndex, uint PortIndex, String ParamKey, String ParamVal) {
1072 dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1073 LSCPResultSet result;
1074 try {
1075 // get MIDI input device
1076 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1077 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1078 MidiInputDevice* pDevice = devices[DeviceIndex];
1079
1080 // get MIDI port
1081 MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
1082 if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + ".");
1083
1084 // set port parameter value
1085 std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
1086 if (!parameters.count(ParamKey)) throw LinuxSamplerException("MIDI input device " + ToString(PortIndex) + " does not have a parameter '" + ParamKey + "'");
1087 parameters[ParamKey]->SetValue(ParamVal);
1088 }
1089 catch (LinuxSamplerException e) {
1090 result.Error(e);
1091 }
1092 return result.Produce();
1093 }
1094
1095 /**
1096 * Will be called by the parser to change the audio output channel for
1097 * playback on a particular sampler channel.
1098 */
1099 String LSCPServer::SetAudioOutputChannel(uint ChannelAudioOutputChannel, uint AudioOutputDeviceInputChannel, uint uiSamplerChannel) {
1100 dmsg(2,("LSCPServer: SetAudioOutputChannel(ChannelAudioOutputChannel=%d, AudioOutputDeviceInputChannel=%d, SamplerChannel=%d)\n",ChannelAudioOutputChannel,AudioOutputDeviceInputChannel,uiSamplerChannel));
1101 LSCPResultSet result;
1102 try {
1103 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1104 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1105 Engine* pEngine = pSamplerChannel->GetEngine();
1106 if (!pEngine) throw LinuxSamplerException("No engine deployed on sampler channel " + ToString(uiSamplerChannel));
1107 pEngine->SetOutputChannel(ChannelAudioOutputChannel, AudioOutputDeviceInputChannel);
1108 }
1109 catch (LinuxSamplerException e) {
1110 result.Error(e);
1111 }
1112 return result.Produce();
1113 }
1114
1115 String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {
1116 dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));
1117 LSCPResultSet result;
1118 try {
1119 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1120 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1121 std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1122 if (!devices.count(AudioDeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(AudioDeviceId));
1123 AudioOutputDevice* pDevice = devices[AudioDeviceId];
1124 pSamplerChannel->SetAudioOutputDevice(pDevice);
1125 }
1126 catch (LinuxSamplerException e) {
1127 result.Error(e);
1128 }
1129 return result.Produce();
1130 }
1131
1132 String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {
1133 dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));
1134 LSCPResultSet result;
1135 try {
1136 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1137 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1138 // Driver type name aliasing...
1139 if (AudioOutputDriver == "ALSA") AudioOutputDriver = "Alsa";
1140 if (AudioOutputDriver == "JACK") AudioOutputDriver = "Jack";
1141 // Check if there's one audio output device already created
1142 // for the intended audio driver type (AudioOutputDriver)...
1143 AudioOutputDevice *pDevice = NULL;
1144 std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1145 std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1146 for (; iter != devices.end(); iter++) {
1147 if ((iter->second)->Driver() == AudioOutputDriver) {
1148 pDevice = iter->second;
1149 break;
1150 }
1151 }
1152 // If it doesn't exist, create a new one with default parameters...
1153 if (pDevice == NULL) {
1154 std::map<String,String> params;
1155 pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);
1156 }
1157 // Must have a device...
1158 if (pDevice == NULL)
1159 throw LinuxSamplerException("Internal error: could not create audio output device.");
1160 // Set it as the current channel device...
1161 pSamplerChannel->SetAudioOutputDevice(pDevice);
1162 }
1163 catch (LinuxSamplerException e) {
1164 result.Error(e);
1165 }
1166 return result.Produce();
1167 }
1168
1169 String LSCPServer::SetMIDIInputPort(uint MIDIPort, uint uiSamplerChannel) {
1170 dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIPort=%d, SamplerChannel=%d)\n",MIDIPort,uiSamplerChannel));
1171 LSCPResultSet result;
1172 try {
1173 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1174 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1175 pSamplerChannel->SetMidiInputPort(MIDIPort);
1176 }
1177 catch (LinuxSamplerException e) {
1178 result.Error(e);
1179 }
1180 return result.Produce();
1181 }
1182
1183 String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) {
1184 dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n",MIDIChannel,uiSamplerChannel));
1185 LSCPResultSet result;
1186 try {
1187 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1188 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1189 pSamplerChannel->SetMidiInputChannel((MidiInputPort::midi_chan_t) MIDIChannel);
1190 }
1191 catch (LinuxSamplerException e) {
1192 result.Error(e);
1193 }
1194 return result.Produce();
1195 }
1196
1197 String LSCPServer::SetMIDIInputDevice(uint MIDIDeviceId, uint uiSamplerChannel) {
1198 dmsg(2,("LSCPServer: SetMIDIInputDevice(MIDIDeviceId=%d, SamplerChannel=%d)\n",MIDIDeviceId,uiSamplerChannel));
1199 LSCPResultSet result;
1200 try {
1201 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1202 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1203 std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1204 if (!devices.count(MIDIDeviceId)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1205 MidiInputDevice* pDevice = devices[MIDIDeviceId];
1206 pSamplerChannel->SetMidiInputDevice(pDevice);
1207 }
1208 catch (LinuxSamplerException e) {
1209 result.Error(e);
1210 }
1211 return result.Produce();
1212 }
1213
1214 String LSCPServer::SetMIDIInputType(String MidiInputDriver, uint uiSamplerChannel) {
1215 dmsg(2,("LSCPServer: SetMIDIInputType(String MidiInputDriver=%s, SamplerChannel=%d)\n",MidiInputDriver.c_str(),uiSamplerChannel));
1216 LSCPResultSet result;
1217 try {
1218 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1219 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1220 // Driver type name aliasing...
1221 if (MidiInputDriver == "ALSA") MidiInputDriver = "Alsa";
1222 // Check if there's one MIDI input device already created
1223 // for the intended MIDI driver type (MidiInputDriver)...
1224 MidiInputDevice *pDevice = NULL;
1225 std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1226 std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
1227 for (; iter != devices.end(); iter++) {
1228 if ((iter->second)->Driver() == MidiInputDriver) {
1229 pDevice = iter->second;
1230 break;
1231 }
1232 }
1233 // If it doesn't exist, create a new one with default parameters...
1234 if (pDevice == NULL) {
1235 std::map<String,String> params;
1236 pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);
1237 // Make it with at least one initial port.
1238 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1239 parameters["PORTS"]->SetValue("1");
1240 }
1241 // Must have a device...
1242 if (pDevice == NULL)
1243 throw LinuxSamplerException("Internal error: could not create MIDI input device.");
1244 // Set it as the current channel device...
1245 pSamplerChannel->SetMidiInputDevice(pDevice);
1246 }
1247 catch (LinuxSamplerException e) {
1248 result.Error(e);
1249 }
1250 return result.Produce();
1251 }
1252
1253 /**
1254 * Will be called by the parser to change the MIDI input device, port and channel on which
1255 * engine of a particular sampler channel should listen to.
1256 */
1257 String LSCPServer::SetMIDIInput(uint MIDIDeviceId, uint MIDIPort, uint MIDIChannel, uint uiSamplerChannel) {
1258 dmsg(2,("LSCPServer: SetMIDIInput(MIDIDeviceId=%d, MIDIPort=%d, MIDIChannel=%d, SamplerChannel=%d)\n", MIDIDeviceId, MIDIPort, MIDIChannel, uiSamplerChannel));
1259 LSCPResultSet result;
1260 try {
1261 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1262 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1263 std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1264 if (!devices.count(MIDIDeviceId)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1265 MidiInputDevice* pDevice = devices[MIDIDeviceId];
1266 pSamplerChannel->SetMidiInput(pDevice, MIDIPort, (MidiInputPort::midi_chan_t) MIDIChannel);
1267 }
1268 catch (LinuxSamplerException e) {
1269 result.Error(e);
1270 }
1271 return result.Produce();
1272 }
1273
1274 /**
1275 * Will be called by the parser to change the global volume factor on a
1276 * particular sampler channel.
1277 */
1278 String LSCPServer::SetVolume(double dVolume, uint uiSamplerChannel) {
1279 dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));
1280 LSCPResultSet result;
1281 try {
1282 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1283 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
1284 Engine* pEngine = pSamplerChannel->GetEngine();
1285 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
1286 pEngine->Volume(dVolume);
1287 }
1288 catch (LinuxSamplerException e) {
1289 result.Error(e);
1290 }
1291 return result.Produce();
1292 }
1293
1294 /**
1295 * Will be called by the parser to reset a particular sampler channel.
1296 */
1297 String LSCPServer::ResetChannel(uint uiSamplerChannel) {
1298 dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
1299 LSCPResultSet result;
1300 try {
1301 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1302 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
1303 Engine* pEngine = pSamplerChannel->GetEngine();
1304 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
1305 pEngine->Reset();
1306 }
1307 catch (LinuxSamplerException e) {
1308 result.Error(e);
1309 }
1310 return result.Produce();
1311 }
1312
1313 /**
1314 * Will be called by the parser to reset the whole sampler.
1315 */
1316 String LSCPServer::ResetSampler() {
1317 dmsg(2,("LSCPServer: ResetSampler()\n"));
1318 pSampler->Reset();
1319 LSCPResultSet result;
1320 return result.Produce();
1321 }
1322
1323 /**
1324 * Will be called by the parser to subscribe a client (frontend) on the
1325 * server for receiving event messages.
1326 */
1327 String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {
1328 dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
1329 LSCPResultSet result;
1330 SubscriptionMutex.Lock();
1331 eventSubscriptions[type].push_back(currentSocket);
1332 SubscriptionMutex.Unlock();
1333 return result.Produce();
1334 }
1335
1336 /**
1337 * Will be called by the parser to unsubscribe a client on the server
1338 * for not receiving further event messages.
1339 */
1340 String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {
1341 dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
1342 LSCPResultSet result;
1343 SubscriptionMutex.Lock();
1344 eventSubscriptions[type].remove(currentSocket);
1345 SubscriptionMutex.Unlock();
1346 return result.Produce();
1347 }
1348
1349 /**
1350 * Will be called by the parser to enable or disable echo mode; if echo
1351 * mode is enabled, all commands from the client will (immediately) be
1352 * echoed back to the client.
1353 */
1354 String LSCPServer::SetEcho(yyparse_param_t* pSession, double boolean_value) {
1355 dmsg(2,("LSCPServer: SetEcho(val=%f)\n", boolean_value));
1356 LSCPResultSet result;
1357 try {
1358 if (boolean_value == 0) pSession->bVerbose = false;
1359 else if (boolean_value == 1) pSession->bVerbose = true;
1360 else throw LinuxSamplerException("Not a boolean value, must either be 0 or 1");
1361 }
1362 catch (LinuxSamplerException e) {
1363 result.Error(e);
1364 }
1365 return result.Produce();
1366 }
1367
1368 // Instrument loader constructor.
1369 LSCPLoadInstrument::LSCPLoadInstrument(Engine* pEngine, String Filename, uint uiInstrument)
1370 : Thread(false, 0, -4)
1371 {
1372 this->pEngine = pEngine;
1373 this->Filename = Filename;
1374 this->uiInstrument = uiInstrument;
1375 }
1376
1377 // Instrument loader process.
1378 int LSCPLoadInstrument::Main()
1379 {
1380 try {
1381 pEngine->LoadInstrument(Filename.c_str(), uiInstrument);
1382 }
1383
1384 catch (LinuxSamplerException e) {
1385 e.PrintMessage();
1386 }
1387
1388 // Always re-enable the engine.
1389 pEngine->Enable();
1390
1391 // FIXME: Shoot ourselves on the foot?
1392 delete this;
1393 }

  ViewVC Help
Powered by ViewVC