/[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 1695 by schoenebeck, Sat Feb 16 01:09:33 2008 UTC revision 2837 by persson, Sun Aug 23 06:14:00 2015 UTC
# Line 3  Line 3 
3   *   LinuxSampler - modular, streaming capable sampler                     *   *   LinuxSampler - modular, streaming capable sampler                     *
4   *                                                                         *   *                                                                         *
5   *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *   *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
6   *   Copyright (C) 2005 - 2008 Christian Schoenebeck                       *   *   Copyright (C) 2005 - 2015 Christian Schoenebeck                       *
7   *                                                                         *   *                                                                         *
8   *   This library 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  *
# Line 21  Line 21 
21   *   MA  02111-1307  USA                                                   *   *   MA  02111-1307  USA                                                   *
22   ***************************************************************************/   ***************************************************************************/
23    
24    #include <algorithm>
25    #include <string>
26    
27    #include "../common/File.h"
28  #include "lscpserver.h"  #include "lscpserver.h"
29  #include "lscpresultset.h"  #include "lscpresultset.h"
30  #include "lscpevent.h"  #include "lscpevent.h"
# Line 39  Line 43 
43  #include "../engines/EngineChannelFactory.h"  #include "../engines/EngineChannelFactory.h"
44  #include "../drivers/audio/AudioOutputDeviceFactory.h"  #include "../drivers/audio/AudioOutputDeviceFactory.h"
45  #include "../drivers/midi/MidiInputDeviceFactory.h"  #include "../drivers/midi/MidiInputDeviceFactory.h"
46    #include "../effects/EffectFactory.h"
47    
48    namespace LinuxSampler {
49    
50    String lscpParserProcessShellInteraction(String& line, yyparse_param_t* param, bool possibilities);
51    
52  /**  /**
53   * Returns a copy of the given string where all special characters are   * Returns a copy of the given string where all special characters are
# Line 91  static String _escapeLscpResponse(String Line 99  static String _escapeLscpResponse(String
99   */   */
100  fd_set LSCPServer::fdSet;  fd_set LSCPServer::fdSet;
101  int LSCPServer::currentSocket = -1;  int LSCPServer::currentSocket = -1;
102  std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();  std::vector<yyparse_param_t> LSCPServer::Sessions;
103  std::vector<yyparse_param_t>::iterator itCurrentSession = std::vector<yyparse_param_t>::iterator();  std::vector<yyparse_param_t>::iterator itCurrentSession;
104  std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();  std::map<int,String> LSCPServer::bufferedNotifies;
105  std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();  std::map<int,String> LSCPServer::bufferedCommands;
106  std::map< LSCPEvent::event_t, std::list<int> > LSCPServer::eventSubscriptions = std::map< LSCPEvent::event_t, std::list<int> >();  std::map< LSCPEvent::event_t, std::list<int> > LSCPServer::eventSubscriptions;
107  Mutex LSCPServer::NotifyMutex = Mutex();  Mutex LSCPServer::NotifyMutex;
108  Mutex LSCPServer::NotifyBufferMutex = Mutex();  Mutex LSCPServer::NotifyBufferMutex;
109  Mutex LSCPServer::SubscriptionMutex = Mutex();  Mutex LSCPServer::SubscriptionMutex;
110  Mutex LSCPServer::RTNotifyMutex = Mutex();  Mutex LSCPServer::RTNotifyMutex;
111    
112  LSCPServer::LSCPServer(Sampler* pSampler, long int addr, short int port) : Thread(true, false, 0, -4), eventHandler(this) {  LSCPServer::LSCPServer(Sampler* pSampler, long int addr, short int port) : Thread(true, false, 0, -4), eventHandler(this) {
113      SocketAddress.sin_family      = AF_INET;      SocketAddress.sin_family      = AF_INET;
# Line 132  LSCPServer::LSCPServer(Sampler* pSampler Line 140  LSCPServer::LSCPServer(Sampler* pSampler
140      LSCPEvent::RegisterEvent(LSCPEvent::event_global_info, "GLOBAL_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_global_info, "GLOBAL_INFO");
141      LSCPEvent::RegisterEvent(LSCPEvent::event_channel_midi, "CHANNEL_MIDI");      LSCPEvent::RegisterEvent(LSCPEvent::event_channel_midi, "CHANNEL_MIDI");
142      LSCPEvent::RegisterEvent(LSCPEvent::event_device_midi, "DEVICE_MIDI");      LSCPEvent::RegisterEvent(LSCPEvent::event_device_midi, "DEVICE_MIDI");
143        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_instance_count, "EFFECT_INSTANCE_COUNT");
144        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_instance_info, "EFFECT_INSTANCE_INFO");
145        LSCPEvent::RegisterEvent(LSCPEvent::event_send_fx_chain_count, "SEND_EFFECT_CHAIN_COUNT");
146        LSCPEvent::RegisterEvent(LSCPEvent::event_send_fx_chain_info, "SEND_EFFECT_CHAIN_INFO");
147      hSocket = -1;      hSocket = -1;
148  }  }
149    
150  LSCPServer::~LSCPServer() {  LSCPServer::~LSCPServer() {
151        CloseAllConnections();
152        InstrumentManager::StopBackgroundThread();
153  #if defined(WIN32)  #if defined(WIN32)
154      if (hSocket >= 0) closesocket(hSocket);      if (hSocket >= 0) closesocket(hSocket);
155  #else  #else
# Line 330  void LSCPServer::DbInstrumentsEventHandl Line 344  void LSCPServer::DbInstrumentsEventHandl
344  }  }
345  #endif // HAVE_SQLITE3  #endif // HAVE_SQLITE3
346    
347    void LSCPServer::RemoveListeners() {
348        pSampler->RemoveChannelCountListener(&eventHandler);
349        pSampler->RemoveAudioDeviceCountListener(&eventHandler);
350        pSampler->RemoveMidiDeviceCountListener(&eventHandler);
351        pSampler->RemoveVoiceCountListener(&eventHandler);
352        pSampler->RemoveStreamCountListener(&eventHandler);
353        pSampler->RemoveBufferFillListener(&eventHandler);
354        pSampler->RemoveTotalStreamCountListener(&eventHandler);
355        pSampler->RemoveTotalVoiceCountListener(&eventHandler);
356        pSampler->RemoveFxSendCountListener(&eventHandler);
357        MidiInstrumentMapper::RemoveMidiInstrumentCountListener(&eventHandler);
358        MidiInstrumentMapper::RemoveMidiInstrumentInfoListener(&eventHandler);
359        MidiInstrumentMapper::RemoveMidiInstrumentMapCountListener(&eventHandler);
360        MidiInstrumentMapper::RemoveMidiInstrumentMapInfoListener(&eventHandler);
361    #if HAVE_SQLITE3
362        InstrumentsDb::GetInstrumentsDb()->RemoveInstrumentsDbListener(&dbInstrumentsEventHandler);
363    #endif
364    }
365    
366  /**  /**
367   * Blocks the calling thread until the LSCP Server is initialized and   * Blocks the calling thread until the LSCP Server is initialized and
# Line 417  int LSCPServer::Main() { Line 449  int LSCPServer::Main() {
449          #endif          #endif
450          // check if some engine channel's parameter / status changed, if so notify the respective LSCP event subscribers          // check if some engine channel's parameter / status changed, if so notify the respective LSCP event subscribers
451          {          {
452                LockGuard lock(EngineChannelFactory::EngineChannelsMutex);
453              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
454              std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();              std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
455              std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();              std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
456              for (; itEngineChannel != itEnd; ++itEngineChannel) {              for (; itEngineChannel != itEnd; ++itEngineChannel) {
457                  if ((*itEngineChannel)->StatusChanged()) {                  if ((*itEngineChannel)->StatusChanged()) {
458                      SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->iSamplerChannelIndex));                      SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->GetSamplerChannel()->Index()));
459                  }                  }
460    
461                  for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {                  for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
462                      FxSend* fxs = (*itEngineChannel)->GetFxSend(i);                      FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
463                      if(fxs != NULL && fxs->IsInfoChanged()) {                      if(fxs != NULL && fxs->IsInfoChanged()) {
464                          int chn = (*itEngineChannel)->iSamplerChannelIndex;                          int chn = (*itEngineChannel)->GetSamplerChannel()->Index();
465                          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, chn, fxs->Id()));                          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, chn, fxs->Id()));
466                          fxs->SetInfoChanged(false);                          fxs->SetInfoChanged(false);
467                      }                      }
# Line 485  int LSCPServer::Main() { Line 518  int LSCPServer::Main() {
518              }              }
519          }          }
520    
521          //Now let's deliver late notifies (if any)          //Now let's deliver late notifies (if any)
522          NotifyBufferMutex.Lock();          {
523          for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {              LockGuard lock(NotifyBufferMutex);
524                for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {
525  #ifdef MSG_NOSIGNAL  #ifdef MSG_NOSIGNAL
526                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), MSG_NOSIGNAL);                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), MSG_NOSIGNAL);
527  #else  #else
528                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);
529  #endif  #endif
530          }              }
531          bufferedNotifies.clear();              bufferedNotifies.clear();
532          NotifyBufferMutex.Unlock();          }
533    
534          fd_set selectSet = fdSet;          fd_set selectSet = fdSet;
535          timeout.tv_sec  = 0;          timeout.tv_sec  = 0;
# Line 503  int LSCPServer::Main() { Line 537  int LSCPServer::Main() {
537    
538          int retval = select(maxSessions+1, &selectSet, NULL, NULL, &timeout);          int retval = select(maxSessions+1, &selectSet, NULL, NULL, &timeout);
539    
540          if (retval == 0)          if (retval == 0 || (retval == -1 && errno == EINTR))
541                  continue; //Nothing try again                  continue; //Nothing try again
542          if (retval == -1) {          if (retval == -1) {
543                  std::cerr << "LSCPServer: Socket select error." << std::endl;                  std::cerr << "LSCPServer: Socket select error." << std::endl;
# Line 530  int LSCPServer::Main() { Line 564  int LSCPServer::Main() {
564                    exit(EXIT_FAILURE);                    exit(EXIT_FAILURE);
565                  }                  }
566          #else          #else
567                    struct linger linger;
568                    linger.l_onoff = 1;
569                    linger.l_linger = 0;
570                    if(setsockopt(socket, SOL_SOCKET, SO_LINGER, &linger, sizeof(linger))) {
571                        std::cerr << "LSCPServer: Failed to set SO_LINGER\n";
572                    }
573    
574                  if (fcntl(socket, F_SETFL, O_NONBLOCK)) {                  if (fcntl(socket, F_SETFL, O_NONBLOCK)) {
575                          std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;                          std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;
576                          exit(EXIT_FAILURE);                          exit(EXIT_FAILURE);
# Line 553  int LSCPServer::Main() { Line 594  int LSCPServer::Main() {
594          //Something was selected and it was not the hSocket, so it must be some command(s) coming.          //Something was selected and it was not the hSocket, so it must be some command(s) coming.
595          for (std::vector<yyparse_param_t>::iterator iter = Sessions.begin(); iter != Sessions.end(); iter++) {          for (std::vector<yyparse_param_t>::iterator iter = Sessions.begin(); iter != Sessions.end(); iter++) {
596                  if (FD_ISSET((*iter).hSession, &selectSet)) {   //Was it this socket?                  if (FD_ISSET((*iter).hSession, &selectSet)) {   //Was it this socket?
597                            currentSocket = (*iter).hSession;  //a hack
598                          if (GetLSCPCommand(iter)) {     //Have we read the entire command?                          if (GetLSCPCommand(iter)) {     //Have we read the entire command?
599                                  dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket));                                  dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket));
600                                  int dummy; // just a temporary hack to fulfill the restart() function prototype                                  int dummy; // just a temporary hack to fulfill the restart() function prototype
601                                  restart(NULL, dummy); // restart the 'scanner'                                  restart(NULL, dummy); // restart the 'scanner'
                                 currentSocket = (*iter).hSession;  //a hack  
602                                  itCurrentSession = iter; // another hack                                  itCurrentSession = iter; // another hack
603                                  dmsg(2,("LSCPServer: [%s]\n",bufferedCommands[currentSocket].c_str()));                                  dmsg(2,("LSCPServer: [%s]\n",bufferedCommands[currentSocket].c_str()));
604                                  if ((*iter).bVerbose) { // if echo mode enabled                                  if ((*iter).bVerbose) { // if echo mode enabled
# Line 571  int LSCPServer::Main() { Line 612  int LSCPServer::Main() {
612                                          CloseConnection(iter);                                          CloseConnection(iter);
613                                  }                                  }
614                          }                          }
615                            currentSocket = -1;     //continuation of a hack
616                          //socket may have been closed, iter may be invalid, get out of the loop for now.                          //socket may have been closed, iter may be invalid, get out of the loop for now.
617                          //we'll be back if there is data.                          //we'll be back if there is data.
618                          break;                          break;
# Line 585  void LSCPServer::CloseConnection( std::v Line 627  void LSCPServer::CloseConnection( std::v
627          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));
628          Sessions.erase(iter);          Sessions.erase(iter);
629          FD_CLR(socket,  &fdSet);          FD_CLR(socket,  &fdSet);
630          SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any)          {
631          for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {              LockGuard lock(SubscriptionMutex);
632                  iter->second.remove(socket);              // Must unsubscribe this socket from all events (if any)
633          }              for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {
634          SubscriptionMutex.Unlock();                  iter->second.remove(socket);
635          NotifyMutex.Lock();              }
636            }
637            LockGuard lock(NotifyMutex);
638          bufferedCommands.erase(socket);          bufferedCommands.erase(socket);
639          bufferedNotifies.erase(socket);          bufferedNotifies.erase(socket);
640          #if defined(WIN32)          #if defined(WIN32)
# Line 598  void LSCPServer::CloseConnection( std::v Line 642  void LSCPServer::CloseConnection( std::v
642          #else          #else
643          close(socket);          close(socket);
644          #endif          #endif
         NotifyMutex.Unlock();  
645  }  }
646    
647  void LSCPServer::LockRTNotify() {  void LSCPServer::CloseAllConnections() {
648      RTNotifyMutex.Lock();      std::vector<yyparse_param_t>::iterator iter = Sessions.begin();
649  }      while(iter != Sessions.end()) {
650            CloseConnection(iter);
651  void LSCPServer::UnlockRTNotify() {          iter = Sessions.begin();
652      RTNotifyMutex.Unlock();      }
653  }  }
654    
655  int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {  int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {
656          int subs = 0;          int subs = 0;
657          SubscriptionMutex.Lock();          LockGuard lock(SubscriptionMutex);
658          for( std::list<LSCPEvent::event_t>::iterator iter = events.begin();          for( std::list<LSCPEvent::event_t>::iterator iter = events.begin();
659                          iter != events.end(); iter++)                          iter != events.end(); iter++)
660          {          {
661                  subs += eventSubscriptions.count(*iter);                  subs += eventSubscriptions.count(*iter);
662          }          }
         SubscriptionMutex.Unlock();  
663          return subs;          return subs;
664  }  }
665    
666  void LSCPServer::SendLSCPNotify( LSCPEvent event ) {  void LSCPServer::SendLSCPNotify( LSCPEvent event ) {
667          SubscriptionMutex.Lock();          LockGuard lock(SubscriptionMutex);
668          if (eventSubscriptions.count(event.GetType()) == 0) {          if (eventSubscriptions.count(event.GetType()) == 0) {
669                  SubscriptionMutex.Unlock();     //Nobody is subscribed to this event                  // Nobody is subscribed to this event
670                  return;                  return;
671          }          }
672          std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();          std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();
# Line 650  void LSCPServer::SendLSCPNotify( LSCPEve Line 692  void LSCPServer::SendLSCPNotify( LSCPEve
692                          }                          }
693                  }                  }
694          }          }
         SubscriptionMutex.Unlock();  
695  }  }
696    
697  extern int GetLSCPCommand( void *buf, int max_size ) {  extern int GetLSCPCommand( void *buf, int max_size ) {
# Line 675  extern yyparse_param_t* GetCurrentYaccSe Line 716  extern yyparse_param_t* GetCurrentYaccSe
716  }  }
717    
718  /**  /**
719     * Generate the relevant LSCP documentation reference section if necessary.
720     * The documentation section for the currently active command on the LSCP
721     * shell's command line will be encoded in a special format, specifically for
722     * the LSCP shell application.
723     *
724     * @param line - current LSCP command line
725     * @param param - reentrant Bison parser parameters
726     *
727     * @return encoded reference string or empty string if nothing shall be sent
728     *         to LSCP shell (client) at this point
729     */
730    String LSCPServer::generateLSCPDocReply(const String& line, yyparse_param_t* param) {
731        String result;
732        lscp_ref_entry_t* ref = lscp_reference_for_command(line.c_str());
733        // Pointer comparison works here, since the function above always
734        // returns the same constant pointer for the respective LSCP
735        // command ... Only send the LSCP reference section to the client if
736        // another LSCP reference section became relevant now:
737        if (ref != param->pLSCPDocRef) {
738            param->pLSCPDocRef = ref;
739            if (ref) { // send a new LSCP doc section to client ...
740                result += "SHD:" + ToString(LSCP_SHD_MATCH) + ":" + String(ref->name) + "\n";
741                result += String(ref->section) + "\n";
742                result += "."; // dot line marks the end of the text for client
743            } else { // inform client that no LSCP doc section matches right now ...
744                result = "SHD:" + ToString(LSCP_SHD_NO_MATCH);
745            }
746        }
747        dmsg(4,("LSCP doc reply -> '%s'\n", result.c_str()));
748        return result;
749    }
750    
751    /**
752   * Will be called to try to read the command from the socket   * Will be called to try to read the command from the socket
753   * If command is read, it will return true. Otherwise false is returned.   * If command is read, it will return true. Otherwise false is returned.
754   * In any case the received portion (complete or incomplete) is saved into bufferedCommand map.   * In any case the received portion (complete or incomplete) is saved into bufferedCommand map.
755   */   */
756  bool LSCPServer::GetLSCPCommand( std::vector<yyparse_param_t>::iterator iter ) {  bool LSCPServer::GetLSCPCommand( std::vector<yyparse_param_t>::iterator iter ) {
757          int socket = (*iter).hSession;          int socket = (*iter).hSession;
758            int result;
759          char c;          char c;
760          int i = 0;          std::vector<char> input;
761    
762            // first get as many character as possible and add it to the 'input' buffer
763          while (true) {          while (true) {
764                  #if defined(WIN32)                  #if defined(WIN32)
765                  int result = recv(socket, (char *)&c, 1, 0); //Read one character at a time for now                  result = recv(socket, (char *)&c, 1, 0); //Read one character at a time for now
766                  #else                  #else
767                  int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now                  result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now
768                  #endif                  #endif
769                  if (result == 0) { //socket was selected, so 0 here means client has closed the connection                  if (result == 1) input.push_back(c);
770                          CloseConnection(iter);                  else break; // end of input or some error
771                          break;                  if (c == '\n') break; // process line by line
772            }
773    
774            // process input buffer
775            for (int i = 0; i < input.size(); ++i) {
776                    c = input[i];
777                    if (c == '\r') continue; //Ignore CR
778                    if (c == '\n') {
779                            // only if the other side is the LSCP shell application:
780                            // check the current (incomplete) command line for syntax errors,
781                            // possible completions and report everything back to the shell
782                            if ((*iter).bShellInteract || (*iter).bShellAutoCorrect) {
783                                    String s = lscpParserProcessShellInteraction(bufferedCommands[socket], &(*iter), false);
784                                    if (!s.empty() && (*iter).bShellInteract) AnswerClient(s + "\n");
785                            }
786                            // if other side is LSCP shell application, send the relevant LSCP
787                            // documentation section of the current command line (if necessary)
788                            if ((*iter).bShellSendLSCPDoc && (*iter).bShellInteract) {
789                                    String s = generateLSCPDocReply(bufferedCommands[socket], &(*iter));
790                                    if (!s.empty()) AnswerClient(s + "\n");
791                            }
792                            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket));
793                            bufferedCommands[socket] += "\r\n";
794                            return true; //Complete command was read
795                    } else if (c == 2) { // custom ASCII code usage for moving cursor left (LSCP shell)
796                            if (iter->iCursorOffset + bufferedCommands[socket].size() > 0)
797                                    iter->iCursorOffset--;
798                    } else if (c == 3) { // custom ASCII code usage for moving cursor right (LSCP shell)
799                            if (iter->iCursorOffset < 0) iter->iCursorOffset++;
800                    } else {
801                            size_t cursorPos = bufferedCommands[socket].size() + iter->iCursorOffset;
802                            // backspace character - should only happen with shell
803                            if (c == '\b') {
804                                    if (!bufferedCommands[socket].empty() && cursorPos > 0)
805                                            bufferedCommands[socket].erase(cursorPos - 1, 1);
806                            } else { // append (or insert) new character (at current cursor position) ...
807                                    if (cursorPos >= 0)
808                                            bufferedCommands[socket].insert(cursorPos, String(1,c)); // insert
809                                    else
810                                            bufferedCommands[socket] += c; // append
811                            }
812                  }                  }
813                  if (result == 1) {                  // Only if the other side (client) is the LSCP shell application:
814                          if (c == '\r')                  // The following block takes care about automatic correction, auto
815                                  continue; //Ignore CR                  // completion (and suggestions), LSCP reference documentation, etc.
816                          if (c == '\n') {                  // The "if" statement here is for optimization reasons, so that the
817                                  LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket));                  // heavy LSCP grammar evaluation algorithm is only executed once for an
818                                  bufferedCommands[socket] += "\r\n";                  // entire command line received.
819                                  return true; //Complete command was read                  if (i == input.size() - 1) {
820                            // check the current (incomplete) command line for syntax errors,
821                            // possible completions and report everything back to the shell
822                            if ((*iter).bShellInteract || (*iter).bShellAutoCorrect) {
823                                    String s = lscpParserProcessShellInteraction(bufferedCommands[socket], &(*iter), true);
824                                    if (!s.empty() && (*iter).bShellInteract && i == input.size() - 1)
825                                            AnswerClient(s + "\n");
826                            }
827                            // if other side is LSCP shell application, send the relevant LSCP
828                            // documentation section of the current command line (if necessary)
829                            if ((*iter).bShellSendLSCPDoc && (*iter).bShellInteract) {
830                                    String s = generateLSCPDocReply(bufferedCommands[socket], &(*iter));
831                                    if (!s.empty()) AnswerClient(s + "\n");
832                          }                          }
                         bufferedCommands[socket] += c;  
833                  }                  }
834                  #if defined(WIN32)          }
835                  if (result == SOCKET_ERROR) {  
836                      int wsa_lasterror = WSAGetLastError();          // handle network errors ...
837                          if (wsa_lasterror == WSAEWOULDBLOCK) //Would block, try again later.          if (result == 0) { //socket was selected, so 0 here means client has closed the connection
838                    CloseConnection(iter);
839                    return false;
840            }
841            #if defined(WIN32)
842            if (result == SOCKET_ERROR) {
843                    int wsa_lasterror = WSAGetLastError();
844                    if (wsa_lasterror == WSAEWOULDBLOCK) //Would block, try again later.
845                            return false;
846                    dmsg(2,("LSCPScanner: Socket error after recv() Error %d.\n", wsa_lasterror));
847                    CloseConnection(iter);
848                    return false;
849            }
850            #else
851            if (result == -1) {
852                    if (errno == EAGAIN) //Would block, try again later.
853                            return false;
854                    switch(errno) {
855                            case EBADF:
856                                    dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n"));
857                                  return false;                                  return false;
858                          dmsg(2,("LSCPScanner: Socket error after recv() Error %d.\n", wsa_lasterror));                          case ECONNREFUSED:
859                          CloseConnection(iter);                                  dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n"));
860                          break;                                  return false;
861                  }                          case ENOTCONN:
862                  #else                                  dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n"));
863                  if (result == -1) {                                  return false;
864                          if (errno == EAGAIN) //Would block, try again later.                          case ENOTSOCK:
865                                    dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n"));
866                                    return false;
867                            case EAGAIN:
868                                    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"));
869                                    return false;
870                            case EINTR:
871                                    dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n"));
872                                    return false;
873                            case EFAULT:
874                                    dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n"));
875                                    return false;
876                            case EINVAL:
877                                    dmsg(2,("LSCPScanner: Invalid argument passed.\n"));
878                                    return false;
879                            case ENOMEM:
880                                    dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n"));
881                                    return false;
882                            default:
883                                    dmsg(2,("LSCPScanner: Unknown recv() error.\n"));
884                                  return false;                                  return false;
                         switch(errno) {  
                                 case EBADF:  
                                         dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n"));  
                                         break;  
                                 case ECONNREFUSED:  
                                         dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n"));  
                                         break;  
                                 case ENOTCONN:  
                                         dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n"));  
                                         break;  
                                 case ENOTSOCK:  
                                         dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n"));  
                                         break;  
                                 case EAGAIN:  
                                         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"));  
                                         break;  
                                 case EINTR:  
                                         dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n"));  
                                         break;  
                                 case EFAULT:  
                                         dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n"));  
                                         break;  
                                 case EINVAL:  
                                         dmsg(2,("LSCPScanner: Invalid argument passed.\n"));  
                                         break;  
                                 case ENOMEM:  
                                         dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n"));  
                                         break;  
                                 default:  
                                         dmsg(2,("LSCPScanner: Unknown recv() error.\n"));  
                                         break;  
                         }  
                         CloseConnection(iter);  
                         break;  
885                  }                  }
886                  #endif                  CloseConnection(iter);
887                    return false;
888          }          }
889            #endif
890    
891          return false;          return false;
892  }  }
893    
# Line 763  bool LSCPServer::GetLSCPCommand( std::ve Line 898  bool LSCPServer::GetLSCPCommand( std::ve
898   * @param ReturnMessage - message that will be send to the client   * @param ReturnMessage - message that will be send to the client
899   */   */
900  void LSCPServer::AnswerClient(String ReturnMessage) {  void LSCPServer::AnswerClient(String ReturnMessage) {
901      dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));      dmsg(2,("LSCPServer::AnswerClient(ReturnMessage='%s')", ReturnMessage.c_str()));
902      if (currentSocket != -1) {      if (currentSocket != -1) {
903              NotifyMutex.Lock();              LockGuard lock(NotifyMutex);
904    
905            // just if other side is LSCP shell: in case respose is a multi-line
906            // one, then inform client about it before sending the actual mult-line
907            // response
908            if (GetCurrentYaccSession()->bShellInteract) {
909                // check if this is a multi-line response
910                int n = 0;
911                for (int i = 0; i < ReturnMessage.size(); ++i)
912                    if (ReturnMessage[i] == '\n') ++n;
913                if (n >= 2) {
914                    dmsg(2,("LSCP Shell <- expect mult-line response\n"));
915                    String s = LSCP_SHK_EXPECT_MULTI_LINE "\r\n";
916    #ifdef MSG_NOSIGNAL
917                    send(currentSocket, s.c_str(), s.size(), MSG_NOSIGNAL);
918    #else
919                    send(currentSocket, s.c_str(), s.size(), 0);
920    #endif                
921                }
922            }
923    
924  #ifdef MSG_NOSIGNAL  #ifdef MSG_NOSIGNAL
925              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), MSG_NOSIGNAL);              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), MSG_NOSIGNAL);
926  #else  #else
927              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);
928  #endif  #endif
             NotifyMutex.Unlock();  
929      }      }
930  }  }
931    
# Line 921  String LSCPServer::SetEngineType(String Line 1075  String LSCPServer::SetEngineType(String
1075      try {      try {
1076          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1077          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1078          LockRTNotify();          LockGuard lock(RTNotifyMutex);
1079          pSamplerChannel->SetEngineType(EngineName);          pSamplerChannel->SetEngineType(EngineName);
1080          if(HasSoloChannel()) pSamplerChannel->GetEngineChannel()->SetMute(-1);          if(HasSoloChannel()) pSamplerChannel->GetEngineChannel()->SetMute(-1);
         UnlockRTNotify();  
1081      }      }
1082      catch (Exception e) {      catch (Exception e) {
1083           result.Error(e);           result.Error(e);
# Line 964  String LSCPServer::ListChannels() { Line 1117  String LSCPServer::ListChannels() {
1117   */   */
1118  String LSCPServer::AddChannel() {  String LSCPServer::AddChannel() {
1119      dmsg(2,("LSCPServer: AddChannel()\n"));      dmsg(2,("LSCPServer: AddChannel()\n"));
1120      LockRTNotify();      SamplerChannel* pSamplerChannel;
1121      SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();      {
1122      UnlockRTNotify();          LockGuard lock(RTNotifyMutex);
1123            pSamplerChannel = pSampler->AddSamplerChannel();
1124        }
1125      LSCPResultSet result(pSamplerChannel->Index());      LSCPResultSet result(pSamplerChannel->Index());
1126      return result.Produce();      return result.Produce();
1127  }  }
# Line 977  String LSCPServer::AddChannel() { Line 1132  String LSCPServer::AddChannel() {
1132  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
1133      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
1134      LSCPResultSet result;      LSCPResultSet result;
1135      LockRTNotify();      {
1136      pSampler->RemoveSamplerChannel(uiSamplerChannel);          LockGuard lock(RTNotifyMutex);
1137      UnlockRTNotify();          pSampler->RemoveSamplerChannel(uiSamplerChannel);
1138        }
1139      return result.Produce();      return result.Produce();
1140  }  }
1141    
# Line 1022  String LSCPServer::ListAvailableEngines( Line 1178  String LSCPServer::ListAvailableEngines(
1178  String LSCPServer::GetEngineInfo(String EngineName) {  String LSCPServer::GetEngineInfo(String EngineName) {
1179      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
1180      LSCPResultSet result;      LSCPResultSet result;
1181      LockRTNotify();      {
1182      try {          LockGuard lock(RTNotifyMutex);
1183          Engine* pEngine = EngineFactory::Create(EngineName);          try {
1184          result.Add("DESCRIPTION", _escapeLscpResponse(pEngine->Description()));              Engine* pEngine = EngineFactory::Create(EngineName);
1185          result.Add("VERSION",     pEngine->Version());              result.Add("DESCRIPTION", _escapeLscpResponse(pEngine->Description()));
1186          EngineFactory::Destroy(pEngine);              result.Add("VERSION",     pEngine->Version());
1187      }              EngineFactory::Destroy(pEngine);
1188      catch (Exception e) {          }
1189           result.Error(e);          catch (Exception e) {
1190                result.Error(e);
1191            }
1192      }      }
     UnlockRTNotify();  
1193      return result.Produce();      return result.Produce();
1194  }  }
1195    
# Line 1131  String LSCPServer::GetVoiceCount(uint ui Line 1288  String LSCPServer::GetVoiceCount(uint ui
1288      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
1289      LSCPResultSet result;      LSCPResultSet result;
1290      try {      try {
1291          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine loaded on sampler channel");  
1292          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");
1293          result.Add(pEngineChannel->GetEngine()->VoiceCount());          result.Add(pEngineChannel->GetEngine()->VoiceCount());
1294      }      }
# Line 1152  String LSCPServer::GetStreamCount(uint u Line 1306  String LSCPServer::GetStreamCount(uint u
1306      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
1307      LSCPResultSet result;      LSCPResultSet result;
1308      try {      try {
1309          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
1310          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");
1311          result.Add(pEngineChannel->GetEngine()->DiskStreamCount());          result.Add(pEngineChannel->GetEngine()->DiskStreamCount());
1312      }      }
# Line 1173  String LSCPServer::GetBufferFill(fill_re Line 1324  String LSCPServer::GetBufferFill(fill_re
1324      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
1325      LSCPResultSet result;      LSCPResultSet result;
1326      try {      try {
1327          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
1328          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");
1329          if (!pEngineChannel->GetEngine()->DiskStreamSupported()) result.Add("NA");          if (!pEngineChannel->GetEngine()->DiskStreamSupported()) result.Add("NA");
1330          else {          else {
# Line 1264  String LSCPServer::GetMidiInputDriverInf Line 1412  String LSCPServer::GetMidiInputDriverInf
1412              for (;iter != parameters.end(); iter++) {              for (;iter != parameters.end(); iter++) {
1413                  if (s != "") s += ",";                  if (s != "") s += ",";
1414                  s += iter->first;                  s += iter->first;
1415                    delete iter->second;
1416              }              }
1417              result.Add("PARAMETERS", s);              result.Add("PARAMETERS", s);
1418          }          }
# Line 1288  String LSCPServer::GetAudioOutputDriverI Line 1437  String LSCPServer::GetAudioOutputDriverI
1437              for (;iter != parameters.end(); iter++) {              for (;iter != parameters.end(); iter++) {
1438                  if (s != "") s += ",";                  if (s != "") s += ",";
1439                  s += iter->first;                  s += iter->first;
1440                    delete iter->second;
1441              }              }
1442              result.Add("PARAMETERS", s);              result.Add("PARAMETERS", s);
1443          }          }
# Line 1299  String LSCPServer::GetAudioOutputDriverI Line 1449  String LSCPServer::GetAudioOutputDriverI
1449  }  }
1450    
1451  String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {  String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
1452      dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),DependencyList.size()));      dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),int(DependencyList.size())));
1453      LSCPResultSet result;      LSCPResultSet result;
1454      try {      try {
1455          DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter);          DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter);
# Line 1318  String LSCPServer::GetMidiInputDriverPar Line 1468  String LSCPServer::GetMidiInputDriverPar
1468          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
1469          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
1470          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
1471            delete pParameter;
1472      }      }
1473      catch (Exception e) {      catch (Exception e) {
1474          result.Error(e);          result.Error(e);
# Line 1326  String LSCPServer::GetMidiInputDriverPar Line 1477  String LSCPServer::GetMidiInputDriverPar
1477  }  }
1478    
1479  String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {  String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
1480      dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),DependencyList.size()));      dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),int(DependencyList.size())));
1481      LSCPResultSet result;      LSCPResultSet result;
1482      try {      try {
1483          DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter);          DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter);
# Line 1345  String LSCPServer::GetAudioOutputDriverP Line 1496  String LSCPServer::GetAudioOutputDriverP
1496          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
1497          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
1498          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
1499            delete pParameter;
1500      }      }
1501      catch (Exception e) {      catch (Exception e) {
1502          result.Error(e);          result.Error(e);
# Line 1482  String LSCPServer::GetMidiInputPortInfo( Line 1634  String LSCPServer::GetMidiInputPortInfo(
1634  }  }
1635    
1636  String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) {  String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) {
1637      dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%d,ChannelId)\n",DeviceId,ChannelId));      dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%u,ChannelId=%u)\n",DeviceId,ChannelId));
1638      LSCPResultSet result;      LSCPResultSet result;
1639      try {      try {
1640          // get audio output device          // get audio output device
# Line 1686  String LSCPServer::SetAudioOutputChannel Line 1838  String LSCPServer::SetAudioOutputChannel
1838  String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {  String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {
1839      dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));      dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));
1840      LSCPResultSet result;      LSCPResultSet result;
1841      LockRTNotify();      {
1842            LockGuard lock(RTNotifyMutex);
1843            try {
1844                SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1845                if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1846                std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1847                if (!devices.count(AudioDeviceId)) throw Exception("There is no audio output device with index " + ToString(AudioDeviceId));
1848                AudioOutputDevice* pDevice = devices[AudioDeviceId];
1849                pSamplerChannel->SetAudioOutputDevice(pDevice);
1850            }
1851            catch (Exception e) {
1852                result.Error(e);
1853            }
1854        }
1855        return result.Produce();
1856    }
1857    
1858    String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {
1859        dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));
1860        LSCPResultSet result;
1861        {
1862            LockGuard lock(RTNotifyMutex);
1863            try {
1864                SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1865                if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1866                // Driver type name aliasing...
1867                if (AudioOutputDriver == "Alsa") AudioOutputDriver = "ALSA";
1868                if (AudioOutputDriver == "Jack") AudioOutputDriver = "JACK";
1869                // Check if there's one audio output device already created
1870                // for the intended audio driver type (AudioOutputDriver)...
1871                AudioOutputDevice *pDevice = NULL;
1872                std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1873                std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1874                for (; iter != devices.end(); iter++) {
1875                    if ((iter->second)->Driver() == AudioOutputDriver) {
1876                        pDevice = iter->second;
1877                        break;
1878                    }
1879                }
1880                // If it doesn't exist, create a new one with default parameters...
1881                if (pDevice == NULL) {
1882                    std::map<String,String> params;
1883                    pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);
1884                }
1885                // Must have a device...
1886                if (pDevice == NULL)
1887                    throw Exception("Internal error: could not create audio output device.");
1888                // Set it as the current channel device...
1889                pSamplerChannel->SetAudioOutputDevice(pDevice);
1890            }
1891            catch (Exception e) {
1892                result.Error(e);
1893            }
1894        }
1895        return result.Produce();
1896    }
1897    
1898    String LSCPServer::AddChannelMidiInput(uint uiSamplerChannel, uint MIDIDeviceId, uint MIDIPort) {
1899        dmsg(2,("LSCPServer: AddChannelMidiInput(uiSamplerChannel=%d, MIDIDeviceId=%d, MIDIPort=%d)\n",uiSamplerChannel,MIDIDeviceId,MIDIPort));
1900        LSCPResultSet result;
1901      try {      try {
1902          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1903          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1904          std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();  
1905          if (!devices.count(AudioDeviceId)) throw Exception("There is no audio output device with index " + ToString(AudioDeviceId));          std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1906          AudioOutputDevice* pDevice = devices[AudioDeviceId];          if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1907          pSamplerChannel->SetAudioOutputDevice(pDevice);          MidiInputDevice* pDevice = devices[MIDIDeviceId];
1908    
1909            MidiInputPort* pPort = pDevice->GetPort(MIDIPort);
1910            if (!pPort) throw Exception("There is no MIDI input port with index " + ToString(MIDIPort) + " on MIDI input device with index " + ToString(MIDIDeviceId));
1911    
1912            pSamplerChannel->Connect(pPort);
1913        } catch (Exception e) {
1914            result.Error(e);
1915      }      }
1916      catch (Exception e) {      return result.Produce();
1917           result.Error(e);  }
1918    
1919    String LSCPServer::RemoveChannelMidiInput(uint uiSamplerChannel) {
1920        dmsg(2,("LSCPServer: RemoveChannelMidiInput(uiSamplerChannel=%d)\n",uiSamplerChannel));
1921        LSCPResultSet result;
1922        try {
1923            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1924            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1925            pSamplerChannel->DisconnectAllMidiInputPorts();
1926        } catch (Exception e) {
1927            result.Error(e);
1928      }      }
     UnlockRTNotify();  
1929      return result.Produce();      return result.Produce();
1930  }  }
1931    
1932  String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {  String LSCPServer::RemoveChannelMidiInput(uint uiSamplerChannel, uint MIDIDeviceId) {
1933      dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));      dmsg(2,("LSCPServer: RemoveChannelMidiInput(uiSamplerChannel=%d, MIDIDeviceId=%d)\n",uiSamplerChannel,MIDIDeviceId));
1934      LSCPResultSet result;      LSCPResultSet result;
     LockRTNotify();  
1935      try {      try {
1936          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1937          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1938          // Driver type name aliasing...  
1939          if (AudioOutputDriver == "Alsa") AudioOutputDriver = "ALSA";          std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1940          if (AudioOutputDriver == "Jack") AudioOutputDriver = "JACK";          if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1941          // Check if there's one audio output device already created          MidiInputDevice* pDevice = devices[MIDIDeviceId];
1942          // for the intended audio driver type (AudioOutputDriver)...          
1943          AudioOutputDevice *pDevice = NULL;          std::vector<MidiInputPort*> vPorts = pSamplerChannel->GetMidiInputPorts();
1944          std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();          for (int i = 0; i < vPorts.size(); ++i)
1945          std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();              if (vPorts[i]->GetDevice() == pDevice)
1946          for (; iter != devices.end(); iter++) {                  pSamplerChannel->Disconnect(vPorts[i]);
1947              if ((iter->second)->Driver() == AudioOutputDriver) {  
1948                  pDevice = iter->second;      } catch (Exception e) {
1949                  break;          result.Error(e);
             }  
         }  
         // If it doesn't exist, create a new one with default parameters...  
         if (pDevice == NULL) {  
             std::map<String,String> params;  
             pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);  
         }  
         // Must have a device...  
         if (pDevice == NULL)  
             throw Exception("Internal error: could not create audio output device.");  
         // Set it as the current channel device...  
         pSamplerChannel->SetAudioOutputDevice(pDevice);  
1950      }      }
1951      catch (Exception e) {      return result.Produce();
1952           result.Error(e);  }
1953    
1954    String LSCPServer::RemoveChannelMidiInput(uint uiSamplerChannel, uint MIDIDeviceId, uint MIDIPort) {
1955        dmsg(2,("LSCPServer: RemoveChannelMidiInput(uiSamplerChannel=%d, MIDIDeviceId=%d, MIDIPort=%d)\n",uiSamplerChannel,MIDIDeviceId,MIDIPort));
1956        LSCPResultSet result;
1957        try {
1958            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1959            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1960    
1961            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1962            if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1963            MidiInputDevice* pDevice = devices[MIDIDeviceId];
1964    
1965            MidiInputPort* pPort = pDevice->GetPort(MIDIPort);
1966            if (!pPort) throw Exception("There is no MIDI input port with index " + ToString(MIDIPort) + " on MIDI input device with index " + ToString(MIDIDeviceId));
1967    
1968            pSamplerChannel->Disconnect(pPort);
1969        } catch (Exception e) {
1970            result.Error(e);
1971        }
1972        return result.Produce();
1973    }
1974    
1975    String LSCPServer::ListChannelMidiInputs(uint uiSamplerChannel) {
1976        dmsg(2,("LSCPServer: ListChannelMidiInputs(uiSamplerChannel=%d)\n",uiSamplerChannel));
1977        LSCPResultSet result;
1978        try {
1979            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1980            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1981            std::vector<MidiInputPort*> vPorts = pSamplerChannel->GetMidiInputPorts();
1982    
1983            String s;
1984            for (int i = 0; i < vPorts.size(); ++i) {
1985                const int iDeviceID = vPorts[i]->GetDevice()->MidiInputDeviceID();
1986                const int iPortNr   = vPorts[i]->GetPortNumber();
1987                if (s.size()) s += ",";
1988                s += "{" + ToString(iDeviceID) + ","
1989                         + ToString(iPortNr) + "}";
1990            }
1991            result.Add(s);
1992        } catch (Exception e) {
1993            result.Error(e);
1994      }      }
     UnlockRTNotify();  
1995      return result.Produce();      return result.Produce();
1996  }  }
1997    
# Line 1811  String LSCPServer::SetMIDIInputType(Stri Line 2065  String LSCPServer::SetMIDIInputType(Stri
2065              pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);              pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);
2066              // Make it with at least one initial port.              // Make it with at least one initial port.
2067              std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();              std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
             parameters["PORTS"]->SetValue("1");  
2068          }          }
2069          // Must have a device...          // Must have a device...
2070          if (pDevice == NULL)          if (pDevice == NULL)
# Line 1854  String LSCPServer::SetVolume(double dVol Line 2107  String LSCPServer::SetVolume(double dVol
2107      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));
2108      LSCPResultSet result;      LSCPResultSet result;
2109      try {      try {
2110          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
2111          pEngineChannel->Volume(dVolume);          pEngineChannel->Volume(dVolume);
2112      }      }
2113      catch (Exception e) {      catch (Exception e) {
# Line 1873  String LSCPServer::SetChannelMute(bool b Line 2123  String LSCPServer::SetChannelMute(bool b
2123      dmsg(2,("LSCPServer: SetChannelMute(bMute=%d,uiSamplerChannel=%d)\n",bMute,uiSamplerChannel));      dmsg(2,("LSCPServer: SetChannelMute(bMute=%d,uiSamplerChannel=%d)\n",bMute,uiSamplerChannel));
2124      LSCPResultSet result;      LSCPResultSet result;
2125      try {      try {
2126          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
   
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
2127    
2128          if(!bMute) pEngineChannel->SetMute((HasSoloChannel() && !pEngineChannel->GetSolo()) ? -1 : 0);          if(!bMute) pEngineChannel->SetMute((HasSoloChannel() && !pEngineChannel->GetSolo()) ? -1 : 0);
2129          else pEngineChannel->SetMute(1);          else pEngineChannel->SetMute(1);
# Line 1894  String LSCPServer::SetChannelSolo(bool b Line 2140  String LSCPServer::SetChannelSolo(bool b
2140      dmsg(2,("LSCPServer: SetChannelSolo(bSolo=%d,uiSamplerChannel=%d)\n",bSolo,uiSamplerChannel));      dmsg(2,("LSCPServer: SetChannelSolo(bSolo=%d,uiSamplerChannel=%d)\n",bSolo,uiSamplerChannel));
2141      LSCPResultSet result;      LSCPResultSet result;
2142      try {      try {
2143          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
   
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
2144    
2145          bool oldSolo = pEngineChannel->GetSolo();          bool oldSolo = pEngineChannel->GetSolo();
2146          bool hadSoloChannel = HasSoloChannel();          bool hadSoloChannel = HasSoloChannel();
# Line 2018  String LSCPServer::GetMidiInstrumentMapp Line 2260  String LSCPServer::GetMidiInstrumentMapp
2260      dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));      dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));
2261      LSCPResultSet result;      LSCPResultSet result;
2262      try {      try {
2263          result.Add(MidiInstrumentMapper::Entries(MidiMapID).size());          result.Add(MidiInstrumentMapper::GetInstrumentCount(MidiMapID));
2264      } catch (Exception e) {      } catch (Exception e) {
2265          result.Error(e);          result.Error(e);
2266      }      }
# Line 2029  String LSCPServer::GetMidiInstrumentMapp Line 2271  String LSCPServer::GetMidiInstrumentMapp
2271  String LSCPServer::GetAllMidiInstrumentMappings() {  String LSCPServer::GetAllMidiInstrumentMappings() {
2272      dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));      dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));
2273      LSCPResultSet result;      LSCPResultSet result;
2274      std::vector<int> maps = MidiInstrumentMapper::Maps();      try {
2275      int totalMappings = 0;          result.Add(MidiInstrumentMapper::GetInstrumentCount());
2276      for (int i = 0; i < maps.size(); i++) {      } catch (Exception e) {
2277          try {          result.Error(e);
             totalMappings += MidiInstrumentMapper::Entries(maps[i]).size();  
         } catch (Exception e) { /*NOOP*/ }  
2278      }      }
     result.Add(totalMappings);  
2279      return result.Produce();      return result.Produce();
2280  }  }
2281    
# Line 2044  String LSCPServer::GetMidiInstrumentMapp Line 2283  String LSCPServer::GetMidiInstrumentMapp
2283      dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));      dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));
2284      LSCPResultSet result;      LSCPResultSet result;
2285      try {      try {
2286          midi_prog_index_t idx;          MidiInstrumentMapper::entry_t entry = MidiInstrumentMapper::GetEntry(MidiMapID, MidiBank, MidiProg);
2287          idx.midi_bank_msb = (MidiBank >> 7) & 0x7f;          // convert the filename into the correct encoding as defined for LSCP
2288          idx.midi_bank_lsb = MidiBank & 0x7f;          // (especially in terms of special characters -> escape sequences)
         idx.midi_prog     = MidiProg;  
   
         std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t> mappings = MidiInstrumentMapper::Entries(MidiMapID);  
         std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t>::iterator iter = mappings.find(idx);  
         if (iter == mappings.end()) result.Error("there is no map entry with that index");  
         else { // found  
   
             // convert the filename into the correct encoding as defined for LSCP  
             // (especially in terms of special characters -> escape sequences)  
2289  #if WIN32  #if WIN32
2290              const String instrumentFileName = Path::fromWindows(iter->second.InstrumentFile).toLscp();          const String instrumentFileName = Path::fromWindows(entry.InstrumentFile).toLscp();
2291  #else  #else
2292              // assuming POSIX          // assuming POSIX
2293              const String instrumentFileName = Path::fromPosix(iter->second.InstrumentFile).toLscp();          const String instrumentFileName = Path::fromPosix(entry.InstrumentFile).toLscp();
2294  #endif  #endif
2295    
2296              result.Add("NAME", _escapeLscpResponse(iter->second.Name));          result.Add("NAME", _escapeLscpResponse(entry.Name));
2297              result.Add("ENGINE_NAME", iter->second.EngineName);          result.Add("ENGINE_NAME", entry.EngineName);
2298              result.Add("INSTRUMENT_FILE", instrumentFileName);          result.Add("INSTRUMENT_FILE", instrumentFileName);
2299              result.Add("INSTRUMENT_NR", (int) iter->second.InstrumentIndex);          result.Add("INSTRUMENT_NR", (int) entry.InstrumentIndex);
2300              String instrumentName;          String instrumentName;
2301              Engine* pEngine = EngineFactory::Create(iter->second.EngineName);          Engine* pEngine = EngineFactory::Create(entry.EngineName);
2302              if (pEngine) {          if (pEngine) {
2303                  if (pEngine->GetInstrumentManager()) {              if (pEngine->GetInstrumentManager()) {
2304                      InstrumentManager::instrument_id_t instrID;                  InstrumentManager::instrument_id_t instrID;
2305                      instrID.FileName = iter->second.InstrumentFile;                  instrID.FileName = entry.InstrumentFile;
2306                      instrID.Index    = iter->second.InstrumentIndex;                  instrID.Index    = entry.InstrumentIndex;
2307                      instrumentName = pEngine->GetInstrumentManager()->GetInstrumentName(instrID);                  instrumentName = pEngine->GetInstrumentManager()->GetInstrumentName(instrID);
                 }  
                 EngineFactory::Destroy(pEngine);  
             }  
             result.Add("INSTRUMENT_NAME", _escapeLscpResponse(instrumentName));  
             switch (iter->second.LoadMode) {  
                 case MidiInstrumentMapper::ON_DEMAND:  
                     result.Add("LOAD_MODE", "ON_DEMAND");  
                     break;  
                 case MidiInstrumentMapper::ON_DEMAND_HOLD:  
                     result.Add("LOAD_MODE", "ON_DEMAND_HOLD");  
                     break;  
                 case MidiInstrumentMapper::PERSISTENT:  
                     result.Add("LOAD_MODE", "PERSISTENT");  
                     break;  
                 default:  
                     throw Exception("entry reflects invalid LOAD_MODE, consider this as a bug!");  
2308              }              }
2309              result.Add("VOLUME", iter->second.Volume);              EngineFactory::Destroy(pEngine);
2310          }          }
2311            result.Add("INSTRUMENT_NAME", _escapeLscpResponse(instrumentName));
2312            switch (entry.LoadMode) {
2313                case MidiInstrumentMapper::ON_DEMAND:
2314                    result.Add("LOAD_MODE", "ON_DEMAND");
2315                    break;
2316                case MidiInstrumentMapper::ON_DEMAND_HOLD:
2317                    result.Add("LOAD_MODE", "ON_DEMAND_HOLD");
2318                    break;
2319                case MidiInstrumentMapper::PERSISTENT:
2320                    result.Add("LOAD_MODE", "PERSISTENT");
2321                    break;
2322                default:
2323                    throw Exception("entry reflects invalid LOAD_MODE, consider this as a bug!");
2324            }
2325            result.Add("VOLUME", entry.Volume);
2326      } catch (Exception e) {      } catch (Exception e) {
2327          result.Error(e);          result.Error(e);
2328      }      }
# Line 2264  String LSCPServer::SetChannelMap(uint ui Line 2493  String LSCPServer::SetChannelMap(uint ui
2493      dmsg(2,("LSCPServer: SetChannelMap()\n"));      dmsg(2,("LSCPServer: SetChannelMap()\n"));
2494      LSCPResultSet result;      LSCPResultSet result;
2495      try {      try {
2496          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
   
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("There is no engine deployed on this sampler channel yet");  
2497    
2498          if      (MidiMapID == -1) pEngineChannel->SetMidiInstrumentMapToNone();          if      (MidiMapID == -1) pEngineChannel->SetMidiInstrumentMapToNone();
2499          else if (MidiMapID == -2) pEngineChannel->SetMidiInstrumentMapToDefault();          else if (MidiMapID == -2) pEngineChannel->SetMidiInstrumentMapToDefault();
# Line 2376  String LSCPServer::GetFxSendInfo(uint ui Line 2601  String LSCPServer::GetFxSendInfo(uint ui
2601              AudioRouting += ToString(pFxSend->DestinationChannel(chan));              AudioRouting += ToString(pFxSend->DestinationChannel(chan));
2602          }          }
2603    
2604            const String sEffectRouting =
2605                (pFxSend->DestinationEffectChain() >= 0 && pFxSend->DestinationEffectChainPosition() >= 0)
2606                    ? ToString(pFxSend->DestinationEffectChain()) + "," + ToString(pFxSend->DestinationEffectChainPosition())
2607                    : "NONE";
2608    
2609          // success          // success
2610          result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));          result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));
2611          result.Add("MIDI_CONTROLLER", pFxSend->MidiController());          result.Add("MIDI_CONTROLLER", pFxSend->MidiController());
2612          result.Add("LEVEL", ToString(pFxSend->Level()));          result.Add("LEVEL", ToString(pFxSend->Level()));
2613          result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);          result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
2614            result.Add("EFFECT", sEffectRouting);
2615      } catch (Exception e) {      } catch (Exception e) {
2616          result.Error(e);          result.Error(e);
2617      }      }
# Line 2443  String LSCPServer::SetFxSendLevel(uint u Line 2674  String LSCPServer::SetFxSendLevel(uint u
2674      return result.Produce();      return result.Produce();
2675  }  }
2676    
2677    String LSCPServer::SetFxSendEffect(uint uiSamplerChannel, uint FxSendID, int iSendEffectChain, int iEffectChainPosition) {
2678        dmsg(2,("LSCPServer: SetFxSendEffect(%d,%d)\n", iSendEffectChain, iEffectChainPosition));
2679        LSCPResultSet result;
2680        try {
2681            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2682    
2683            pFxSend->SetDestinationEffect(iSendEffectChain, iEffectChainPosition);
2684            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2685        } catch (Exception e) {
2686            result.Error(e);
2687        }
2688        return result.Produce();
2689    }
2690    
2691    String LSCPServer::GetAvailableEffects() {
2692        dmsg(2,("LSCPServer: GetAvailableEffects()\n"));
2693        LSCPResultSet result;
2694        try {
2695            int n = EffectFactory::AvailableEffectsCount();
2696            result.Add(n);
2697        }
2698        catch (Exception e) {
2699            result.Error(e);
2700        }
2701        return result.Produce();
2702    }
2703    
2704    String LSCPServer::ListAvailableEffects() {
2705        dmsg(2,("LSCPServer: ListAvailableEffects()\n"));
2706        LSCPResultSet result;
2707        String list;
2708        try {
2709            //FIXME: for now we simply enumerate from 0 .. EffectFactory::AvailableEffectsCount() here, in future we should use unique IDs for effects during the whole sampler session. This issue comes into game when the user forces a reload of available effect plugins
2710            int n = EffectFactory::AvailableEffectsCount();
2711            for (int i = 0; i < n; i++) {
2712                if (i) list += ",";
2713                list += ToString(i);
2714            }
2715        }
2716        catch (Exception e) {
2717            result.Error(e);
2718        }
2719        result.Add(list);
2720        return result.Produce();
2721    }
2722    
2723    String LSCPServer::GetEffectInfo(int iEffectIndex) {
2724        dmsg(2,("LSCPServer: GetEffectInfo(%d)\n", iEffectIndex));
2725        LSCPResultSet result;
2726        try {
2727            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
2728            if (!pEffectInfo)
2729                throw Exception("There is no effect with index " + ToString(iEffectIndex));
2730    
2731            // convert the filename into the correct encoding as defined for LSCP
2732            // (especially in terms of special characters -> escape sequences)
2733    #if WIN32
2734            const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
2735    #else
2736            // assuming POSIX
2737            const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
2738    #endif
2739    
2740            result.Add("SYSTEM", pEffectInfo->EffectSystem());
2741            result.Add("MODULE", dllFileName);
2742            result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
2743            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
2744        }
2745        catch (Exception e) {
2746            result.Error(e);
2747        }
2748        return result.Produce();    
2749    }
2750    
2751    String LSCPServer::GetEffectInstanceInfo(int iEffectInstance) {
2752        dmsg(2,("LSCPServer: GetEffectInstanceInfo(%d)\n", iEffectInstance));
2753        LSCPResultSet result;
2754        try {
2755            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2756            if (!pEffect)
2757                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2758    
2759            EffectInfo* pEffectInfo = pEffect->GetEffectInfo();
2760    
2761            // convert the filename into the correct encoding as defined for LSCP
2762            // (especially in terms of special characters -> escape sequences)
2763    #if WIN32
2764            const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
2765    #else
2766            // assuming POSIX
2767            const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
2768    #endif
2769    
2770            result.Add("SYSTEM", pEffectInfo->EffectSystem());
2771            result.Add("MODULE", dllFileName);
2772            result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
2773            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
2774            result.Add("INPUT_CONTROLS", ToString(pEffect->InputControlCount()));
2775        }
2776        catch (Exception e) {
2777            result.Error(e);
2778        }
2779        return result.Produce();
2780    }
2781    
2782    String LSCPServer::GetEffectInstanceInputControlInfo(int iEffectInstance, int iInputControlIndex) {
2783        dmsg(2,("LSCPServer: GetEffectInstanceInputControlInfo(%d,%d)\n", iEffectInstance, iInputControlIndex));
2784        LSCPResultSet result;
2785        try {
2786            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2787            if (!pEffect)
2788                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2789    
2790            EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
2791            if (!pEffectControl)
2792                throw Exception(
2793                    "Effect instance " + ToString(iEffectInstance) +
2794                    " does not have an input control with index " +
2795                    ToString(iInputControlIndex)
2796                );
2797    
2798            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectControl->Description()));
2799            result.Add("VALUE", pEffectControl->Value());
2800            if (pEffectControl->MinValue())
2801                 result.Add("RANGE_MIN", *pEffectControl->MinValue());
2802            if (pEffectControl->MaxValue())
2803                 result.Add("RANGE_MAX", *pEffectControl->MaxValue());
2804            if (!pEffectControl->Possibilities().empty())
2805                 result.Add("POSSIBILITIES", pEffectControl->Possibilities());
2806            if (pEffectControl->DefaultValue())
2807                 result.Add("DEFAULT", *pEffectControl->DefaultValue());
2808        } catch (Exception e) {
2809            result.Error(e);
2810        }
2811        return result.Produce();
2812    }
2813    
2814    String LSCPServer::SetEffectInstanceInputControlValue(int iEffectInstance, int iInputControlIndex, double dValue) {
2815        dmsg(2,("LSCPServer: SetEffectInstanceInputControlValue(%d,%d,%f)\n", iEffectInstance, iInputControlIndex, dValue));
2816        LSCPResultSet result;
2817        try {
2818            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2819            if (!pEffect)
2820                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2821    
2822            EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
2823            if (!pEffectControl)
2824                throw Exception(
2825                    "Effect instance " + ToString(iEffectInstance) +
2826                    " does not have an input control with index " +
2827                    ToString(iInputControlIndex)
2828                );
2829    
2830            pEffectControl->SetValue(dValue);
2831            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_info, iEffectInstance));
2832        } catch (Exception e) {
2833            result.Error(e);
2834        }
2835        return result.Produce();
2836    }
2837    
2838    String LSCPServer::CreateEffectInstance(int iEffectIndex) {
2839        dmsg(2,("LSCPServer: CreateEffectInstance(%d)\n", iEffectIndex));
2840        LSCPResultSet result;
2841        try {
2842            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
2843            if (!pEffectInfo)
2844                throw Exception("There is no effect with index " + ToString(iEffectIndex));
2845            Effect* pEffect = EffectFactory::Create(pEffectInfo);
2846            result = pEffect->ID(); // success
2847            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_count, EffectFactory::EffectInstancesCount()));
2848        } catch (Exception e) {
2849            result.Error(e);
2850        }
2851        return result.Produce();
2852    }
2853    
2854    String LSCPServer::CreateEffectInstance(String effectSystem, String module, String effectName) {
2855        dmsg(2,("LSCPServer: CreateEffectInstance('%s','%s','%s')\n", effectSystem.c_str(), module.c_str(), effectName.c_str()));
2856        LSCPResultSet result;
2857        try {
2858            // to allow loading the same LSCP session file on different systems
2859            // successfully, probably with different effect plugin DLL paths or even
2860            // running completely different operating systems, we do the following
2861            // for finding the right effect:
2862            //
2863            // first try to search for an exact match of the effect plugin DLL
2864            // (a.k.a 'module'), to avoid picking the wrong DLL with the same
2865            // effect name ...
2866            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_MATCH_EXACTLY);
2867            // ... if no effect with exactly matchin DLL filename was found, then
2868            // try to lower the restrictions of matching the effect plugin DLL
2869            // filename and try again and again ...
2870            if (!pEffectInfo) {
2871                dmsg(2,("no exact module match, trying MODULE_IGNORE_PATH\n"));
2872                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH);
2873            }
2874            if (!pEffectInfo) {
2875                dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE\n"));
2876                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE);
2877            }
2878            if (!pEffectInfo) {
2879                dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE | MODULE_IGNORE_EXTENSION\n"));
2880                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE | EffectFactory::MODULE_IGNORE_EXTENSION);
2881            }
2882            // ... if there was still no effect found, then completely ignore the
2883            // DLL plugin filename argument and just search for the matching effect
2884            // system type and effect name
2885            if (!pEffectInfo) {
2886                dmsg(2,("no module match, trying MODULE_IGNORE_ALL\n"));
2887                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_ALL);
2888            }
2889            if (!pEffectInfo)
2890                throw Exception("There is no such effect '" + effectSystem + "' '" + module + "' '" + effectName + "'");
2891    
2892            Effect* pEffect = EffectFactory::Create(pEffectInfo);
2893            result = LSCPResultSet(pEffect->ID());
2894            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_count, EffectFactory::EffectInstancesCount()));
2895        } catch (Exception e) {
2896            result.Error(e);
2897        }
2898        return result.Produce();
2899    }
2900    
2901    String LSCPServer::DestroyEffectInstance(int iEffectInstance) {
2902        dmsg(2,("LSCPServer: DestroyEffectInstance(%d)\n", iEffectInstance));
2903        LSCPResultSet result;
2904        try {
2905            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2906            if (!pEffect)
2907                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2908            EffectFactory::Destroy(pEffect);
2909            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_count, EffectFactory::EffectInstancesCount()));
2910        } catch (Exception e) {
2911            result.Error(e);
2912        }
2913        return result.Produce();
2914    }
2915    
2916    String LSCPServer::GetEffectInstances() {
2917        dmsg(2,("LSCPServer: GetEffectInstances()\n"));
2918        LSCPResultSet result;
2919        try {
2920            int n = EffectFactory::EffectInstancesCount();
2921            result.Add(n);
2922        } catch (Exception e) {
2923            result.Error(e);
2924        }
2925        return result.Produce();
2926    }
2927    
2928    String LSCPServer::ListEffectInstances() {
2929        dmsg(2,("LSCPServer: ListEffectInstances()\n"));
2930        LSCPResultSet result;
2931        String list;
2932        try {
2933            int n = EffectFactory::EffectInstancesCount();
2934            for (int i = 0; i < n; i++) {
2935                Effect* pEffect = EffectFactory::GetEffectInstance(i);
2936                if (i) list += ",";
2937                list += ToString(pEffect->ID());
2938            }
2939        } catch (Exception e) {
2940            result.Error(e);
2941        }
2942        result.Add(list);
2943        return result.Produce();
2944    }
2945    
2946    String LSCPServer::GetSendEffectChains(int iAudioOutputDevice) {
2947        dmsg(2,("LSCPServer: GetSendEffectChains(%d)\n", iAudioOutputDevice));
2948        LSCPResultSet result;
2949        try {
2950            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2951            if (!devices.count(iAudioOutputDevice))
2952                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2953            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2954            int n = pDevice->SendEffectChainCount();
2955            result.Add(n);
2956        } catch (Exception e) {
2957            result.Error(e);
2958        }
2959        return result.Produce();
2960    }
2961    
2962    String LSCPServer::ListSendEffectChains(int iAudioOutputDevice) {
2963        dmsg(2,("LSCPServer: ListSendEffectChains(%d)\n", iAudioOutputDevice));
2964        LSCPResultSet result;
2965        String list;
2966        try {
2967            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2968            if (!devices.count(iAudioOutputDevice))
2969                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2970            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2971            int n = pDevice->SendEffectChainCount();
2972            for (int i = 0; i < n; i++) {
2973                EffectChain* pEffectChain = pDevice->SendEffectChain(i);
2974                if (i) list += ",";
2975                list += ToString(pEffectChain->ID());
2976            }
2977        } catch (Exception e) {
2978            result.Error(e);
2979        }
2980        result.Add(list);
2981        return result.Produce();
2982    }
2983    
2984    String LSCPServer::AddSendEffectChain(int iAudioOutputDevice) {
2985        dmsg(2,("LSCPServer: AddSendEffectChain(%d)\n", iAudioOutputDevice));
2986        LSCPResultSet result;
2987        try {
2988            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2989            if (!devices.count(iAudioOutputDevice))
2990                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2991            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2992            EffectChain* pEffectChain = pDevice->AddSendEffectChain();
2993            result = pEffectChain->ID();
2994            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_count, iAudioOutputDevice, pDevice->SendEffectChainCount()));
2995        } catch (Exception e) {
2996            result.Error(e);
2997        }
2998        return result.Produce();
2999    }
3000    
3001    String LSCPServer::RemoveSendEffectChain(int iAudioOutputDevice, int iSendEffectChain) {
3002        dmsg(2,("LSCPServer: RemoveSendEffectChain(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
3003        LSCPResultSet result;
3004        try {
3005            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
3006            if (!devices.count(iAudioOutputDevice))
3007                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
3008    
3009            std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
3010            std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
3011            std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
3012            for (; itEngineChannel != itEnd; ++itEngineChannel) {
3013                AudioOutputDevice* pDev = (*itEngineChannel)->GetAudioOutputDevice();
3014                if (pDev != NULL && pDev->deviceId() == iAudioOutputDevice) {
3015                    for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
3016                        FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
3017                        if(fxs != NULL && fxs->DestinationEffectChain() == iSendEffectChain) {
3018                            throw Exception("The effect chain is still in use by channel " + ToString((*itEngineChannel)->GetSamplerChannel()->Index()));
3019                        }
3020                    }
3021                }
3022            }
3023    
3024            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
3025            for (int i = 0; i < pDevice->SendEffectChainCount(); i++) {
3026                EffectChain* pEffectChain = pDevice->SendEffectChain(i);
3027                if (pEffectChain->ID() == iSendEffectChain) {
3028                    pDevice->RemoveSendEffectChain(i);
3029                    LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_count, iAudioOutputDevice, pDevice->SendEffectChainCount()));
3030                    return result.Produce();
3031                }
3032            }
3033            throw Exception(
3034                "There is no send effect chain with ID " +
3035                ToString(iSendEffectChain) + " for audio output device " +
3036                ToString(iAudioOutputDevice) + "."
3037            );
3038        } catch (Exception e) {
3039            result.Error(e);
3040        }
3041        return result.Produce();
3042    }
3043    
3044    static EffectChain* _getSendEffectChain(Sampler* pSampler, int iAudioOutputDevice, int iSendEffectChain) throw (Exception) {
3045        std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
3046        if (!devices.count(iAudioOutputDevice))
3047            throw Exception(
3048                "There is no audio output device with index " +
3049                ToString(iAudioOutputDevice) + "."
3050            );
3051        AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
3052        EffectChain* pEffectChain = pDevice->SendEffectChainByID(iSendEffectChain);
3053        if(pEffectChain != NULL) return pEffectChain;
3054        throw Exception(
3055            "There is no send effect chain with ID " +
3056            ToString(iSendEffectChain) + " for audio output device " +
3057            ToString(iAudioOutputDevice) + "."
3058        );
3059    }
3060    
3061    String LSCPServer::GetSendEffectChainInfo(int iAudioOutputDevice, int iSendEffectChain) {
3062        dmsg(2,("LSCPServer: GetSendEffectChainInfo(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
3063        LSCPResultSet result;
3064        try {
3065            EffectChain* pEffectChain =
3066                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
3067            String sEffectSequence;
3068            for (int i = 0; i < pEffectChain->EffectCount(); i++) {
3069                if (i) sEffectSequence += ",";
3070                sEffectSequence += ToString(pEffectChain->GetEffect(i)->ID());
3071            }
3072            result.Add("EFFECT_COUNT", pEffectChain->EffectCount());
3073            result.Add("EFFECT_SEQUENCE", sEffectSequence);
3074        } catch (Exception e) {
3075            result.Error(e);
3076        }
3077        return result.Produce();
3078    }
3079    
3080    String LSCPServer::AppendSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectInstance) {
3081        dmsg(2,("LSCPServer: AppendSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectInstance));
3082        LSCPResultSet result;
3083        try {
3084            EffectChain* pEffectChain =
3085                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
3086            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
3087            if (!pEffect)
3088                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
3089            pEffectChain->AppendEffect(pEffect);
3090            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_info, iAudioOutputDevice, iSendEffectChain, pEffectChain->EffectCount()));
3091        } catch (Exception e) {
3092            result.Error(e);
3093        }
3094        return result.Produce();
3095    }
3096    
3097    String LSCPServer::InsertSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition, int iEffectInstance) {
3098        dmsg(2,("LSCPServer: InsertSendEffectChainEffect(%d,%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition, iEffectInstance));
3099        LSCPResultSet result;
3100        try {
3101            EffectChain* pEffectChain =
3102                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
3103            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
3104            if (!pEffect)
3105                throw Exception("There is no effect instance with index " + ToString(iEffectInstance));
3106            pEffectChain->InsertEffect(pEffect, iEffectChainPosition);
3107            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_info, iAudioOutputDevice, iSendEffectChain, pEffectChain->EffectCount()));
3108        } catch (Exception e) {
3109            result.Error(e);
3110        }
3111        return result.Produce();
3112    }
3113    
3114    String LSCPServer::RemoveSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition) {
3115        dmsg(2,("LSCPServer: RemoveSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition));
3116        LSCPResultSet result;
3117        try {
3118            EffectChain* pEffectChain =
3119                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
3120    
3121            std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
3122            std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
3123            std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
3124            for (; itEngineChannel != itEnd; ++itEngineChannel) {
3125                AudioOutputDevice* pDev = (*itEngineChannel)->GetAudioOutputDevice();
3126                if (pDev != NULL && pDev->deviceId() == iAudioOutputDevice) {
3127                    for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
3128                        FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
3129                        if(fxs != NULL && fxs->DestinationEffectChain() == iSendEffectChain && fxs->DestinationEffectChainPosition() == iEffectChainPosition) {
3130                            throw Exception("The effect instance is still in use by channel " + ToString((*itEngineChannel)->GetSamplerChannel()->Index()));
3131                        }
3132                    }
3133                }
3134            }
3135    
3136            pEffectChain->RemoveEffect(iEffectChainPosition);
3137            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_info, iAudioOutputDevice, iSendEffectChain, pEffectChain->EffectCount()));
3138        } catch (Exception e) {
3139            result.Error(e);
3140        }
3141        return result.Produce();
3142    }
3143    
3144  String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {  String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {
3145      dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));
3146      LSCPResultSet result;      LSCPResultSet result;
3147      try {      try {
3148          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
3149          if (pEngineChannel->InstrumentStatus() < 0) throw Exception("No instrument loaded to sampler channel");          if (pEngineChannel->InstrumentStatus() < 0) throw Exception("No instrument loaded to sampler channel");
3150          Engine* pEngine = pEngineChannel->GetEngine();          Engine* pEngine = pEngineChannel->GetEngine();
3151          InstrumentManager* pInstrumentManager = pEngine->GetInstrumentManager();          InstrumentManager* pInstrumentManager = pEngine->GetInstrumentManager();
# Line 2458  String LSCPServer::EditSamplerChannelIns Line 3153  String LSCPServer::EditSamplerChannelIns
3153          InstrumentManager::instrument_id_t instrumentID;          InstrumentManager::instrument_id_t instrumentID;
3154          instrumentID.FileName = pEngineChannel->InstrumentFileName();          instrumentID.FileName = pEngineChannel->InstrumentFileName();
3155          instrumentID.Index    = pEngineChannel->InstrumentIndex();          instrumentID.Index    = pEngineChannel->InstrumentIndex();
3156          pInstrumentManager->LaunchInstrumentEditor(instrumentID);          pInstrumentManager->LaunchInstrumentEditor(pEngineChannel, instrumentID);
3157        } catch (Exception e) {
3158            result.Error(e);
3159        }
3160        return result.Produce();
3161    }
3162    
3163    String LSCPServer::SendChannelMidiData(String MidiMsg, uint uiSamplerChannel, uint Arg1, uint Arg2) {
3164        dmsg(2,("LSCPServer: SendChannelMidiData(MidiMsg=%s,uiSamplerChannel=%d,Arg1=%d,Arg2=%d)\n", MidiMsg.c_str(), uiSamplerChannel, Arg1, Arg2));
3165        LSCPResultSet result;
3166        try {
3167            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
3168    
3169            if (Arg1 > 127 || Arg2 > 127) {
3170                throw Exception("Invalid MIDI message");
3171            }
3172    
3173            VirtualMidiDevice* pMidiDevice = NULL;
3174            std::vector<EventHandler::midi_listener_entry>::iterator iter = eventHandler.channelMidiListeners.begin();
3175            for (; iter != eventHandler.channelMidiListeners.end(); ++iter) {
3176                if ((*iter).pEngineChannel == pEngineChannel) {
3177                    pMidiDevice = (*iter).pMidiListener;
3178                    break;
3179                }
3180            }
3181            
3182            if(pMidiDevice == NULL) throw Exception("Couldn't find virtual MIDI device");
3183    
3184            if (MidiMsg == "NOTE_ON") {
3185                pMidiDevice->SendNoteOnToDevice(Arg1, Arg2);
3186                bool b = pMidiDevice->SendNoteOnToSampler(Arg1, Arg2);
3187                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
3188            } else if (MidiMsg == "NOTE_OFF") {
3189                pMidiDevice->SendNoteOffToDevice(Arg1, Arg2);
3190                bool b = pMidiDevice->SendNoteOffToSampler(Arg1, Arg2);
3191                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
3192            } else if (MidiMsg == "CC") {
3193                pMidiDevice->SendCCToDevice(Arg1, Arg2);
3194                bool b = pMidiDevice->SendCCToSampler(Arg1, Arg2);
3195                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
3196            } else {
3197                throw Exception("Unknown MIDI message type: " + MidiMsg);
3198            }
3199      } catch (Exception e) {      } catch (Exception e) {
3200          result.Error(e);          result.Error(e);
3201      }      }
# Line 2472  String LSCPServer::ResetChannel(uint uiS Line 3209  String LSCPServer::ResetChannel(uint uiS
3209      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
3210      LSCPResultSet result;      LSCPResultSet result;
3211      try {      try {
3212          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
         if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));  
         EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();  
         if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");  
3213          pEngineChannel->Reset();          pEngineChannel->Reset();
3214      }      }
3215      catch (Exception e) {      catch (Exception e) {
# Line 2541  String LSCPServer::GetTotalVoiceCount() Line 3275  String LSCPServer::GetTotalVoiceCount()
3275  String LSCPServer::GetTotalVoiceCountMax() {  String LSCPServer::GetTotalVoiceCountMax() {
3276      dmsg(2,("LSCPServer: GetTotalVoiceCountMax()\n"));      dmsg(2,("LSCPServer: GetTotalVoiceCountMax()\n"));
3277      LSCPResultSet result;      LSCPResultSet result;
3278      result.Add(EngineFactory::EngineInstances().size() * CONFIG_MAX_VOICES);      result.Add(EngineFactory::EngineInstances().size() * pSampler->GetGlobalMaxVoices());
3279        return result.Produce();
3280    }
3281    
3282    /**
3283     * Will be called by the parser to return the sampler global maximum
3284     * allowed number of voices.
3285     */
3286    String LSCPServer::GetGlobalMaxVoices() {
3287        dmsg(2,("LSCPServer: GetGlobalMaxVoices()\n"));
3288        LSCPResultSet result;
3289        result.Add(pSampler->GetGlobalMaxVoices());
3290        return result.Produce();
3291    }
3292    
3293    /**
3294     * Will be called by the parser to set the sampler global maximum number of
3295     * voices.
3296     */
3297    String LSCPServer::SetGlobalMaxVoices(int iVoices) {
3298        dmsg(2,("LSCPServer: SetGlobalMaxVoices(%d)\n", iVoices));
3299        LSCPResultSet result;
3300        try {
3301            pSampler->SetGlobalMaxVoices(iVoices);
3302            LSCPServer::SendLSCPNotify(
3303                LSCPEvent(LSCPEvent::event_global_info, "VOICES", pSampler->GetGlobalMaxVoices())
3304            );
3305        } catch (Exception e) {
3306            result.Error(e);
3307        }
3308        return result.Produce();
3309    }
3310    
3311    /**
3312     * Will be called by the parser to return the sampler global maximum
3313     * allowed number of disk streams.
3314     */
3315    String LSCPServer::GetGlobalMaxStreams() {
3316        dmsg(2,("LSCPServer: GetGlobalMaxStreams()\n"));
3317        LSCPResultSet result;
3318        result.Add(pSampler->GetGlobalMaxStreams());
3319        return result.Produce();
3320    }
3321    
3322    /**
3323     * Will be called by the parser to set the sampler global maximum number of
3324     * disk streams.
3325     */
3326    String LSCPServer::SetGlobalMaxStreams(int iStreams) {
3327        dmsg(2,("LSCPServer: SetGlobalMaxStreams(%d)\n", iStreams));
3328        LSCPResultSet result;
3329        try {
3330            pSampler->SetGlobalMaxStreams(iStreams);
3331            LSCPServer::SendLSCPNotify(
3332                LSCPEvent(LSCPEvent::event_global_info, "STREAMS", pSampler->GetGlobalMaxStreams())
3333            );
3334        } catch (Exception e) {
3335            result.Error(e);
3336        }
3337      return result.Produce();      return result.Produce();
3338  }  }
3339    
# Line 2555  String LSCPServer::SetGlobalVolume(doubl Line 3347  String LSCPServer::SetGlobalVolume(doubl
3347      LSCPResultSet result;      LSCPResultSet result;
3348      try {      try {
3349          if (dVolume < 0) throw Exception("Volume may not be negative");          if (dVolume < 0) throw Exception("Volume may not be negative");
3350          GLOBAL_VOLUME = dVolume; // see common/global.cpp          GLOBAL_VOLUME = dVolume; // see common/global_private.cpp
3351          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOLUME", GLOBAL_VOLUME));          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOLUME", GLOBAL_VOLUME));
3352      } catch (Exception e) {      } catch (Exception e) {
3353          result.Error(e);          result.Error(e);
# Line 2682  String LSCPServer::GetFileInstrumentInfo Line 3474  String LSCPServer::GetFileInstrumentInfo
3474                  result.Add("FORMAT_VERSION", info.FormatVersion);                  result.Add("FORMAT_VERSION", info.FormatVersion);
3475                  result.Add("PRODUCT", info.Product);                  result.Add("PRODUCT", info.Product);
3476                  result.Add("ARTISTS", info.Artists);                  result.Add("ARTISTS", info.Artists);
3477    
3478                    std::stringstream ss;
3479                    bool b = false;
3480                    for (int i = 0; i < 128; i++) {
3481                        if (info.KeyBindings[i]) {
3482                            if (b) ss << ',';
3483                            ss << i; b = true;
3484                        }
3485                    }
3486                    result.Add("KEY_BINDINGS", ss.str());
3487    
3488                    b = false;
3489                    std::stringstream ss2;
3490                    for (int i = 0; i < 128; i++) {
3491                        if (info.KeySwitchBindings[i]) {
3492                            if (b) ss2 << ',';
3493                            ss2 << i; b = true;
3494                        }
3495                    }
3496                    result.Add("KEYSWITCH_BINDINGS", ss2.str());
3497                  // no more need to ask other engine types                  // no more need to ask other engine types
3498                  bFound = true;                  bFound = true;
3499              } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));              } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
# Line 2709  void LSCPServer::VerifyFile(String Filen Line 3521  void LSCPServer::VerifyFile(String Filen
3521          throw Exception("Directory is specified");          throw Exception("Directory is specified");
3522      }      }
3523      #else      #else
3524      struct stat statBuf;      File f(Filename);
3525      int res = stat(Filename.c_str(), &statBuf);      if(!f.Exist()) throw Exception(f.GetErrorMsg());
3526      if (res) {      if (f.IsDirectory()) throw Exception("Directory is specified");
         std::stringstream ss;  
         ss << "Fail to stat `" << Filename << "`: " << strerror(errno);  
         throw Exception(ss.str());  
     }  
   
     if (S_ISDIR(statBuf.st_mode)) {  
         throw Exception("Directory is specified");  
     }  
3527      #endif      #endif
3528  }  }
3529    
# Line 2730  void LSCPServer::VerifyFile(String Filen Line 3534  void LSCPServer::VerifyFile(String Filen
3534  String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {  String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {
3535      dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));      dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
3536      LSCPResultSet result;      LSCPResultSet result;
3537      SubscriptionMutex.Lock();      {
3538      eventSubscriptions[type].push_back(currentSocket);          LockGuard lock(SubscriptionMutex);
3539      SubscriptionMutex.Unlock();          eventSubscriptions[type].push_back(currentSocket);
3540        }
3541      return result.Produce();      return result.Produce();
3542  }  }
3543    
# Line 2743  String LSCPServer::SubscribeNotification Line 3548  String LSCPServer::SubscribeNotification
3548  String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {  String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {
3549      dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));      dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
3550      LSCPResultSet result;      LSCPResultSet result;
3551      SubscriptionMutex.Lock();      {
3552      eventSubscriptions[type].remove(currentSocket);          LockGuard lock(SubscriptionMutex);
3553      SubscriptionMutex.Unlock();          eventSubscriptions[type].remove(currentSocket);
3554        }
3555      return result.Produce();      return result.Produce();
3556  }  }
3557    
# Line 2914  String LSCPServer::AddDbInstruments(Stri Line 3720  String LSCPServer::AddDbInstruments(Stri
3720      return result.Produce();      return result.Produce();
3721  }  }
3722    
3723  String LSCPServer::AddDbInstruments(String ScanMode, String DbDir, String FsDir, bool bBackground) {  String LSCPServer::AddDbInstruments(String ScanMode, String DbDir, String FsDir, bool bBackground, bool insDir) {
3724      dmsg(2,("LSCPServer: AddDbInstruments(ScanMode=%s,DbDir=%s,FsDir=%s,bBackground=%d)\n", ScanMode.c_str(), DbDir.c_str(), FsDir.c_str(), bBackground));      dmsg(2,("LSCPServer: AddDbInstruments(ScanMode=%s,DbDir=%s,FsDir=%s,bBackground=%d,insDir=%d)\n", ScanMode.c_str(), DbDir.c_str(), FsDir.c_str(), bBackground, insDir));
3725      LSCPResultSet result;      LSCPResultSet result;
3726  #if HAVE_SQLITE3  #if HAVE_SQLITE3
3727      try {      try {
3728          int id;          int id;
3729          InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();          InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();
3730          if (ScanMode.compare("RECURSIVE") == 0) {          if (ScanMode.compare("RECURSIVE") == 0) {
3731             id = db->AddInstruments(RECURSIVE, DbDir, FsDir, bBackground);              id = db->AddInstruments(RECURSIVE, DbDir, FsDir, bBackground, insDir);
3732          } else if (ScanMode.compare("NON_RECURSIVE") == 0) {          } else if (ScanMode.compare("NON_RECURSIVE") == 0) {
3733             id = db->AddInstruments(NON_RECURSIVE, DbDir, FsDir, bBackground);              id = db->AddInstruments(NON_RECURSIVE, DbDir, FsDir, bBackground, insDir);
3734          } else if (ScanMode.compare("FLAT") == 0) {          } else if (ScanMode.compare("FLAT") == 0) {
3735             id = db->AddInstruments(FLAT, DbDir, FsDir, bBackground);              id = db->AddInstruments(FLAT, DbDir, FsDir, bBackground, insDir);
3736          } else {          } else {
3737              throw Exception("Unknown scan mode: " + ScanMode);              throw Exception("Unknown scan mode: " + ScanMode);
3738          }          }
# Line 3102  String LSCPServer::SetDbInstrumentDescri Line 3908  String LSCPServer::SetDbInstrumentDescri
3908      return result.Produce();      return result.Produce();
3909  }  }
3910    
3911    String LSCPServer::SetDbInstrumentFilePath(String OldPath, String NewPath) {
3912        dmsg(2,("LSCPServer: SetDbInstrumentFilePath(OldPath=%s,NewPath=%s)\n", OldPath.c_str(), NewPath.c_str()));
3913        LSCPResultSet result;
3914    #if HAVE_SQLITE3
3915        try {
3916            InstrumentsDb::GetInstrumentsDb()->SetInstrumentFilePath(OldPath, NewPath);
3917        } catch (Exception e) {
3918             result.Error(e);
3919        }
3920    #else
3921        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3922    #endif
3923        return result.Produce();
3924    }
3925    
3926    String LSCPServer::FindLostDbInstrumentFiles() {
3927        dmsg(2,("LSCPServer: FindLostDbInstrumentFiles()\n"));
3928        LSCPResultSet result;
3929    #if HAVE_SQLITE3
3930        try {
3931            String list;
3932            StringListPtr pLostFiles = InstrumentsDb::GetInstrumentsDb()->FindLostInstrumentFiles();
3933    
3934            for (int i = 0; i < pLostFiles->size(); i++) {
3935                if (list != "") list += ",";
3936                list += "'" + pLostFiles->at(i) + "'";
3937            }
3938    
3939            result.Add(list);
3940        } catch (Exception e) {
3941             result.Error(e);
3942        }
3943    #else
3944        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3945    #endif
3946        return result.Produce();
3947    }
3948    
3949  String LSCPServer::FindDbInstrumentDirectories(String Dir, std::map<String,String> Parameters, bool Recursive) {  String LSCPServer::FindDbInstrumentDirectories(String Dir, std::map<String,String> Parameters, bool Recursive) {
3950      dmsg(2,("LSCPServer: FindDbInstrumentDirectories(Dir=%s)\n", Dir.c_str()));      dmsg(2,("LSCPServer: FindDbInstrumentDirectories(Dir=%s)\n", Dir.c_str()));
3951      LSCPResultSet result;      LSCPResultSet result;
# Line 3232  String LSCPServer::SetEcho(yyparse_param Line 4076  String LSCPServer::SetEcho(yyparse_param
4076      }      }
4077      return result.Produce();      return result.Produce();
4078  }  }
4079    
4080    String LSCPServer::SetShellInteract(yyparse_param_t* pSession, double boolean_value) {
4081        dmsg(2,("LSCPServer: SetShellInteract(val=%f)\n", boolean_value));
4082        LSCPResultSet result;
4083        try {
4084            if      (boolean_value == 0) pSession->bShellInteract = false;
4085            else if (boolean_value == 1) pSession->bShellInteract = true;
4086            else throw Exception("Not a boolean value, must either be 0 or 1");
4087        } catch (Exception e) {
4088            result.Error(e);
4089        }
4090        return result.Produce();
4091    }
4092    
4093    String LSCPServer::SetShellAutoCorrect(yyparse_param_t* pSession, double boolean_value) {
4094        dmsg(2,("LSCPServer: SetShellAutoCorrect(val=%f)\n", boolean_value));
4095        LSCPResultSet result;
4096        try {
4097            if      (boolean_value == 0) pSession->bShellAutoCorrect = false;
4098            else if (boolean_value == 1) pSession->bShellAutoCorrect = true;
4099            else throw Exception("Not a boolean value, must either be 0 or 1");
4100        } catch (Exception e) {
4101            result.Error(e);
4102        }
4103        return result.Produce();
4104    }
4105    
4106    String LSCPServer::SetShellDoc(yyparse_param_t* pSession, double boolean_value) {
4107        dmsg(2,("LSCPServer: SetShellDoc(val=%f)\n", boolean_value));
4108        LSCPResultSet result;
4109        try {
4110            if      (boolean_value == 0) pSession->bShellSendLSCPDoc = false;
4111            else if (boolean_value == 1) pSession->bShellSendLSCPDoc = true;
4112            else throw Exception("Not a boolean value, must either be 0 or 1");
4113        } catch (Exception e) {
4114            result.Error(e);
4115        }
4116        return result.Produce();
4117    }
4118    
4119    }

Legend:
Removed from v.1695  
changed lines
  Added in v.2837

  ViewVC Help
Powered by ViewVC