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

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

Parent Directory | Revision Log | View Patch Patch

-revision 1897 by persson,
Sun May 10 09:31:51 2009 UTC
+revision 2138 by schoenebeck,
Mon Oct  4 22:11:53 2010 UTC
 Line 3
   *   LinuxSampler - modular, streaming capable sampler                     *
   *                                                                         *
   *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
-  *   Copyright (C) 2005 - 2009 Christian Schoenebeck                       *
+  *   Copyright (C) 2005 - 2010 Christian Schoenebeck                       *
   *                                                                         *
   *   This library is free software; you can redistribute it and/or modify  *
   *   it under the terms of the GNU General Public License as published by  *
 Line 43
  #include "../engines/EngineChannelFactory.h"
  #include "../drivers/audio/AudioOutputDeviceFactory.h"
  #include "../drivers/midi/MidiInputDeviceFactory.h"
+ #include "../effects/EffectFactory.h"
  namespace LinuxSampler {
-Line 2382 
 String LSCPServer::GetFxSendInfo(uint ui
+Line 2383 
 String LSCPServer::GetFxSendInfo(uint ui
              AudioRouting += ToString(pFxSend->DestinationChannel(chan));
          }
+         const String sEffectRouting =
+             (pFxSend->DestinationEffectChain() >= 0 && pFxSend->DestinationEffectChainPosition() >= 0)
+                 ? ToString(pFxSend->DestinationEffectChain()) + "," + ToString(pFxSend->DestinationEffectChainPosition())
+                 : "NONE";
          // success
          result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));
          result.Add("MIDI_CONTROLLER", pFxSend->MidiController());
          result.Add("LEVEL", ToString(pFxSend->Level()));
          result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
+         result.Add("SEND_EFFECT", sEffectRouting);
      } catch (Exception e) {
          result.Error(e);
      }
-Line 2449 
 String LSCPServer::SetFxSendLevel(uint u
+Line 2456 
 String LSCPServer::SetFxSendLevel(uint u
      return result.Produce();
  }
+ String LSCPServer::SetFxSendEffect(uint uiSamplerChannel, uint FxSendID, int iSendEffectChain, int iEffectChainPosition) {
+     dmsg(2,("LSCPServer: SetFxSendEffect(%d,%d)\n", iSendEffectChain, iEffectChainPosition));
+     LSCPResultSet result;
+     try {
+         FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
+         pFxSend->SetDestinationEffect(iSendEffectChain, iEffectChainPosition);
+         LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::GetAvailableEffects() {
+     dmsg(2,("LSCPServer: GetAvailableEffects()\n"));
+     LSCPResultSet result;
+     try {
+         int n = EffectFactory::AvailableEffectsCount();
+         result.Add(n);
+     }
+     catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::ListAvailableEffects() {
+     dmsg(2,("LSCPServer: ListAvailableEffects()\n"));
+     LSCPResultSet result;
+     String list;
+     try {
+         //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
+         int n = EffectFactory::AvailableEffectsCount();
+         for (int i = 0; i < n; i++) {
+             if (i) list += ",";
+             list += ToString(i);
+         }
+     }
+     catch (Exception e) {
+         result.Error(e);
+     }
+     result.Add(list);
+     return result.Produce();
+ }
+ String LSCPServer::GetEffectInfo(int iEffectIndex) {
+     dmsg(2,("LSCPServer: GetEffectInfo(%d)\n", iEffectIndex));
+     LSCPResultSet result;
+     try {
+         EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
+         if (!pEffectInfo)
+             throw Exception("There is no effect with index " + ToString(iEffectIndex));
+         // convert the filename into the correct encoding as defined for LSCP
+         // (especially in terms of special characters -> escape sequences)
+ #if WIN32
+         const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
+ #else
+         // assuming POSIX
+         const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
+ #endif
+         result.Add("SYSTEM", pEffectInfo->EffectSystem());
+         result.Add("MODULE", dllFileName);
+         result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
+         result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
+     }
+     catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::GetEffectInstanceInfo(int iEffectInstance) {
+     dmsg(2,("LSCPServer: GetEffectInstanceInfo(%d)\n", iEffectInstance));
+     LSCPResultSet result;
+     try {
+         Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
+         if (!pEffect)
+             throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
+         EffectInfo* pEffectInfo = pEffect->GetEffectInfo();
+         // convert the filename into the correct encoding as defined for LSCP
+         // (especially in terms of special characters -> escape sequences)
+ #if WIN32
+         const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
+ #else
+         // assuming POSIX
+         const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
+ #endif
+         result.Add("SYSTEM", pEffectInfo->EffectSystem());
+         result.Add("MODULE", dllFileName);
+         result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
+         result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
+         result.Add("INPUT_CONTROLS", ToString(pEffect->InputControlCount()));
+     }
+     catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::GetEffectInstanceInputControlInfo(int iEffectInstance, int iInputControlIndex) {
+     dmsg(2,("LSCPServer: GetEffectInstanceInputControlInfo(%d,%d)\n", iEffectInstance, iInputControlIndex));
+     LSCPResultSet result;
+     try {
+         Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
+         if (!pEffect)
+             throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
+         EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
+         if (!pEffectControl)
+             throw Exception(
+                 "Effect instance " + ToString(iEffectInstance) +
+                 " does not have an input control with index " +
+                 ToString(iInputControlIndex)
+             );
+         result.Add("DESCRIPTION", _escapeLscpResponse(pEffectControl->Description()));
+         result.Add("VALUE", pEffectControl->Value());
+         if (pEffectControl->MinValue())
+              result.Add("RANGE_MIN", *pEffectControl->MinValue());
+         if (pEffectControl->MaxValue())
+              result.Add("RANGE_MAX", *pEffectControl->MaxValue());
+         if (!pEffectControl->Possibilities().empty())
+              result.Add("POSSIBILITIES", pEffectControl->Possibilities());
+         if (pEffectControl->DefaultValue())
+              result.Add("DEFAULT", *pEffectControl->DefaultValue());
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::SetEffectInstanceInputControlValue(int iEffectInstance, int iInputControlIndex, double dValue) {
+     dmsg(2,("LSCPServer: SetEffectInstanceInputControlValue(%d,%d,%f)\n", iEffectInstance, iInputControlIndex, dValue));
+     LSCPResultSet result;
+     try {
+         Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
+         if (!pEffect)
+             throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
+         EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
+         if (!pEffectControl)
+             throw Exception(
+                 "Effect instance " + ToString(iEffectInstance) +
+                 " does not have an input control with index " +
+                 ToString(iInputControlIndex)
+             );
+         pEffectControl->SetValue(dValue);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::CreateEffectInstance(int iEffectIndex) {
+     dmsg(2,("LSCPServer: CreateEffectInstance(%d)\n", iEffectIndex));
+     LSCPResultSet result;
+     try {
+         EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
+         if (!pEffectInfo)
+             throw Exception("There is no effect with index " + ToString(iEffectIndex));
+         Effect* pEffect = EffectFactory::Create(pEffectInfo);
+         result = pEffect->ID(); // success
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::CreateEffectInstance(String effectSystem, String module, String effectName) {
+     dmsg(2,("LSCPServer: CreateEffectInstance('%s','%s','%s')\n", effectSystem.c_str(), module.c_str(), effectName.c_str()));
+     LSCPResultSet result;
+     try {
+         // to allow loading the same LSCP session file on different systems
+         // successfully, probably with different effect plugin DLL paths or even
+         // running completely different operating systems, we do the following
+         // for finding the right effect:
+         //
+         // first try to search for an exact match of the effect plugin DLL
+         // (a.k.a 'module'), to avoid picking the wrong DLL with the same
+         // effect name ...
+         EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_MATCH_EXACTLY);
+         // ... if no effect with exactly matchin DLL filename was found, then
+         // try to lower the restrictions of matching the effect plugin DLL
+         // filename and try again and again ...
+         if (!pEffectInfo) {
+             dmsg(2,("no exact module match, trying MODULE_IGNORE_PATH\n"));
+             pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH);
+         }
+         if (!pEffectInfo) {
+             dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE\n"));
+             pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE);
+         }
+         if (!pEffectInfo) {
+             dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE | MODULE_IGNORE_EXTENSION\n"));
+             pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE | EffectFactory::MODULE_IGNORE_EXTENSION);
+         }
+         // ... if there was still no effect found, then completely ignore the
+         // DLL plugin filename argument and just search for the matching effect
+         // system type and effect name
+         if (!pEffectInfo) {
+             dmsg(2,("no module match, trying MODULE_IGNORE_ALL\n"));
+             pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_ALL);
+         }
+         if (!pEffectInfo)
+             throw Exception("There is no such effect '" + effectSystem + "' '" + module + "' '" + effectName + "'");
+         Effect* pEffect = EffectFactory::Create(pEffectInfo);
+         result = LSCPResultSet(pEffect->ID());
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::DestroyEffectInstance(int iEffectInstance) {
+     dmsg(2,("LSCPServer: DestroyEffectInstance(%d)\n", iEffectInstance));
+     LSCPResultSet result;
+     try {
+         Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
+         if (!pEffect)
+             throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
+         EffectFactory::Destroy(pEffect);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::GetEffectInstances() {
+     dmsg(2,("LSCPServer: GetEffectInstances()\n"));
+     LSCPResultSet result;
+     try {
+         int n = EffectFactory::EffectInstancesCount();
+         result.Add(n);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::ListEffectInstances() {
+     dmsg(2,("LSCPServer: ListEffectInstances()\n"));
+     LSCPResultSet result;
+     String list;
+     try {
+         int n = EffectFactory::EffectInstancesCount();
+         for (int i = 0; i < n; i++) {
+             Effect* pEffect = EffectFactory::GetEffectInstance(i);
+             if (i) list += ",";
+             list += ToString(pEffect->ID());
+         }
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     result.Add(list);
+     return result.Produce();
+ }
+ String LSCPServer::GetSendEffectChains(int iAudioOutputDevice) {
+     dmsg(2,("LSCPServer: GetSendEffectChains(%d)\n", iAudioOutputDevice));
+     LSCPResultSet result;
+     try {
+         std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
+         if (!devices.count(iAudioOutputDevice))
+             throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
+         AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
+         int n = pDevice->SendEffectChainCount();
+         result.Add(n);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::ListSendEffectChains(int iAudioOutputDevice) {
+     dmsg(2,("LSCPServer: ListSendEffectChains(%d)\n", iAudioOutputDevice));
+     LSCPResultSet result;
+     String list;
+     try {
+         std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
+         if (!devices.count(iAudioOutputDevice))
+             throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
+         AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
+         int n = pDevice->SendEffectChainCount();
+         for (int i = 0; i < n; i++) {
+             EffectChain* pEffectChain = pDevice->SendEffectChain(i);
+             if (i) list += ",";
+             list += ToString(pEffectChain->ID());
+         }
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     result.Add(list);
+     return result.Produce();
+ }
+ String LSCPServer::AddSendEffectChain(int iAudioOutputDevice) {
+     dmsg(2,("LSCPServer: AddSendEffectChain(%d)\n", iAudioOutputDevice));
+     LSCPResultSet result;
+     try {
+         std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
+         if (!devices.count(iAudioOutputDevice))
+             throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
+         AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
+         EffectChain* pEffectChain = pDevice->AddSendEffectChain();
+         result = pEffectChain->ID();
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::RemoveSendEffectChain(int iAudioOutputDevice, int iSendEffectChain) {
+     dmsg(2,("LSCPServer: RemoveSendEffectChain(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
+     LSCPResultSet result;
+     try {
+         std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
+         if (!devices.count(iAudioOutputDevice))
+             throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
+         AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
+         for (int i = 0; i < pDevice->SendEffectChainCount(); i++) {
+             EffectChain* pEffectChain = pDevice->SendEffectChain(i);
+             if (pEffectChain->ID() == iSendEffectChain) {
+                 pDevice->RemoveSendEffectChain(i);
+                 return result.Produce();
+             }
+         }
+         throw Exception(
+             "There is no send effect chain with ID " +
+             ToString(iSendEffectChain) + " for audio output device " +
+             ToString(iAudioOutputDevice) + "."
+         );
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ static EffectChain* _getSendEffectChain(Sampler* pSampler, int iAudioOutputDevice, int iSendEffectChain) throw (Exception) {
+     std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
+     if (!devices.count(iAudioOutputDevice))
+         throw Exception(
+             "There is no audio output device with index " +
+             ToString(iAudioOutputDevice) + "."
+         );
+     AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
+     for (int i = 0; i < pDevice->SendEffectChainCount(); i++) {
+         EffectChain* pEffectChain = pDevice->SendEffectChain(i);
+         if (pEffectChain->ID() == iSendEffectChain) {
+             return pEffectChain;
+         }
+     }
+     throw Exception(
+         "There is no send effect chain with ID " +
+         ToString(iSendEffectChain) + " for audio output device " +
+         ToString(iAudioOutputDevice) + "."
+     );
+ }
+ String LSCPServer::GetSendEffectChainInfo(int iAudioOutputDevice, int iSendEffectChain) {
+     dmsg(2,("LSCPServer: GetSendEffectChainInfo(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
+     LSCPResultSet result;
+     try {
+         EffectChain* pEffectChain =
+             _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
+         String sEffectSequence;
+         for (int i = 0; i < pEffectChain->EffectCount(); i++) {
+             if (i) sEffectSequence += ",";
+             sEffectSequence += ToString(pEffectChain->GetEffect(i)->ID());
+         }
+         result.Add("EFFECT_COUNT", pEffectChain->EffectCount());
+         result.Add("EFFECT_SEQUENCE", sEffectSequence);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::AppendSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectInstance) {
+     dmsg(2,("LSCPServer: AppendSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectInstance));
+     LSCPResultSet result;
+     try {
+         EffectChain* pEffectChain =
+             _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
+         Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
+         if (!pEffect)
+             throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
+         pEffectChain->AppendEffect(pEffect);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::InsertSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition, int iEffectInstance) {
+     dmsg(2,("LSCPServer: InsertSendEffectChainEffect(%d,%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition, iEffectInstance));
+     LSCPResultSet result;
+     try {
+         EffectChain* pEffectChain =
+             _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
+         Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
+         if (!pEffect)
+             throw Exception("There is no effect instance with index " + ToString(iEffectInstance));
+         pEffectChain->InsertEffect(pEffect, iEffectChainPosition);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
+ String LSCPServer::RemoveSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition) {
+     dmsg(2,("LSCPServer: RemoveSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition));
+     LSCPResultSet result;
+     try {
+         EffectChain* pEffectChain =
+             _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
+         pEffectChain->RemoveEffect(iEffectChainPosition);
+     } catch (Exception e) {
+         result.Error(e);
+     }
+     return result.Produce();
+ }
  String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {
      dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));
      LSCPResultSet result;
-Line 2497 
 String LSCPServer::SendChannelMidiData(S
+Line 2934 
 String LSCPServer::SendChannelMidiData(S
              pMidiDevice->SendNoteOffToDevice(Arg1, Arg2);
              bool b = pMidiDevice->SendNoteOffToSampler(Arg1, Arg2);
              if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
+         } else if (MidiMsg == "CC") {
+             pMidiDevice->SendCCToDevice(Arg1, Arg2);
+             bool b = pMidiDevice->SendCCToSampler(Arg1, Arg2);
+             if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
          } else {
              throw Exception("Unknown MIDI message type: " + MidiMsg);
          }

 Legend:



Removed from v.1897
 


changed lines


 
Added in v.2138
 Legend:



Removed from v.1897
 


changed lines


 
Added in v.2138
-Removed from v.1897
+Added in v.2138

	ViewVC Help
Powered by ViewVC