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

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

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

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

Legend:
Removed from v.35  
changed lines
  Added in v.905

  ViewVC Help
Powered by ViewVC