/[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 1525 by schoenebeck, Sun Nov 25 17:47:46 2007 UTC revision 2500 by schoenebeck, Fri Jan 10 12:20:05 2014 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 - 2007 Christian Schoenebeck                       *   *   Copyright (C) 2005 - 2014 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"
31    
32  #if defined(WIN32)  #if defined(WIN32)
33    #include <windows.h>
34  #else  #else
35  #include <fcntl.h>  #include <fcntl.h>
36  #endif  #endif
# Line 38  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  /**  /**
51   * 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 90  static String _escapeLscpResponse(String Line 97  static String _escapeLscpResponse(String
97   */   */
98  fd_set LSCPServer::fdSet;  fd_set LSCPServer::fdSet;
99  int LSCPServer::currentSocket = -1;  int LSCPServer::currentSocket = -1;
100  std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();  std::vector<yyparse_param_t> LSCPServer::Sessions;
101  std::vector<yyparse_param_t>::iterator itCurrentSession = std::vector<yyparse_param_t>::iterator();  std::vector<yyparse_param_t>::iterator itCurrentSession;
102  std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();  std::map<int,String> LSCPServer::bufferedNotifies;
103  std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();  std::map<int,String> LSCPServer::bufferedCommands;
104  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;
105  Mutex LSCPServer::NotifyMutex = Mutex();  Mutex LSCPServer::NotifyMutex;
106  Mutex LSCPServer::NotifyBufferMutex = Mutex();  Mutex LSCPServer::NotifyBufferMutex;
107  Mutex LSCPServer::SubscriptionMutex = Mutex();  Mutex LSCPServer::SubscriptionMutex;
108  Mutex LSCPServer::RTNotifyMutex = Mutex();  Mutex LSCPServer::RTNotifyMutex;
109    
110  LSCPServer::LSCPServer(Sampler* pSampler, long int addr, short int port) : Thread(true, false, 0, -4) {  LSCPServer::LSCPServer(Sampler* pSampler, long int addr, short int port) : Thread(true, false, 0, -4), eventHandler(this) {
111      SocketAddress.sin_family      = AF_INET;      SocketAddress.sin_family      = AF_INET;
112      SocketAddress.sin_addr.s_addr = addr;      SocketAddress.sin_addr.s_addr = addr;
113      SocketAddress.sin_port        = port;      SocketAddress.sin_port        = port;
# Line 126  LSCPServer::LSCPServer(Sampler* pSampler Line 133  LSCPServer::LSCPServer(Sampler* pSampler
133      LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_info, "DB_INSTRUMENT_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_info, "DB_INSTRUMENT_INFO");
134      LSCPEvent::RegisterEvent(LSCPEvent::event_db_instrs_job_info, "DB_INSTRUMENTS_JOB_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_db_instrs_job_info, "DB_INSTRUMENTS_JOB_INFO");
135      LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");      LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");
136        LSCPEvent::RegisterEvent(LSCPEvent::event_total_stream_count, "TOTAL_STREAM_COUNT");
137      LSCPEvent::RegisterEvent(LSCPEvent::event_total_voice_count, "TOTAL_VOICE_COUNT");      LSCPEvent::RegisterEvent(LSCPEvent::event_total_voice_count, "TOTAL_VOICE_COUNT");
138      LSCPEvent::RegisterEvent(LSCPEvent::event_global_info, "GLOBAL_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_global_info, "GLOBAL_INFO");
139        LSCPEvent::RegisterEvent(LSCPEvent::event_channel_midi, "CHANNEL_MIDI");
140        LSCPEvent::RegisterEvent(LSCPEvent::event_device_midi, "DEVICE_MIDI");
141        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_instance_count, "EFFECT_INSTANCE_COUNT");
142        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_instance_info, "EFFECT_INSTANCE_INFO");
143        LSCPEvent::RegisterEvent(LSCPEvent::event_send_fx_chain_count, "SEND_EFFECT_CHAIN_COUNT");
144        LSCPEvent::RegisterEvent(LSCPEvent::event_send_fx_chain_info, "SEND_EFFECT_CHAIN_INFO");
145      hSocket = -1;      hSocket = -1;
146  }  }
147    
148  LSCPServer::~LSCPServer() {  LSCPServer::~LSCPServer() {
149        CloseAllConnections();
150        InstrumentManager::StopBackgroundThread();
151  #if defined(WIN32)  #if defined(WIN32)
152      if (hSocket >= 0) closesocket(hSocket);      if (hSocket >= 0) closesocket(hSocket);
153  #else  #else
# Line 139  LSCPServer::~LSCPServer() { Line 155  LSCPServer::~LSCPServer() {
155  #endif  #endif
156  }  }
157    
158    LSCPServer::EventHandler::EventHandler(LSCPServer* pParent) {
159        this->pParent = pParent;
160    }
161    
162    LSCPServer::EventHandler::~EventHandler() {
163        std::vector<midi_listener_entry> l = channelMidiListeners;
164        channelMidiListeners.clear();
165        for (int i = 0; i < l.size(); i++)
166            delete l[i].pMidiListener;
167    }
168    
169  void LSCPServer::EventHandler::ChannelCountChanged(int NewCount) {  void LSCPServer::EventHandler::ChannelCountChanged(int NewCount) {
170      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, NewCount));      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, NewCount));
171  }  }
172    
173    void LSCPServer::EventHandler::ChannelAdded(SamplerChannel* pChannel) {
174        pChannel->AddEngineChangeListener(this);
175    }
176    
177    void LSCPServer::EventHandler::ChannelToBeRemoved(SamplerChannel* pChannel) {
178        if (!pChannel->GetEngineChannel()) return;
179        EngineToBeChanged(pChannel->Index());
180    }
181    
182    void LSCPServer::EventHandler::EngineToBeChanged(int ChannelId) {
183        SamplerChannel* pSamplerChannel =
184            pParent->pSampler->GetSamplerChannel(ChannelId);
185        if (!pSamplerChannel) return;
186        EngineChannel* pEngineChannel =
187            pSamplerChannel->GetEngineChannel();
188        if (!pEngineChannel) return;
189        for (std::vector<midi_listener_entry>::iterator iter = channelMidiListeners.begin(); iter != channelMidiListeners.end(); ++iter) {
190            if ((*iter).pEngineChannel == pEngineChannel) {
191                VirtualMidiDevice* pMidiListener = (*iter).pMidiListener;
192                pEngineChannel->Disconnect(pMidiListener);
193                channelMidiListeners.erase(iter);
194                delete pMidiListener;
195                return;
196            }
197        }
198    }
199    
200    void LSCPServer::EventHandler::EngineChanged(int ChannelId) {
201        SamplerChannel* pSamplerChannel =
202            pParent->pSampler->GetSamplerChannel(ChannelId);
203        if (!pSamplerChannel) return;
204        EngineChannel* pEngineChannel =
205            pSamplerChannel->GetEngineChannel();
206        if (!pEngineChannel) return;
207        VirtualMidiDevice* pMidiListener = new VirtualMidiDevice;
208        pEngineChannel->Connect(pMidiListener);
209        midi_listener_entry entry = {
210            pSamplerChannel, pEngineChannel, pMidiListener
211        };
212        channelMidiListeners.push_back(entry);
213    }
214    
215  void LSCPServer::EventHandler::AudioDeviceCountChanged(int NewCount) {  void LSCPServer::EventHandler::AudioDeviceCountChanged(int NewCount) {
216      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, NewCount));      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, NewCount));
217  }  }
# Line 151  void LSCPServer::EventHandler::MidiDevic Line 220  void LSCPServer::EventHandler::MidiDevic
220      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, NewCount));      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, NewCount));
221  }  }
222    
223    void LSCPServer::EventHandler::MidiDeviceToBeDestroyed(MidiInputDevice* pDevice) {
224        pDevice->RemoveMidiPortCountListener(this);
225        for (int i = 0; i < pDevice->PortCount(); ++i)
226            MidiPortToBeRemoved(pDevice->GetPort(i));
227    }
228    
229    void LSCPServer::EventHandler::MidiDeviceCreated(MidiInputDevice* pDevice) {
230        pDevice->AddMidiPortCountListener(this);
231        for (int i = 0; i < pDevice->PortCount(); ++i)
232            MidiPortAdded(pDevice->GetPort(i));
233    }
234    
235    void LSCPServer::EventHandler::MidiPortCountChanged(int NewCount) {
236        // yet unused
237    }
238    
239    void LSCPServer::EventHandler::MidiPortToBeRemoved(MidiInputPort* pPort) {
240        for (std::vector<device_midi_listener_entry>::iterator iter = deviceMidiListeners.begin(); iter != deviceMidiListeners.end(); ++iter) {
241            if ((*iter).pPort == pPort) {
242                VirtualMidiDevice* pMidiListener = (*iter).pMidiListener;
243                pPort->Disconnect(pMidiListener);
244                deviceMidiListeners.erase(iter);
245                delete pMidiListener;
246                return;
247            }
248        }
249    }
250    
251    void LSCPServer::EventHandler::MidiPortAdded(MidiInputPort* pPort) {
252        // find out the device ID
253        std::map<uint, MidiInputDevice*> devices =
254            pParent->pSampler->GetMidiInputDevices();
255        for (
256            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
257            iter != devices.end(); ++iter
258        ) {
259            if (iter->second == pPort->GetDevice()) { // found
260                VirtualMidiDevice* pMidiListener = new VirtualMidiDevice;
261                pPort->Connect(pMidiListener);
262                device_midi_listener_entry entry = {
263                    pPort, pMidiListener, iter->first
264                };
265                deviceMidiListeners.push_back(entry);
266                return;
267            }
268        }
269    }
270    
271  void LSCPServer::EventHandler::MidiInstrumentCountChanged(int MapId, int NewCount) {  void LSCPServer::EventHandler::MidiInstrumentCountChanged(int MapId, int NewCount) {
272      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_count, MapId, NewCount));      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_count, MapId, NewCount));
273  }  }
# Line 187  void LSCPServer::EventHandler::TotalVoic Line 304  void LSCPServer::EventHandler::TotalVoic
304      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_voice_count, NewCount));      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_voice_count, NewCount));
305  }  }
306    
307    void LSCPServer::EventHandler::TotalStreamCountChanged(int NewCount) {
308        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_stream_count, NewCount));
309    }
310    
311  #if HAVE_SQLITE3  #if HAVE_SQLITE3
312  void LSCPServer::DbInstrumentsEventHandler::DirectoryCountChanged(String Dir) {  void LSCPServer::DbInstrumentsEventHandler::DirectoryCountChanged(String Dir) {
313      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_count, InstrumentsDb::toEscapedPath(Dir)));      LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_count, InstrumentsDb::toEscapedPath(Dir)));
# Line 221  void LSCPServer::DbInstrumentsEventHandl Line 342  void LSCPServer::DbInstrumentsEventHandl
342  }  }
343  #endif // HAVE_SQLITE3  #endif // HAVE_SQLITE3
344    
345    void LSCPServer::RemoveListeners() {
346        pSampler->RemoveChannelCountListener(&eventHandler);
347        pSampler->RemoveAudioDeviceCountListener(&eventHandler);
348        pSampler->RemoveMidiDeviceCountListener(&eventHandler);
349        pSampler->RemoveVoiceCountListener(&eventHandler);
350        pSampler->RemoveStreamCountListener(&eventHandler);
351        pSampler->RemoveBufferFillListener(&eventHandler);
352        pSampler->RemoveTotalStreamCountListener(&eventHandler);
353        pSampler->RemoveTotalVoiceCountListener(&eventHandler);
354        pSampler->RemoveFxSendCountListener(&eventHandler);
355        MidiInstrumentMapper::RemoveMidiInstrumentCountListener(&eventHandler);
356        MidiInstrumentMapper::RemoveMidiInstrumentInfoListener(&eventHandler);
357        MidiInstrumentMapper::RemoveMidiInstrumentMapCountListener(&eventHandler);
358        MidiInstrumentMapper::RemoveMidiInstrumentMapInfoListener(&eventHandler);
359    #if HAVE_SQLITE3
360        InstrumentsDb::GetInstrumentsDb()->RemoveInstrumentsDbListener(&dbInstrumentsEventHandler);
361    #endif
362    }
363    
364  /**  /**
365   * Blocks the calling thread until the LSCP Server is initialized and   * Blocks the calling thread until the LSCP Server is initialized and
# Line 283  int LSCPServer::Main() { Line 422  int LSCPServer::Main() {
422      pSampler->AddVoiceCountListener(&eventHandler);      pSampler->AddVoiceCountListener(&eventHandler);
423      pSampler->AddStreamCountListener(&eventHandler);      pSampler->AddStreamCountListener(&eventHandler);
424      pSampler->AddBufferFillListener(&eventHandler);      pSampler->AddBufferFillListener(&eventHandler);
425        pSampler->AddTotalStreamCountListener(&eventHandler);
426      pSampler->AddTotalVoiceCountListener(&eventHandler);      pSampler->AddTotalVoiceCountListener(&eventHandler);
427      pSampler->AddFxSendCountListener(&eventHandler);      pSampler->AddFxSendCountListener(&eventHandler);
428      MidiInstrumentMapper::AddMidiInstrumentCountListener(&eventHandler);      MidiInstrumentMapper::AddMidiInstrumentCountListener(&eventHandler);
# Line 302  int LSCPServer::Main() { Line 442  int LSCPServer::Main() {
442      timeval timeout;      timeval timeout;
443    
444      while (true) {      while (true) {
445            #if CONFIG_PTHREAD_TESTCANCEL
446                    TestCancel();
447            #endif
448          // 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
449          {          {
450                LockGuard lock(EngineChannelFactory::EngineChannelsMutex);
451              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
452              std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();              std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
453              std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();              std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
454              for (; itEngineChannel != itEnd; ++itEngineChannel) {              for (; itEngineChannel != itEnd; ++itEngineChannel) {
455                  if ((*itEngineChannel)->StatusChanged()) {                  if ((*itEngineChannel)->StatusChanged()) {
456                      SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->iSamplerChannelIndex));                      SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->GetSamplerChannel()->Index()));
457                  }                  }
458    
459                  for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {                  for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
460                      FxSend* fxs = (*itEngineChannel)->GetFxSend(i);                      FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
461                      if(fxs != NULL && fxs->IsInfoChanged()) {                      if(fxs != NULL && fxs->IsInfoChanged()) {
462                          int chn = (*itEngineChannel)->iSamplerChannelIndex;                          int chn = (*itEngineChannel)->GetSamplerChannel()->Index();
463                          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, chn, fxs->Id()));                          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, chn, fxs->Id()));
464                          fxs->SetInfoChanged(false);                          fxs->SetInfoChanged(false);
465                      }                      }
# Line 323  int LSCPServer::Main() { Line 467  int LSCPServer::Main() {
467              }              }
468          }          }
469    
470          //Now let's deliver late notifies (if any)          // check if MIDI data arrived on some engine channel
471          NotifyBufferMutex.Lock();          for (int i = 0; i < eventHandler.channelMidiListeners.size(); ++i) {
472          for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {              const EventHandler::midi_listener_entry entry =
473                    eventHandler.channelMidiListeners[i];
474                VirtualMidiDevice* pMidiListener = entry.pMidiListener;
475                if (pMidiListener->NotesChanged()) {
476                    for (int iNote = 0; iNote < 128; iNote++) {
477                        if (pMidiListener->NoteChanged(iNote)) {
478                            const bool bActive = pMidiListener->NoteIsActive(iNote);
479                            LSCPServer::SendLSCPNotify(
480                                LSCPEvent(
481                                    LSCPEvent::event_channel_midi,
482                                    entry.pSamplerChannel->Index(),
483                                    std::string(bActive ? "NOTE_ON" : "NOTE_OFF"),
484                                    iNote,
485                                    bActive ? pMidiListener->NoteOnVelocity(iNote)
486                                            : pMidiListener->NoteOffVelocity(iNote)
487                                )
488                            );
489                        }
490                    }
491                }
492            }
493    
494            // check if MIDI data arrived on some MIDI device
495            for (int i = 0; i < eventHandler.deviceMidiListeners.size(); ++i) {
496                const EventHandler::device_midi_listener_entry entry =
497                    eventHandler.deviceMidiListeners[i];
498                VirtualMidiDevice* pMidiListener = entry.pMidiListener;
499                if (pMidiListener->NotesChanged()) {
500                    for (int iNote = 0; iNote < 128; iNote++) {
501                        if (pMidiListener->NoteChanged(iNote)) {
502                            const bool bActive = pMidiListener->NoteIsActive(iNote);
503                            LSCPServer::SendLSCPNotify(
504                                LSCPEvent(
505                                    LSCPEvent::event_device_midi,
506                                    entry.uiDeviceID,
507                                    entry.pPort->GetPortNumber(),
508                                    std::string(bActive ? "NOTE_ON" : "NOTE_OFF"),
509                                    iNote,
510                                    bActive ? pMidiListener->NoteOnVelocity(iNote)
511                                            : pMidiListener->NoteOffVelocity(iNote)
512                                )
513                            );
514                        }
515                    }
516                }
517            }
518    
519            //Now let's deliver late notifies (if any)
520            {
521                LockGuard lock(NotifyBufferMutex);
522                for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {
523  #ifdef MSG_NOSIGNAL  #ifdef MSG_NOSIGNAL
524                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), MSG_NOSIGNAL);                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), MSG_NOSIGNAL);
525  #else  #else
526                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);                  send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);
527  #endif  #endif
528          }              }
529          bufferedNotifies.clear();              bufferedNotifies.clear();
530          NotifyBufferMutex.Unlock();          }
531    
532          fd_set selectSet = fdSet;          fd_set selectSet = fdSet;
533          timeout.tv_sec  = 0;          timeout.tv_sec  = 0;
# Line 341  int LSCPServer::Main() { Line 535  int LSCPServer::Main() {
535    
536          int retval = select(maxSessions+1, &selectSet, NULL, NULL, &timeout);          int retval = select(maxSessions+1, &selectSet, NULL, NULL, &timeout);
537    
538          if (retval == 0)          if (retval == 0 || (retval == -1 && errno == EINTR))
539                  continue; //Nothing try again                  continue; //Nothing try again
540          if (retval == -1) {          if (retval == -1) {
541                  std::cerr << "LSCPServer: Socket select error." << std::endl;                  std::cerr << "LSCPServer: Socket select error." << std::endl;
# Line 367  int LSCPServer::Main() { Line 561  int LSCPServer::Main() {
561                    std::cerr << "LSCPServer: ioctlsocket: set FIONBIO failed. Error " << WSAGetLastError() << std::endl;                    std::cerr << "LSCPServer: ioctlsocket: set FIONBIO failed. Error " << WSAGetLastError() << std::endl;
562                    exit(EXIT_FAILURE);                    exit(EXIT_FAILURE);
563                  }                  }
564          #else                    #else
565                    struct linger linger;
566                    linger.l_onoff = 1;
567                    linger.l_linger = 0;
568                    if(setsockopt(socket, SOL_SOCKET, SO_LINGER, &linger, sizeof(linger))) {
569                        std::cerr << "LSCPServer: Failed to set SO_LINGER\n";
570                    }
571    
572                  if (fcntl(socket, F_SETFL, O_NONBLOCK)) {                  if (fcntl(socket, F_SETFL, O_NONBLOCK)) {
573                          std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;                          std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;
574                          exit(EXIT_FAILURE);                          exit(EXIT_FAILURE);
# Line 423  void LSCPServer::CloseConnection( std::v Line 624  void LSCPServer::CloseConnection( std::v
624          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));
625          Sessions.erase(iter);          Sessions.erase(iter);
626          FD_CLR(socket,  &fdSet);          FD_CLR(socket,  &fdSet);
627          SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any)          {
628          for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {              LockGuard lock(SubscriptionMutex);
629                  iter->second.remove(socket);              // Must unsubscribe this socket from all events (if any)
630          }              for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {
631          SubscriptionMutex.Unlock();                  iter->second.remove(socket);
632          NotifyMutex.Lock();              }
633            }
634            LockGuard lock(NotifyMutex);
635          bufferedCommands.erase(socket);          bufferedCommands.erase(socket);
636          bufferedNotifies.erase(socket);          bufferedNotifies.erase(socket);
637          #if defined(WIN32)          #if defined(WIN32)
# Line 436  void LSCPServer::CloseConnection( std::v Line 639  void LSCPServer::CloseConnection( std::v
639          #else          #else
640          close(socket);          close(socket);
641          #endif          #endif
642          NotifyMutex.Unlock();  }
643    
644    void LSCPServer::CloseAllConnections() {
645        std::vector<yyparse_param_t>::iterator iter = Sessions.begin();
646        while(iter != Sessions.end()) {
647            CloseConnection(iter);
648            iter = Sessions.begin();
649        }
650  }  }
651    
652  int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {  int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {
653          int subs = 0;          int subs = 0;
654          SubscriptionMutex.Lock();          LockGuard lock(SubscriptionMutex);
655          for( std::list<LSCPEvent::event_t>::iterator iter = events.begin();          for( std::list<LSCPEvent::event_t>::iterator iter = events.begin();
656                          iter != events.end(); iter++)                          iter != events.end(); iter++)
657          {          {
658                  subs += eventSubscriptions.count(*iter);                  subs += eventSubscriptions.count(*iter);
659          }          }
         SubscriptionMutex.Unlock();  
660          return subs;          return subs;
661  }  }
662    
663  void LSCPServer::SendLSCPNotify( LSCPEvent event ) {  void LSCPServer::SendLSCPNotify( LSCPEvent event ) {
664          SubscriptionMutex.Lock();          LockGuard lock(SubscriptionMutex);
665          if (eventSubscriptions.count(event.GetType()) == 0) {          if (eventSubscriptions.count(event.GetType()) == 0) {
666                  SubscriptionMutex.Unlock();     //Nobody is subscribed to this event                  // Nobody is subscribed to this event
667                  return;                  return;
668          }          }
669          std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();          std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();
# Line 480  void LSCPServer::SendLSCPNotify( LSCPEve Line 689  void LSCPServer::SendLSCPNotify( LSCPEve
689                          }                          }
690                  }                  }
691          }          }
         SubscriptionMutex.Unlock();  
692  }  }
693    
694  extern int GetLSCPCommand( void *buf, int max_size ) {  extern int GetLSCPCommand( void *buf, int max_size ) {
# Line 538  bool LSCPServer::GetLSCPCommand( std::ve Line 746  bool LSCPServer::GetLSCPCommand( std::ve
746                      int wsa_lasterror = WSAGetLastError();                      int wsa_lasterror = WSAGetLastError();
747                          if (wsa_lasterror == WSAEWOULDBLOCK) //Would block, try again later.                          if (wsa_lasterror == WSAEWOULDBLOCK) //Would block, try again later.
748                                  return false;                                  return false;
749                          dmsg(2,("LSCPScanner: Socket error after recv() Error %d.\n", wsa_lasterror));                            dmsg(2,("LSCPScanner: Socket error after recv() Error %d.\n", wsa_lasterror));
750                          CloseConnection(iter);                          CloseConnection(iter);
751                          break;                          break;
752                  }                  }
# Line 595  bool LSCPServer::GetLSCPCommand( std::ve Line 803  bool LSCPServer::GetLSCPCommand( std::ve
803  void LSCPServer::AnswerClient(String ReturnMessage) {  void LSCPServer::AnswerClient(String ReturnMessage) {
804      dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));      dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));
805      if (currentSocket != -1) {      if (currentSocket != -1) {
806              NotifyMutex.Lock();              LockGuard lock(NotifyMutex);
807  #ifdef MSG_NOSIGNAL  #ifdef MSG_NOSIGNAL
808              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), MSG_NOSIGNAL);              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), MSG_NOSIGNAL);
809  #else  #else
810              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);              send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);
811  #endif  #endif
             NotifyMutex.Unlock();  
812      }      }
813  }  }
814    
# Line 751  String LSCPServer::SetEngineType(String Line 958  String LSCPServer::SetEngineType(String
958      try {      try {
959          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
960          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
961          LockRTNotify();          LockGuard lock(RTNotifyMutex);
962          pSamplerChannel->SetEngineType(EngineName);          pSamplerChannel->SetEngineType(EngineName);
963          if(HasSoloChannel()) pSamplerChannel->GetEngineChannel()->SetMute(-1);          if(HasSoloChannel()) pSamplerChannel->GetEngineChannel()->SetMute(-1);
         UnlockRTNotify();  
964      }      }
965      catch (Exception e) {      catch (Exception e) {
966           result.Error(e);           result.Error(e);
# Line 794  String LSCPServer::ListChannels() { Line 1000  String LSCPServer::ListChannels() {
1000   */   */
1001  String LSCPServer::AddChannel() {  String LSCPServer::AddChannel() {
1002      dmsg(2,("LSCPServer: AddChannel()\n"));      dmsg(2,("LSCPServer: AddChannel()\n"));
1003      LockRTNotify();      SamplerChannel* pSamplerChannel;
1004      SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();      {
1005      UnlockRTNotify();          LockGuard lock(RTNotifyMutex);
1006            pSamplerChannel = pSampler->AddSamplerChannel();
1007        }
1008      LSCPResultSet result(pSamplerChannel->Index());      LSCPResultSet result(pSamplerChannel->Index());
1009      return result.Produce();      return result.Produce();
1010  }  }
# Line 807  String LSCPServer::AddChannel() { Line 1015  String LSCPServer::AddChannel() {
1015  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
1016      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
1017      LSCPResultSet result;      LSCPResultSet result;
1018      LockRTNotify();      {
1019      pSampler->RemoveSamplerChannel(uiSamplerChannel);          LockGuard lock(RTNotifyMutex);
1020      UnlockRTNotify();          pSampler->RemoveSamplerChannel(uiSamplerChannel);
1021        }
1022      return result.Produce();      return result.Produce();
1023  }  }
1024    
# Line 852  String LSCPServer::ListAvailableEngines( Line 1061  String LSCPServer::ListAvailableEngines(
1061  String LSCPServer::GetEngineInfo(String EngineName) {  String LSCPServer::GetEngineInfo(String EngineName) {
1062      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
1063      LSCPResultSet result;      LSCPResultSet result;
1064      LockRTNotify();      {
1065      try {          LockGuard lock(RTNotifyMutex);
1066          Engine* pEngine = EngineFactory::Create(EngineName);          try {
1067          result.Add("DESCRIPTION", _escapeLscpResponse(pEngine->Description()));              Engine* pEngine = EngineFactory::Create(EngineName);
1068          result.Add("VERSION",     pEngine->Version());              result.Add("DESCRIPTION", _escapeLscpResponse(pEngine->Description()));
1069          EngineFactory::Destroy(pEngine);              result.Add("VERSION",     pEngine->Version());
1070      }              EngineFactory::Destroy(pEngine);
1071      catch (Exception e) {          }
1072           result.Error(e);          catch (Exception e) {
1073                result.Error(e);
1074            }
1075      }      }
     UnlockRTNotify();  
1076      return result.Produce();      return result.Produce();
1077  }  }
1078    
# Line 961  String LSCPServer::GetVoiceCount(uint ui Line 1171  String LSCPServer::GetVoiceCount(uint ui
1171      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
1172      LSCPResultSet result;      LSCPResultSet result;
1173      try {      try {
1174          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");  
1175          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");
1176          result.Add(pEngineChannel->GetEngine()->VoiceCount());          result.Add(pEngineChannel->GetEngine()->VoiceCount());
1177      }      }
# Line 982  String LSCPServer::GetStreamCount(uint u Line 1189  String LSCPServer::GetStreamCount(uint u
1189      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
1190      LSCPResultSet result;      LSCPResultSet result;
1191      try {      try {
1192          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");  
1193          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");
1194          result.Add(pEngineChannel->GetEngine()->DiskStreamCount());          result.Add(pEngineChannel->GetEngine()->DiskStreamCount());
1195      }      }
# Line 1003  String LSCPServer::GetBufferFill(fill_re Line 1207  String LSCPServer::GetBufferFill(fill_re
1207      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
1208      LSCPResultSet result;      LSCPResultSet result;
1209      try {      try {
1210          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");  
1211          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");
1212          if (!pEngineChannel->GetEngine()->DiskStreamSupported()) result.Add("NA");          if (!pEngineChannel->GetEngine()->DiskStreamSupported()) result.Add("NA");
1213          else {          else {
# Line 1094  String LSCPServer::GetMidiInputDriverInf Line 1295  String LSCPServer::GetMidiInputDriverInf
1295              for (;iter != parameters.end(); iter++) {              for (;iter != parameters.end(); iter++) {
1296                  if (s != "") s += ",";                  if (s != "") s += ",";
1297                  s += iter->first;                  s += iter->first;
1298                    delete iter->second;
1299              }              }
1300              result.Add("PARAMETERS", s);              result.Add("PARAMETERS", s);
1301          }          }
# Line 1118  String LSCPServer::GetAudioOutputDriverI Line 1320  String LSCPServer::GetAudioOutputDriverI
1320              for (;iter != parameters.end(); iter++) {              for (;iter != parameters.end(); iter++) {
1321                  if (s != "") s += ",";                  if (s != "") s += ",";
1322                  s += iter->first;                  s += iter->first;
1323                    delete iter->second;
1324              }              }
1325              result.Add("PARAMETERS", s);              result.Add("PARAMETERS", s);
1326          }          }
# Line 1148  String LSCPServer::GetMidiInputDriverPar Line 1351  String LSCPServer::GetMidiInputDriverPar
1351          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
1352          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
1353          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
1354            delete pParameter;
1355      }      }
1356      catch (Exception e) {      catch (Exception e) {
1357          result.Error(e);          result.Error(e);
# Line 1175  String LSCPServer::GetAudioOutputDriverP Line 1379  String LSCPServer::GetAudioOutputDriverP
1379          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);          if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
1380          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);          if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
1381          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);          if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
1382            delete pParameter;
1383      }      }
1384      catch (Exception e) {      catch (Exception e) {
1385          result.Error(e);          result.Error(e);
# Line 1516  String LSCPServer::SetAudioOutputChannel Line 1721  String LSCPServer::SetAudioOutputChannel
1721  String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {  String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {
1722      dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));      dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));
1723      LSCPResultSet result;      LSCPResultSet result;
1724      LockRTNotify();      {
1725            LockGuard lock(RTNotifyMutex);
1726            try {
1727                SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1728                if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1729                std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1730                if (!devices.count(AudioDeviceId)) throw Exception("There is no audio output device with index " + ToString(AudioDeviceId));
1731                AudioOutputDevice* pDevice = devices[AudioDeviceId];
1732                pSamplerChannel->SetAudioOutputDevice(pDevice);
1733            }
1734            catch (Exception e) {
1735                result.Error(e);
1736            }
1737        }
1738        return result.Produce();
1739    }
1740    
1741    String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {
1742        dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));
1743        LSCPResultSet result;
1744        {
1745            LockGuard lock(RTNotifyMutex);
1746            try {
1747                SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1748                if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1749                // Driver type name aliasing...
1750                if (AudioOutputDriver == "Alsa") AudioOutputDriver = "ALSA";
1751                if (AudioOutputDriver == "Jack") AudioOutputDriver = "JACK";
1752                // Check if there's one audio output device already created
1753                // for the intended audio driver type (AudioOutputDriver)...
1754                AudioOutputDevice *pDevice = NULL;
1755                std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1756                std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1757                for (; iter != devices.end(); iter++) {
1758                    if ((iter->second)->Driver() == AudioOutputDriver) {
1759                        pDevice = iter->second;
1760                        break;
1761                    }
1762                }
1763                // If it doesn't exist, create a new one with default parameters...
1764                if (pDevice == NULL) {
1765                    std::map<String,String> params;
1766                    pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);
1767                }
1768                // Must have a device...
1769                if (pDevice == NULL)
1770                    throw Exception("Internal error: could not create audio output device.");
1771                // Set it as the current channel device...
1772                pSamplerChannel->SetAudioOutputDevice(pDevice);
1773            }
1774            catch (Exception e) {
1775                result.Error(e);
1776            }
1777        }
1778        return result.Produce();
1779    }
1780    
1781    String LSCPServer::AddChannelMidiInput(uint uiSamplerChannel, uint MIDIDeviceId, uint MIDIPort) {
1782        dmsg(2,("LSCPServer: AddChannelMidiInput(uiSamplerChannel=%d, MIDIDeviceId=%d, MIDIPort=%d)\n",uiSamplerChannel,MIDIDeviceId,MIDIPort));
1783        LSCPResultSet result;
1784      try {      try {
1785          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1786          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1787          std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();  
1788          if (!devices.count(AudioDeviceId)) throw Exception("There is no audio output device with index " + ToString(AudioDeviceId));          std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1789          AudioOutputDevice* pDevice = devices[AudioDeviceId];          if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1790          pSamplerChannel->SetAudioOutputDevice(pDevice);          MidiInputDevice* pDevice = devices[MIDIDeviceId];
1791    
1792            MidiInputPort* pPort = pDevice->GetPort(MIDIPort);
1793            if (!pPort) throw Exception("There is no MIDI input port with index " + ToString(MIDIPort) + " on MIDI input device with index " + ToString(MIDIDeviceId));
1794    
1795            pSamplerChannel->Connect(pPort);
1796        } catch (Exception e) {
1797            result.Error(e);
1798      }      }
1799      catch (Exception e) {      return result.Produce();
1800           result.Error(e);  }
1801    
1802    String LSCPServer::RemoveChannelMidiInput(uint uiSamplerChannel) {
1803        dmsg(2,("LSCPServer: RemoveChannelMidiInput(uiSamplerChannel=%d)\n",uiSamplerChannel));
1804        LSCPResultSet result;
1805        try {
1806            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1807            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1808            pSamplerChannel->DisconnectAllMidiInputPorts();
1809        } catch (Exception e) {
1810            result.Error(e);
1811      }      }
     UnlockRTNotify();  
1812      return result.Produce();      return result.Produce();
1813  }  }
1814    
1815  String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {  String LSCPServer::RemoveChannelMidiInput(uint uiSamplerChannel, uint MIDIDeviceId) {
1816      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));
1817      LSCPResultSet result;      LSCPResultSet result;
     LockRTNotify();  
1818      try {      try {
1819          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1820          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1821          // Driver type name aliasing...  
1822          if (AudioOutputDriver == "Alsa") AudioOutputDriver = "ALSA";          std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1823          if (AudioOutputDriver == "Jack") AudioOutputDriver = "JACK";          if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1824          // Check if there's one audio output device already created          MidiInputDevice* pDevice = devices[MIDIDeviceId];
1825          // for the intended audio driver type (AudioOutputDriver)...          
1826          AudioOutputDevice *pDevice = NULL;          std::vector<MidiInputPort*> vPorts = pSamplerChannel->GetMidiInputPorts();
1827          std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();          for (int i = 0; i < vPorts.size(); ++i)
1828          std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();              if (vPorts[i]->GetDevice() == pDevice)
1829          for (; iter != devices.end(); iter++) {                  pSamplerChannel->Disconnect(vPorts[i]);
1830              if ((iter->second)->Driver() == AudioOutputDriver) {  
1831                  pDevice = iter->second;      } catch (Exception e) {
1832                  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);  
1833      }      }
1834      catch (Exception e) {      return result.Produce();
1835           result.Error(e);  }
1836    
1837    String LSCPServer::RemoveChannelMidiInput(uint uiSamplerChannel, uint MIDIDeviceId, uint MIDIPort) {
1838        dmsg(2,("LSCPServer: RemoveChannelMidiInput(uiSamplerChannel=%d, MIDIDeviceId=%d, MIDIPort=%d)\n",uiSamplerChannel,MIDIDeviceId,MIDIPort));
1839        LSCPResultSet result;
1840        try {
1841            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1842            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1843    
1844            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1845            if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1846            MidiInputDevice* pDevice = devices[MIDIDeviceId];
1847    
1848            MidiInputPort* pPort = pDevice->GetPort(MIDIPort);
1849            if (!pPort) throw Exception("There is no MIDI input port with index " + ToString(MIDIPort) + " on MIDI input device with index " + ToString(MIDIDeviceId));
1850    
1851            pSamplerChannel->Disconnect(pPort);
1852        } catch (Exception e) {
1853            result.Error(e);
1854        }
1855        return result.Produce();
1856    }
1857    
1858    String LSCPServer::ListChannelMidiInputs(uint uiSamplerChannel) {
1859        dmsg(2,("LSCPServer: ListChannelMidiInputs(uiSamplerChannel=%d)\n",uiSamplerChannel));
1860        LSCPResultSet result;
1861        try {
1862            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1863            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1864            std::vector<MidiInputPort*> vPorts = pSamplerChannel->GetMidiInputPorts();
1865    
1866            String s;
1867            for (int i = 0; i < vPorts.size(); ++i) {
1868                const int iDeviceID = vPorts[i]->GetDevice()->MidiInputDeviceID();
1869                const int iPortNr   = vPorts[i]->GetPortNumber();
1870                if (s.size()) s += ",";
1871                s += "{" + ToString(iDeviceID) + ","
1872                         + ToString(iPortNr) + "}";
1873            }
1874            result.Add(s);
1875        } catch (Exception e) {
1876            result.Error(e);
1877      }      }
     UnlockRTNotify();  
1878      return result.Produce();      return result.Produce();
1879  }  }
1880    
# Line 1641  String LSCPServer::SetMIDIInputType(Stri Line 1948  String LSCPServer::SetMIDIInputType(Stri
1948              pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);              pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);
1949              // Make it with at least one initial port.              // Make it with at least one initial port.
1950              std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();              std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
             parameters["PORTS"]->SetValue("1");  
1951          }          }
1952          // Must have a device...          // Must have a device...
1953          if (pDevice == NULL)          if (pDevice == NULL)
# Line 1684  String LSCPServer::SetVolume(double dVol Line 1990  String LSCPServer::SetVolume(double dVol
1990      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));
1991      LSCPResultSet result;      LSCPResultSet result;
1992      try {      try {
1993          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");  
1994          pEngineChannel->Volume(dVolume);          pEngineChannel->Volume(dVolume);
1995      }      }
1996      catch (Exception e) {      catch (Exception e) {
# Line 1703  String LSCPServer::SetChannelMute(bool b Line 2006  String LSCPServer::SetChannelMute(bool b
2006      dmsg(2,("LSCPServer: SetChannelMute(bMute=%d,uiSamplerChannel=%d)\n",bMute,uiSamplerChannel));      dmsg(2,("LSCPServer: SetChannelMute(bMute=%d,uiSamplerChannel=%d)\n",bMute,uiSamplerChannel));
2007      LSCPResultSet result;      LSCPResultSet result;
2008      try {      try {
2009          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");  
2010    
2011          if(!bMute) pEngineChannel->SetMute((HasSoloChannel() && !pEngineChannel->GetSolo()) ? -1 : 0);          if(!bMute) pEngineChannel->SetMute((HasSoloChannel() && !pEngineChannel->GetSolo()) ? -1 : 0);
2012          else pEngineChannel->SetMute(1);          else pEngineChannel->SetMute(1);
# Line 1724  String LSCPServer::SetChannelSolo(bool b Line 2023  String LSCPServer::SetChannelSolo(bool b
2023      dmsg(2,("LSCPServer: SetChannelSolo(bSolo=%d,uiSamplerChannel=%d)\n",bSolo,uiSamplerChannel));      dmsg(2,("LSCPServer: SetChannelSolo(bSolo=%d,uiSamplerChannel=%d)\n",bSolo,uiSamplerChannel));
2024      LSCPResultSet result;      LSCPResultSet result;
2025      try {      try {
2026          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");  
2027    
2028          bool oldSolo = pEngineChannel->GetSolo();          bool oldSolo = pEngineChannel->GetSolo();
2029          bool hadSoloChannel = HasSoloChannel();          bool hadSoloChannel = HasSoloChannel();
# Line 1848  String LSCPServer::GetMidiInstrumentMapp Line 2143  String LSCPServer::GetMidiInstrumentMapp
2143      dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));      dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));
2144      LSCPResultSet result;      LSCPResultSet result;
2145      try {      try {
2146          result.Add(MidiInstrumentMapper::Entries(MidiMapID).size());          result.Add(MidiInstrumentMapper::GetInstrumentCount(MidiMapID));
2147      } catch (Exception e) {      } catch (Exception e) {
2148          result.Error(e);          result.Error(e);
2149      }      }
# Line 1859  String LSCPServer::GetMidiInstrumentMapp Line 2154  String LSCPServer::GetMidiInstrumentMapp
2154  String LSCPServer::GetAllMidiInstrumentMappings() {  String LSCPServer::GetAllMidiInstrumentMappings() {
2155      dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));      dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));
2156      LSCPResultSet result;      LSCPResultSet result;
2157      std::vector<int> maps = MidiInstrumentMapper::Maps();      try {
2158      int totalMappings = 0;          result.Add(MidiInstrumentMapper::GetInstrumentCount());
2159      for (int i = 0; i < maps.size(); i++) {      } catch (Exception e) {
2160          try {          result.Error(e);
             totalMappings += MidiInstrumentMapper::Entries(maps[i]).size();  
         } catch (Exception e) { /*NOOP*/ }  
2161      }      }
     result.Add(totalMappings);  
2162      return result.Produce();      return result.Produce();
2163  }  }
2164    
# Line 1874  String LSCPServer::GetMidiInstrumentMapp Line 2166  String LSCPServer::GetMidiInstrumentMapp
2166      dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));      dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));
2167      LSCPResultSet result;      LSCPResultSet result;
2168      try {      try {
2169          midi_prog_index_t idx;          MidiInstrumentMapper::entry_t entry = MidiInstrumentMapper::GetEntry(MidiMapID, MidiBank, MidiProg);
2170          idx.midi_bank_msb = (MidiBank >> 7) & 0x7f;          // convert the filename into the correct encoding as defined for LSCP
2171          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)  
2172  #if WIN32  #if WIN32
2173              const String instrumentFileName = Path::fromWindows(iter->second.InstrumentFile).toLscp();          const String instrumentFileName = Path::fromWindows(entry.InstrumentFile).toLscp();
2174  #else  #else
2175              // assuming POSIX          // assuming POSIX
2176              const String instrumentFileName = Path::fromPosix(iter->second.InstrumentFile).toLscp();          const String instrumentFileName = Path::fromPosix(entry.InstrumentFile).toLscp();
2177  #endif  #endif
2178    
2179              result.Add("NAME", _escapeLscpResponse(iter->second.Name));          result.Add("NAME", _escapeLscpResponse(entry.Name));
2180              result.Add("ENGINE_NAME", iter->second.EngineName);          result.Add("ENGINE_NAME", entry.EngineName);
2181              result.Add("INSTRUMENT_FILE", instrumentFileName);          result.Add("INSTRUMENT_FILE", instrumentFileName);
2182              result.Add("INSTRUMENT_NR", (int) iter->second.InstrumentIndex);          result.Add("INSTRUMENT_NR", (int) entry.InstrumentIndex);
2183              String instrumentName;          String instrumentName;
2184              Engine* pEngine = EngineFactory::Create(iter->second.EngineName);          Engine* pEngine = EngineFactory::Create(entry.EngineName);
2185              if (pEngine) {          if (pEngine) {
2186                  if (pEngine->GetInstrumentManager()) {              if (pEngine->GetInstrumentManager()) {
2187                      InstrumentManager::instrument_id_t instrID;                  InstrumentManager::instrument_id_t instrID;
2188                      instrID.FileName = iter->second.InstrumentFile;                  instrID.FileName = entry.InstrumentFile;
2189                      instrID.Index    = iter->second.InstrumentIndex;                  instrID.Index    = entry.InstrumentIndex;
2190                      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!");  
2191              }              }
2192              result.Add("VOLUME", iter->second.Volume);              EngineFactory::Destroy(pEngine);
2193          }          }
2194            result.Add("INSTRUMENT_NAME", _escapeLscpResponse(instrumentName));
2195            switch (entry.LoadMode) {
2196                case MidiInstrumentMapper::ON_DEMAND:
2197                    result.Add("LOAD_MODE", "ON_DEMAND");
2198                    break;
2199                case MidiInstrumentMapper::ON_DEMAND_HOLD:
2200                    result.Add("LOAD_MODE", "ON_DEMAND_HOLD");
2201                    break;
2202                case MidiInstrumentMapper::PERSISTENT:
2203                    result.Add("LOAD_MODE", "PERSISTENT");
2204                    break;
2205                default:
2206                    throw Exception("entry reflects invalid LOAD_MODE, consider this as a bug!");
2207            }
2208            result.Add("VOLUME", entry.Volume);
2209      } catch (Exception e) {      } catch (Exception e) {
2210          result.Error(e);          result.Error(e);
2211      }      }
# Line 2094  String LSCPServer::SetChannelMap(uint ui Line 2376  String LSCPServer::SetChannelMap(uint ui
2376      dmsg(2,("LSCPServer: SetChannelMap()\n"));      dmsg(2,("LSCPServer: SetChannelMap()\n"));
2377      LSCPResultSet result;      LSCPResultSet result;
2378      try {      try {
2379          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");  
2380    
2381          if      (MidiMapID == -1) pEngineChannel->SetMidiInstrumentMapToNone();          if      (MidiMapID == -1) pEngineChannel->SetMidiInstrumentMapToNone();
2382          else if (MidiMapID == -2) pEngineChannel->SetMidiInstrumentMapToDefault();          else if (MidiMapID == -2) pEngineChannel->SetMidiInstrumentMapToDefault();
# Line 2206  String LSCPServer::GetFxSendInfo(uint ui Line 2484  String LSCPServer::GetFxSendInfo(uint ui
2484              AudioRouting += ToString(pFxSend->DestinationChannel(chan));              AudioRouting += ToString(pFxSend->DestinationChannel(chan));
2485          }          }
2486    
2487            const String sEffectRouting =
2488                (pFxSend->DestinationEffectChain() >= 0 && pFxSend->DestinationEffectChainPosition() >= 0)
2489                    ? ToString(pFxSend->DestinationEffectChain()) + "," + ToString(pFxSend->DestinationEffectChainPosition())
2490                    : "NONE";
2491    
2492          // success          // success
2493          result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));          result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));
2494          result.Add("MIDI_CONTROLLER", pFxSend->MidiController());          result.Add("MIDI_CONTROLLER", pFxSend->MidiController());
2495          result.Add("LEVEL", ToString(pFxSend->Level()));          result.Add("LEVEL", ToString(pFxSend->Level()));
2496          result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);          result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
2497            result.Add("EFFECT", sEffectRouting);
2498      } catch (Exception e) {      } catch (Exception e) {
2499          result.Error(e);          result.Error(e);
2500      }      }
# Line 2273  String LSCPServer::SetFxSendLevel(uint u Line 2557  String LSCPServer::SetFxSendLevel(uint u
2557      return result.Produce();      return result.Produce();
2558  }  }
2559    
2560    String LSCPServer::SetFxSendEffect(uint uiSamplerChannel, uint FxSendID, int iSendEffectChain, int iEffectChainPosition) {
2561        dmsg(2,("LSCPServer: SetFxSendEffect(%d,%d)\n", iSendEffectChain, iEffectChainPosition));
2562        LSCPResultSet result;
2563        try {
2564            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2565    
2566            pFxSend->SetDestinationEffect(iSendEffectChain, iEffectChainPosition);
2567            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2568        } catch (Exception e) {
2569            result.Error(e);
2570        }
2571        return result.Produce();
2572    }
2573    
2574    String LSCPServer::GetAvailableEffects() {
2575        dmsg(2,("LSCPServer: GetAvailableEffects()\n"));
2576        LSCPResultSet result;
2577        try {
2578            int n = EffectFactory::AvailableEffectsCount();
2579            result.Add(n);
2580        }
2581        catch (Exception e) {
2582            result.Error(e);
2583        }
2584        return result.Produce();
2585    }
2586    
2587    String LSCPServer::ListAvailableEffects() {
2588        dmsg(2,("LSCPServer: ListAvailableEffects()\n"));
2589        LSCPResultSet result;
2590        String list;
2591        try {
2592            //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
2593            int n = EffectFactory::AvailableEffectsCount();
2594            for (int i = 0; i < n; i++) {
2595                if (i) list += ",";
2596                list += ToString(i);
2597            }
2598        }
2599        catch (Exception e) {
2600            result.Error(e);
2601        }
2602        result.Add(list);
2603        return result.Produce();
2604    }
2605    
2606    String LSCPServer::GetEffectInfo(int iEffectIndex) {
2607        dmsg(2,("LSCPServer: GetEffectInfo(%d)\n", iEffectIndex));
2608        LSCPResultSet result;
2609        try {
2610            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
2611            if (!pEffectInfo)
2612                throw Exception("There is no effect with index " + ToString(iEffectIndex));
2613    
2614            // convert the filename into the correct encoding as defined for LSCP
2615            // (especially in terms of special characters -> escape sequences)
2616    #if WIN32
2617            const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
2618    #else
2619            // assuming POSIX
2620            const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
2621    #endif
2622    
2623            result.Add("SYSTEM", pEffectInfo->EffectSystem());
2624            result.Add("MODULE", dllFileName);
2625            result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
2626            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
2627        }
2628        catch (Exception e) {
2629            result.Error(e);
2630        }
2631        return result.Produce();    
2632    }
2633    
2634    String LSCPServer::GetEffectInstanceInfo(int iEffectInstance) {
2635        dmsg(2,("LSCPServer: GetEffectInstanceInfo(%d)\n", iEffectInstance));
2636        LSCPResultSet result;
2637        try {
2638            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2639            if (!pEffect)
2640                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2641    
2642            EffectInfo* pEffectInfo = pEffect->GetEffectInfo();
2643    
2644            // convert the filename into the correct encoding as defined for LSCP
2645            // (especially in terms of special characters -> escape sequences)
2646    #if WIN32
2647            const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
2648    #else
2649            // assuming POSIX
2650            const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
2651    #endif
2652    
2653            result.Add("SYSTEM", pEffectInfo->EffectSystem());
2654            result.Add("MODULE", dllFileName);
2655            result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
2656            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
2657            result.Add("INPUT_CONTROLS", ToString(pEffect->InputControlCount()));
2658        }
2659        catch (Exception e) {
2660            result.Error(e);
2661        }
2662        return result.Produce();
2663    }
2664    
2665    String LSCPServer::GetEffectInstanceInputControlInfo(int iEffectInstance, int iInputControlIndex) {
2666        dmsg(2,("LSCPServer: GetEffectInstanceInputControlInfo(%d,%d)\n", iEffectInstance, iInputControlIndex));
2667        LSCPResultSet result;
2668        try {
2669            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2670            if (!pEffect)
2671                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2672    
2673            EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
2674            if (!pEffectControl)
2675                throw Exception(
2676                    "Effect instance " + ToString(iEffectInstance) +
2677                    " does not have an input control with index " +
2678                    ToString(iInputControlIndex)
2679                );
2680    
2681            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectControl->Description()));
2682            result.Add("VALUE", pEffectControl->Value());
2683            if (pEffectControl->MinValue())
2684                 result.Add("RANGE_MIN", *pEffectControl->MinValue());
2685            if (pEffectControl->MaxValue())
2686                 result.Add("RANGE_MAX", *pEffectControl->MaxValue());
2687            if (!pEffectControl->Possibilities().empty())
2688                 result.Add("POSSIBILITIES", pEffectControl->Possibilities());
2689            if (pEffectControl->DefaultValue())
2690                 result.Add("DEFAULT", *pEffectControl->DefaultValue());
2691        } catch (Exception e) {
2692            result.Error(e);
2693        }
2694        return result.Produce();
2695    }
2696    
2697    String LSCPServer::SetEffectInstanceInputControlValue(int iEffectInstance, int iInputControlIndex, double dValue) {
2698        dmsg(2,("LSCPServer: SetEffectInstanceInputControlValue(%d,%d,%f)\n", iEffectInstance, iInputControlIndex, dValue));
2699        LSCPResultSet result;
2700        try {
2701            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2702            if (!pEffect)
2703                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2704    
2705            EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
2706            if (!pEffectControl)
2707                throw Exception(
2708                    "Effect instance " + ToString(iEffectInstance) +
2709                    " does not have an input control with index " +
2710                    ToString(iInputControlIndex)
2711                );
2712    
2713            pEffectControl->SetValue(dValue);
2714            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_info, iEffectInstance));
2715        } catch (Exception e) {
2716            result.Error(e);
2717        }
2718        return result.Produce();
2719    }
2720    
2721    String LSCPServer::CreateEffectInstance(int iEffectIndex) {
2722        dmsg(2,("LSCPServer: CreateEffectInstance(%d)\n", iEffectIndex));
2723        LSCPResultSet result;
2724        try {
2725            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
2726            if (!pEffectInfo)
2727                throw Exception("There is no effect with index " + ToString(iEffectIndex));
2728            Effect* pEffect = EffectFactory::Create(pEffectInfo);
2729            result = pEffect->ID(); // success
2730            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_count, EffectFactory::EffectInstancesCount()));
2731        } catch (Exception e) {
2732            result.Error(e);
2733        }
2734        return result.Produce();
2735    }
2736    
2737    String LSCPServer::CreateEffectInstance(String effectSystem, String module, String effectName) {
2738        dmsg(2,("LSCPServer: CreateEffectInstance('%s','%s','%s')\n", effectSystem.c_str(), module.c_str(), effectName.c_str()));
2739        LSCPResultSet result;
2740        try {
2741            // to allow loading the same LSCP session file on different systems
2742            // successfully, probably with different effect plugin DLL paths or even
2743            // running completely different operating systems, we do the following
2744            // for finding the right effect:
2745            //
2746            // first try to search for an exact match of the effect plugin DLL
2747            // (a.k.a 'module'), to avoid picking the wrong DLL with the same
2748            // effect name ...
2749            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_MATCH_EXACTLY);
2750            // ... if no effect with exactly matchin DLL filename was found, then
2751            // try to lower the restrictions of matching the effect plugin DLL
2752            // filename and try again and again ...
2753            if (!pEffectInfo) {
2754                dmsg(2,("no exact module match, trying MODULE_IGNORE_PATH\n"));
2755                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH);
2756            }
2757            if (!pEffectInfo) {
2758                dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE\n"));
2759                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE);
2760            }
2761            if (!pEffectInfo) {
2762                dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE | MODULE_IGNORE_EXTENSION\n"));
2763                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE | EffectFactory::MODULE_IGNORE_EXTENSION);
2764            }
2765            // ... if there was still no effect found, then completely ignore the
2766            // DLL plugin filename argument and just search for the matching effect
2767            // system type and effect name
2768            if (!pEffectInfo) {
2769                dmsg(2,("no module match, trying MODULE_IGNORE_ALL\n"));
2770                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_ALL);
2771            }
2772            if (!pEffectInfo)
2773                throw Exception("There is no such effect '" + effectSystem + "' '" + module + "' '" + effectName + "'");
2774    
2775            Effect* pEffect = EffectFactory::Create(pEffectInfo);
2776            result = LSCPResultSet(pEffect->ID());
2777            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_count, EffectFactory::EffectInstancesCount()));
2778        } catch (Exception e) {
2779            result.Error(e);
2780        }
2781        return result.Produce();
2782    }
2783    
2784    String LSCPServer::DestroyEffectInstance(int iEffectInstance) {
2785        dmsg(2,("LSCPServer: DestroyEffectInstance(%d)\n", iEffectInstance));
2786        LSCPResultSet result;
2787        try {
2788            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2789            if (!pEffect)
2790                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2791            EffectFactory::Destroy(pEffect);
2792            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_instance_count, EffectFactory::EffectInstancesCount()));
2793        } catch (Exception e) {
2794            result.Error(e);
2795        }
2796        return result.Produce();
2797    }
2798    
2799    String LSCPServer::GetEffectInstances() {
2800        dmsg(2,("LSCPServer: GetEffectInstances()\n"));
2801        LSCPResultSet result;
2802        try {
2803            int n = EffectFactory::EffectInstancesCount();
2804            result.Add(n);
2805        } catch (Exception e) {
2806            result.Error(e);
2807        }
2808        return result.Produce();
2809    }
2810    
2811    String LSCPServer::ListEffectInstances() {
2812        dmsg(2,("LSCPServer: ListEffectInstances()\n"));
2813        LSCPResultSet result;
2814        String list;
2815        try {
2816            int n = EffectFactory::EffectInstancesCount();
2817            for (int i = 0; i < n; i++) {
2818                Effect* pEffect = EffectFactory::GetEffectInstance(i);
2819                if (i) list += ",";
2820                list += ToString(pEffect->ID());
2821            }
2822        } catch (Exception e) {
2823            result.Error(e);
2824        }
2825        result.Add(list);
2826        return result.Produce();
2827    }
2828    
2829    String LSCPServer::GetSendEffectChains(int iAudioOutputDevice) {
2830        dmsg(2,("LSCPServer: GetSendEffectChains(%d)\n", iAudioOutputDevice));
2831        LSCPResultSet result;
2832        try {
2833            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2834            if (!devices.count(iAudioOutputDevice))
2835                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2836            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2837            int n = pDevice->SendEffectChainCount();
2838            result.Add(n);
2839        } catch (Exception e) {
2840            result.Error(e);
2841        }
2842        return result.Produce();
2843    }
2844    
2845    String LSCPServer::ListSendEffectChains(int iAudioOutputDevice) {
2846        dmsg(2,("LSCPServer: ListSendEffectChains(%d)\n", iAudioOutputDevice));
2847        LSCPResultSet result;
2848        String list;
2849        try {
2850            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2851            if (!devices.count(iAudioOutputDevice))
2852                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2853            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2854            int n = pDevice->SendEffectChainCount();
2855            for (int i = 0; i < n; i++) {
2856                EffectChain* pEffectChain = pDevice->SendEffectChain(i);
2857                if (i) list += ",";
2858                list += ToString(pEffectChain->ID());
2859            }
2860        } catch (Exception e) {
2861            result.Error(e);
2862        }
2863        result.Add(list);
2864        return result.Produce();
2865    }
2866    
2867    String LSCPServer::AddSendEffectChain(int iAudioOutputDevice) {
2868        dmsg(2,("LSCPServer: AddSendEffectChain(%d)\n", iAudioOutputDevice));
2869        LSCPResultSet result;
2870        try {
2871            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2872            if (!devices.count(iAudioOutputDevice))
2873                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2874            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2875            EffectChain* pEffectChain = pDevice->AddSendEffectChain();
2876            result = pEffectChain->ID();
2877            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_count, iAudioOutputDevice, pDevice->SendEffectChainCount()));
2878        } catch (Exception e) {
2879            result.Error(e);
2880        }
2881        return result.Produce();
2882    }
2883    
2884    String LSCPServer::RemoveSendEffectChain(int iAudioOutputDevice, int iSendEffectChain) {
2885        dmsg(2,("LSCPServer: RemoveSendEffectChain(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
2886        LSCPResultSet result;
2887        try {
2888            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2889            if (!devices.count(iAudioOutputDevice))
2890                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2891    
2892            std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
2893            std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
2894            std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
2895            for (; itEngineChannel != itEnd; ++itEngineChannel) {
2896                AudioOutputDevice* pDev = (*itEngineChannel)->GetAudioOutputDevice();
2897                if (pDev != NULL && pDev->deviceId() == iAudioOutputDevice) {
2898                    for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
2899                        FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
2900                        if(fxs != NULL && fxs->DestinationEffectChain() == iSendEffectChain) {
2901                            throw Exception("The effect chain is still in use by channel " + ToString((*itEngineChannel)->GetSamplerChannel()->Index()));
2902                        }
2903                    }
2904                }
2905            }
2906    
2907            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2908            for (int i = 0; i < pDevice->SendEffectChainCount(); i++) {
2909                EffectChain* pEffectChain = pDevice->SendEffectChain(i);
2910                if (pEffectChain->ID() == iSendEffectChain) {
2911                    pDevice->RemoveSendEffectChain(i);
2912                    LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_count, iAudioOutputDevice, pDevice->SendEffectChainCount()));
2913                    return result.Produce();
2914                }
2915            }
2916            throw Exception(
2917                "There is no send effect chain with ID " +
2918                ToString(iSendEffectChain) + " for audio output device " +
2919                ToString(iAudioOutputDevice) + "."
2920            );
2921        } catch (Exception e) {
2922            result.Error(e);
2923        }
2924        return result.Produce();
2925    }
2926    
2927    static EffectChain* _getSendEffectChain(Sampler* pSampler, int iAudioOutputDevice, int iSendEffectChain) throw (Exception) {
2928        std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2929        if (!devices.count(iAudioOutputDevice))
2930            throw Exception(
2931                "There is no audio output device with index " +
2932                ToString(iAudioOutputDevice) + "."
2933            );
2934        AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2935        EffectChain* pEffectChain = pDevice->SendEffectChainByID(iSendEffectChain);
2936        if(pEffectChain != NULL) return pEffectChain;
2937        throw Exception(
2938            "There is no send effect chain with ID " +
2939            ToString(iSendEffectChain) + " for audio output device " +
2940            ToString(iAudioOutputDevice) + "."
2941        );
2942    }
2943    
2944    String LSCPServer::GetSendEffectChainInfo(int iAudioOutputDevice, int iSendEffectChain) {
2945        dmsg(2,("LSCPServer: GetSendEffectChainInfo(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
2946        LSCPResultSet result;
2947        try {
2948            EffectChain* pEffectChain =
2949                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2950            String sEffectSequence;
2951            for (int i = 0; i < pEffectChain->EffectCount(); i++) {
2952                if (i) sEffectSequence += ",";
2953                sEffectSequence += ToString(pEffectChain->GetEffect(i)->ID());
2954            }
2955            result.Add("EFFECT_COUNT", pEffectChain->EffectCount());
2956            result.Add("EFFECT_SEQUENCE", sEffectSequence);
2957        } catch (Exception e) {
2958            result.Error(e);
2959        }
2960        return result.Produce();
2961    }
2962    
2963    String LSCPServer::AppendSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectInstance) {
2964        dmsg(2,("LSCPServer: AppendSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectInstance));
2965        LSCPResultSet result;
2966        try {
2967            EffectChain* pEffectChain =
2968                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2969            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2970            if (!pEffect)
2971                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2972            pEffectChain->AppendEffect(pEffect);
2973            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_info, iAudioOutputDevice, iSendEffectChain, pEffectChain->EffectCount()));
2974        } catch (Exception e) {
2975            result.Error(e);
2976        }
2977        return result.Produce();
2978    }
2979    
2980    String LSCPServer::InsertSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition, int iEffectInstance) {
2981        dmsg(2,("LSCPServer: InsertSendEffectChainEffect(%d,%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition, iEffectInstance));
2982        LSCPResultSet result;
2983        try {
2984            EffectChain* pEffectChain =
2985                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2986            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2987            if (!pEffect)
2988                throw Exception("There is no effect instance with index " + ToString(iEffectInstance));
2989            pEffectChain->InsertEffect(pEffect, iEffectChainPosition);
2990            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_info, iAudioOutputDevice, iSendEffectChain, pEffectChain->EffectCount()));
2991        } catch (Exception e) {
2992            result.Error(e);
2993        }
2994        return result.Produce();
2995    }
2996    
2997    String LSCPServer::RemoveSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition) {
2998        dmsg(2,("LSCPServer: RemoveSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition));
2999        LSCPResultSet result;
3000        try {
3001            EffectChain* pEffectChain =
3002                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
3003    
3004            std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
3005            std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
3006            std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
3007            for (; itEngineChannel != itEnd; ++itEngineChannel) {
3008                AudioOutputDevice* pDev = (*itEngineChannel)->GetAudioOutputDevice();
3009                if (pDev != NULL && pDev->deviceId() == iAudioOutputDevice) {
3010                    for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
3011                        FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
3012                        if(fxs != NULL && fxs->DestinationEffectChain() == iSendEffectChain && fxs->DestinationEffectChainPosition() == iEffectChainPosition) {
3013                            throw Exception("The effect instance is still in use by channel " + ToString((*itEngineChannel)->GetSamplerChannel()->Index()));
3014                        }
3015                    }
3016                }
3017            }
3018    
3019            pEffectChain->RemoveEffect(iEffectChainPosition);
3020            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_send_fx_chain_info, iAudioOutputDevice, iSendEffectChain, pEffectChain->EffectCount()));
3021        } catch (Exception e) {
3022            result.Error(e);
3023        }
3024        return result.Produce();
3025    }
3026    
3027  String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {  String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {
3028      dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));
3029      LSCPResultSet result;      LSCPResultSet result;
3030      try {      try {
3031          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");  
3032          if (pEngineChannel->InstrumentStatus() < 0) throw Exception("No instrument loaded to sampler channel");          if (pEngineChannel->InstrumentStatus() < 0) throw Exception("No instrument loaded to sampler channel");
3033          Engine* pEngine = pEngineChannel->GetEngine();          Engine* pEngine = pEngineChannel->GetEngine();
3034          InstrumentManager* pInstrumentManager = pEngine->GetInstrumentManager();          InstrumentManager* pInstrumentManager = pEngine->GetInstrumentManager();
# Line 2295  String LSCPServer::EditSamplerChannelIns Line 3043  String LSCPServer::EditSamplerChannelIns
3043      return result.Produce();      return result.Produce();
3044  }  }
3045    
3046    String LSCPServer::SendChannelMidiData(String MidiMsg, uint uiSamplerChannel, uint Arg1, uint Arg2) {
3047        dmsg(2,("LSCPServer: SendChannelMidiData(MidiMsg=%s,uiSamplerChannel=%d,Arg1=%d,Arg2=%d)\n", MidiMsg.c_str(), uiSamplerChannel, Arg1, Arg2));
3048        LSCPResultSet result;
3049        try {
3050            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
3051    
3052            if (Arg1 > 127 || Arg2 > 127) {
3053                throw Exception("Invalid MIDI message");
3054            }
3055    
3056            VirtualMidiDevice* pMidiDevice = NULL;
3057            std::vector<EventHandler::midi_listener_entry>::iterator iter = eventHandler.channelMidiListeners.begin();
3058            for (; iter != eventHandler.channelMidiListeners.end(); ++iter) {
3059                if ((*iter).pEngineChannel == pEngineChannel) {
3060                    pMidiDevice = (*iter).pMidiListener;
3061                    break;
3062                }
3063            }
3064            
3065            if(pMidiDevice == NULL) throw Exception("Couldn't find virtual MIDI device");
3066    
3067            if (MidiMsg == "NOTE_ON") {
3068                pMidiDevice->SendNoteOnToDevice(Arg1, Arg2);
3069                bool b = pMidiDevice->SendNoteOnToSampler(Arg1, Arg2);
3070                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
3071            } else if (MidiMsg == "NOTE_OFF") {
3072                pMidiDevice->SendNoteOffToDevice(Arg1, Arg2);
3073                bool b = pMidiDevice->SendNoteOffToSampler(Arg1, Arg2);
3074                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
3075            } else if (MidiMsg == "CC") {
3076                pMidiDevice->SendCCToDevice(Arg1, Arg2);
3077                bool b = pMidiDevice->SendCCToSampler(Arg1, Arg2);
3078                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
3079            } else {
3080                throw Exception("Unknown MIDI message type: " + MidiMsg);
3081            }
3082        } catch (Exception e) {
3083            result.Error(e);
3084        }
3085        return result.Produce();
3086    }
3087    
3088  /**  /**
3089   * Will be called by the parser to reset a particular sampler channel.   * Will be called by the parser to reset a particular sampler channel.
3090   */   */
# Line 2302  String LSCPServer::ResetChannel(uint uiS Line 3092  String LSCPServer::ResetChannel(uint uiS
3092      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
3093      LSCPResultSet result;      LSCPResultSet result;
3094      try {      try {
3095          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");  
3096          pEngineChannel->Reset();          pEngineChannel->Reset();
3097      }      }
3098      catch (Exception e) {      catch (Exception e) {
# Line 2346  String LSCPServer::GetServerInfo() { Line 3133  String LSCPServer::GetServerInfo() {
3133  }  }
3134    
3135  /**  /**
3136     * Will be called by the parser to return the current number of all active streams.
3137     */
3138    String LSCPServer::GetTotalStreamCount() {
3139        dmsg(2,("LSCPServer: GetTotalStreamCount()\n"));
3140        LSCPResultSet result;
3141        result.Add(pSampler->GetDiskStreamCount());
3142        return result.Produce();
3143    }
3144    
3145    /**
3146   * Will be called by the parser to return the current number of all active voices.   * Will be called by the parser to return the current number of all active voices.
3147   */   */
3148  String LSCPServer::GetTotalVoiceCount() {  String LSCPServer::GetTotalVoiceCount() {
# Line 2361  String LSCPServer::GetTotalVoiceCount() Line 3158  String LSCPServer::GetTotalVoiceCount()
3158  String LSCPServer::GetTotalVoiceCountMax() {  String LSCPServer::GetTotalVoiceCountMax() {
3159      dmsg(2,("LSCPServer: GetTotalVoiceCountMax()\n"));      dmsg(2,("LSCPServer: GetTotalVoiceCountMax()\n"));
3160      LSCPResultSet result;      LSCPResultSet result;
3161      result.Add(EngineFactory::EngineInstances().size() * CONFIG_MAX_VOICES);      result.Add(EngineFactory::EngineInstances().size() * pSampler->GetGlobalMaxVoices());
3162        return result.Produce();
3163    }
3164    
3165    /**
3166     * Will be called by the parser to return the sampler global maximum
3167     * allowed number of voices.
3168     */
3169    String LSCPServer::GetGlobalMaxVoices() {
3170        dmsg(2,("LSCPServer: GetGlobalMaxVoices()\n"));
3171        LSCPResultSet result;
3172        result.Add(pSampler->GetGlobalMaxVoices());
3173        return result.Produce();
3174    }
3175    
3176    /**
3177     * Will be called by the parser to set the sampler global maximum number of
3178     * voices.
3179     */
3180    String LSCPServer::SetGlobalMaxVoices(int iVoices) {
3181        dmsg(2,("LSCPServer: SetGlobalMaxVoices(%d)\n", iVoices));
3182        LSCPResultSet result;
3183        try {
3184            pSampler->SetGlobalMaxVoices(iVoices);
3185            LSCPServer::SendLSCPNotify(
3186                LSCPEvent(LSCPEvent::event_global_info, "VOICES", pSampler->GetGlobalMaxVoices())
3187            );
3188        } catch (Exception e) {
3189            result.Error(e);
3190        }
3191        return result.Produce();
3192    }
3193    
3194    /**
3195     * Will be called by the parser to return the sampler global maximum
3196     * allowed number of disk streams.
3197     */
3198    String LSCPServer::GetGlobalMaxStreams() {
3199        dmsg(2,("LSCPServer: GetGlobalMaxStreams()\n"));
3200        LSCPResultSet result;
3201        result.Add(pSampler->GetGlobalMaxStreams());
3202        return result.Produce();
3203    }
3204    
3205    /**
3206     * Will be called by the parser to set the sampler global maximum number of
3207     * disk streams.
3208     */
3209    String LSCPServer::SetGlobalMaxStreams(int iStreams) {
3210        dmsg(2,("LSCPServer: SetGlobalMaxStreams(%d)\n", iStreams));
3211        LSCPResultSet result;
3212        try {
3213            pSampler->SetGlobalMaxStreams(iStreams);
3214            LSCPServer::SendLSCPNotify(
3215                LSCPEvent(LSCPEvent::event_global_info, "STREAMS", pSampler->GetGlobalMaxStreams())
3216            );
3217        } catch (Exception e) {
3218            result.Error(e);
3219        }
3220      return result.Produce();      return result.Produce();
3221  }  }
3222    
# Line 2375  String LSCPServer::SetGlobalVolume(doubl Line 3230  String LSCPServer::SetGlobalVolume(doubl
3230      LSCPResultSet result;      LSCPResultSet result;
3231      try {      try {
3232          if (dVolume < 0) throw Exception("Volume may not be negative");          if (dVolume < 0) throw Exception("Volume may not be negative");
3233          GLOBAL_VOLUME = dVolume; // see common/global.cpp          GLOBAL_VOLUME = dVolume; // see common/global_private.cpp
3234          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOLUME", GLOBAL_VOLUME));          LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOLUME", GLOBAL_VOLUME));
3235      } catch (Exception e) {      } catch (Exception e) {
3236          result.Error(e);          result.Error(e);
# Line 2384  String LSCPServer::SetGlobalVolume(doubl Line 3239  String LSCPServer::SetGlobalVolume(doubl
3239  }  }
3240    
3241  String LSCPServer::GetFileInstruments(String Filename) {  String LSCPServer::GetFileInstruments(String Filename) {
3242        dmsg(2,("LSCPServer: GetFileInstruments(String Filename=%s)\n",Filename.c_str()));
3243      LSCPResultSet result;      LSCPResultSet result;
3244        try {
3245            VerifyFile(Filename);
3246        } catch (Exception e) {
3247            result.Error(e);
3248            return result.Produce();
3249        }
3250      // try to find a sampler engine that can handle the file      // try to find a sampler engine that can handle the file
3251      bool bFound = false;      bool bFound = false;
3252      std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();      std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
# Line 2407  String LSCPServer::GetFileInstruments(St Line 3269  String LSCPServer::GetFileInstruments(St
3269          }          }
3270          if (pEngine) EngineFactory::Destroy(pEngine);          if (pEngine) EngineFactory::Destroy(pEngine);
3271      }      }
3272    
3273        if (!bFound) result.Error("Unknown file format");
3274      return result.Produce();      return result.Produce();
3275  }  }
3276    
3277  String LSCPServer::ListFileInstruments(String Filename) {  String LSCPServer::ListFileInstruments(String Filename) {
3278        dmsg(2,("LSCPServer: ListFileInstruments(String Filename=%s)\n",Filename.c_str()));
3279      LSCPResultSet result;      LSCPResultSet result;
3280        try {
3281            VerifyFile(Filename);
3282        } catch (Exception e) {
3283            result.Error(e);
3284            return result.Produce();
3285        }
3286      // try to find a sampler engine that can handle the file      // try to find a sampler engine that can handle the file
3287      bool bFound = false;      bool bFound = false;
3288      std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();      std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
# Line 2439  String LSCPServer::ListFileInstruments(S Line 3310  String LSCPServer::ListFileInstruments(S
3310          }          }
3311          if (pEngine) EngineFactory::Destroy(pEngine);          if (pEngine) EngineFactory::Destroy(pEngine);
3312      }      }
3313    
3314        if (!bFound) result.Error("Unknown file format");
3315      return result.Produce();      return result.Produce();
3316  }  }
3317    
3318  String LSCPServer::GetFileInstrumentInfo(String Filename, uint InstrumentID) {  String LSCPServer::GetFileInstrumentInfo(String Filename, uint InstrumentID) {
3319        dmsg(2,("LSCPServer: GetFileInstrumentInfo(String Filename=%s, InstrumentID=%d)\n",Filename.c_str(),InstrumentID));
3320      LSCPResultSet result;      LSCPResultSet result;
3321        try {
3322            VerifyFile(Filename);
3323        } catch (Exception e) {
3324            result.Error(e);
3325            return result.Produce();
3326        }
3327      InstrumentManager::instrument_id_t id;      InstrumentManager::instrument_id_t id;
3328      id.FileName = Filename;      id.FileName = Filename;
3329      id.Index    = InstrumentID;      id.Index    = InstrumentID;
3330      // try to find a sampler engine that can handle the file      // try to find a sampler engine that can handle the file
3331      bool bFound = false;      bool bFound = false;
3332        bool bFatalErr = false;
3333      std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();      std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
3334      for (int i = 0; !bFound && i < engineTypes.size(); i++) {      for (int i = 0; !bFound && !bFatalErr && i < engineTypes.size(); i++) {
3335          Engine* pEngine = NULL;          Engine* pEngine = NULL;
3336          try {          try {
3337              pEngine = EngineFactory::Create(engineTypes[i]);              pEngine = EngineFactory::Create(engineTypes[i]);
3338              if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");              if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
3339              InstrumentManager* pManager = pEngine->GetInstrumentManager();              InstrumentManager* pManager = pEngine->GetInstrumentManager();
3340              if (pManager) {              if (pManager) {
3341                    // check if the instrument index is valid
3342                    // FIXME: this won't work if an engine only supports parts of the instrument file
3343                    std::vector<InstrumentManager::instrument_id_t> IDs =
3344                        pManager->GetInstrumentFileContent(Filename);
3345                    if (std::find(IDs.begin(), IDs.end(), id) == IDs.end()) {
3346                        std::stringstream ss;
3347                        ss << "Invalid instrument index " << InstrumentID << " for instrument file '" << Filename << "'";
3348                        bFatalErr = true;
3349                        throw Exception(ss.str());
3350                    }
3351                    // get the info of the requested instrument
3352                  InstrumentManager::instrument_info_t info =                  InstrumentManager::instrument_info_t info =
3353                      pManager->GetInstrumentInfo(id);                      pManager->GetInstrumentInfo(id);
3354                  // return detailed informations about the file                  // return detailed informations about the file
3355                  result.Add("NAME", info.InstrumentName);                  result.Add("NAME", info.InstrumentName);
3356                  result.Add("FORMAT_NAME", engineTypes[i]);                  result.Add("FORMAT_FAMILY", engineTypes[i]);
3357                  result.Add("FORMAT_VERSION", info.FormatVersion);                  result.Add("FORMAT_VERSION", info.FormatVersion);
3358                  result.Add("PRODUCT", info.Product);                  result.Add("PRODUCT", info.Product);
3359                  result.Add("ARTISTS", info.Artists);                  result.Add("ARTISTS", info.Artists);
3360    
3361                    std::stringstream ss;
3362                    bool b = false;
3363                    for (int i = 0; i < 128; i++) {
3364                        if (info.KeyBindings[i]) {
3365                            if (b) ss << ',';
3366                            ss << i; b = true;
3367                        }
3368                    }
3369                    result.Add("KEY_BINDINGS", ss.str());
3370    
3371                    b = false;
3372                    std::stringstream ss2;
3373                    for (int i = 0; i < 128; i++) {
3374                        if (info.KeySwitchBindings[i]) {
3375                            if (b) ss2 << ',';
3376                            ss2 << i; b = true;
3377                        }
3378                    }
3379                    result.Add("KEYSWITCH_BINDINGS", ss2.str());
3380                  // no more need to ask other engine types                  // no more need to ask other engine types
3381                  bFound = true;                  bFound = true;
3382              } 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()));
3383          } catch (Exception e) {          } catch (Exception e) {
3384              // NOOP, as exception is thrown if engine doesn't support file              // usually NOOP, as exception is thrown if engine doesn't support file
3385                if (bFatalErr) result.Error(e);
3386          }          }
3387          if (pEngine) EngineFactory::Destroy(pEngine);          if (pEngine) EngineFactory::Destroy(pEngine);
3388      }      }
3389    
3390        if (!bFound && !bFatalErr) result.Error("Unknown file format");
3391      return result.Produce();      return result.Produce();
3392  }  }
3393    
3394    void LSCPServer::VerifyFile(String Filename) {
3395        #if WIN32
3396        WIN32_FIND_DATA win32FileAttributeData;
3397        BOOL res = GetFileAttributesEx( Filename.c_str(), GetFileExInfoStandard, &win32FileAttributeData );
3398        if (!res) {
3399            std::stringstream ss;
3400            ss << "File does not exist, GetFileAttributesEx failed `" << Filename << "`: Error " << GetLastError();
3401            throw Exception(ss.str());
3402        }
3403        if ( win32FileAttributeData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) {
3404            throw Exception("Directory is specified");
3405        }
3406        #else
3407        File f(Filename);
3408        if(!f.Exist()) throw Exception(f.GetErrorMsg());
3409        if (f.IsDirectory()) throw Exception("Directory is specified");
3410        #endif
3411    }
3412    
3413  /**  /**
3414   * Will be called by the parser to subscribe a client (frontend) on the   * Will be called by the parser to subscribe a client (frontend) on the
3415   * server for receiving event messages.   * server for receiving event messages.
# Line 2483  String LSCPServer::GetFileInstrumentInfo Line 3417  String LSCPServer::GetFileInstrumentInfo
3417  String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {  String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {
3418      dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));      dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
3419      LSCPResultSet result;      LSCPResultSet result;
3420      SubscriptionMutex.Lock();      {
3421      eventSubscriptions[type].push_back(currentSocket);          LockGuard lock(SubscriptionMutex);
3422      SubscriptionMutex.Unlock();          eventSubscriptions[type].push_back(currentSocket);
3423        }
3424      return result.Produce();      return result.Produce();
3425  }  }
3426    
# Line 2496  String LSCPServer::SubscribeNotification Line 3431  String LSCPServer::SubscribeNotification
3431  String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {  String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {
3432      dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));      dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
3433      LSCPResultSet result;      LSCPResultSet result;
3434      SubscriptionMutex.Lock();      {
3435      eventSubscriptions[type].remove(currentSocket);          LockGuard lock(SubscriptionMutex);
3436      SubscriptionMutex.Unlock();          eventSubscriptions[type].remove(currentSocket);
3437        }
3438      return result.Produce();      return result.Produce();
3439  }  }
3440    
# Line 2667  String LSCPServer::AddDbInstruments(Stri Line 3603  String LSCPServer::AddDbInstruments(Stri
3603      return result.Produce();      return result.Produce();
3604  }  }
3605    
3606  String LSCPServer::AddDbInstruments(String ScanMode, String DbDir, String FsDir, bool bBackground) {  String LSCPServer::AddDbInstruments(String ScanMode, String DbDir, String FsDir, bool bBackground, bool insDir) {
3607      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));
3608      LSCPResultSet result;      LSCPResultSet result;
3609  #if HAVE_SQLITE3  #if HAVE_SQLITE3
3610      try {      try {
3611          int id;          int id;
3612          InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();          InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();
3613          if (ScanMode.compare("RECURSIVE") == 0) {          if (ScanMode.compare("RECURSIVE") == 0) {
3614             id = db->AddInstruments(RECURSIVE, DbDir, FsDir, bBackground);              id = db->AddInstruments(RECURSIVE, DbDir, FsDir, bBackground, insDir);
3615          } else if (ScanMode.compare("NON_RECURSIVE") == 0) {          } else if (ScanMode.compare("NON_RECURSIVE") == 0) {
3616             id = db->AddInstruments(NON_RECURSIVE, DbDir, FsDir, bBackground);              id = db->AddInstruments(NON_RECURSIVE, DbDir, FsDir, bBackground, insDir);
3617          } else if (ScanMode.compare("FLAT") == 0) {          } else if (ScanMode.compare("FLAT") == 0) {
3618             id = db->AddInstruments(FLAT, DbDir, FsDir, bBackground);              id = db->AddInstruments(FLAT, DbDir, FsDir, bBackground, insDir);
3619          } else {          } else {
3620              throw Exception("Unknown scan mode: " + ScanMode);              throw Exception("Unknown scan mode: " + ScanMode);
3621          }          }
# Line 2855  String LSCPServer::SetDbInstrumentDescri Line 3791  String LSCPServer::SetDbInstrumentDescri
3791      return result.Produce();      return result.Produce();
3792  }  }
3793    
3794    String LSCPServer::SetDbInstrumentFilePath(String OldPath, String NewPath) {
3795        dmsg(2,("LSCPServer: SetDbInstrumentFilePath(OldPath=%s,NewPath=%s)\n", OldPath.c_str(), NewPath.c_str()));
3796        LSCPResultSet result;
3797    #if HAVE_SQLITE3
3798        try {
3799            InstrumentsDb::GetInstrumentsDb()->SetInstrumentFilePath(OldPath, NewPath);
3800        } catch (Exception e) {
3801             result.Error(e);
3802        }
3803    #else
3804        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3805    #endif
3806        return result.Produce();
3807    }
3808    
3809    String LSCPServer::FindLostDbInstrumentFiles() {
3810        dmsg(2,("LSCPServer: FindLostDbInstrumentFiles()\n"));
3811        LSCPResultSet result;
3812    #if HAVE_SQLITE3
3813        try {
3814            String list;
3815            StringListPtr pLostFiles = InstrumentsDb::GetInstrumentsDb()->FindLostInstrumentFiles();
3816    
3817            for (int i = 0; i < pLostFiles->size(); i++) {
3818                if (list != "") list += ",";
3819                list += "'" + pLostFiles->at(i) + "'";
3820            }
3821    
3822            result.Add(list);
3823        } catch (Exception e) {
3824             result.Error(e);
3825        }
3826    #else
3827        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3828    #endif
3829        return result.Produce();
3830    }
3831    
3832  String LSCPServer::FindDbInstrumentDirectories(String Dir, std::map<String,String> Parameters, bool Recursive) {  String LSCPServer::FindDbInstrumentDirectories(String Dir, std::map<String,String> Parameters, bool Recursive) {
3833      dmsg(2,("LSCPServer: FindDbInstrumentDirectories(Dir=%s)\n", Dir.c_str()));      dmsg(2,("LSCPServer: FindDbInstrumentDirectories(Dir=%s)\n", Dir.c_str()));
3834      LSCPResultSet result;      LSCPResultSet result;
# Line 2985  String LSCPServer::SetEcho(yyparse_param Line 3959  String LSCPServer::SetEcho(yyparse_param
3959      }      }
3960      return result.Produce();      return result.Produce();
3961  }  }
3962    
3963    }

Legend:
Removed from v.1525  
changed lines
  Added in v.2500

  ViewVC Help
Powered by ViewVC