/[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 814 by wylder, Thu Dec 22 19:26:35 2005 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 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                    bufferedNotifies.erase(iterNotify);
155            }
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 LinuxSamplerException("Internal error: could not find created audio output device.");
431            result = index; // success
432        }
433        catch (LinuxSamplerException 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 LinuxSamplerException("Internal error: could not find created midi input device.");
447            result = index; // success
448        }
449        catch (LinuxSamplerException 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 LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
461            AudioOutputDevice* pDevice = devices[DeviceIndex];
462            pSampler->DestroyAudioOutputDevice(pDevice);
463        }
464        catch (LinuxSamplerException 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 LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
476            MidiInputDevice* pDevice = devices[DeviceIndex];
477            pSampler->DestroyMidiInputDevice(pDevice);
478        }
479        catch (LinuxSamplerException 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 LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
494            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
495            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel yet");
496            if (!pSamplerChannel->GetAudioOutputDevice())
497                throw LinuxSamplerException("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 (LinuxSamplerException 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 LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
524            LockRTNotify();
525            pSamplerChannel->SetEngineType(EngineName);
526            if(HasSoloChannel()) pSamplerChannel->GetEngineChannel()->SetMute(-1);
527            UnlockRTNotify();
528        }
529        catch (LinuxSamplerException 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";      SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();
568        LSCPResultSet result(pSamplerChannel->Index());
569        return result.Produce();
570  }  }
571    
572  /**  /**
573   * Will be called by the parser to remove a sampler channel.   * Will be called by the parser to remove a sampler channel.
574   */   */
575  String LSCPServer::RemoveChannel(uint SamplerChannel) {  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
576      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", SamplerChannel));      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
577      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
578        LockRTNotify();
579        pSampler->RemoveSamplerChannel(uiSamplerChannel);
580        UnlockRTNotify();
581        return result.Produce();
582  }  }
583    
584  /**  /**
585   * 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.
586   */   */
587  String LSCPServer::GetAvailableEngines() {  String LSCPServer::GetAvailableEngines() {
588      dmsg(2,("LSCPServer: GetAvailableEngines()\n"));      dmsg(2,("LSCPServer: GetAvailableEngines()\n"));
589      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result("1");
590        return result.Produce();
591    }
592    
593    /**
594     * Will be called by the parser to get a list of all available engines.
595     */
596    String LSCPServer::ListAvailableEngines() {
597        dmsg(2,("LSCPServer: ListAvailableEngines()\n"));
598        LSCPResultSet result("\'GIG\'");
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 descriptions for a particular
604     * sampler engine.
605   */   */
606  String LSCPServer::GetEngineInfo(String EngineName) {  String LSCPServer::GetEngineInfo(String EngineName) {
607      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
608      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
609        try {
610            Engine* pEngine = EngineFactory::Create(EngineName);
611            result.Add("DESCRIPTION", pEngine->Description());
612            result.Add("VERSION",     pEngine->Version());
613            EngineFactory::Destroy(pEngine);
614        }
615        catch (LinuxSamplerException e) {
616             result.Error(e);
617        }
618        return result.Produce();
619  }  }
620    
621  /**  /**
622   * Will be called by the parser to get informations about a particular   * Will be called by the parser to get informations about a particular
623   * sampler channel.   * sampler channel.
624   */   */
625  String LSCPServer::GetChannelInfo(uint SamplerChannel) {  String LSCPServer::GetChannelInfo(uint uiSamplerChannel) {
626      dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", SamplerChannel));      dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel));
627      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
628        try {
629            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
630            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
631            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
632    
633            //Defaults values
634            String EngineName = "NONE";
635            float Volume = 0.0f;
636            String InstrumentFileName = "NONE";
637            String InstrumentName = "NONE";
638            int InstrumentIndex = -1;
639            int InstrumentStatus = -1;
640            int AudioOutputChannels = 0;
641            String AudioRouting;
642            int Mute = 0;
643            bool Solo = false;
644    
645            if (pEngineChannel) {
646                EngineName          = pEngineChannel->EngineName();
647                AudioOutputChannels = pEngineChannel->Channels();
648                Volume              = pEngineChannel->Volume();
649                InstrumentStatus    = pEngineChannel->InstrumentStatus();
650                InstrumentIndex     = pEngineChannel->InstrumentIndex();
651                if (InstrumentIndex != -1) {
652                    InstrumentFileName = pEngineChannel->InstrumentFileName();
653                    InstrumentName     = pEngineChannel->InstrumentName();
654                }
655                for (int chan = 0; chan < pEngineChannel->Channels(); chan++) {
656                    if (AudioRouting != "") AudioRouting += ",";
657                    AudioRouting += ToString(pEngineChannel->OutputChannel(chan));
658                }
659                Mute = pEngineChannel->GetMute();
660                Solo = pEngineChannel->GetSolo();
661            }
662    
663            result.Add("ENGINE_NAME", EngineName);
664            result.Add("VOLUME", Volume);
665    
666            //Some not-so-hardcoded stuff to make GUI look good
667            result.Add("AUDIO_OUTPUT_DEVICE", GetAudioOutputDeviceIndex(pSamplerChannel->GetAudioOutputDevice()));
668            result.Add("AUDIO_OUTPUT_CHANNELS", AudioOutputChannels);
669            result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
670    
671            result.Add("MIDI_INPUT_DEVICE", GetMidiInputDeviceIndex(pSamplerChannel->GetMidiInputDevice()));
672            result.Add("MIDI_INPUT_PORT", pSamplerChannel->GetMidiInputPort());
673            if (pSamplerChannel->GetMidiInputChannel() == midi_chan_all) result.Add("MIDI_INPUT_CHANNEL", "ALL");
674            else result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel());
675    
676            result.Add("INSTRUMENT_FILE", InstrumentFileName);
677            result.Add("INSTRUMENT_NR", InstrumentIndex);
678            result.Add("INSTRUMENT_NAME", InstrumentName);
679            result.Add("INSTRUMENT_STATUS", InstrumentStatus);
680            result.Add("MUTE", Mute == -1 ? "MUTED_BY_SOLO" : (Mute ? "true" : "false"));
681            result.Add("SOLO", Solo);
682        }
683        catch (LinuxSamplerException e) {
684             result.Error(e);
685        }
686        return result.Produce();
687  }  }
688    
689  /**  /**
690   * 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
691   * particular sampler channel.   * particular sampler channel.
692   */   */
693  String LSCPServer::GetVoiceCount(uint SamplerChannel) {  String LSCPServer::GetVoiceCount(uint uiSamplerChannel) {
694      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", SamplerChannel));      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
695      return ToString(pEngine->ActiveVoiceCount) + "\r\n";      LSCPResultSet result;
696        try {
697            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
698            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
699            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
700            if (!pEngineChannel) throw LinuxSamplerException("No engine loaded on sampler channel");
701            if (!pEngineChannel->GetEngine()) throw LinuxSamplerException("No audio output device connected to sampler channel");
702            result.Add(pEngineChannel->GetEngine()->VoiceCount());
703        }
704        catch (LinuxSamplerException e) {
705             result.Error(e);
706        }
707        return result.Produce();
708  }  }
709    
710  /**  /**
711   * 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
712   * particular sampler channel.   * particular sampler channel.
713   */   */
714  String LSCPServer::GetStreamCount(uint SamplerChannel) {  String LSCPServer::GetStreamCount(uint uiSamplerChannel) {
715      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", SamplerChannel));      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
716      return ToString(pEngine->pDiskThread->ActiveStreamCount) + "\r\n";      LSCPResultSet result;
717        try {
718            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
719            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
720            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
721            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel");
722            if (!pEngineChannel->GetEngine()) throw LinuxSamplerException("No audio output device connected to sampler channel");
723            result.Add(pEngineChannel->GetEngine()->DiskStreamCount());
724        }
725        catch (LinuxSamplerException e) {
726             result.Error(e);
727        }
728        return result.Produce();
729  }  }
730    
731  /**  /**
732   * 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
733   * streams on a particular sampler channel.   * streams on a particular sampler channel.
734   */   */
735  String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint SamplerChannel) {  String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) {
736      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, SamplerChannel));      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
737      return (ResponseType == fill_response_bytes) ? pEngine->pDiskThread->GetBufferFillBytes() + "\r\n"      LSCPResultSet result;
738                                                   : pEngine->pDiskThread->GetBufferFillPercentage() + "\r\n";      try {
739            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
740            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
741            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
742            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel");
743            if (!pEngineChannel->GetEngine()) throw LinuxSamplerException("No audio output device connected to sampler channel");
744            if (!pEngineChannel->GetEngine()->DiskStreamSupported()) result.Add("NA");
745            else {
746                switch (ResponseType) {
747                    case fill_response_bytes:
748                        result.Add(pEngineChannel->GetEngine()->DiskStreamBufferFillBytes());
749                        break;
750                    case fill_response_percentage:
751                        result.Add(pEngineChannel->GetEngine()->DiskStreamBufferFillPercentage());
752                        break;
753                    default:
754                        throw LinuxSamplerException("Unknown fill response type");
755                }
756            }
757        }
758        catch (LinuxSamplerException e) {
759             result.Error(e);
760        }
761        return result.Produce();
762  }  }
763    
764  /**  String LSCPServer::GetAvailableAudioOutputDrivers() {
765   * Will be called by the parser to change the audio output type on a      dmsg(2,("LSCPServer: GetAvailableAudioOutputDrivers()\n"));
766   * particular sampler channel.      LSCPResultSet result;
767   */      try {
768  String LSCPServer::SetAudioOutputType(audio_output_type_t AudioOutputType, uint SamplerChannel) {          int n = AudioOutputDeviceFactory::AvailableDrivers().size();
769      dmsg(2,("LSCPServer: SetAudioOutputType(AudioOutputType=%d, SamplerChannel=%d)\n", AudioOutputType, SamplerChannel));          result.Add(n);
770      return "ERR:0:Not implemented yet.\r\n";      }
771        catch (LinuxSamplerException e) {
772            result.Error(e);
773        }
774        return result.Produce();
775    }
776    
777    String LSCPServer::ListAvailableAudioOutputDrivers() {
778        dmsg(2,("LSCPServer: ListAvailableAudioOutputDrivers()\n"));
779        LSCPResultSet result;
780        try {
781            String s = AudioOutputDeviceFactory::AvailableDriversAsString();
782            result.Add(s);
783        }
784        catch (LinuxSamplerException e) {
785            result.Error(e);
786        }
787        return result.Produce();
788    }
789    
790    String LSCPServer::GetAvailableMidiInputDrivers() {
791        dmsg(2,("LSCPServer: GetAvailableMidiInputDrivers()\n"));
792        LSCPResultSet result;
793        try {
794            int n = MidiInputDeviceFactory::AvailableDrivers().size();
795            result.Add(n);
796        }
797        catch (LinuxSamplerException e) {
798            result.Error(e);
799        }
800        return result.Produce();
801    }
802    
803    String LSCPServer::ListAvailableMidiInputDrivers() {
804        dmsg(2,("LSCPServer: ListAvailableMidiInputDrivers()\n"));
805        LSCPResultSet result;
806        try {
807            String s = MidiInputDeviceFactory::AvailableDriversAsString();
808            result.Add(s);
809        }
810        catch (LinuxSamplerException e) {
811            result.Error(e);
812        }
813        return result.Produce();
814    }
815    
816    String LSCPServer::GetMidiInputDriverInfo(String Driver) {
817        dmsg(2,("LSCPServer: GetMidiInputDriverInfo(Driver=%s)\n",Driver.c_str()));
818        LSCPResultSet result;
819        try {
820            result.Add("DESCRIPTION", MidiInputDeviceFactory::GetDriverDescription(Driver));
821            result.Add("VERSION",     MidiInputDeviceFactory::GetDriverVersion(Driver));
822    
823            std::map<String,DeviceCreationParameter*> parameters = MidiInputDeviceFactory::GetAvailableDriverParameters(Driver);
824            if (parameters.size()) { // if there are parameters defined for this driver
825                String s;
826                std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
827                for (;iter != parameters.end(); iter++) {
828                    if (s != "") s += ",";
829                    s += iter->first;
830                }
831                result.Add("PARAMETERS", s);
832            }
833        }
834        catch (LinuxSamplerException e) {
835            result.Error(e);
836        }
837        return result.Produce();
838    }
839    
840    String LSCPServer::GetAudioOutputDriverInfo(String Driver) {
841        dmsg(2,("LSCPServer: GetAudioOutputDriverInfo(Driver=%s)\n",Driver.c_str()));
842        LSCPResultSet result;
843        try {
844            result.Add("DESCRIPTION", AudioOutputDeviceFactory::GetDriverDescription(Driver));
845            result.Add("VERSION",     AudioOutputDeviceFactory::GetDriverVersion(Driver));
846    
847            std::map<String,DeviceCreationParameter*> parameters = AudioOutputDeviceFactory::GetAvailableDriverParameters(Driver);
848            if (parameters.size()) { // if there are parameters defined for this driver
849                String s;
850                std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
851                for (;iter != parameters.end(); iter++) {
852                    if (s != "") s += ",";
853                    s += iter->first;
854                }
855                result.Add("PARAMETERS", s);
856            }
857        }
858        catch (LinuxSamplerException e) {
859            result.Error(e);
860        }
861        return result.Produce();
862    }
863    
864    String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
865        dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),DependencyList.size()));
866        LSCPResultSet result;
867        try {
868            DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter);
869            result.Add("TYPE",         pParameter->Type());
870            result.Add("DESCRIPTION",  pParameter->Description());
871            result.Add("MANDATORY",    pParameter->Mandatory());
872            result.Add("FIX",          pParameter->Fix());
873            result.Add("MULTIPLICITY", pParameter->Multiplicity());
874            optional<String> oDepends       = pParameter->Depends();
875            optional<String> oDefault       = pParameter->Default(DependencyList);
876            optional<String> oRangeMin      = pParameter->RangeMin(DependencyList);
877            optional<String> oRangeMax      = pParameter->RangeMax(DependencyList);
878            optional<String> oPossibilities = pParameter->Possibilities(DependencyList);
879            if (oDepends)       result.Add("DEPENDS",       *oDepends);
880            if (oDefault)       result.Add("DEFAULT",       *oDefault);
881            if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
882            if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
883            if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
884        }
885        catch (LinuxSamplerException e) {
886            result.Error(e);
887        }
888        return result.Produce();
889    }
890    
891    String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
892        dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),DependencyList.size()));
893        LSCPResultSet result;
894        try {
895            DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter);
896            result.Add("TYPE",         pParameter->Type());
897            result.Add("DESCRIPTION",  pParameter->Description());
898            result.Add("MANDATORY",    pParameter->Mandatory());
899            result.Add("FIX",          pParameter->Fix());
900            result.Add("MULTIPLICITY", pParameter->Multiplicity());
901            optional<String> oDepends       = pParameter->Depends();
902            optional<String> oDefault       = pParameter->Default(DependencyList);
903            optional<String> oRangeMin      = pParameter->RangeMin(DependencyList);
904            optional<String> oRangeMax      = pParameter->RangeMax(DependencyList);
905            optional<String> oPossibilities = pParameter->Possibilities(DependencyList);
906            if (oDepends)       result.Add("DEPENDS",       *oDepends);
907            if (oDefault)       result.Add("DEFAULT",       *oDefault);
908            if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
909            if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
910            if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
911        }
912        catch (LinuxSamplerException e) {
913            result.Error(e);
914        }
915        return result.Produce();
916    }
917    
918    String LSCPServer::GetAudioOutputDeviceCount() {
919        dmsg(2,("LSCPServer: GetAudioOutputDeviceCount()\n"));
920        LSCPResultSet result;
921        try {
922            uint count = pSampler->AudioOutputDevices();
923            result.Add(count); // success
924        }
925        catch (LinuxSamplerException e) {
926            result.Error(e);
927        }
928        return result.Produce();
929    }
930    
931    String LSCPServer::GetMidiInputDeviceCount() {
932        dmsg(2,("LSCPServer: GetMidiInputDeviceCount()\n"));
933        LSCPResultSet result;
934        try {
935            uint count = pSampler->MidiInputDevices();
936            result.Add(count); // success
937        }
938        catch (LinuxSamplerException e) {
939            result.Error(e);
940        }
941        return result.Produce();
942    }
943    
944    String LSCPServer::GetAudioOutputDevices() {
945        dmsg(2,("LSCPServer: GetAudioOutputDevices()\n"));
946        LSCPResultSet result;
947        try {
948            String s;
949            std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
950            std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
951            for (; iter != devices.end(); iter++) {
952                if (s != "") s += ",";
953                s += ToString(iter->first);
954            }
955            result.Add(s);
956        }
957        catch (LinuxSamplerException e) {
958            result.Error(e);
959        }
960        return result.Produce();
961    }
962    
963    String LSCPServer::GetMidiInputDevices() {
964        dmsg(2,("LSCPServer: GetMidiInputDevices()\n"));
965        LSCPResultSet result;
966        try {
967            String s;
968            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
969            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
970            for (; iter != devices.end(); iter++) {
971                if (s != "") s += ",";
972                s += ToString(iter->first);
973            }
974            result.Add(s);
975        }
976        catch (LinuxSamplerException e) {
977            result.Error(e);
978        }
979        return result.Produce();
980    }
981    
982    String LSCPServer::GetAudioOutputDeviceInfo(uint DeviceIndex) {
983        dmsg(2,("LSCPServer: GetAudioOutputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
984        LSCPResultSet result;
985        try {
986            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
987            if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
988            AudioOutputDevice* pDevice = devices[DeviceIndex];
989            result.Add("DRIVER", pDevice->Driver());
990            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
991            std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
992            for (; iter != parameters.end(); iter++) {
993                result.Add(iter->first, iter->second->Value());
994            }
995        }
996        catch (LinuxSamplerException e) {
997            result.Error(e);
998        }
999        return result.Produce();
1000    }
1001    
1002    String LSCPServer::GetMidiInputDeviceInfo(uint DeviceIndex) {
1003        dmsg(2,("LSCPServer: GetMidiInputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
1004        LSCPResultSet result;
1005        try {
1006            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1007            if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1008            MidiInputDevice* pDevice = devices[DeviceIndex];
1009            result.Add("DRIVER", pDevice->Driver());
1010            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1011            std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
1012            for (; iter != parameters.end(); iter++) {
1013                result.Add(iter->first, iter->second->Value());
1014            }
1015        }
1016        catch (LinuxSamplerException e) {
1017            result.Error(e);
1018        }
1019        return result.Produce();
1020    }
1021    String LSCPServer::GetMidiInputPortInfo(uint DeviceIndex, uint PortIndex) {
1022        dmsg(2,("LSCPServer: GetMidiInputPortInfo(DeviceIndex=%d, PortIndex=%d)\n",DeviceIndex, PortIndex));
1023        LSCPResultSet result;
1024        try {
1025            // get MIDI input device
1026            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1027            if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1028            MidiInputDevice* pDevice = devices[DeviceIndex];
1029    
1030            // get MIDI port
1031            MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
1032            if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + ".");
1033    
1034            // return the values of all MIDI port parameters
1035            std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
1036            std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
1037            for (; iter != parameters.end(); iter++) {
1038                result.Add(iter->first, iter->second->Value());
1039            }
1040        }
1041        catch (LinuxSamplerException e) {
1042            result.Error(e);
1043        }
1044        return result.Produce();
1045    }
1046    
1047    String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) {
1048        dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%d,ChannelId)\n",DeviceId,ChannelId));
1049        LSCPResultSet result;
1050        try {
1051            // get audio output device
1052            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1053            if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
1054            AudioOutputDevice* pDevice = devices[DeviceId];
1055    
1056            // get audio channel
1057            AudioChannel* pChannel = pDevice->Channel(ChannelId);
1058            if (!pChannel) throw LinuxSamplerException("Audio output device does not have audio channel " + ToString(ChannelId) + ".");
1059    
1060            // return the values of all audio channel parameters
1061            std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1062            std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
1063            for (; iter != parameters.end(); iter++) {
1064                result.Add(iter->first, iter->second->Value());
1065            }
1066        }
1067        catch (LinuxSamplerException e) {
1068            result.Error(e);
1069        }
1070        return result.Produce();
1071    }
1072    
1073    String LSCPServer::GetMidiInputPortParameterInfo(uint DeviceId, uint PortId, String ParameterName) {
1074        dmsg(2,("LSCPServer: GetMidiInputPortParameterInfo(DeviceId=%d,PortId=%d,ParameterName=%s)\n",DeviceId,PortId,ParameterName.c_str()));
1075        LSCPResultSet result;
1076        try {
1077            // get MIDI input device
1078            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1079            if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no midi input device with index " + ToString(DeviceId) + ".");
1080            MidiInputDevice* pDevice = devices[DeviceId];
1081    
1082            // get midi port
1083            MidiInputPort* pPort = pDevice->GetPort(PortId);
1084            if (!pPort) throw LinuxSamplerException("Midi input device does not have port " + ToString(PortId) + ".");
1085    
1086            // get desired port parameter
1087            std::map<String,DeviceRuntimeParameter*> parameters = pPort->PortParameters();
1088            if (!parameters.count(ParameterName)) throw LinuxSamplerException("Midi port does not provide a parameter '" + ParameterName + "'.");
1089            DeviceRuntimeParameter* pParameter = parameters[ParameterName];
1090    
1091            // return all fields of this audio channel parameter
1092            result.Add("TYPE",         pParameter->Type());
1093            result.Add("DESCRIPTION",  pParameter->Description());
1094            result.Add("FIX",          pParameter->Fix());
1095            result.Add("MULTIPLICITY", pParameter->Multiplicity());
1096            if (pParameter->RangeMin())      result.Add("RANGE_MIN",     *pParameter->RangeMin());
1097            if (pParameter->RangeMax())      result.Add("RANGE_MAX",     *pParameter->RangeMax());
1098            if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
1099        }
1100        catch (LinuxSamplerException e) {
1101            result.Error(e);
1102        }
1103        return result.Produce();
1104    }
1105    
1106    String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) {
1107        dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str()));
1108        LSCPResultSet result;
1109        try {
1110            // get audio output device
1111            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1112            if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
1113            AudioOutputDevice* pDevice = devices[DeviceId];
1114    
1115            // get audio channel
1116            AudioChannel* pChannel = pDevice->Channel(ChannelId);
1117            if (!pChannel) throw LinuxSamplerException("Audio output device does not have audio channel " + ToString(ChannelId) + ".");
1118    
1119            // get desired audio channel parameter
1120            std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1121            if (!parameters.count(ParameterName)) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParameterName + "'.");
1122            DeviceRuntimeParameter* pParameter = parameters[ParameterName];
1123    
1124            // return all fields of this audio channel parameter
1125            result.Add("TYPE",         pParameter->Type());
1126            result.Add("DESCRIPTION",  pParameter->Description());
1127            result.Add("FIX",          pParameter->Fix());
1128            result.Add("MULTIPLICITY", pParameter->Multiplicity());
1129            if (pParameter->RangeMin())      result.Add("RANGE_MIN",     *pParameter->RangeMin());
1130            if (pParameter->RangeMax())      result.Add("RANGE_MAX",     *pParameter->RangeMax());
1131            if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
1132        }
1133        catch (LinuxSamplerException e) {
1134            result.Error(e);
1135        }
1136        return result.Produce();
1137    }
1138    
1139    String LSCPServer::SetAudioOutputChannelParameter(uint DeviceId, uint ChannelId, String ParamKey, String ParamVal) {
1140        dmsg(2,("LSCPServer: SetAudioOutputChannelParameter(DeviceId=%d,ChannelId=%d,ParamKey=%s,ParamVal=%s)\n",DeviceId,ChannelId,ParamKey.c_str(),ParamVal.c_str()));
1141        LSCPResultSet result;
1142        try {
1143            // get audio output device
1144            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1145            if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
1146            AudioOutputDevice* pDevice = devices[DeviceId];
1147    
1148            // get audio channel
1149            AudioChannel* pChannel = pDevice->Channel(ChannelId);
1150            if (!pChannel) throw LinuxSamplerException("Audio output device does not have audio channel " + ToString(ChannelId) + ".");
1151    
1152            // get desired audio channel parameter
1153            std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1154            if (!parameters.count(ParamKey)) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParamKey + "'.");
1155            DeviceRuntimeParameter* pParameter = parameters[ParamKey];
1156    
1157            // set new channel parameter value
1158            pParameter->SetValue(ParamVal);
1159        }
1160        catch (LinuxSamplerException e) {
1161            result.Error(e);
1162        }
1163        return result.Produce();
1164    }
1165    
1166    String LSCPServer::SetAudioOutputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1167        dmsg(2,("LSCPServer: SetAudioOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1168        LSCPResultSet result;
1169        try {
1170            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1171            if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
1172            AudioOutputDevice* pDevice = devices[DeviceIndex];
1173            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1174            if (!parameters.count(ParamKey)) throw LinuxSamplerException("Audio output device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1175            parameters[ParamKey]->SetValue(ParamVal);
1176        }
1177        catch (LinuxSamplerException e) {
1178            result.Error(e);
1179        }
1180        return result.Produce();
1181    }
1182    
1183    String LSCPServer::SetMidiInputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1184        dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1185        LSCPResultSet result;
1186        try {
1187            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1188            if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1189            MidiInputDevice* pDevice = devices[DeviceIndex];
1190            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1191            if (!parameters.count(ParamKey)) throw LinuxSamplerException("MIDI input device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1192            parameters[ParamKey]->SetValue(ParamVal);
1193        }
1194        catch (LinuxSamplerException e) {
1195            result.Error(e);
1196        }
1197        return result.Produce();
1198    }
1199    
1200    String LSCPServer::SetMidiInputPortParameter(uint DeviceIndex, uint PortIndex, String ParamKey, String ParamVal) {
1201        dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1202        LSCPResultSet result;
1203        try {
1204            // get MIDI input device
1205            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1206            if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1207            MidiInputDevice* pDevice = devices[DeviceIndex];
1208    
1209            // get MIDI port
1210            MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
1211            if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + ".");
1212    
1213            // set port parameter value
1214            std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
1215            if (!parameters.count(ParamKey)) throw LinuxSamplerException("MIDI input device " + ToString(PortIndex) + " does not have a parameter '" + ParamKey + "'");
1216            parameters[ParamKey]->SetValue(ParamVal);
1217        }
1218        catch (LinuxSamplerException e) {
1219            result.Error(e);
1220        }
1221        return result.Produce();
1222  }  }
1223    
1224  /**  /**
1225   * 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
1226   * playback on a particular sampler channel.   * playback on a particular sampler channel.
1227   */   */
1228  String LSCPServer::SetAudioOutputChannel(uint AudioOutputChannel, uint SamplerChannel) {  String LSCPServer::SetAudioOutputChannel(uint ChannelAudioOutputChannel, uint AudioOutputDeviceInputChannel, uint uiSamplerChannel) {
1229      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));
1230      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
1231        try {
1232            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1233            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1234            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1235            if (!pEngineChannel) throw LinuxSamplerException("No engine type yet assigned to sampler channel " + ToString(uiSamplerChannel));
1236            if (!pSamplerChannel->GetAudioOutputDevice()) throw LinuxSamplerException("No audio output device connected to sampler channel " + ToString(uiSamplerChannel));
1237            pEngineChannel->SetOutputChannel(ChannelAudioOutputChannel, AudioOutputDeviceInputChannel);
1238        }
1239        catch (LinuxSamplerException e) {
1240             result.Error(e);
1241        }
1242        return result.Produce();
1243  }  }
1244    
1245  /**  String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {
1246   * 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));
1247   * engine of a particular sampler channel should listen to.      LSCPResultSet result;
1248   */      try {
1249  String LSCPServer::SetMIDIInputPort(String MIDIInputPort, uint Samplerchannel) {          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1250      dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIInputPort=%s, Samplerchannel=%d)\n", MIDIInputPort.c_str(), Samplerchannel));          if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1251      return "ERR:0:Not implemented yet.\r\n";          std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1252            if (!devices.count(AudioDeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(AudioDeviceId));
1253            AudioOutputDevice* pDevice = devices[AudioDeviceId];
1254            pSamplerChannel->SetAudioOutputDevice(pDevice);
1255        }
1256        catch (LinuxSamplerException e) {
1257             result.Error(e);
1258        }
1259        return result.Produce();
1260    }
1261    
1262    String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {
1263        dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));
1264        LSCPResultSet result;
1265        try {
1266            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1267            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1268            // Driver type name aliasing...
1269            if (AudioOutputDriver == "Alsa") AudioOutputDriver = "ALSA";
1270            if (AudioOutputDriver == "Jack") AudioOutputDriver = "JACK";
1271            // Check if there's one audio output device already created
1272            // for the intended audio driver type (AudioOutputDriver)...
1273            AudioOutputDevice *pDevice = NULL;
1274            std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1275            std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1276            for (; iter != devices.end(); iter++) {
1277                if ((iter->second)->Driver() == AudioOutputDriver) {
1278                    pDevice = iter->second;
1279                    break;
1280                }
1281            }
1282            // If it doesn't exist, create a new one with default parameters...
1283            if (pDevice == NULL) {
1284                std::map<String,String> params;
1285                pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);
1286            }
1287            // Must have a device...
1288            if (pDevice == NULL)
1289                throw LinuxSamplerException("Internal error: could not create audio output device.");
1290            // Set it as the current channel device...
1291            pSamplerChannel->SetAudioOutputDevice(pDevice);
1292        }
1293        catch (LinuxSamplerException e) {
1294             result.Error(e);
1295        }
1296        return result.Produce();
1297    }
1298    
1299    String LSCPServer::SetMIDIInputPort(uint MIDIPort, uint uiSamplerChannel) {
1300        dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIPort=%d, SamplerChannel=%d)\n",MIDIPort,uiSamplerChannel));
1301        LSCPResultSet result;
1302        try {
1303            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1304            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1305            pSamplerChannel->SetMidiInputPort(MIDIPort);
1306        }
1307        catch (LinuxSamplerException e) {
1308             result.Error(e);
1309        }
1310        return result.Produce();
1311    }
1312    
1313    String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) {
1314        dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n",MIDIChannel,uiSamplerChannel));
1315        LSCPResultSet result;
1316        try {
1317            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1318            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1319            pSamplerChannel->SetMidiInputChannel((midi_chan_t) MIDIChannel);
1320        }
1321        catch (LinuxSamplerException e) {
1322             result.Error(e);
1323        }
1324        return result.Produce();
1325    }
1326    
1327    String LSCPServer::SetMIDIInputDevice(uint MIDIDeviceId, uint uiSamplerChannel) {
1328        dmsg(2,("LSCPServer: SetMIDIInputDevice(MIDIDeviceId=%d, SamplerChannel=%d)\n",MIDIDeviceId,uiSamplerChannel));
1329        LSCPResultSet result;
1330        try {
1331            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1332            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1333            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1334            if (!devices.count(MIDIDeviceId)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1335            MidiInputDevice* pDevice = devices[MIDIDeviceId];
1336            pSamplerChannel->SetMidiInputDevice(pDevice);
1337        }
1338        catch (LinuxSamplerException e) {
1339             result.Error(e);
1340        }
1341        return result.Produce();
1342    }
1343    
1344    String LSCPServer::SetMIDIInputType(String MidiInputDriver, uint uiSamplerChannel) {
1345        dmsg(2,("LSCPServer: SetMIDIInputType(String MidiInputDriver=%s, SamplerChannel=%d)\n",MidiInputDriver.c_str(),uiSamplerChannel));
1346        LSCPResultSet result;
1347        try {
1348            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1349            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1350            // Driver type name aliasing...
1351            if (MidiInputDriver == "Alsa") MidiInputDriver = "ALSA";
1352            // Check if there's one MIDI input device already created
1353            // for the intended MIDI driver type (MidiInputDriver)...
1354            MidiInputDevice *pDevice = NULL;
1355            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1356            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
1357            for (; iter != devices.end(); iter++) {
1358                if ((iter->second)->Driver() == MidiInputDriver) {
1359                    pDevice = iter->second;
1360                    break;
1361                }
1362            }
1363            // If it doesn't exist, create a new one with default parameters...
1364            if (pDevice == NULL) {
1365                std::map<String,String> params;
1366                pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);
1367                // Make it with at least one initial port.
1368                std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1369                parameters["PORTS"]->SetValue("1");
1370            }
1371            // Must have a device...
1372            if (pDevice == NULL)
1373                throw LinuxSamplerException("Internal error: could not create MIDI input device.");
1374            // Set it as the current channel device...
1375            pSamplerChannel->SetMidiInputDevice(pDevice);
1376        }
1377        catch (LinuxSamplerException e) {
1378             result.Error(e);
1379        }
1380        return result.Produce();
1381  }  }
1382    
1383  /**  /**
1384   * 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
1385   * engine of a particular sampler channel should listen to.   * engine of a particular sampler channel should listen to.
1386   */   */
1387  String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint SamplerChannel) {  String LSCPServer::SetMIDIInput(uint MIDIDeviceId, uint MIDIPort, uint MIDIChannel, uint uiSamplerChannel) {
1388      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));
1389      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
1390        try {
1391            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1392            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1393            std::map<uint, MidiInputDevice*> devices =  pSampler->GetMidiInputDevices();
1394            if (!devices.count(MIDIDeviceId)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1395            MidiInputDevice* pDevice = devices[MIDIDeviceId];
1396            pSamplerChannel->SetMidiInput(pDevice, MIDIPort, (midi_chan_t) MIDIChannel);
1397        }
1398        catch (LinuxSamplerException e) {
1399             result.Error(e);
1400        }
1401        return result.Produce();
1402  }  }
1403    
1404  /**  /**
1405   * 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
1406   * particular sampler channel.   * particular sampler channel.
1407   */   */
1408  String LSCPServer::SetVolume(double Volume, uint SamplerChannel) {  String LSCPServer::SetVolume(double dVolume, uint uiSamplerChannel) {
1409      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", Volume, SamplerChannel));      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));
1410      pEngine->Volume = Volume;      LSCPResultSet result;
1411      return "OK\r\n";      try {
1412            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1413            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1414            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1415            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel");
1416            pEngineChannel->Volume(dVolume);
1417        }
1418        catch (LinuxSamplerException e) {
1419             result.Error(e);
1420        }
1421        return result.Produce();
1422    }
1423    
1424    /**
1425     * Will be called by the parser to mute/unmute particular sampler channel.
1426     */
1427    String LSCPServer::SetChannelMute(bool bMute, uint uiSamplerChannel) {
1428        dmsg(2,("LSCPServer: SetChannelMute(bMute=%d,uiSamplerChannel=%d)\n",bMute,uiSamplerChannel));
1429        LSCPResultSet result;
1430        try {
1431            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1432            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1433    
1434            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1435            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel");
1436    
1437            if(!bMute) pEngineChannel->SetMute((HasSoloChannel() && !pEngineChannel->GetSolo()) ? -1 : 0);
1438            else pEngineChannel->SetMute(1);
1439        } catch (LinuxSamplerException e) {
1440            result.Error(e);
1441        }
1442        return result.Produce();
1443    }
1444    
1445    /**
1446     * Will be called by the parser to solo particular sampler channel.
1447     */
1448    String LSCPServer::SetChannelSolo(bool bSolo, uint uiSamplerChannel) {
1449        dmsg(2,("LSCPServer: SetChannelSolo(bSolo=%d,uiSamplerChannel=%d)\n",bSolo,uiSamplerChannel));
1450        LSCPResultSet result;
1451        try {
1452            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1453            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1454    
1455            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1456            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel");
1457    
1458            bool oldSolo = pEngineChannel->GetSolo();
1459            bool hadSoloChannel = HasSoloChannel();
1460            
1461            pEngineChannel->SetSolo(bSolo);
1462            
1463            if(!oldSolo && bSolo) {
1464                if(pEngineChannel->GetMute() == -1) pEngineChannel->SetMute(0);
1465                if(!hadSoloChannel) MuteNonSoloChannels();
1466            }
1467            
1468            if(oldSolo && !bSolo) {
1469                if(!HasSoloChannel()) UnmuteChannels();
1470                else if(!pEngineChannel->GetMute()) pEngineChannel->SetMute(-1);
1471            }
1472        } catch (LinuxSamplerException e) {
1473            result.Error(e);
1474        }
1475        return result.Produce();
1476    }
1477    
1478    /**
1479     * Determines whether there is at least one solo channel in the channel list.
1480     *
1481     * @returns true if there is at least one solo channel in the channel list,
1482     * false otherwise.
1483     */
1484    bool LSCPServer::HasSoloChannel() {
1485        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
1486        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
1487        for (; iter != channels.end(); iter++) {
1488            EngineChannel* c = iter->second->GetEngineChannel();
1489            if(c && c->GetSolo()) return true;
1490        }
1491    
1492        return false;
1493    }
1494    
1495    /**
1496     * Mutes all unmuted non-solo channels. Notice that the channels are muted
1497     * with -1 which indicates that they are muted because of the presence
1498     * of a solo channel(s). Channels muted with -1 will be automatically unmuted
1499     * when there are no solo channels left.
1500     */
1501    void LSCPServer::MuteNonSoloChannels() {
1502        dmsg(2,("LSCPServer: MuteNonSoloChannels()\n"));
1503        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
1504        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
1505        for (; iter != channels.end(); iter++) {
1506            EngineChannel* c = iter->second->GetEngineChannel();
1507            if(c && !c->GetSolo() && !c->GetMute()) c->SetMute(-1);
1508        }
1509    }
1510    
1511    /**
1512     * Unmutes all channels that are muted because of the presence
1513     * of a solo channel(s).
1514     */
1515    void  LSCPServer::UnmuteChannels() {
1516        dmsg(2,("LSCPServer: UnmuteChannels()\n"));
1517        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
1518        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
1519        for (; iter != channels.end(); iter++) {
1520            EngineChannel* c = iter->second->GetEngineChannel();
1521            if(c && c->GetMute() == -1) c->SetMute(0);
1522        }
1523  }  }
1524    
1525  /**  /**
1526   * Will be called by the parser to reset a particular sampler channel.   * Will be called by the parser to reset a particular sampler channel.
1527   */   */
1528  String LSCPServer::ResetChannel(uint SamplerChannel) {  String LSCPServer::ResetChannel(uint uiSamplerChannel) {
1529      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", SamplerChannel));      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
1530      pEngine->Reset();      LSCPResultSet result;
1531      return "OK\r\n";      try {
1532            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1533            if (!pSamplerChannel) throw LinuxSamplerException("Invalid sampler channel number " + ToString(uiSamplerChannel));
1534            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1535            if (!pEngineChannel) throw LinuxSamplerException("No engine type assigned to sampler channel");
1536            pEngineChannel->Reset();
1537        }
1538        catch (LinuxSamplerException e) {
1539             result.Error(e);
1540        }
1541        return result.Produce();
1542    }
1543    
1544    /**
1545     * Will be called by the parser to reset the whole sampler.
1546     */
1547    String LSCPServer::ResetSampler() {
1548        dmsg(2,("LSCPServer: ResetSampler()\n"));
1549        pSampler->Reset();
1550        LSCPResultSet result;
1551        return result.Produce();
1552    }
1553    
1554    /**
1555     * Will be called by the parser to return general informations about this
1556     * sampler.
1557     */
1558    String LSCPServer::GetServerInfo() {
1559        dmsg(2,("LSCPServer: GetServerInfo()\n"));
1560        LSCPResultSet result;
1561        result.Add("DESCRIPTION", "LinuxSampler - modular, streaming capable sampler");
1562        result.Add("VERSION", VERSION);
1563        result.Add("PROTOCOL_VERSION", "1.0");
1564        return result.Produce();
1565    }
1566    
1567    /**
1568     * Will be called by the parser to return the current number of all active voices.
1569     */
1570    String LSCPServer::GetTotalVoiceCount() {
1571        dmsg(2,("LSCPServer: GetTotalVoiceCount()\n"));
1572        LSCPResultSet result;
1573        result.Add(pSampler->GetVoiceCount());
1574        return result.Produce();
1575    }
1576    
1577    /**
1578     * Will be called by the parser to return the maximum number of voices.
1579     */
1580    String LSCPServer::GetTotalVoiceCountMax() {
1581        dmsg(2,("LSCPServer: GetTotalVoiceCountMax()\n"));
1582        LSCPResultSet result;
1583        result.Add(EngineFactory::EngineInstances().size() * CONFIG_MAX_VOICES);
1584        return result.Produce();
1585  }  }
1586    
1587  /**  /**
1588   * 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
1589   * server for receiving event messages.   * server for receiving event messages.
1590   */   */
1591  String LSCPServer::SubscribeNotification(uint UDPPort) {  String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {
1592      dmsg(2,("LSCPServer: SubscribeNotification(UDPPort=%d)\n", UDPPort));      dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
1593      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
1594        SubscriptionMutex.Lock();
1595        eventSubscriptions[type].push_back(currentSocket);
1596        SubscriptionMutex.Unlock();
1597        return result.Produce();
1598  }  }
1599    
1600  /**  /**
1601   * 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
1602   * for not receiving further event messages.   * for not receiving further event messages.
1603   */   */
1604  String LSCPServer::UnsubscribeNotification(String SessionID) {  String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {
1605      dmsg(2,("LSCPServer: UnsubscribeNotification(SessionID=%s)\n", SessionID.c_str()));      dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
1606      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
1607        SubscriptionMutex.Lock();
1608        eventSubscriptions[type].remove(currentSocket);
1609        SubscriptionMutex.Unlock();
1610        return result.Produce();
1611    }
1612    
1613    static int select_callback(void * lscpResultSet, int argc,
1614                            char **argv, char **azColName)
1615    {
1616        LSCPResultSet* resultSet = (LSCPResultSet*) lscpResultSet;
1617        resultSet->Add(argc, argv);
1618        return 0;
1619    }
1620    
1621    String LSCPServer::QueryDatabase(String query) {
1622        LSCPResultSet result;
1623    #if HAVE_SQLITE3
1624        char* zErrMsg = NULL;
1625        sqlite3 *db;
1626        String selectStr = "SELECT " + query;
1627    
1628        int rc = sqlite3_open("linuxsampler.db", &db);
1629        if (rc == SQLITE_OK)
1630        {
1631                rc = sqlite3_exec(db, selectStr.c_str(), select_callback, &result, &zErrMsg);
1632        }
1633        if ( rc != SQLITE_OK )
1634        {
1635                result.Error(String(zErrMsg), rc);
1636        }
1637        sqlite3_close(db);
1638    #else
1639        result.Error(String("SQLITE3 was not installed when linuxsampler was built. SELECT statement is not available."), 0);
1640    #endif
1641        return result.Produce();
1642    }
1643    
1644    /**
1645     * Will be called by the parser to enable or disable echo mode; if echo
1646     * mode is enabled, all commands from the client will (immediately) be
1647     * echoed back to the client.
1648     */
1649    String LSCPServer::SetEcho(yyparse_param_t* pSession, double boolean_value) {
1650        dmsg(2,("LSCPServer: SetEcho(val=%f)\n", boolean_value));
1651        LSCPResultSet result;
1652        try {
1653            if      (boolean_value == 0) pSession->bVerbose = false;
1654            else if (boolean_value == 1) pSession->bVerbose = true;
1655            else throw LinuxSamplerException("Not a boolean value, must either be 0 or 1");
1656        }
1657        catch (LinuxSamplerException e) {
1658             result.Error(e);
1659        }
1660        return result.Produce();
1661  }  }

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

  ViewVC Help
Powered by ViewVC