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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 778 - (hide annotations) (download)
Fri Sep 23 06:58:26 2005 UTC (18 years, 6 months ago) by iliev
File size: 69681 byte(s)
Added new LSCP commands: GET TOTAL_VOICE_COUNT,
GET TOTAL_VOICE_COUNT_MAX, SUBSCRIBE/UNSUBSCRIBE TOTAL_VOICE_COUNT

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

  ViewVC Help
Powered by ViewVC