/[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 981 by iliev, Sun Dec 17 22:35:01 2006 UTC revision 1763 by iliev, Wed Sep 3 17:18:51 2008 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, 2006 Christian Schoenebeck                        *   *   Copyright (C) 2005 - 2008 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    
26  #include "lscpserver.h"  #include "lscpserver.h"
27  #include "lscpresultset.h"  #include "lscpresultset.h"
28  #include "lscpevent.h"  #include "lscpevent.h"
 //#include "../common/global.h"  
29    
30    #if defined(WIN32)
31    #include <windows.h>
32    #else
33  #include <fcntl.h>  #include <fcntl.h>
34    #endif
35    
36  #if HAVE_SQLITE3  #if ! HAVE_SQLITE3
37  # include "sqlite3.h"  #define DOESNT_HAVE_SQLITE3 "No database support. SQLITE3 was not installed when linuxsampler was built."
38  #endif  #endif
39    
40  #include "../engines/EngineFactory.h"  #include "../engines/EngineFactory.h"
# Line 37  Line 42 
42  #include "../drivers/audio/AudioOutputDeviceFactory.h"  #include "../drivers/audio/AudioOutputDeviceFactory.h"
43  #include "../drivers/midi/MidiInputDeviceFactory.h"  #include "../drivers/midi/MidiInputDeviceFactory.h"
44    
45    
46    /**
47     * Returns a copy of the given string where all special characters are
48     * replaced by LSCP escape sequences ("\xHH"). This function shall be used
49     * to escape LSCP response fields in case the respective response field is
50     * actually defined as using escape sequences in the LSCP specs.
51     *
52     * @e Caution: DO NOT use this function for escaping path based responses,
53     * use the Path class (src/common/Path.h) for this instead!
54     */
55    static String _escapeLscpResponse(String txt) {
56        for (int i = 0; i < txt.length(); i++) {
57            const char c = txt.c_str()[i];
58            if (
59                !(c >= '0' && c <= '9') &&
60                !(c >= 'a' && c <= 'z') &&
61                !(c >= 'A' && c <= 'Z') &&
62                !(c == ' ') && !(c == '!') && !(c == '#') && !(c == '$') &&
63                !(c == '%') && !(c == '&') && !(c == '(') && !(c == ')') &&
64                !(c == '*') && !(c == '+') && !(c == ',') && !(c == '-') &&
65                !(c == '.') && !(c == '/') && !(c == ':') && !(c == ';') &&
66                !(c == '<') && !(c == '=') && !(c == '>') && !(c == '?') &&
67                !(c == '@') && !(c == '[') && !(c == ']') &&
68                !(c == '^') && !(c == '_') && !(c == '`') && !(c == '{') &&
69                !(c == '|') && !(c == '}') && !(c == '~')
70            ) {
71                // convert the "special" character into a "\xHH" LSCP escape sequence
72                char buf[5];
73                snprintf(buf, sizeof(buf), "\\x%02x", static_cast<unsigned char>(c));
74                txt.replace(i, 1, buf);
75                i += 3;
76            }
77        }
78        return txt;
79    }
80    
81  /**  /**
82   * Below are a few static members of the LSCPServer class.   * Below are a few static members of the LSCPServer class.
83   * The big assumption here is that LSCPServer is going to remain a singleton.   * The big assumption here is that LSCPServer is going to remain a singleton.
# Line 53  Line 94 
94  fd_set LSCPServer::fdSet;  fd_set LSCPServer::fdSet;
95  int LSCPServer::currentSocket = -1;  int LSCPServer::currentSocket = -1;
96  std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();  std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();
97    std::vector<yyparse_param_t>::iterator itCurrentSession = std::vector<yyparse_param_t>::iterator();
98  std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();  std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();
99  std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();  std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();
100  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 = std::map< LSCPEvent::event_t, std::list<int> >();
# Line 61  Mutex LSCPServer::NotifyBufferMutex = Mu Line 103  Mutex LSCPServer::NotifyBufferMutex = Mu
103  Mutex LSCPServer::SubscriptionMutex = Mutex();  Mutex LSCPServer::SubscriptionMutex = Mutex();
104  Mutex LSCPServer::RTNotifyMutex = Mutex();  Mutex LSCPServer::RTNotifyMutex = Mutex();
105    
106  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) {
107      SocketAddress.sin_family      = AF_INET;      SocketAddress.sin_family      = AF_INET;
108      SocketAddress.sin_addr.s_addr = addr;      SocketAddress.sin_addr.s_addr = addr;
109      SocketAddress.sin_port        = port;      SocketAddress.sin_port        = port;
# Line 75  LSCPServer::LSCPServer(Sampler* pSampler Line 117  LSCPServer::LSCPServer(Sampler* pSampler
117      LSCPEvent::RegisterEvent(LSCPEvent::event_stream_count, "STREAM_COUNT");      LSCPEvent::RegisterEvent(LSCPEvent::event_stream_count, "STREAM_COUNT");
118      LSCPEvent::RegisterEvent(LSCPEvent::event_buffer_fill, "BUFFER_FILL");      LSCPEvent::RegisterEvent(LSCPEvent::event_buffer_fill, "BUFFER_FILL");
119      LSCPEvent::RegisterEvent(LSCPEvent::event_channel_info, "CHANNEL_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_channel_info, "CHANNEL_INFO");
120        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_send_count, "FX_SEND_COUNT");
121        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_send_info, "FX_SEND_INFO");
122      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_map_count, "MIDI_INSTRUMENT_MAP_COUNT");      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_map_count, "MIDI_INSTRUMENT_MAP_COUNT");
123      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_map_info, "MIDI_INSTRUMENT_MAP_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_map_info, "MIDI_INSTRUMENT_MAP_INFO");
124      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_count, "MIDI_INSTRUMENT_COUNT");      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_count, "MIDI_INSTRUMENT_COUNT");
125      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_info, "MIDI_INSTRUMENT_INFO");      LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_info, "MIDI_INSTRUMENT_INFO");
126        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_dir_count, "DB_INSTRUMENT_DIRECTORY_COUNT");
127        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_dir_info, "DB_INSTRUMENT_DIRECTORY_INFO");
128        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_count, "DB_INSTRUMENT_COUNT");
129        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_info, "DB_INSTRUMENT_INFO");
130        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instrs_job_info, "DB_INSTRUMENTS_JOB_INFO");
131      LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");      LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");
132        LSCPEvent::RegisterEvent(LSCPEvent::event_total_stream_count, "TOTAL_STREAM_COUNT");
133      LSCPEvent::RegisterEvent(LSCPEvent::event_total_voice_count, "TOTAL_VOICE_COUNT");      LSCPEvent::RegisterEvent(LSCPEvent::event_total_voice_count, "TOTAL_VOICE_COUNT");
134        LSCPEvent::RegisterEvent(LSCPEvent::event_global_info, "GLOBAL_INFO");
135        LSCPEvent::RegisterEvent(LSCPEvent::event_channel_midi, "CHANNEL_MIDI");
136        LSCPEvent::RegisterEvent(LSCPEvent::event_device_midi, "DEVICE_MIDI");
137      hSocket = -1;      hSocket = -1;
138  }  }
139    
140  LSCPServer::~LSCPServer() {  LSCPServer::~LSCPServer() {
141    #if defined(WIN32)
142        if (hSocket >= 0) closesocket(hSocket);
143    #else
144      if (hSocket >= 0) close(hSocket);      if (hSocket >= 0) close(hSocket);
145    #endif
146    }
147    
148    LSCPServer::EventHandler::EventHandler(LSCPServer* pParent) {
149        this->pParent = pParent;
150    }
151    
152    LSCPServer::EventHandler::~EventHandler() {
153        std::vector<midi_listener_entry> l = channelMidiListeners;
154        channelMidiListeners.clear();
155        for (int i = 0; i < l.size(); i++)
156            delete l[i].pMidiListener;
157    }
158    
159    void LSCPServer::EventHandler::ChannelCountChanged(int NewCount) {
160        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, NewCount));
161    }
162    
163    void LSCPServer::EventHandler::ChannelAdded(SamplerChannel* pChannel) {
164        pChannel->AddEngineChangeListener(this);
165    }
166    
167    void LSCPServer::EventHandler::ChannelToBeRemoved(SamplerChannel* pChannel) {
168        if (!pChannel->GetEngineChannel()) return;
169        EngineToBeChanged(pChannel->Index());
170    }
171    
172    void LSCPServer::EventHandler::EngineToBeChanged(int ChannelId) {
173        SamplerChannel* pSamplerChannel =
174            pParent->pSampler->GetSamplerChannel(ChannelId);
175        if (!pSamplerChannel) return;
176        EngineChannel* pEngineChannel =
177            pSamplerChannel->GetEngineChannel();
178        if (!pEngineChannel) return;
179        for (std::vector<midi_listener_entry>::iterator iter = channelMidiListeners.begin(); iter != channelMidiListeners.end(); ++iter) {
180            if ((*iter).pEngineChannel == pEngineChannel) {
181                VirtualMidiDevice* pMidiListener = (*iter).pMidiListener;
182                pEngineChannel->Disconnect(pMidiListener);
183                channelMidiListeners.erase(iter);
184                delete pMidiListener;
185                return;
186            }
187        }
188    }
189    
190    void LSCPServer::EventHandler::EngineChanged(int ChannelId) {
191        SamplerChannel* pSamplerChannel =
192            pParent->pSampler->GetSamplerChannel(ChannelId);
193        if (!pSamplerChannel) return;
194        EngineChannel* pEngineChannel =
195            pSamplerChannel->GetEngineChannel();
196        if (!pEngineChannel) return;
197        VirtualMidiDevice* pMidiListener = new VirtualMidiDevice;
198        pEngineChannel->Connect(pMidiListener);
199        midi_listener_entry entry = {
200            pSamplerChannel, pEngineChannel, pMidiListener
201        };
202        channelMidiListeners.push_back(entry);
203    }
204    
205    void LSCPServer::EventHandler::AudioDeviceCountChanged(int NewCount) {
206        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, NewCount));
207    }
208    
209    void LSCPServer::EventHandler::MidiDeviceCountChanged(int NewCount) {
210        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, NewCount));
211    }
212    
213    void LSCPServer::EventHandler::MidiDeviceToBeDestroyed(MidiInputDevice* pDevice) {
214        pDevice->RemoveMidiPortCountListener(this);
215        for (int i = 0; i < pDevice->PortCount(); ++i)
216            MidiPortToBeRemoved(pDevice->GetPort(i));
217    }
218    
219    void LSCPServer::EventHandler::MidiDeviceCreated(MidiInputDevice* pDevice) {
220        pDevice->AddMidiPortCountListener(this);
221        for (int i = 0; i < pDevice->PortCount(); ++i)
222            MidiPortAdded(pDevice->GetPort(i));
223    }
224    
225    void LSCPServer::EventHandler::MidiPortCountChanged(int NewCount) {
226        // yet unused
227    }
228    
229    void LSCPServer::EventHandler::MidiPortToBeRemoved(MidiInputPort* pPort) {
230        for (std::vector<device_midi_listener_entry>::iterator iter = deviceMidiListeners.begin(); iter != deviceMidiListeners.end(); ++iter) {
231            if ((*iter).pPort == pPort) {
232                VirtualMidiDevice* pMidiListener = (*iter).pMidiListener;
233                pPort->Disconnect(pMidiListener);
234                deviceMidiListeners.erase(iter);
235                delete pMidiListener;
236                return;
237            }
238        }
239    }
240    
241    void LSCPServer::EventHandler::MidiPortAdded(MidiInputPort* pPort) {
242        // find out the device ID
243        std::map<uint, MidiInputDevice*> devices =
244            pParent->pSampler->GetMidiInputDevices();
245        for (
246            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
247            iter != devices.end(); ++iter
248        ) {
249            if (iter->second == pPort->GetDevice()) { // found
250                VirtualMidiDevice* pMidiListener = new VirtualMidiDevice;
251                pPort->Connect(pMidiListener);
252                device_midi_listener_entry entry = {
253                    pPort, pMidiListener, iter->first
254                };
255                deviceMidiListeners.push_back(entry);
256                return;
257            }
258        }
259    }
260    
261    void LSCPServer::EventHandler::MidiInstrumentCountChanged(int MapId, int NewCount) {
262        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_count, MapId, NewCount));
263    }
264    
265    void LSCPServer::EventHandler::MidiInstrumentInfoChanged(int MapId, int Bank, int Program) {
266        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_info, MapId, Bank, Program));
267    }
268    
269    void LSCPServer::EventHandler::MidiInstrumentMapCountChanged(int NewCount) {
270        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_map_count, NewCount));
271    }
272    
273    void LSCPServer::EventHandler::MidiInstrumentMapInfoChanged(int MapId) {
274        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_map_info, MapId));
275    }
276    
277    void LSCPServer::EventHandler::FxSendCountChanged(int ChannelId, int NewCount) {
278        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_count, ChannelId, NewCount));
279    }
280    
281    void LSCPServer::EventHandler::VoiceCountChanged(int ChannelId, int NewCount) {
282        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_voice_count, ChannelId, NewCount));
283    }
284    
285    void LSCPServer::EventHandler::StreamCountChanged(int ChannelId, int NewCount) {
286        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_stream_count, ChannelId, NewCount));
287    }
288    
289    void LSCPServer::EventHandler::BufferFillChanged(int ChannelId, String FillData) {
290        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_buffer_fill, ChannelId, FillData));
291    }
292    
293    void LSCPServer::EventHandler::TotalVoiceCountChanged(int NewCount) {
294        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_voice_count, NewCount));
295    }
296    
297    void LSCPServer::EventHandler::TotalStreamCountChanged(int NewCount) {
298        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_stream_count, NewCount));
299    }
300    
301    #if HAVE_SQLITE3
302    void LSCPServer::DbInstrumentsEventHandler::DirectoryCountChanged(String Dir) {
303        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_count, InstrumentsDb::toEscapedPath(Dir)));
304    }
305    
306    void LSCPServer::DbInstrumentsEventHandler::DirectoryInfoChanged(String Dir) {
307        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_info, InstrumentsDb::toEscapedPath(Dir)));
308    }
309    
310    void LSCPServer::DbInstrumentsEventHandler::DirectoryNameChanged(String Dir, String NewName) {
311        Dir = "'" + InstrumentsDb::toEscapedPath(Dir) + "'";
312        NewName = "'" + InstrumentsDb::toEscapedPath(NewName) + "'";
313        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_info, "NAME", Dir, NewName));
314    }
315    
316    void LSCPServer::DbInstrumentsEventHandler::InstrumentCountChanged(String Dir) {
317        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_count, InstrumentsDb::toEscapedPath(Dir)));
318    }
319    
320    void LSCPServer::DbInstrumentsEventHandler::InstrumentInfoChanged(String Instr) {
321        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_info, InstrumentsDb::toEscapedPath(Instr)));
322  }  }
323    
324    void LSCPServer::DbInstrumentsEventHandler::InstrumentNameChanged(String Instr, String NewName) {
325        Instr = "'" + InstrumentsDb::toEscapedPath(Instr) + "'";
326        NewName = "'" + InstrumentsDb::toEscapedPath(NewName) + "'";
327        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_info, "NAME", Instr, NewName));
328    }
329    
330    void LSCPServer::DbInstrumentsEventHandler::JobStatusChanged(int JobId) {
331        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instrs_job_info, JobId));
332    }
333    #endif // HAVE_SQLITE3
334    
335    
336  /**  /**
337   * Blocks the calling thread until the LSCP Server is initialized and   * Blocks the calling thread until the LSCP Server is initialized and
338   * accepting socket connections, if the server is already initialized then   * accepting socket connections, if the server is already initialized then
# Line 103  int LSCPServer::WaitUntilInitialized(lon Line 348  int LSCPServer::WaitUntilInitialized(lon
348  }  }
349    
350  int LSCPServer::Main() {  int LSCPServer::Main() {
351            #if defined(WIN32)
352            WSADATA wsaData;
353            int iResult;
354            iResult = WSAStartup(MAKEWORD(2,2), &wsaData);
355            if (iResult != 0) {
356                    std::cerr << "LSCPServer: WSAStartup failed: " << iResult << "\n";
357                    exit(EXIT_FAILURE);
358            }
359            #endif
360      hSocket = socket(AF_INET, SOCK_STREAM, 0);      hSocket = socket(AF_INET, SOCK_STREAM, 0);
361      if (hSocket < 0) {      if (hSocket < 0) {
362          std::cerr << "LSCPServer: Could not create server socket." << std::endl;          std::cerr << "LSCPServer: Could not create server socket." << std::endl;
# Line 116  int LSCPServer::Main() { Line 370  int LSCPServer::Main() {
370              if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {              if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {
371                  if (trial > LSCP_SERVER_BIND_TIMEOUT) {                  if (trial > LSCP_SERVER_BIND_TIMEOUT) {
372                      std::cerr << "gave up!" << std::endl;                      std::cerr << "gave up!" << std::endl;
373                        #if defined(WIN32)
374                        closesocket(hSocket);
375                        #else
376                      close(hSocket);                      close(hSocket);
377                        #endif
378                      //return -1;                      //return -1;
379                      exit(EXIT_FAILURE);                      exit(EXIT_FAILURE);
380                  }                  }
# Line 129  int LSCPServer::Main() { Line 387  int LSCPServer::Main() {
387      listen(hSocket, 1);      listen(hSocket, 1);
388      Initialized.Set(true);      Initialized.Set(true);
389    
390        // Registering event listeners
391        pSampler->AddChannelCountListener(&eventHandler);
392        pSampler->AddAudioDeviceCountListener(&eventHandler);
393        pSampler->AddMidiDeviceCountListener(&eventHandler);
394        pSampler->AddVoiceCountListener(&eventHandler);
395        pSampler->AddStreamCountListener(&eventHandler);
396        pSampler->AddBufferFillListener(&eventHandler);
397        pSampler->AddTotalStreamCountListener(&eventHandler);
398        pSampler->AddTotalVoiceCountListener(&eventHandler);
399        pSampler->AddFxSendCountListener(&eventHandler);
400        MidiInstrumentMapper::AddMidiInstrumentCountListener(&eventHandler);
401        MidiInstrumentMapper::AddMidiInstrumentInfoListener(&eventHandler);
402        MidiInstrumentMapper::AddMidiInstrumentMapCountListener(&eventHandler);
403        MidiInstrumentMapper::AddMidiInstrumentMapInfoListener(&eventHandler);
404    #if HAVE_SQLITE3
405        InstrumentsDb::GetInstrumentsDb()->AddInstrumentsDbListener(&dbInstrumentsEventHandler);
406    #endif
407      // now wait for client connections and handle their requests      // now wait for client connections and handle their requests
408      sockaddr_in client;      sockaddr_in client;
409      int length = sizeof(client);      int length = sizeof(client);
# Line 139  int LSCPServer::Main() { Line 414  int LSCPServer::Main() {
414      timeval timeout;      timeval timeout;
415    
416      while (true) {      while (true) {
417            #if CONFIG_PTHREAD_TESTCANCEL
418                    TestCancel();
419            #endif
420          // 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
421          {          {
422              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
# Line 146  int LSCPServer::Main() { Line 424  int LSCPServer::Main() {
424              std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();              std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
425              for (; itEngineChannel != itEnd; ++itEngineChannel) {              for (; itEngineChannel != itEnd; ++itEngineChannel) {
426                  if ((*itEngineChannel)->StatusChanged()) {                  if ((*itEngineChannel)->StatusChanged()) {
427                      SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->iSamplerChannelIndex));                      SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->GetSamplerChannel()->Index()));
428                    }
429    
430                    for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
431                        FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
432                        if(fxs != NULL && fxs->IsInfoChanged()) {
433                            int chn = (*itEngineChannel)->GetSamplerChannel()->Index();
434                            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, chn, fxs->Id()));
435                            fxs->SetInfoChanged(false);
436                        }
437                    }
438                }
439            }
440    
441            // check if MIDI data arrived on some engine channel
442            for (int i = 0; i < eventHandler.channelMidiListeners.size(); ++i) {
443                const EventHandler::midi_listener_entry entry =
444                    eventHandler.channelMidiListeners[i];
445                VirtualMidiDevice* pMidiListener = entry.pMidiListener;
446                if (pMidiListener->NotesChanged()) {
447                    for (int iNote = 0; iNote < 128; iNote++) {
448                        if (pMidiListener->NoteChanged(iNote)) {
449                            const bool bActive = pMidiListener->NoteIsActive(iNote);
450                            LSCPServer::SendLSCPNotify(
451                                LSCPEvent(
452                                    LSCPEvent::event_channel_midi,
453                                    entry.pSamplerChannel->Index(),
454                                    std::string(bActive ? "NOTE_ON" : "NOTE_OFF"),
455                                    iNote,
456                                    bActive ? pMidiListener->NoteOnVelocity(iNote)
457                                            : pMidiListener->NoteOffVelocity(iNote)
458                                )
459                            );
460                        }
461                    }
462                }
463            }
464    
465            // check if MIDI data arrived on some MIDI device
466            for (int i = 0; i < eventHandler.deviceMidiListeners.size(); ++i) {
467                const EventHandler::device_midi_listener_entry entry =
468                    eventHandler.deviceMidiListeners[i];
469                VirtualMidiDevice* pMidiListener = entry.pMidiListener;
470                if (pMidiListener->NotesChanged()) {
471                    for (int iNote = 0; iNote < 128; iNote++) {
472                        if (pMidiListener->NoteChanged(iNote)) {
473                            const bool bActive = pMidiListener->NoteIsActive(iNote);
474                            LSCPServer::SendLSCPNotify(
475                                LSCPEvent(
476                                    LSCPEvent::event_device_midi,
477                                    entry.uiDeviceID,
478                                    entry.pPort->GetPortNumber(),
479                                    std::string(bActive ? "NOTE_ON" : "NOTE_OFF"),
480                                    iNote,
481                                    bActive ? pMidiListener->NoteOnVelocity(iNote)
482                                            : pMidiListener->NoteOffVelocity(iNote)
483                                )
484                            );
485                        }
486                  }                  }
487              }              }
488          }          }
# Line 173  int LSCPServer::Main() { Line 509  int LSCPServer::Main() {
509                  continue; //Nothing try again                  continue; //Nothing try again
510          if (retval == -1) {          if (retval == -1) {
511                  std::cerr << "LSCPServer: Socket select error." << std::endl;                  std::cerr << "LSCPServer: Socket select error." << std::endl;
512                    #if defined(WIN32)
513                    closesocket(hSocket);
514                    #else
515                  close(hSocket);                  close(hSocket);
516                    #endif
517                  exit(EXIT_FAILURE);                  exit(EXIT_FAILURE);
518          }          }
519    
# Line 185  int LSCPServer::Main() { Line 525  int LSCPServer::Main() {
525                          exit(EXIT_FAILURE);                          exit(EXIT_FAILURE);
526                  }                  }
527    
528                    #if defined(WIN32)
529                    u_long nonblock_io = 1;
530                    if( ioctlsocket(socket, FIONBIO, &nonblock_io) ) {
531                      std::cerr << "LSCPServer: ioctlsocket: set FIONBIO failed. Error " << WSAGetLastError() << std::endl;
532                      exit(EXIT_FAILURE);
533                    }
534            #else
535                  if (fcntl(socket, F_SETFL, O_NONBLOCK)) {                  if (fcntl(socket, F_SETFL, O_NONBLOCK)) {
536                          std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;                          std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;
537                          exit(EXIT_FAILURE);                          exit(EXIT_FAILURE);
538                  }                  }
539                    #endif
540    
541                  // Parser initialization                  // Parser initialization
542                  yyparse_param_t yyparse_param;                  yyparse_param_t yyparse_param;
# Line 212  int LSCPServer::Main() { Line 560  int LSCPServer::Main() {
560                                  int dummy; // just a temporary hack to fulfill the restart() function prototype                                  int dummy; // just a temporary hack to fulfill the restart() function prototype
561                                  restart(NULL, dummy); // restart the 'scanner'                                  restart(NULL, dummy); // restart the 'scanner'
562                                  currentSocket = (*iter).hSession;  //a hack                                  currentSocket = (*iter).hSession;  //a hack
563                                    itCurrentSession = iter; // another hack
564                                  dmsg(2,("LSCPServer: [%s]\n",bufferedCommands[currentSocket].c_str()));                                  dmsg(2,("LSCPServer: [%s]\n",bufferedCommands[currentSocket].c_str()));
565                                  if ((*iter).bVerbose) { // if echo mode enabled                                  if ((*iter).bVerbose) { // if echo mode enabled
566                                      AnswerClient(bufferedCommands[currentSocket]);                                      AnswerClient(bufferedCommands[currentSocket]);
567                                  }                                  }
568                                  int result = yyparse(&(*iter));                                  int result = yyparse(&(*iter));
569                                  currentSocket = -1;     //continuation of a hack                                  currentSocket = -1;     //continuation of a hack
570                                    itCurrentSession = Sessions.end(); // hack as well
571                                  dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket));                                  dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket));
572                                  if (result == LSCP_QUIT) { //Was it a quit command by any chance?                                  if (result == LSCP_QUIT) { //Was it a quit command by any chance?
573                                          CloseConnection(iter);                                          CloseConnection(iter);
# Line 245  void LSCPServer::CloseConnection( std::v Line 595  void LSCPServer::CloseConnection( std::v
595          NotifyMutex.Lock();          NotifyMutex.Lock();
596          bufferedCommands.erase(socket);          bufferedCommands.erase(socket);
597          bufferedNotifies.erase(socket);          bufferedNotifies.erase(socket);
598            #if defined(WIN32)
599            closesocket(socket);
600            #else
601          close(socket);          close(socket);
602            #endif
603          NotifyMutex.Unlock();          NotifyMutex.Unlock();
604  }  }
605    
606    void LSCPServer::LockRTNotify() {
607        RTNotifyMutex.Lock();
608    }
609    
610    void LSCPServer::UnlockRTNotify() {
611        RTNotifyMutex.Unlock();
612    }
613    
614  int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {  int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {
615          int subs = 0;          int subs = 0;
616          SubscriptionMutex.Lock();          SubscriptionMutex.Lock();
# Line 310  extern int GetLSCPCommand( void *buf, in Line 672  extern int GetLSCPCommand( void *buf, in
672          return command.size();          return command.size();
673  }  }
674    
675    extern yyparse_param_t* GetCurrentYaccSession() {
676        return &(*itCurrentSession);
677    }
678    
679  /**  /**
680   * Will be called to try to read the command from the socket   * Will be called to try to read the command from the socket
681   * If command is read, it will return true. Otherwise false is returned.   * If command is read, it will return true. Otherwise false is returned.
# Line 320  bool LSCPServer::GetLSCPCommand( std::ve Line 686  bool LSCPServer::GetLSCPCommand( std::ve
686          char c;          char c;
687          int i = 0;          int i = 0;
688          while (true) {          while (true) {
689                    #if defined(WIN32)
690                    int result = recv(socket, (char *)&c, 1, 0); //Read one character at a time for now
691                    #else
692                  int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now                  int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now
693                    #endif
694                  if (result == 0) { //socket was selected, so 0 here means client has closed the connection                  if (result == 0) { //socket was selected, so 0 here means client has closed the connection
695                          CloseConnection(iter);                          CloseConnection(iter);
696                          break;                          break;
# Line 335  bool LSCPServer::GetLSCPCommand( std::ve Line 705  bool LSCPServer::GetLSCPCommand( std::ve
705                          }                          }
706                          bufferedCommands[socket] += c;                          bufferedCommands[socket] += c;
707                  }                  }
708                    #if defined(WIN32)
709                    if (result == SOCKET_ERROR) {
710                        int wsa_lasterror = WSAGetLastError();
711                            if (wsa_lasterror == WSAEWOULDBLOCK) //Would block, try again later.
712                                    return false;
713                            dmsg(2,("LSCPScanner: Socket error after recv() Error %d.\n", wsa_lasterror));
714                            CloseConnection(iter);
715                            break;
716                    }
717                    #else
718                  if (result == -1) {                  if (result == -1) {
719                          if (errno == EAGAIN) //Would block, try again later.                          if (errno == EAGAIN) //Would block, try again later.
720                                  return false;                                  return false;
# Line 373  bool LSCPServer::GetLSCPCommand( std::ve Line 753  bool LSCPServer::GetLSCPCommand( std::ve
753                          CloseConnection(iter);                          CloseConnection(iter);
754                          break;                          break;
755                  }                  }
756                    #endif
757          }          }
758          return false;          return false;
759  }  }
# Line 490  String LSCPServer::DestroyMidiInputDevic Line 871  String LSCPServer::DestroyMidiInputDevic
871      return result.Produce();      return result.Produce();
872  }  }
873    
874    EngineChannel* LSCPServer::GetEngineChannel(uint uiSamplerChannel) {
875        SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
876        if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
877    
878        EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
879        if (!pEngineChannel) throw Exception("There is no engine deployed on this sampler channel yet");
880    
881        return pEngineChannel;
882    }
883    
884  /**  /**
885   * Will be called by the parser to load an instrument.   * Will be called by the parser to load an instrument.
886   */   */
# Line 636  String LSCPServer::GetEngineInfo(String Line 1027  String LSCPServer::GetEngineInfo(String
1027      LockRTNotify();      LockRTNotify();
1028      try {      try {
1029          Engine* pEngine = EngineFactory::Create(EngineName);          Engine* pEngine = EngineFactory::Create(EngineName);
1030          result.Add("DESCRIPTION", pEngine->Description());          result.Add("DESCRIPTION", _escapeLscpResponse(pEngine->Description()));
1031          result.Add("VERSION",     pEngine->Version());          result.Add("VERSION",     pEngine->Version());
1032          EngineFactory::Destroy(pEngine);          EngineFactory::Destroy(pEngine);
1033      }      }
# Line 670  String LSCPServer::GetChannelInfo(uint u Line 1061  String LSCPServer::GetChannelInfo(uint u
1061          String AudioRouting;          String AudioRouting;
1062          int Mute = 0;          int Mute = 0;
1063          bool Solo = false;          bool Solo = false;
1064          String MidiInstrumentMap;          String MidiInstrumentMap = "NONE";
1065    
1066          if (pEngineChannel) {          if (pEngineChannel) {
1067              EngineName          = pEngineChannel->EngineName();              EngineName          = pEngineChannel->EngineName();
# Line 709  String LSCPServer::GetChannelInfo(uint u Line 1100  String LSCPServer::GetChannelInfo(uint u
1100          if (pSamplerChannel->GetMidiInputChannel() == midi_chan_all) result.Add("MIDI_INPUT_CHANNEL", "ALL");          if (pSamplerChannel->GetMidiInputChannel() == midi_chan_all) result.Add("MIDI_INPUT_CHANNEL", "ALL");
1101          else result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel());          else result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel());
1102    
1103            // convert the filename into the correct encoding as defined for LSCP
1104            // (especially in terms of special characters -> escape sequences)
1105            if (InstrumentFileName != "NONE" && InstrumentFileName != "") {
1106    #if WIN32
1107                InstrumentFileName = Path::fromWindows(InstrumentFileName).toLscp();
1108    #else
1109                // assuming POSIX
1110                InstrumentFileName = Path::fromPosix(InstrumentFileName).toLscp();
1111    #endif
1112            }
1113    
1114          result.Add("INSTRUMENT_FILE", InstrumentFileName);          result.Add("INSTRUMENT_FILE", InstrumentFileName);
1115          result.Add("INSTRUMENT_NR", InstrumentIndex);          result.Add("INSTRUMENT_NR", InstrumentIndex);
1116          result.Add("INSTRUMENT_NAME", InstrumentName);          result.Add("INSTRUMENT_NAME", _escapeLscpResponse(InstrumentName));
1117          result.Add("INSTRUMENT_STATUS", InstrumentStatus);          result.Add("INSTRUMENT_STATUS", InstrumentStatus);
1118          result.Add("MUTE", Mute == -1 ? "MUTED_BY_SOLO" : (Mute ? "true" : "false"));          result.Add("MUTE", Mute == -1 ? "MUTED_BY_SOLO" : (Mute ? "true" : "false"));
1119          result.Add("SOLO", Solo);          result.Add("SOLO", Solo);
# Line 1502  String LSCPServer::SetChannelSolo(bool b Line 1904  String LSCPServer::SetChannelSolo(bool b
1904    
1905          bool oldSolo = pEngineChannel->GetSolo();          bool oldSolo = pEngineChannel->GetSolo();
1906          bool hadSoloChannel = HasSoloChannel();          bool hadSoloChannel = HasSoloChannel();
1907            
1908          pEngineChannel->SetSolo(bSolo);          pEngineChannel->SetSolo(bSolo);
1909            
1910          if(!oldSolo && bSolo) {          if(!oldSolo && bSolo) {
1911              if(pEngineChannel->GetMute() == -1) pEngineChannel->SetMute(0);              if(pEngineChannel->GetMute() == -1) pEngineChannel->SetMute(0);
1912              if(!hadSoloChannel) MuteNonSoloChannels();              if(!hadSoloChannel) MuteNonSoloChannels();
1913          }          }
1914            
1915          if(oldSolo && !bSolo) {          if(oldSolo && !bSolo) {
1916              if(!HasSoloChannel()) UnmuteChannels();              if(!HasSoloChannel()) UnmuteChannels();
1917              else if(!pEngineChannel->GetMute()) pEngineChannel->SetMute(-1);              else if(!pEngineChannel->GetMute()) pEngineChannel->SetMute(-1);
# Line 1567  void  LSCPServer::UnmuteChannels() { Line 1969  void  LSCPServer::UnmuteChannels() {
1969      }      }
1970  }  }
1971    
1972  String LSCPServer::AddOrReplaceMIDIInstrumentMapping(uint MidiMapID, uint MidiBank, uint MidiProg, String EngineType, String InstrumentFile, uint InstrumentIndex, float Volume, MidiInstrumentMapper::mode_t LoadMode, String Name) {  String LSCPServer::AddOrReplaceMIDIInstrumentMapping(uint MidiMapID, uint MidiBank, uint MidiProg, String EngineType, String InstrumentFile, uint InstrumentIndex, float Volume, MidiInstrumentMapper::mode_t LoadMode, String Name, bool bModal) {
1973      dmsg(2,("LSCPServer: AddOrReplaceMIDIInstrumentMapping()\n"));      dmsg(2,("LSCPServer: AddOrReplaceMIDIInstrumentMapping()\n"));
1974    
1975      midi_prog_index_t idx;      midi_prog_index_t idx;
# Line 1585  String LSCPServer::AddOrReplaceMIDIInstr Line 1987  String LSCPServer::AddOrReplaceMIDIInstr
1987    
1988      LSCPResultSet result;      LSCPResultSet result;
1989      try {      try {
1990          // PERSISTENT mapping commands might bloock for a long time, so in          // PERSISTENT mapping commands might block for a long time, so in
1991          // that case we add/replace the mapping in another thread          // that case we add/replace the mapping in another thread in case
1992          bool bInBackground = (entry.LoadMode == MidiInstrumentMapper::PERSISTENT);          // the NON_MODAL argument was supplied, non persistent mappings
1993            // should return immediately, so we don't need to do that for them
1994            bool bInBackground = (entry.LoadMode == MidiInstrumentMapper::PERSISTENT && !bModal);
1995          MidiInstrumentMapper::AddOrReplaceEntry(MidiMapID, idx, entry, bInBackground);          MidiInstrumentMapper::AddOrReplaceEntry(MidiMapID, idx, entry, bInBackground);
1996      } catch (Exception e) {      } catch (Exception e) {
1997          result.Error(e);          result.Error(e);
# Line 1616  String LSCPServer::GetMidiInstrumentMapp Line 2020  String LSCPServer::GetMidiInstrumentMapp
2020      dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));      dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));
2021      LSCPResultSet result;      LSCPResultSet result;
2022      try {      try {
2023          result.Add(MidiInstrumentMapper::Entries(MidiMapID).size());          result.Add(MidiInstrumentMapper::GetInstrumentCount(MidiMapID));
2024      } catch (Exception e) {      } catch (Exception e) {
2025          result.Error(e);          result.Error(e);
2026      }      }
# Line 1627  String LSCPServer::GetMidiInstrumentMapp Line 2031  String LSCPServer::GetMidiInstrumentMapp
2031  String LSCPServer::GetAllMidiInstrumentMappings() {  String LSCPServer::GetAllMidiInstrumentMappings() {
2032      dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));      dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));
2033      LSCPResultSet result;      LSCPResultSet result;
2034      std::vector<int> maps = MidiInstrumentMapper::Maps();      try {
2035      int totalMappings = 0;          result.Add(MidiInstrumentMapper::GetInstrumentCount());
2036      for (int i = 0; i < maps.size(); i++) {      } catch (Exception e) {
2037          try {          result.Error(e);
             totalMappings += MidiInstrumentMapper::Entries(maps[i]).size();  
         } catch (Exception e) { /*NOOP*/ }  
2038      }      }
     result.Add(totalMappings);  
2039      return result.Produce();      return result.Produce();
2040  }  }
2041    
# Line 1642  String LSCPServer::GetMidiInstrumentMapp Line 2043  String LSCPServer::GetMidiInstrumentMapp
2043      dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));      dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));
2044      LSCPResultSet result;      LSCPResultSet result;
2045      try {      try {
2046          midi_prog_index_t idx;          MidiInstrumentMapper::entry_t entry = MidiInstrumentMapper::GetEntry(MidiMapID, MidiBank, MidiProg);
2047          idx.midi_bank_msb = (MidiBank >> 7) & 0x7f;          // convert the filename into the correct encoding as defined for LSCP
2048          idx.midi_bank_lsb = MidiBank & 0x7f;          // (especially in terms of special characters -> escape sequences)
2049          idx.midi_prog     = MidiProg;  #if WIN32
2050            const String instrumentFileName = Path::fromWindows(entry.InstrumentFile).toLscp();
2051    #else
2052            // assuming POSIX
2053            const String instrumentFileName = Path::fromPosix(entry.InstrumentFile).toLscp();
2054    #endif
2055    
2056          std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t> mappings = MidiInstrumentMapper::Entries(MidiMapID);          result.Add("NAME", _escapeLscpResponse(entry.Name));
2057          std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t>::iterator iter = mappings.find(idx);          result.Add("ENGINE_NAME", entry.EngineName);
2058          if (iter == mappings.end()) result.Error("there is no map entry with that index");          result.Add("INSTRUMENT_FILE", instrumentFileName);
2059          else { // found          result.Add("INSTRUMENT_NR", (int) entry.InstrumentIndex);
2060              result.Add("NAME", iter->second.Name);          String instrumentName;
2061              result.Add("ENGINE_NAME", iter->second.EngineName);          Engine* pEngine = EngineFactory::Create(entry.EngineName);
2062              result.Add("INSTRUMENT_FILE", iter->second.InstrumentFile);          if (pEngine) {
2063              result.Add("INSTRUMENT_NR", (int) iter->second.InstrumentIndex);              if (pEngine->GetInstrumentManager()) {
2064              String instrumentName;                  InstrumentManager::instrument_id_t instrID;
2065              Engine* pEngine = EngineFactory::Create(iter->second.EngineName);                  instrID.FileName = entry.InstrumentFile;
2066              if (pEngine) {                  instrID.Index    = entry.InstrumentIndex;
2067                  if (pEngine->GetInstrumentManager()) {                  instrumentName = pEngine->GetInstrumentManager()->GetInstrumentName(instrID);
                     InstrumentManager::instrument_id_t instrID;  
                     instrID.FileName = iter->second.InstrumentFile;  
                     instrID.Index    = iter->second.InstrumentIndex;  
                     instrumentName = pEngine->GetInstrumentManager()->GetInstrumentName(instrID);  
                 }  
                 EngineFactory::Destroy(pEngine);  
2068              }              }
2069              result.Add("INSTRUMENT_NAME", instrumentName);              EngineFactory::Destroy(pEngine);
             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!");  
             }  
             result.Add("VOLUME", iter->second.Volume);  
2070          }          }
2071            result.Add("INSTRUMENT_NAME", _escapeLscpResponse(instrumentName));
2072            switch (entry.LoadMode) {
2073                case MidiInstrumentMapper::ON_DEMAND:
2074                    result.Add("LOAD_MODE", "ON_DEMAND");
2075                    break;
2076                case MidiInstrumentMapper::ON_DEMAND_HOLD:
2077                    result.Add("LOAD_MODE", "ON_DEMAND_HOLD");
2078                    break;
2079                case MidiInstrumentMapper::PERSISTENT:
2080                    result.Add("LOAD_MODE", "PERSISTENT");
2081                    break;
2082                default:
2083                    throw Exception("entry reflects invalid LOAD_MODE, consider this as a bug!");
2084            }
2085            result.Add("VOLUME", entry.Volume);
2086      } catch (Exception e) {      } catch (Exception e) {
2087          result.Error(e);          result.Error(e);
2088      }      }
# Line 1698  String LSCPServer::ListMidiInstrumentMap Line 2099  String LSCPServer::ListMidiInstrumentMap
2099          for (; iter != mappings.end(); iter++) {          for (; iter != mappings.end(); iter++) {
2100              if (s.size()) s += ",";              if (s.size()) s += ",";
2101              s += "{" + ToString(MidiMapID) + ","              s += "{" + ToString(MidiMapID) + ","
2102                       + ToString((int(iter->first.midi_bank_msb) << 7) & int(iter->first.midi_bank_lsb)) + ","                       + ToString((int(iter->first.midi_bank_msb) << 7) | int(iter->first.midi_bank_lsb)) + ","
2103                       + ToString(int(iter->first.midi_prog)) + "}";                       + ToString(int(iter->first.midi_prog)) + "}";
2104          }          }
2105          result.Add(s);          result.Add(s);
# Line 1720  String LSCPServer::ListAllMidiInstrument Line 2121  String LSCPServer::ListAllMidiInstrument
2121              for (; iter != mappings.end(); iter++) {              for (; iter != mappings.end(); iter++) {
2122                  if (s.size()) s += ",";                  if (s.size()) s += ",";
2123                  s += "{" + ToString(maps[i]) + ","                  s += "{" + ToString(maps[i]) + ","
2124                           + ToString((int(iter->first.midi_bank_msb) << 7) & int(iter->first.midi_bank_lsb)) + ","                           + ToString((int(iter->first.midi_bank_msb) << 7) | int(iter->first.midi_bank_lsb)) + ","
2125                           + ToString(int(iter->first.midi_prog)) + "}";                           + ToString(int(iter->first.midi_prog)) + "}";
2126              }              }
2127          }          }
# Line 1821  String LSCPServer::GetMidiInstrumentMap( Line 2222  String LSCPServer::GetMidiInstrumentMap(
2222      dmsg(2,("LSCPServer: GetMidiInstrumentMap()\n"));      dmsg(2,("LSCPServer: GetMidiInstrumentMap()\n"));
2223      LSCPResultSet result;      LSCPResultSet result;
2224      try {      try {
2225          result.Add("NAME", MidiInstrumentMapper::MapName(MidiMapID));          result.Add("NAME", _escapeLscpResponse(MidiInstrumentMapper::MapName(MidiMapID)));
2226            result.Add("DEFAULT", MidiInstrumentMapper::GetDefaultMap() == MidiMapID);
2227      } catch (Exception e) {      } catch (Exception e) {
2228          result.Error(e);          result.Error(e);
2229      }      }
# Line 1866  String LSCPServer::SetChannelMap(uint ui Line 2268  String LSCPServer::SetChannelMap(uint ui
2268      return result.Produce();      return result.Produce();
2269  }  }
2270    
2271    String LSCPServer::CreateFxSend(uint uiSamplerChannel, uint MidiCtrl, String Name) {
2272        dmsg(2,("LSCPServer: CreateFxSend()\n"));
2273        LSCPResultSet result;
2274        try {
2275            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2276    
2277            FxSend* pFxSend = pEngineChannel->AddFxSend(MidiCtrl, Name);
2278            if (!pFxSend) throw Exception("Could not add FxSend, don't ask, I don't know why (probably a bug)");
2279    
2280            result = LSCPResultSet(pFxSend->Id()); // success
2281        } catch (Exception e) {
2282            result.Error(e);
2283        }
2284        return result.Produce();
2285    }
2286    
2287    String LSCPServer::DestroyFxSend(uint uiSamplerChannel, uint FxSendID) {
2288        dmsg(2,("LSCPServer: DestroyFxSend()\n"));
2289        LSCPResultSet result;
2290        try {
2291            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2292    
2293            FxSend* pFxSend = NULL;
2294            for (int i = 0; i < pEngineChannel->GetFxSendCount(); i++) {
2295                if (pEngineChannel->GetFxSend(i)->Id() == FxSendID) {
2296                    pFxSend = pEngineChannel->GetFxSend(i);
2297                    break;
2298                }
2299            }
2300            if (!pFxSend) throw Exception("There is no FxSend with that ID on the given sampler channel");
2301            pEngineChannel->RemoveFxSend(pFxSend);
2302        } catch (Exception e) {
2303            result.Error(e);
2304        }
2305        return result.Produce();
2306    }
2307    
2308    String LSCPServer::GetFxSends(uint uiSamplerChannel) {
2309        dmsg(2,("LSCPServer: GetFxSends()\n"));
2310        LSCPResultSet result;
2311        try {
2312            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2313    
2314            result.Add(pEngineChannel->GetFxSendCount());
2315        } catch (Exception e) {
2316            result.Error(e);
2317        }
2318        return result.Produce();
2319    }
2320    
2321    String LSCPServer::ListFxSends(uint uiSamplerChannel) {
2322        dmsg(2,("LSCPServer: ListFxSends()\n"));
2323        LSCPResultSet result;
2324        String list;
2325        try {
2326            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2327    
2328            for (int i = 0; i < pEngineChannel->GetFxSendCount(); i++) {
2329                FxSend* pFxSend = pEngineChannel->GetFxSend(i);
2330                if (list != "") list += ",";
2331                list += ToString(pFxSend->Id());
2332            }
2333            result.Add(list);
2334        } catch (Exception e) {
2335            result.Error(e);
2336        }
2337        return result.Produce();
2338    }
2339    
2340    FxSend* LSCPServer::GetFxSend(uint uiSamplerChannel, uint FxSendID) {
2341        EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2342    
2343        FxSend* pFxSend = NULL;
2344        for (int i = 0; i < pEngineChannel->GetFxSendCount(); i++) {
2345            if (pEngineChannel->GetFxSend(i)->Id() == FxSendID) {
2346                pFxSend = pEngineChannel->GetFxSend(i);
2347                break;
2348            }
2349        }
2350        if (!pFxSend) throw Exception("There is no FxSend with that ID on the given sampler channel");
2351        return pFxSend;
2352    }
2353    
2354    String LSCPServer::GetFxSendInfo(uint uiSamplerChannel, uint FxSendID) {
2355        dmsg(2,("LSCPServer: GetFxSendInfo()\n"));
2356        LSCPResultSet result;
2357        try {
2358            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2359            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2360    
2361            // gather audio routing informations
2362            String AudioRouting;
2363            for (int chan = 0; chan < pEngineChannel->Channels(); chan++) {
2364                if (AudioRouting != "") AudioRouting += ",";
2365                AudioRouting += ToString(pFxSend->DestinationChannel(chan));
2366            }
2367    
2368            // success
2369            result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));
2370            result.Add("MIDI_CONTROLLER", pFxSend->MidiController());
2371            result.Add("LEVEL", ToString(pFxSend->Level()));
2372            result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
2373        } catch (Exception e) {
2374            result.Error(e);
2375        }
2376        return result.Produce();
2377    }
2378    
2379    String LSCPServer::SetFxSendName(uint uiSamplerChannel, uint FxSendID, String Name) {
2380        dmsg(2,("LSCPServer: SetFxSendName()\n"));
2381        LSCPResultSet result;
2382        try {
2383            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2384    
2385            pFxSend->SetName(Name);
2386            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2387        } catch (Exception e) {
2388            result.Error(e);
2389        }
2390        return result.Produce();
2391    }
2392    
2393    String LSCPServer::SetFxSendAudioOutputChannel(uint uiSamplerChannel, uint FxSendID, uint FxSendChannel, uint DeviceChannel) {
2394        dmsg(2,("LSCPServer: SetFxSendAudioOutputChannel()\n"));
2395        LSCPResultSet result;
2396        try {
2397            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2398    
2399            pFxSend->SetDestinationChannel(FxSendChannel, DeviceChannel);
2400            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2401        } catch (Exception e) {
2402            result.Error(e);
2403        }
2404        return result.Produce();
2405    }
2406    
2407    String LSCPServer::SetFxSendMidiController(uint uiSamplerChannel, uint FxSendID, uint MidiController) {
2408        dmsg(2,("LSCPServer: SetFxSendMidiController()\n"));
2409        LSCPResultSet result;
2410        try {
2411            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2412    
2413            pFxSend->SetMidiController(MidiController);
2414            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2415        } catch (Exception e) {
2416            result.Error(e);
2417        }
2418        return result.Produce();
2419    }
2420    
2421    String LSCPServer::SetFxSendLevel(uint uiSamplerChannel, uint FxSendID, double dLevel) {
2422        dmsg(2,("LSCPServer: SetFxSendLevel()\n"));
2423        LSCPResultSet result;
2424        try {
2425            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2426    
2427            pFxSend->SetLevel((float)dLevel);
2428            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2429        } catch (Exception e) {
2430            result.Error(e);
2431        }
2432        return result.Produce();
2433    }
2434    
2435    String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {
2436        dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));
2437        LSCPResultSet result;
2438        try {
2439            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
2440            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
2441            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
2442            if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel");
2443            if (pEngineChannel->InstrumentStatus() < 0) throw Exception("No instrument loaded to sampler channel");
2444            Engine* pEngine = pEngineChannel->GetEngine();
2445            InstrumentManager* pInstrumentManager = pEngine->GetInstrumentManager();
2446            if (!pInstrumentManager) throw Exception("Engine does not provide an instrument manager");
2447            InstrumentManager::instrument_id_t instrumentID;
2448            instrumentID.FileName = pEngineChannel->InstrumentFileName();
2449            instrumentID.Index    = pEngineChannel->InstrumentIndex();
2450            pInstrumentManager->LaunchInstrumentEditor(instrumentID);
2451        } catch (Exception e) {
2452            result.Error(e);
2453        }
2454        return result.Produce();
2455    }
2456    
2457  /**  /**
2458   * Will be called by the parser to reset a particular sampler channel.   * Will be called by the parser to reset a particular sampler channel.
2459   */   */
# Line 1901  String LSCPServer::ResetSampler() { Line 2489  String LSCPServer::ResetSampler() {
2489   */   */
2490  String LSCPServer::GetServerInfo() {  String LSCPServer::GetServerInfo() {
2491      dmsg(2,("LSCPServer: GetServerInfo()\n"));      dmsg(2,("LSCPServer: GetServerInfo()\n"));
2492        const std::string description =
2493            _escapeLscpResponse("LinuxSampler - modular, streaming capable sampler");
2494      LSCPResultSet result;      LSCPResultSet result;
2495      result.Add("DESCRIPTION", "LinuxSampler - modular, streaming capable sampler");      result.Add("DESCRIPTION", description);
2496      result.Add("VERSION", VERSION);      result.Add("VERSION", VERSION);
2497      result.Add("PROTOCOL_VERSION", ToString(LSCP_RELEASE_MAJOR) + "." + ToString(LSCP_RELEASE_MINOR));      result.Add("PROTOCOL_VERSION", ToString(LSCP_RELEASE_MAJOR) + "." + ToString(LSCP_RELEASE_MINOR));
2498    #if HAVE_SQLITE3
2499        result.Add("INSTRUMENTS_DB_SUPPORT", "yes");
2500    #else
2501        result.Add("INSTRUMENTS_DB_SUPPORT", "no");
2502    #endif
2503    
2504        return result.Produce();
2505    }
2506    
2507    /**
2508     * Will be called by the parser to return the current number of all active streams.
2509     */
2510    String LSCPServer::GetTotalStreamCount() {
2511        dmsg(2,("LSCPServer: GetTotalStreamCount()\n"));
2512        LSCPResultSet result;
2513        result.Add(pSampler->GetDiskStreamCount());
2514      return result.Produce();      return result.Produce();
2515  }  }
2516    
# Line 1928  String LSCPServer::GetTotalVoiceCountMax Line 2534  String LSCPServer::GetTotalVoiceCountMax
2534      return result.Produce();      return result.Produce();
2535  }  }
2536    
2537    String LSCPServer::GetGlobalVolume() {
2538        LSCPResultSet result;
2539        result.Add(ToString(GLOBAL_VOLUME)); // see common/global.cpp
2540        return result.Produce();
2541    }
2542    
2543    String LSCPServer::SetGlobalVolume(double dVolume) {
2544        LSCPResultSet result;
2545        try {
2546            if (dVolume < 0) throw Exception("Volume may not be negative");
2547            GLOBAL_VOLUME = dVolume; // see common/global_private.cpp
2548            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOLUME", GLOBAL_VOLUME));
2549        } catch (Exception e) {
2550            result.Error(e);
2551        }
2552        return result.Produce();
2553    }
2554    
2555    String LSCPServer::GetFileInstruments(String Filename) {
2556        dmsg(2,("LSCPServer: GetFileInstruments(String Filename=%s)\n",Filename.c_str()));
2557        LSCPResultSet result;
2558        try {
2559            VerifyFile(Filename);
2560        } catch (Exception e) {
2561            result.Error(e);
2562            return result.Produce();
2563        }
2564        // try to find a sampler engine that can handle the file
2565        bool bFound = false;
2566        std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
2567        for (int i = 0; !bFound && i < engineTypes.size(); i++) {
2568            Engine* pEngine = NULL;
2569            try {
2570                pEngine = EngineFactory::Create(engineTypes[i]);
2571                if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
2572                InstrumentManager* pManager = pEngine->GetInstrumentManager();
2573                if (pManager) {
2574                    std::vector<InstrumentManager::instrument_id_t> IDs =
2575                        pManager->GetInstrumentFileContent(Filename);
2576                    // return the amount of instruments in the file
2577                    result.Add(IDs.size());
2578                    // no more need to ask other engine types
2579                    bFound = true;
2580                } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
2581            } catch (Exception e) {
2582                // NOOP, as exception is thrown if engine doesn't support file
2583            }
2584            if (pEngine) EngineFactory::Destroy(pEngine);
2585        }
2586    
2587        if (!bFound) result.Error("Unknown file format");
2588        return result.Produce();
2589    }
2590    
2591    String LSCPServer::ListFileInstruments(String Filename) {
2592        dmsg(2,("LSCPServer: ListFileInstruments(String Filename=%s)\n",Filename.c_str()));
2593        LSCPResultSet result;
2594        try {
2595            VerifyFile(Filename);
2596        } catch (Exception e) {
2597            result.Error(e);
2598            return result.Produce();
2599        }
2600        // try to find a sampler engine that can handle the file
2601        bool bFound = false;
2602        std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
2603        for (int i = 0; !bFound && i < engineTypes.size(); i++) {
2604            Engine* pEngine = NULL;
2605            try {
2606                pEngine = EngineFactory::Create(engineTypes[i]);
2607                if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
2608                InstrumentManager* pManager = pEngine->GetInstrumentManager();
2609                if (pManager) {
2610                    std::vector<InstrumentManager::instrument_id_t> IDs =
2611                        pManager->GetInstrumentFileContent(Filename);
2612                    // return a list of IDs of the instruments in the file
2613                    String s;
2614                    for (int j = 0; j < IDs.size(); j++) {
2615                        if (s.size()) s += ",";
2616                        s += ToString(IDs[j].Index);
2617                    }
2618                    result.Add(s);
2619                    // no more need to ask other engine types
2620                    bFound = true;
2621                } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
2622            } catch (Exception e) {
2623                // NOOP, as exception is thrown if engine doesn't support file
2624            }
2625            if (pEngine) EngineFactory::Destroy(pEngine);
2626        }
2627    
2628        if (!bFound) result.Error("Unknown file format");
2629        return result.Produce();
2630    }
2631    
2632    String LSCPServer::GetFileInstrumentInfo(String Filename, uint InstrumentID) {
2633        dmsg(2,("LSCPServer: GetFileInstrumentInfo(String Filename=%s, InstrumentID=%d)\n",Filename.c_str(),InstrumentID));
2634        LSCPResultSet result;
2635        try {
2636            VerifyFile(Filename);
2637        } catch (Exception e) {
2638            result.Error(e);
2639            return result.Produce();
2640        }
2641        InstrumentManager::instrument_id_t id;
2642        id.FileName = Filename;
2643        id.Index    = InstrumentID;
2644        // try to find a sampler engine that can handle the file
2645        bool bFound = false;
2646        bool bFatalErr = false;
2647        std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
2648        for (int i = 0; !bFound && !bFatalErr && i < engineTypes.size(); i++) {
2649            Engine* pEngine = NULL;
2650            try {
2651                pEngine = EngineFactory::Create(engineTypes[i]);
2652                if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
2653                InstrumentManager* pManager = pEngine->GetInstrumentManager();
2654                if (pManager) {
2655                    // check if the instrument index is valid
2656                    // FIXME: this won't work if an engine only supports parts of the instrument file
2657                    std::vector<InstrumentManager::instrument_id_t> IDs =
2658                        pManager->GetInstrumentFileContent(Filename);
2659                    if (std::find(IDs.begin(), IDs.end(), id) == IDs.end()) {
2660                        std::stringstream ss;
2661                        ss << "Invalid instrument index " << InstrumentID << " for instrument file '" << Filename << "'";
2662                        bFatalErr = true;
2663                        throw Exception(ss.str());
2664                    }
2665                    // get the info of the requested instrument
2666                    InstrumentManager::instrument_info_t info =
2667                        pManager->GetInstrumentInfo(id);
2668                    // return detailed informations about the file
2669                    result.Add("NAME", info.InstrumentName);
2670                    result.Add("FORMAT_FAMILY", engineTypes[i]);
2671                    result.Add("FORMAT_VERSION", info.FormatVersion);
2672                    result.Add("PRODUCT", info.Product);
2673                    result.Add("ARTISTS", info.Artists);
2674                    // no more need to ask other engine types
2675                    bFound = true;
2676                } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
2677            } catch (Exception e) {
2678                // usually NOOP, as exception is thrown if engine doesn't support file
2679                if (bFatalErr) result.Error(e);
2680            }
2681            if (pEngine) EngineFactory::Destroy(pEngine);
2682        }
2683    
2684        if (!bFound && !bFatalErr) result.Error("Unknown file format");
2685        return result.Produce();
2686    }
2687    
2688    void LSCPServer::VerifyFile(String Filename) {
2689        #if WIN32
2690        WIN32_FIND_DATA win32FileAttributeData;
2691        BOOL res = GetFileAttributesEx( Filename.c_str(), GetFileExInfoStandard, &win32FileAttributeData );
2692        if (!res) {
2693            std::stringstream ss;
2694            ss << "File does not exist, GetFileAttributesEx failed `" << Filename << "`: Error " << GetLastError();
2695            throw Exception(ss.str());
2696        }
2697        if ( win32FileAttributeData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) {
2698            throw Exception("Directory is specified");
2699        }
2700        #else
2701        struct stat statBuf;
2702        int res = stat(Filename.c_str(), &statBuf);
2703        if (res) {
2704            std::stringstream ss;
2705            ss << "Fail to stat `" << Filename << "`: " << strerror(errno);
2706            throw Exception(ss.str());
2707        }
2708    
2709        if (S_ISDIR(statBuf.st_mode)) {
2710            throw Exception("Directory is specified");
2711        }
2712        #endif
2713    }
2714    
2715  /**  /**
2716   * 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
2717   * server for receiving event messages.   * server for receiving event messages.
# Line 1954  String LSCPServer::UnsubscribeNotificati Line 2738  String LSCPServer::UnsubscribeNotificati
2738      return result.Produce();      return result.Produce();
2739  }  }
2740    
2741  static int select_callback(void * lscpResultSet, int argc,  String LSCPServer::AddDbInstrumentDirectory(String Dir) {
2742                          char **argv, char **azColName)      dmsg(2,("LSCPServer: AddDbInstrumentDirectory(Dir=%s)\n", Dir.c_str()));
2743  {      LSCPResultSet result;
2744      LSCPResultSet* resultSet = (LSCPResultSet*) lscpResultSet;  #if HAVE_SQLITE3
2745      resultSet->Add(argc, argv);      try {
2746      return 0;          InstrumentsDb::GetInstrumentsDb()->AddDirectory(Dir);
2747        } catch (Exception e) {
2748             result.Error(e);
2749        }
2750    #else
2751        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2752    #endif
2753        return result.Produce();
2754    }
2755    
2756    String LSCPServer::RemoveDbInstrumentDirectory(String Dir, bool Force) {
2757        dmsg(2,("LSCPServer: RemoveDbInstrumentDirectory(Dir=%s,Force=%d)\n", Dir.c_str(), Force));
2758        LSCPResultSet result;
2759    #if HAVE_SQLITE3
2760        try {
2761            InstrumentsDb::GetInstrumentsDb()->RemoveDirectory(Dir, Force);
2762        } catch (Exception e) {
2763             result.Error(e);
2764        }
2765    #else
2766        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2767    #endif
2768        return result.Produce();
2769    }
2770    
2771    String LSCPServer::GetDbInstrumentDirectoryCount(String Dir, bool Recursive) {
2772        dmsg(2,("LSCPServer: GetDbInstrumentDirectoryCount(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
2773        LSCPResultSet result;
2774    #if HAVE_SQLITE3
2775        try {
2776            result.Add(InstrumentsDb::GetInstrumentsDb()->GetDirectoryCount(Dir, Recursive));
2777        } catch (Exception e) {
2778             result.Error(e);
2779        }
2780    #else
2781        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2782    #endif
2783        return result.Produce();
2784    }
2785    
2786    String LSCPServer::GetDbInstrumentDirectories(String Dir, bool Recursive) {
2787        dmsg(2,("LSCPServer: GetDbInstrumentDirectories(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
2788        LSCPResultSet result;
2789    #if HAVE_SQLITE3
2790        try {
2791            String list;
2792            StringListPtr dirs = InstrumentsDb::GetInstrumentsDb()->GetDirectories(Dir, Recursive);
2793    
2794            for (int i = 0; i < dirs->size(); i++) {
2795                if (list != "") list += ",";
2796                list += "'" + InstrumentsDb::toEscapedPath(dirs->at(i)) + "'";
2797            }
2798    
2799            result.Add(list);
2800        } catch (Exception e) {
2801             result.Error(e);
2802        }
2803    #else
2804        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2805    #endif
2806        return result.Produce();
2807    }
2808    
2809    String LSCPServer::GetDbInstrumentDirectoryInfo(String Dir) {
2810        dmsg(2,("LSCPServer: GetDbInstrumentDirectoryInfo(Dir=%s)\n", Dir.c_str()));
2811        LSCPResultSet result;
2812    #if HAVE_SQLITE3
2813        try {
2814            DbDirectory info = InstrumentsDb::GetInstrumentsDb()->GetDirectoryInfo(Dir);
2815    
2816            result.Add("DESCRIPTION", _escapeLscpResponse(info.Description));
2817            result.Add("CREATED", info.Created);
2818            result.Add("MODIFIED", info.Modified);
2819        } catch (Exception e) {
2820             result.Error(e);
2821        }
2822    #else
2823        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2824    #endif
2825        return result.Produce();
2826    }
2827    
2828    String LSCPServer::SetDbInstrumentDirectoryName(String Dir, String Name) {
2829        dmsg(2,("LSCPServer: SetDbInstrumentDirectoryName(Dir=%s,Name=%s)\n", Dir.c_str(), Name.c_str()));
2830        LSCPResultSet result;
2831    #if HAVE_SQLITE3
2832        try {
2833            InstrumentsDb::GetInstrumentsDb()->RenameDirectory(Dir, Name);
2834        } catch (Exception e) {
2835             result.Error(e);
2836        }
2837    #else
2838        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2839    #endif
2840        return result.Produce();
2841    }
2842    
2843    String LSCPServer::MoveDbInstrumentDirectory(String Dir, String Dst) {
2844        dmsg(2,("LSCPServer: MoveDbInstrumentDirectory(Dir=%s,Dst=%s)\n", Dir.c_str(), Dst.c_str()));
2845        LSCPResultSet result;
2846    #if HAVE_SQLITE3
2847        try {
2848            InstrumentsDb::GetInstrumentsDb()->MoveDirectory(Dir, Dst);
2849        } catch (Exception e) {
2850             result.Error(e);
2851        }
2852    #else
2853        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2854    #endif
2855        return result.Produce();
2856    }
2857    
2858    String LSCPServer::CopyDbInstrumentDirectory(String Dir, String Dst) {
2859        dmsg(2,("LSCPServer: CopyDbInstrumentDirectory(Dir=%s,Dst=%s)\n", Dir.c_str(), Dst.c_str()));
2860        LSCPResultSet result;
2861    #if HAVE_SQLITE3
2862        try {
2863            InstrumentsDb::GetInstrumentsDb()->CopyDirectory(Dir, Dst);
2864        } catch (Exception e) {
2865             result.Error(e);
2866        }
2867    #else
2868        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2869    #endif
2870        return result.Produce();
2871    }
2872    
2873    String LSCPServer::SetDbInstrumentDirectoryDescription(String Dir, String Desc) {
2874        dmsg(2,("LSCPServer: SetDbInstrumentDirectoryDescription(Dir=%s,Desc=%s)\n", Dir.c_str(), Desc.c_str()));
2875        LSCPResultSet result;
2876    #if HAVE_SQLITE3
2877        try {
2878            InstrumentsDb::GetInstrumentsDb()->SetDirectoryDescription(Dir, Desc);
2879        } catch (Exception e) {
2880             result.Error(e);
2881        }
2882    #else
2883        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2884    #endif
2885        return result.Produce();
2886    }
2887    
2888    String LSCPServer::AddDbInstruments(String DbDir, String FilePath, int Index, bool bBackground) {
2889        dmsg(2,("LSCPServer: AddDbInstruments(DbDir=%s,FilePath=%s,Index=%d,bBackground=%d)\n", DbDir.c_str(), FilePath.c_str(), Index, bBackground));
2890        LSCPResultSet result;
2891    #if HAVE_SQLITE3
2892        try {
2893            int id;
2894            InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();
2895            id = db->AddInstruments(DbDir, FilePath, Index, bBackground);
2896            if (bBackground) result = id;
2897        } catch (Exception e) {
2898             result.Error(e);
2899        }
2900    #else
2901        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2902    #endif
2903        return result.Produce();
2904    }
2905    
2906    String LSCPServer::AddDbInstruments(String ScanMode, String DbDir, String FsDir, bool bBackground) {
2907        dmsg(2,("LSCPServer: AddDbInstruments(ScanMode=%s,DbDir=%s,FsDir=%s,bBackground=%d)\n", ScanMode.c_str(), DbDir.c_str(), FsDir.c_str(), bBackground));
2908        LSCPResultSet result;
2909    #if HAVE_SQLITE3
2910        try {
2911            int id;
2912            InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();
2913            if (ScanMode.compare("RECURSIVE") == 0) {
2914               id = db->AddInstruments(RECURSIVE, DbDir, FsDir, bBackground);
2915            } else if (ScanMode.compare("NON_RECURSIVE") == 0) {
2916               id = db->AddInstruments(NON_RECURSIVE, DbDir, FsDir, bBackground);
2917            } else if (ScanMode.compare("FLAT") == 0) {
2918               id = db->AddInstruments(FLAT, DbDir, FsDir, bBackground);
2919            } else {
2920                throw Exception("Unknown scan mode: " + ScanMode);
2921            }
2922    
2923            if (bBackground) result = id;
2924        } catch (Exception e) {
2925             result.Error(e);
2926        }
2927    #else
2928        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2929    #endif
2930        return result.Produce();
2931    }
2932    
2933    String LSCPServer::RemoveDbInstrument(String Instr) {
2934        dmsg(2,("LSCPServer: RemoveDbInstrument(Instr=%s)\n", Instr.c_str()));
2935        LSCPResultSet result;
2936    #if HAVE_SQLITE3
2937        try {
2938            InstrumentsDb::GetInstrumentsDb()->RemoveInstrument(Instr);
2939        } catch (Exception e) {
2940             result.Error(e);
2941        }
2942    #else
2943        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2944    #endif
2945        return result.Produce();
2946    }
2947    
2948    String LSCPServer::GetDbInstrumentCount(String Dir, bool Recursive) {
2949        dmsg(2,("LSCPServer: GetDbInstrumentCount(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
2950        LSCPResultSet result;
2951    #if HAVE_SQLITE3
2952        try {
2953            result.Add(InstrumentsDb::GetInstrumentsDb()->GetInstrumentCount(Dir, Recursive));
2954        } catch (Exception e) {
2955             result.Error(e);
2956        }
2957    #else
2958        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2959    #endif
2960        return result.Produce();
2961    }
2962    
2963    String LSCPServer::GetDbInstruments(String Dir, bool Recursive) {
2964        dmsg(2,("LSCPServer: GetDbInstruments(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
2965        LSCPResultSet result;
2966    #if HAVE_SQLITE3
2967        try {
2968            String list;
2969            StringListPtr instrs = InstrumentsDb::GetInstrumentsDb()->GetInstruments(Dir, Recursive);
2970    
2971            for (int i = 0; i < instrs->size(); i++) {
2972                if (list != "") list += ",";
2973                list += "'" + InstrumentsDb::toEscapedPath(instrs->at(i)) + "'";
2974            }
2975    
2976            result.Add(list);
2977        } catch (Exception e) {
2978             result.Error(e);
2979        }
2980    #else
2981        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
2982    #endif
2983        return result.Produce();
2984    }
2985    
2986    String LSCPServer::GetDbInstrumentInfo(String Instr) {
2987        dmsg(2,("LSCPServer: GetDbInstrumentInfo(Instr=%s)\n", Instr.c_str()));
2988        LSCPResultSet result;
2989    #if HAVE_SQLITE3
2990        try {
2991            DbInstrument info = InstrumentsDb::GetInstrumentsDb()->GetInstrumentInfo(Instr);
2992    
2993            result.Add("INSTRUMENT_FILE", info.InstrFile);
2994            result.Add("INSTRUMENT_NR", info.InstrNr);
2995            result.Add("FORMAT_FAMILY", info.FormatFamily);
2996            result.Add("FORMAT_VERSION", info.FormatVersion);
2997            result.Add("SIZE", (int)info.Size);
2998            result.Add("CREATED", info.Created);
2999            result.Add("MODIFIED", info.Modified);
3000            result.Add("DESCRIPTION", _escapeLscpResponse(info.Description));
3001            result.Add("IS_DRUM", info.IsDrum);
3002            result.Add("PRODUCT", _escapeLscpResponse(info.Product));
3003            result.Add("ARTISTS", _escapeLscpResponse(info.Artists));
3004            result.Add("KEYWORDS", _escapeLscpResponse(info.Keywords));
3005        } catch (Exception e) {
3006             result.Error(e);
3007        }
3008    #else
3009        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3010    #endif
3011        return result.Produce();
3012    }
3013    
3014    String LSCPServer::GetDbInstrumentsJobInfo(int JobId) {
3015        dmsg(2,("LSCPServer: GetDbInstrumentsJobInfo(JobId=%d)\n", JobId));
3016        LSCPResultSet result;
3017    #if HAVE_SQLITE3
3018        try {
3019            ScanJob job = InstrumentsDb::GetInstrumentsDb()->Jobs.GetJobById(JobId);
3020    
3021            result.Add("FILES_TOTAL", job.FilesTotal);
3022            result.Add("FILES_SCANNED", job.FilesScanned);
3023            result.Add("SCANNING", job.Scanning);
3024            result.Add("STATUS", job.Status);
3025        } catch (Exception e) {
3026             result.Error(e);
3027        }
3028    #else
3029        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3030    #endif
3031        return result.Produce();
3032    }
3033    
3034    String LSCPServer::SetDbInstrumentName(String Instr, String Name) {
3035        dmsg(2,("LSCPServer: SetDbInstrumentName(Instr=%s,Name=%s)\n", Instr.c_str(), Name.c_str()));
3036        LSCPResultSet result;
3037    #if HAVE_SQLITE3
3038        try {
3039            InstrumentsDb::GetInstrumentsDb()->RenameInstrument(Instr, Name);
3040        } catch (Exception e) {
3041             result.Error(e);
3042        }
3043    #else
3044        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3045    #endif
3046        return result.Produce();
3047    }
3048    
3049    String LSCPServer::MoveDbInstrument(String Instr, String Dst) {
3050        dmsg(2,("LSCPServer: MoveDbInstrument(Instr=%s,Dst=%s)\n", Instr.c_str(), Dst.c_str()));
3051        LSCPResultSet result;
3052    #if HAVE_SQLITE3
3053        try {
3054            InstrumentsDb::GetInstrumentsDb()->MoveInstrument(Instr, Dst);
3055        } catch (Exception e) {
3056             result.Error(e);
3057        }
3058    #else
3059        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3060    #endif
3061        return result.Produce();
3062    }
3063    
3064    String LSCPServer::CopyDbInstrument(String Instr, String Dst) {
3065        dmsg(2,("LSCPServer: CopyDbInstrument(Instr=%s,Dst=%s)\n", Instr.c_str(), Dst.c_str()));
3066        LSCPResultSet result;
3067    #if HAVE_SQLITE3
3068        try {
3069            InstrumentsDb::GetInstrumentsDb()->CopyInstrument(Instr, Dst);
3070        } catch (Exception e) {
3071             result.Error(e);
3072        }
3073    #else
3074        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3075    #endif
3076        return result.Produce();
3077  }  }
3078    
3079  String LSCPServer::QueryDatabase(String query) {  String LSCPServer::SetDbInstrumentDescription(String Instr, String Desc) {
3080        dmsg(2,("LSCPServer: SetDbInstrumentDescription(Instr=%s,Desc=%s)\n", Instr.c_str(), Desc.c_str()));
3081      LSCPResultSet result;      LSCPResultSet result;
3082  #if HAVE_SQLITE3  #if HAVE_SQLITE3
3083      char* zErrMsg = NULL;      try {
3084      sqlite3 *db;          InstrumentsDb::GetInstrumentsDb()->SetInstrumentDescription(Instr, Desc);
3085      String selectStr = "SELECT " + query;      } catch (Exception e) {
3086             result.Error(e);
3087        }
3088    #else
3089        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3090    #endif
3091        return result.Produce();
3092    }
3093    
3094      int rc = sqlite3_open("linuxsampler.db", &db);  String LSCPServer::SetDbInstrumentFilePath(String OldPath, String NewPath) {
3095      if (rc == SQLITE_OK)      dmsg(2,("LSCPServer: SetDbInstrumentFilePath(OldPath=%s,NewPath=%s)\n", OldPath.c_str(), NewPath.c_str()));
3096      {      LSCPResultSet result;
3097              rc = sqlite3_exec(db, selectStr.c_str(), select_callback, &result, &zErrMsg);  #if HAVE_SQLITE3
3098        try {
3099            InstrumentsDb::GetInstrumentsDb()->SetInstrumentFilePath(OldPath, NewPath);
3100        } catch (Exception e) {
3101             result.Error(e);
3102      }      }
3103      if ( rc != SQLITE_OK )  #else
3104      {      result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3105              result.Error(String(zErrMsg), rc);  #endif
3106        return result.Produce();
3107    }
3108    
3109    String LSCPServer::FindLostDbInstrumentFiles() {
3110        dmsg(2,("LSCPServer: FindLostDbInstrumentFiles()\n"));
3111        LSCPResultSet result;
3112    #if HAVE_SQLITE3
3113        try {
3114            String list;
3115            StringListPtr pLostFiles = InstrumentsDb::GetInstrumentsDb()->FindLostInstrumentFiles();
3116    
3117            for (int i = 0; i < pLostFiles->size(); i++) {
3118                if (list != "") list += ",";
3119                list += "'" + pLostFiles->at(i) + "'";
3120            }
3121    
3122            result.Add(list);
3123        } catch (Exception e) {
3124             result.Error(e);
3125      }      }
     sqlite3_close(db);  
3126  #else  #else
3127      result.Error(String("SQLITE3 was not installed when linuxsampler was built. SELECT statement is not available."), 0);      result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3128  #endif  #endif
3129      return result.Produce();      return result.Produce();
3130  }  }
3131    
3132    String LSCPServer::FindDbInstrumentDirectories(String Dir, std::map<String,String> Parameters, bool Recursive) {
3133        dmsg(2,("LSCPServer: FindDbInstrumentDirectories(Dir=%s)\n", Dir.c_str()));
3134        LSCPResultSet result;
3135    #if HAVE_SQLITE3
3136        try {
3137            SearchQuery Query;
3138            std::map<String,String>::iterator iter;
3139            for (iter = Parameters.begin(); iter != Parameters.end(); iter++) {
3140                if (iter->first.compare("NAME") == 0) {
3141                    Query.Name = iter->second;
3142                } else if (iter->first.compare("CREATED") == 0) {
3143                    Query.SetCreated(iter->second);
3144                } else if (iter->first.compare("MODIFIED") == 0) {
3145                    Query.SetModified(iter->second);
3146                } else if (iter->first.compare("DESCRIPTION") == 0) {
3147                    Query.Description = iter->second;
3148                } else {
3149                    throw Exception("Unknown search criteria: " + iter->first);
3150                }
3151            }
3152    
3153            String list;
3154            StringListPtr pDirectories =
3155                InstrumentsDb::GetInstrumentsDb()->FindDirectories(Dir, &Query, Recursive);
3156    
3157            for (int i = 0; i < pDirectories->size(); i++) {
3158                if (list != "") list += ",";
3159                list += "'" + InstrumentsDb::toEscapedPath(pDirectories->at(i)) + "'";
3160            }
3161    
3162            result.Add(list);
3163        } catch (Exception e) {
3164             result.Error(e);
3165        }
3166    #else
3167        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3168    #endif
3169        return result.Produce();
3170    }
3171    
3172    String LSCPServer::FindDbInstruments(String Dir, std::map<String,String> Parameters, bool Recursive) {
3173        dmsg(2,("LSCPServer: FindDbInstruments(Dir=%s)\n", Dir.c_str()));
3174        LSCPResultSet result;
3175    #if HAVE_SQLITE3
3176        try {
3177            SearchQuery Query;
3178            std::map<String,String>::iterator iter;
3179            for (iter = Parameters.begin(); iter != Parameters.end(); iter++) {
3180                if (iter->first.compare("NAME") == 0) {
3181                    Query.Name = iter->second;
3182                } else if (iter->first.compare("FORMAT_FAMILIES") == 0) {
3183                    Query.SetFormatFamilies(iter->second);
3184                } else if (iter->first.compare("SIZE") == 0) {
3185                    Query.SetSize(iter->second);
3186                } else if (iter->first.compare("CREATED") == 0) {
3187                    Query.SetCreated(iter->second);
3188                } else if (iter->first.compare("MODIFIED") == 0) {
3189                    Query.SetModified(iter->second);
3190                } else if (iter->first.compare("DESCRIPTION") == 0) {
3191                    Query.Description = iter->second;
3192                } else if (iter->first.compare("IS_DRUM") == 0) {
3193                    if (!strcasecmp(iter->second.c_str(), "true")) {
3194                        Query.InstrType = SearchQuery::DRUM;
3195                    } else {
3196                        Query.InstrType = SearchQuery::CHROMATIC;
3197                    }
3198                } else if (iter->first.compare("PRODUCT") == 0) {
3199                     Query.Product = iter->second;
3200                } else if (iter->first.compare("ARTISTS") == 0) {
3201                     Query.Artists = iter->second;
3202                } else if (iter->first.compare("KEYWORDS") == 0) {
3203                     Query.Keywords = iter->second;
3204                } else {
3205                    throw Exception("Unknown search criteria: " + iter->first);
3206                }
3207            }
3208    
3209            String list;
3210            StringListPtr pInstruments =
3211                InstrumentsDb::GetInstrumentsDb()->FindInstruments(Dir, &Query, Recursive);
3212    
3213            for (int i = 0; i < pInstruments->size(); i++) {
3214                if (list != "") list += ",";
3215                list += "'" + InstrumentsDb::toEscapedPath(pInstruments->at(i)) + "'";
3216            }
3217    
3218            result.Add(list);
3219        } catch (Exception e) {
3220             result.Error(e);
3221        }
3222    #else
3223        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3224    #endif
3225        return result.Produce();
3226    }
3227    
3228    String LSCPServer::FormatInstrumentsDb() {
3229        dmsg(2,("LSCPServer: FormatInstrumentsDb()\n"));
3230        LSCPResultSet result;
3231    #if HAVE_SQLITE3
3232        try {
3233            InstrumentsDb::GetInstrumentsDb()->Format();
3234        } catch (Exception e) {
3235             result.Error(e);
3236        }
3237    #else
3238        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3239    #endif
3240        return result.Produce();
3241    }
3242    
3243    
3244  /**  /**
3245   * Will be called by the parser to enable or disable echo mode; if echo   * Will be called by the parser to enable or disable echo mode; if echo
3246   * mode is enabled, all commands from the client will (immediately) be   * mode is enabled, all commands from the client will (immediately) be

Legend:
Removed from v.981  
changed lines
  Added in v.1763

  ViewVC Help
Powered by ViewVC