--- linuxsampler/trunk/src/network/lscpserver.cpp 2004/06/06 20:59:49 113 +++ linuxsampler/trunk/src/network/lscpserver.cpp 2004/07/25 23:27:41 211 @@ -22,15 +22,61 @@ #include "lscpserver.h" #include "lscpresultset.h" +#include "lscpevent.h" #include "../engines/gig/Engine.h" +#include "../drivers/audio/AudioOutputDeviceFactory.h" +#include "../drivers/midi/MidiInputDeviceFactory.h" + +/** + * Below are a few static members of the LSCPServer class. + * The big assumption here is that LSCPServer is going to remain a singleton. + * These members are used to support client connections. + * Class handles multiple connections at the same time using select() and non-blocking recv() + * Commands are processed by a single LSCPServer thread. + * Notifications are delivered either by the thread that originated them + * or (if the resultset is currently in progress) by the LSCPServer thread + * after the resultset was sent out. + * This makes sure that resultsets can not be interrupted by notifications. + * This also makes sure that the thread sending notification is not blocked + * by the LSCPServer thread. + */ +fd_set LSCPServer::fdSet; +int LSCPServer::currentSocket = -1; +std::vector LSCPServer::Sessions = std::vector(); +std::map LSCPServer::bufferedNotifies = std::map(); +std::map LSCPServer::bufferedCommands = std::map(); +std::map< LSCPEvent::event_t, std::list > LSCPServer::eventSubscriptions = std::map< LSCPEvent::event_t, std::list >(); +Mutex LSCPServer::NotifyMutex = Mutex(); +Mutex LSCPServer::NotifyBufferMutex = Mutex(); +Mutex LSCPServer::SubscriptionMutex = Mutex(); LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) { this->pSampler = pSampler; + LSCPEvent::RegisterEvent(LSCPEvent::event_channels, "CHANNELS"); + LSCPEvent::RegisterEvent(LSCPEvent::event_voice_count, "VOICE_COUNT"); + LSCPEvent::RegisterEvent(LSCPEvent::event_stream_count, "STREAM_COUNT"); + LSCPEvent::RegisterEvent(LSCPEvent::event_buffer_fill, "BUFFER_FILL"); + LSCPEvent::RegisterEvent(LSCPEvent::event_info, "INFO"); + LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS"); +} + +/** + * Blocks the calling thread until the LSCP Server is initialized and + * accepting socket connections, if the server is already initialized then + * this method will return immediately. + * @param TimeoutSeconds - optional: max. wait time in seconds + * (default: 0s) + * @param TimeoutNanoSeconds - optional: max wait time in nano seconds + * (default: 0ns) + * @returns 0 on success, a value less than 0 if timeout exceeded + */ +int LSCPServer::WaitUntilInitialized(long TimeoutSeconds, long TimeoutNanoSeconds) { + return Initialized.WaitAndUnlockIf(false, TimeoutSeconds, TimeoutNanoSeconds); } int LSCPServer::Main() { - hSocket = socket(AF_INET, SOCK_STREAM, 0); + int hSocket = socket(AF_INET, SOCK_STREAM, 0); if (hSocket < 0) { std::cerr << "LSCPServer: Could not create server socket." << std::endl; //return -1; @@ -49,33 +95,217 @@ } listen(hSocket, 1); - dmsg(1,("LSCPServer: Server running.\n")); // server running + Initialized.Set(true); // now wait for client connections and handle their requests sockaddr_in client; int length = sizeof(client); + FD_ZERO(&fdSet); + FD_SET(hSocket, &fdSet); + int maxSessions = hSocket; + while (true) { - hSession = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length); - if (hSession < 0) { - std::cerr << "LSCPServer: Client connection failed." << std::endl; - close(hSocket); - //return -1; - exit(EXIT_FAILURE); - } - - dmsg(1,("LSCPServer: Client connection established.\n")); - //send(hSession, "Welcome!\r\n", 10, 0); - - // Parser invocation - yyparse_param_t yyparse_param; - yyparse_param.pServer = this; - yylex_init(&yyparse_param.pScanner); - while (yyparse(&yyparse_param) == LSCP_SYNTAX_ERROR); // recall parser in case of syntax error - yylex_destroy(yyparse_param.pScanner); + fd_set selectSet = fdSet; + int retval = select(maxSessions+1, &selectSet, NULL, NULL, NULL); + if (retval == 0) + continue; //Nothing try again + if (retval == -1) { + std::cerr << "LSCPServer: Socket select error." << std::endl; + close(hSocket); + exit(EXIT_FAILURE); + } - close(hSession); - dmsg(1,("LSCPServer: Client connection terminated.\n")); + //Accept new connections now (if any) + if (FD_ISSET(hSocket, &selectSet)) { + int socket = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length); + if (socket < 0) { + std::cerr << "LSCPServer: Client connection failed." << std::endl; + exit(EXIT_FAILURE); + } + + if (fcntl(socket, F_SETFL, O_NONBLOCK)) { + std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl; + exit(EXIT_FAILURE); + } + + // Parser initialization + yyparse_param_t yyparse_param; + yyparse_param.pServer = this; + yyparse_param.hSession = socket; + + Sessions.push_back(yyparse_param); + FD_SET(socket, &fdSet); + if (socket > maxSessions) + maxSessions = socket; + dmsg(1,("LSCPServer: Client connection established on socket:%d.\n", socket)); + LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection established on socket", socket)); + continue; //Maybe this was the only selected socket, better select again + } + + //Something was selected and it was not the hSocket, so it must be some command(s) coming. + for (std::vector::iterator iter = Sessions.begin(); iter != Sessions.end(); iter++) { + if (FD_ISSET((*iter).hSession, &selectSet)) { //Was it this socket? + if (GetLSCPCommand(iter)) { //Have we read the entire command? + dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket)); + yylex_init(&((*iter).pScanner)); //FIXME: should me moved out of this loop and initialized only when a new session is created + currentSocket = (*iter).hSession; //a hack + if ((*iter).bVerbose) { // if echo mode enabled + AnswerClient(bufferedCommands[currentSocket]); + } + int result = yyparse(&(*iter)); + currentSocket = -1; //continuation of a hack + dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket)); + if (result == LSCP_QUIT) { //Was it a quit command by any chance? + CloseConnection(iter); + } + } + //socket may have been closed, iter may be invalid, get out of the loop for now. + //we'll be back if there is data. + break; + } + } + + //Now let's deliver late notifies (if any) + NotifyBufferMutex.Lock(); + for (std::map::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) { + send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0); + bufferedNotifies.erase(iterNotify); + } + NotifyBufferMutex.Unlock(); } + //It will never get here anyway + //yylex_destroy(yyparse_param.pScanner); +} + +void LSCPServer::CloseConnection( std::vector::iterator iter ) { + int socket = (*iter).hSession; + dmsg(1,("LSCPServer: Client connection terminated on socket:%d.\n",socket)); + LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket)); + Sessions.erase(iter); + FD_CLR(socket, &fdSet); + SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any) + for (std::map< LSCPEvent::event_t, std::list >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) { + iter->second.remove(socket); + } + SubscriptionMutex.Unlock(); + NotifyMutex.Lock(); + bufferedCommands.erase(socket); + bufferedNotifies.erase(socket); + close(socket); + NotifyMutex.Unlock(); + //yylex_destroy((*iter).pScanner); +} + +void LSCPServer::SendLSCPNotify( LSCPEvent event ) { + SubscriptionMutex.Lock(); + if (eventSubscriptions.count(event.GetType()) == 0) { + SubscriptionMutex.Unlock(); //Nobody is subscribed to this event + return; + } + std::list::iterator iter = eventSubscriptions[event.GetType()].begin(); + std::list::iterator end = eventSubscriptions[event.GetType()].end(); + String notify = event.Produce(); + + while (true) { + if (NotifyMutex.Trylock()) { + for(;iter != end; iter++) + send(*iter, notify.c_str(), notify.size(), 0); + NotifyMutex.Unlock(); + break; + } else { + if (NotifyBufferMutex.Trylock()) { + for(;iter != end; iter++) + bufferedNotifies[*iter] += notify; + NotifyBufferMutex.Unlock(); + break; + } + } + } + SubscriptionMutex.Unlock(); +} + +extern int GetLSCPCommand( void *buf, int max_size ) { + String command = LSCPServer::bufferedCommands[LSCPServer::currentSocket]; + if (command.size() == 0) { //Parser wants input but we have nothing. + strcpy((char*) buf, "\n"); //So give it an empty command + return 1; //to keep it happy. + } + + if (max_size < command.size()) { + std::cerr << "getLSCPCommand: Flex buffer too small, ignoring the command." << std::endl; + return 0; //This will never happen + } + + strcpy((char*) buf, command.c_str()); + LSCPServer::bufferedCommands.erase(LSCPServer::currentSocket); + return command.size(); +} + +/** + * Will be called to try to read the command from the socket + * If command is read, it will return true. Otherwise false is returned. + * In any case the received portion (complete or incomplete) is saved into bufferedCommand map. + */ +bool LSCPServer::GetLSCPCommand( std::vector::iterator iter ) { + int socket = (*iter).hSession; + char c; + int i = 0; + while (true) { + int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now + if (result == 0) { //socket was selected, so 0 here means client has closed the connection + CloseConnection(iter); + break; + } + if (result == 1) { + if (c == '\r') + continue; //Ignore CR + if (c == '\n') { + LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket)); + bufferedCommands[socket] += "\n"; + return true; //Complete command was read + } + bufferedCommands[socket] += c; + } + if (result == -1) { + if (errno == EAGAIN) //Would block, try again later. + return false; + switch(errno) { + case EBADF: + dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n")); + break; + case ECONNREFUSED: + dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n")); + break; + case ENOTCONN: + dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n")); + break; + case ENOTSOCK: + dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n")); + break; + case EAGAIN: + dmsg(2,("LSCPScanner: The socket is marked non-blocking and the receive operation would block, or a receive timeout had been set and the timeout expired before data was received.\n")); + break; + case EINTR: + dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n")); + break; + case EFAULT: + dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n")); + break; + case EINVAL: + dmsg(2,("LSCPScanner: Invalid argument passed.\n")); + break; + case ENOMEM: + dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n")); + break; + default: + dmsg(2,("LSCPScanner: Unknown recv() error.\n")); + break; + } + CloseConnection(iter); + break; + } + } + return false; } /** @@ -86,30 +316,130 @@ */ void LSCPServer::AnswerClient(String ReturnMessage) { dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str())); - send(hSession, ReturnMessage.c_str(), ReturnMessage.size(), 0); + if (currentSocket != -1) { + NotifyMutex.Lock(); + send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0); + NotifyMutex.Unlock(); + } +} + +/** + * Find a created audio output device index. + */ +int LSCPServer::GetAudioOutputDeviceIndex ( AudioOutputDevice *pDevice ) +{ + // Search for the created device to get its index + std::map devices = pSampler->GetAudioOutputDevices(); + std::map::iterator iter = devices.begin(); + for (; iter != devices.end(); iter++) { + if (iter->second == pDevice) + return iter->first; + } + // Not found. + return -1; +} + +/** + * Find a created midi input device index. + */ +int LSCPServer::GetMidiInputDeviceIndex ( MidiInputDevice *pDevice ) +{ + // Search for the created device to get its index + std::map devices = pSampler->GetMidiInputDevices(); + std::map::iterator iter = devices.begin(); + for (; iter != devices.end(); iter++) { + if (iter->second == pDevice) + return iter->first; + } + // Not found. + return -1; +} + +String LSCPServer::CreateAudioOutputDevice(String Driver, std::map Parameters) { + dmsg(2,("LSCPServer: CreateAudioOutputDevice(Driver=%s)\n", Driver.c_str())); + LSCPResultSet result; + try { + AudioOutputDevice* pDevice = pSampler->CreateAudioOutputDevice(Driver, Parameters); + // search for the created device to get its index + int index = GetAudioOutputDeviceIndex(pDevice); + if (index == -1) throw LinuxSamplerException("Internal error: could not find created audio output device."); + result = index; // success + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::CreateMidiInputDevice(String Driver, std::map Parameters) { + dmsg(2,("LSCPServer: CreateMidiInputDevice(Driver=%s)\n", Driver.c_str())); + LSCPResultSet result; + try { + MidiInputDevice* pDevice = pSampler->CreateMidiInputDevice(Driver, Parameters); + // search for the created device to get its index + int index = GetMidiInputDeviceIndex(pDevice); + if (index == -1) throw LinuxSamplerException("Internal error: could not find created midi input device."); + result = index; // success + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::DestroyAudioOutputDevice(uint DeviceIndex) { + dmsg(2,("LSCPServer: DestroyAudioOutputDevice(DeviceIndex=%d)\n", DeviceIndex)); + LSCPResultSet result; + try { + std::map devices = pSampler->GetAudioOutputDevices(); + if (!devices[DeviceIndex]) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + "."); + AudioOutputDevice* pDevice = devices[DeviceIndex]; + pSampler->DestroyAudioOutputDevice(pDevice); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::DestroyMidiInputDevice(uint DeviceIndex) { + dmsg(2,("LSCPServer: DestroyMidiInputDevice(DeviceIndex=%d)\n", DeviceIndex)); + LSCPResultSet result; + try { + std::map devices = pSampler->GetMidiInputDevices(); + MidiInputDevice* pDevice = devices[DeviceIndex]; + if (!pDevice) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + "."); + pSampler->DestroyMidiInputDevice(pDevice); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); } /** * Will be called by the parser to load an instrument. */ -String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel) { +String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel, bool bBackground) { dmsg(2,("LSCPServer: LoadInstrument(Filename=%s,Instrument=%d,SamplerChannel=%d)\n", Filename.c_str(), uiInstrument, uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); if (!pEngine) throw LinuxSamplerException("No engine loaded on channel"); - pEngine->LoadInstrument(Filename.c_str(), uiInstrument); - result.type = result_type_success; + if (pSamplerChannel->GetAudioOutputDevice() == NULL) + throw LinuxSamplerException("No audio output device on channel"); + if (bBackground) { + LSCPLoadInstrument *pLoadInstrument = new LSCPLoadInstrument(pEngine, Filename.c_str(), uiInstrument); + pLoadInstrument->StartThread(); + } + else pEngine->LoadInstrument(Filename.c_str(), uiInstrument); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -117,23 +447,19 @@ */ String LSCPServer::LoadEngine(String EngineName, uint uiSamplerChannel) { dmsg(2,("LSCPServer: LoadEngine(EngineName=%s,SamplerChannel=%d)\n", EngineName.c_str(), uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { Engine::type_t type; - if (EngineName == "gig") type = Engine::type_gig; + if ((EngineName == "GigEngine") || (EngineName == "gig")) type = Engine::type_gig; else throw LinuxSamplerException("Unknown engine type"); SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); pSamplerChannel->LoadEngine(type); - result.type = result_type_success; } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -141,7 +467,26 @@ */ String LSCPServer::GetChannels() { dmsg(2,("LSCPServer: GetChannels()\n")); - return ToString(pSampler->SamplerChannels()) + "\r\n"; + LSCPResultSet result; + result.Add(pSampler->SamplerChannels()); + return result.Produce(); +} + +/** + * Will be called by the parser to get the list of sampler channels. + */ +String LSCPServer::ListChannels() { + dmsg(2,("LSCPServer: ListChannels()\n")); + String list; + std::map channels = pSampler->GetSamplerChannels(); + std::map::iterator iter = channels.begin(); + for (; iter != channels.end(); iter++) { + if (list != "") list += ","; + list += ToString(iter->first); + } + LSCPResultSet result; + result.Add(list); + return result.Produce(); } /** @@ -150,7 +495,8 @@ String LSCPServer::AddChannel() { dmsg(2,("LSCPServer: AddChannel()\n")); SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel(); - return "OK[" + ToString(pSamplerChannel->Index()) + "]\r\n"; + LSCPResultSet result(pSamplerChannel->Index()); + return result.Produce(); } /** @@ -158,8 +504,9 @@ */ String LSCPServer::RemoveChannel(uint uiSamplerChannel) { dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel)); + LSCPResultSet result; pSampler->RemoveSamplerChannel(uiSamplerChannel); - return "OK\r\n"; + return result.Produce(); } /** @@ -167,7 +514,8 @@ */ String LSCPServer::GetAvailableEngines() { dmsg(2,("LSCPServer: GetAvailableEngines()\n")); - return "gig\r\n"; + LSCPResultSet result("GigEngine"); + return result.Produce(); } /** @@ -175,23 +523,20 @@ */ String LSCPServer::GetEngineInfo(String EngineName) { dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str())); - result_t result; + LSCPResultSet result; try { - if (EngineName == "gig") { + if ((EngineName == "GigEngine") || (EngineName == "gig")) { Engine* pEngine = new LinuxSampler::gig::Engine; - String info = pEngine->Description() + "\r\n"; + result.Add(pEngine->Description()); + result.Add(pEngine->Version()); delete pEngine; - return info; // success } else throw LinuxSamplerException("Unknown engine type"); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -200,42 +545,48 @@ */ String LSCPServer::GetChannelInfo(uint uiSamplerChannel) { dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel)); + LSCPResultSet result; try { - LSCPResultSet result; SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); + + //Defaults values + String EngineName = "NONE"; + float Volume = 0; + String InstrumentFileName = "NONE"; + int InstrumentIndex = -1; + int InstrumentStatus = -1; + if (pEngine) { - result.Add("ENGINE_NAME", pEngine->EngineName()); - result.Add("VOLUME", pEngine->Volume()); + EngineName = pEngine->EngineName(); + Volume = pEngine->Volume(); + InstrumentStatus = pEngine->InstrumentStatus(); + InstrumentIndex = pEngine->InstrumentIndex(); + if (InstrumentIndex != -1) + InstrumentFileName = pEngine->InstrumentFileName(); } - //Some hardcoded stuff for now to make GUI look good - result.Add("AUDIO_OUTPUT_DEVICE", "0"); + + result.Add("ENGINE_NAME", EngineName); + result.Add("VOLUME", Volume); + + //Some not-so-hardcoded stuff to make GUI look good + result.Add("AUDIO_OUTPUT_DEVICE", GetAudioOutputDeviceIndex(pSamplerChannel->GetAudioOutputDevice())); result.Add("AUDIO_OUTPUT_CHANNELS", "2"); result.Add("AUDIO_OUTPUT_ROUTING", "0,1"); - if (pEngine) { - int iIdx = pEngine->InstrumentIndex(); - if (iIdx != -1) { - result.Add("INSTRUMENT_FILE", pEngine->InstrumentFileName()); - result.Add("INSTRUMENT_NR", iIdx); - } - } - //Some hardcoded stuff for now to make GUI look good - result.Add("MIDI_INPUT_DEVICE", "0"); - result.Add("MIDI_INPUT_PORT", "0"); - result.Add("MIDI_INPUT_CHANNEL", "1"); - - return result.Produce(); + result.Add("MIDI_INPUT_DEVICE", GetMidiInputDeviceIndex(pSamplerChannel->GetMidiInputDevice())); + result.Add("MIDI_INPUT_PORT", pSamplerChannel->GetMidiInputPort()); + result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel()); + + result.Add("INSTRUMENT_FILE", InstrumentFileName); + result.Add("INSTRUMENT_NR", InstrumentIndex); + result.Add("INSTRUMENT_STATUS", InstrumentStatus); } catch (LinuxSamplerException e) { - result_t result; - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); - return ConvertResult(result); + result.Error(e); } + return result.Produce(); } /** @@ -244,21 +595,18 @@ */ String LSCPServer::GetVoiceCount(uint uiSamplerChannel) { dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); if (!pEngine) throw LinuxSamplerException("No engine loaded on channel"); - return ToString(pEngine->VoiceCount()) + "\r\n"; // success + result.Add(pEngine->VoiceCount()); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -267,21 +615,18 @@ */ String LSCPServer::GetStreamCount(uint uiSamplerChannel) { dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); if (!pEngine) throw LinuxSamplerException("No engine loaded on channel"); - return ToString(pEngine->DiskStreamCount()) + "\r\n"; // success + result.Add(pEngine->DiskStreamCount()); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -290,126 +635,613 @@ */ String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) { dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); if (!pEngine) throw LinuxSamplerException("No engine loaded on channel"); - if (!pEngine->DiskStreamSupported()) return "NA\r\n"; - switch (ResponseType) { - case fill_response_bytes: - return ToString(pEngine->DiskStreamBufferFillBytes()) + "\r\n"; // success - case fill_response_percentage: - return ToString(pEngine->DiskStreamBufferFillPercentage()) + "\r\n"; // success - default: - throw LinuxSamplerException("Unknown fill response type"); + if (!pEngine->DiskStreamSupported()) + result.Add("NA"); + else { + switch (ResponseType) { + case fill_response_bytes: + result.Add(pEngine->DiskStreamBufferFillBytes()); + break; + case fill_response_percentage: + result.Add(pEngine->DiskStreamBufferFillPercentage()); + break; + default: + throw LinuxSamplerException("Unknown fill response type"); + } + } + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAvailableAudioOutputDrivers() { + dmsg(2,("LSCPServer: GetAvailableAudioOutputDrivers()\n")); + LSCPResultSet result; + try { + String s = AudioOutputDeviceFactory::AvailableDriversAsString(); + result.Add(s); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAvailableMidiInputDrivers() { + dmsg(2,("LSCPServer: GetAvailableMidiInputDrivers()\n")); + LSCPResultSet result; + try { + String s = MidiInputDeviceFactory::AvailableDriversAsString(); + result.Add(s); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetMidiInputDriverInfo(String Driver) { + dmsg(2,("LSCPServer: GetMidiInputDriverInfo(Driver=%s)\n",Driver.c_str())); + LSCPResultSet result; + try { + result.Add("DESCRIPTION", MidiInputDeviceFactory::GetDriverDescription(Driver)); + result.Add("VERSION", MidiInputDeviceFactory::GetDriverVersion(Driver)); + + std::map parameters = MidiInputDeviceFactory::GetAvailableDriverParameters(Driver); + if (parameters.size()) { // if there are parameters defined for this driver + String s; + std::map::iterator iter = parameters.begin(); + for (;iter != parameters.end(); iter++) { + if (s != "") s += ","; + s += iter->first; + } + result.Add("PARAMETERS", s); } } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } -/** - * Will be called by the parser to change the audio output type on a - * particular sampler channel. - */ -String LSCPServer::SetAudioOutputType(AudioOutputDevice::type_t AudioOutputType, uint uiSamplerChannel) { - dmsg(2,("LSCPServer: SetAudioOutputType(AudioOutputType=%d, SamplerChannel=%d)\n", AudioOutputType, uiSamplerChannel)); - result_t result; +String LSCPServer::GetAudioOutputDriverInfo(String Driver) { + dmsg(2,("LSCPServer: GetAudioOutputDriverInfo(Driver=%s)\n",Driver.c_str())); + LSCPResultSet result; try { - SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); - if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); - pSamplerChannel->SetAudioOutputDevice(AudioOutputType); - result.type = result_type_success; + result.Add("DESCRIPTION", AudioOutputDeviceFactory::GetDriverDescription(Driver)); + result.Add("VERSION", AudioOutputDeviceFactory::GetDriverVersion(Driver)); + + std::map parameters = AudioOutputDeviceFactory::GetAvailableDriverParameters(Driver); + if (parameters.size()) { // if there are parameters defined for this driver + String s; + std::map::iterator iter = parameters.begin(); + for (;iter != parameters.end(); iter++) { + if (s != "") s += ","; + s += iter->first; + } + result.Add("PARAMETERS", s); + } + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map DependencyList) { + dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s)\n",Driver.c_str(),Parameter.c_str())); + LSCPResultSet result; + try { + DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter); + result.Add("TYPE", pParameter->Type()); + result.Add("DESCRIPTION", pParameter->Description()); + result.Add("MANDATORY", pParameter->Mandatory()); + result.Add("FIX", pParameter->Fix()); + result.Add("MULTIPLICITY", pParameter->Multiplicity()); + if (pParameter->Depends()) result.Add("DEPENDS", pParameter->Depends()); + if (pParameter->Default()) result.Add("DEFAULT", pParameter->Default()); + if (pParameter->RangeMin()) result.Add("RANGE_MIN", pParameter->RangeMin()); + if (pParameter->RangeMax()) result.Add("RANGE_MAX", pParameter->RangeMax()); + if (pParameter->Possibilities()) result.Add("POSSIBILITIES", pParameter->Possibilities()); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map DependencyList) { + dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s)\n",Driver.c_str(),Parameter.c_str())); + LSCPResultSet result; + try { + DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter); + result.Add("TYPE", pParameter->Type()); + result.Add("DESCRIPTION", pParameter->Description()); + result.Add("MANDATORY", pParameter->Mandatory()); + result.Add("FIX", pParameter->Fix()); + result.Add("MULTIPLICITY", pParameter->Multiplicity()); + if (pParameter->Depends()) result.Add("DEPENDS", pParameter->Depends()); + if (pParameter->Default()) result.Add("DEFAULT", pParameter->Default()); + if (pParameter->RangeMin()) result.Add("RANGE_MIN", pParameter->RangeMin()); + if (pParameter->RangeMax()) result.Add("RANGE_MAX", pParameter->RangeMax()); + if (pParameter->Possibilities()) result.Add("POSSIBILITIES", pParameter->Possibilities()); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAudioOutputDeviceCount() { + dmsg(2,("LSCPServer: GetAudioOutputDeviceCount()\n")); + LSCPResultSet result; + try { + uint count = pSampler->AudioOutputDevices(); + result.Add(count); // success + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetMidiInputDeviceCount() { + dmsg(2,("LSCPServer: GetMidiInputDeviceCount()\n")); + LSCPResultSet result; + try { + uint count = pSampler->MidiInputDevices(); + result.Add(count); // success + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAudioOutputDevices() { + dmsg(2,("LSCPServer: GetAudioOutputDevices()\n")); + LSCPResultSet result; + try { + String s; + std::map devices = pSampler->GetAudioOutputDevices(); + std::map::iterator iter = devices.begin(); + for (; iter != devices.end(); iter++) { + if (s != "") s += ","; + s += ToString(iter->first); + } + result.Add(s); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetMidiInputDevices() { + dmsg(2,("LSCPServer: GetMidiInputDevices()\n")); + LSCPResultSet result; + try { + String s; + std::map devices = pSampler->GetMidiInputDevices(); + std::map::iterator iter = devices.begin(); + for (; iter != devices.end(); iter++) { + if (s != "") s += ","; + s += ToString(iter->first); + } + result.Add(s); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAudioOutputDeviceInfo(uint DeviceIndex) { + dmsg(2,("LSCPServer: GetAudioOutputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex)); + LSCPResultSet result; + try { + std::map devices = pSampler->GetAudioOutputDevices(); + if (!devices[DeviceIndex]) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + "."); + AudioOutputDevice* pDevice = devices[DeviceIndex]; + result.Add("driver", pDevice->Driver()); + std::map parameters = pDevice->DeviceParameters(); + std::map::iterator iter = parameters.begin(); + for (; iter != parameters.end(); iter++) { + result.Add(iter->first, iter->second->Value()); + } + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetMidiInputDeviceInfo(uint DeviceIndex) { + dmsg(2,("LSCPServer: GetMidiInputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex)); + LSCPResultSet result; + try { + std::map devices = pSampler->GetMidiInputDevices(); + MidiInputDevice* pDevice = devices[DeviceIndex]; + if (!pDevice) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + "."); + result.Add("driver", pDevice->Driver()); + std::map parameters = pDevice->DeviceParameters(); + std::map::iterator iter = parameters.begin(); + for (; iter != parameters.end(); iter++) { + result.Add(iter->first, iter->second->Value()); + } + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} +String LSCPServer::GetMidiInputPortInfo(uint DeviceIndex, uint PortIndex) { + dmsg(2,("LSCPServer: GetMidiInputPortInfo(DeviceIndex=%d, PortIndex=%d)\n",DeviceIndex, PortIndex)); + LSCPResultSet result; + try { + std::map devices = pSampler->GetMidiInputDevices(); + MidiInputDevice* pDevice = devices[DeviceIndex]; + if (!pDevice) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + "."); + MidiInputDevice::MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex); + if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + "."); + std::map parameters = pMidiInputPort->DeviceParameters(); + std::map::iterator iter = parameters.begin(); + for (; iter != parameters.end(); iter++) { + result.Add(iter->first, iter->second->Value()); + } + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) { + dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%d,ChannelId)\n",DeviceId,ChannelId)); + LSCPResultSet result; + try { + // get audio output device + std::map devices = pSampler->GetAudioOutputDevices(); + if (!devices[DeviceId]) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + "."); + AudioOutputDevice* pDevice = devices[DeviceId]; + + // get audio channel + AudioChannel* pChannel = pDevice->Channel(ChannelId); + if (!pChannel) throw LinuxSamplerException("Audio ouotput device does not have channel " + ToString(ChannelId) + "."); + + // return the values of all audio channel parameters + std::map parameters = pChannel->ChannelParameters(); + std::map::iterator iter = parameters.begin(); + for (; iter != parameters.end(); iter++) { + result.Add(iter->first, iter->second->Value()); + } + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetMidiInputPortParameterInfo(uint DeviceId, uint PortId, String ParameterName) { + dmsg(2,("LSCPServer: GetMidiInputPortParameterInfo(DeviceId=%d,PortId=%d,ParameterName=%s)\n",DeviceId,PortId,ParameterName.c_str())); + LSCPResultSet result; + try { + // get audio output device + std::map devices = pSampler->GetMidiInputDevices(); + if (!devices[DeviceId]) throw LinuxSamplerException("There is no midi input device with index " + ToString(DeviceId) + "."); + MidiInputDevice* pDevice = devices[DeviceId]; + + // get midi port + MidiInputDevice::MidiInputPort* pPort = pDevice->GetPort(PortId); + if (!pPort) throw LinuxSamplerException("Midi input device does not have port " + ToString(PortId) + "."); + + // get desired port parameter + std::map parameters = pPort->DeviceParameters(); + if (!parameters[ParameterName]) throw LinuxSamplerException("Midi port does not provice a parameters '" + ParameterName + "'."); + DeviceCreationParameter* pParameter = parameters[ParameterName]; + + // return all fields of this audio channel parameter + result.Add("TYPE", pParameter->Type()); + result.Add("DESCRIPTION", pParameter->Description()); + result.Add("FIX", pParameter->Fix()); + result.Add("MULTIPLICITY", pParameter->Multiplicity()); + if (pParameter->RangeMin()) result.Add("RANGE_MIN", pParameter->RangeMin()); + if (pParameter->RangeMax()) result.Add("RANGE_MAX", pParameter->RangeMax()); + if (pParameter->Possibilities()) result.Add("POSSIBILITIES", pParameter->Possibilities()); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) { + dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str())); + LSCPResultSet result; + try { + // get audio output device + std::map devices = pSampler->GetAudioOutputDevices(); + if (!devices[DeviceId]) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + "."); + AudioOutputDevice* pDevice = devices[DeviceId]; + + // get audio channel + AudioChannel* pChannel = pDevice->Channel(ChannelId); + if (!pChannel) throw LinuxSamplerException("Audio output device does not have channel " + ToString(ChannelId) + "."); + + // get desired audio channel parameter + std::map parameters = pChannel->ChannelParameters(); + if (!parameters[ParameterName]) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParameterName + "'."); + DeviceRuntimeParameter* pParameter = parameters[ParameterName]; + + // return all fields of this audio channel parameter + result.Add("TYPE", pParameter->Type()); + result.Add("DESCRIPTION", pParameter->Description()); + result.Add("FIX", pParameter->Fix()); + result.Add("MULTIPLICITY", pParameter->Multiplicity()); + if (pParameter->RangeMin()) result.Add("RANGE_MIN", pParameter->RangeMin()); + if (pParameter->RangeMax()) result.Add("RANGE_MAX", pParameter->RangeMax()); + if (pParameter->Possibilities()) result.Add("POSSIBILITIES", pParameter->Possibilities()); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetAudioOutputChannelParameter(uint DeviceId, uint ChannelId, String ParamKey, String ParamVal) { + dmsg(2,("LSCPServer: SetAudioOutputChannelParameter(DeviceId=%d,ChannelId=%d,ParamKey=%s,ParamVal=%s)\n",DeviceId,ChannelId,ParamKey.c_str(),ParamVal.c_str())); + LSCPResultSet result; + try { + // get audio output device + std::map devices = pSampler->GetAudioOutputDevices(); + if (!devices[DeviceId]) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + "."); + AudioOutputDevice* pDevice = devices[DeviceId]; + + // get audio channel + AudioChannel* pChannel = pDevice->Channel(ChannelId); + if (!pChannel) throw LinuxSamplerException("Audio output device does not have channel " + ToString(ChannelId) + "."); + + // get desired audio channel parameter + std::map parameters = pChannel->ChannelParameters(); + if (!parameters[ParamKey]) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParamKey + "'."); + DeviceRuntimeParameter* pParameter = parameters[ParamKey]; + + // set new channel parameter value + pParameter->SetValue(ParamVal); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetAudioOutputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) { + dmsg(2,("LSCPServer: SetAudioOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str())); + LSCPResultSet result; + try { + std::map devices = pSampler->GetAudioOutputDevices(); + if (!devices[DeviceIndex]) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + "."); + AudioOutputDevice* pDevice = devices[DeviceIndex]; + std::map parameters = pDevice->DeviceParameters(); + if (!parameters[ParamKey]) throw LinuxSamplerException("Audio output device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'"); + parameters[ParamKey]->SetValue(ParamVal); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetMidiInputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) { + dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str())); + LSCPResultSet result; + try { + std::map devices = pSampler->GetMidiInputDevices(); + if (!devices[DeviceIndex]) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + "."); + MidiInputDevice* pDevice = devices[DeviceIndex]; + std::map parameters = pDevice->DeviceParameters(); + if (!parameters[ParamKey]) throw LinuxSamplerException("MIDI input device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'"); + parameters[ParamKey]->SetValue(ParamVal); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetMidiInputPortParameter(uint DeviceIndex, uint PortIndex, String ParamKey, String ParamVal) { + dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str())); + LSCPResultSet result; + try { + std::map devices = pSampler->GetMidiInputDevices(); + MidiInputDevice* pDevice = devices[DeviceIndex]; + if (!pDevice) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + "."); + MidiInputDevice::MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex); + if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + "."); + std::map parameters = pMidiInputPort->DeviceParameters(); + if (!parameters[ParamKey]) throw LinuxSamplerException("MIDI input device " + ToString(PortIndex) + " does not have a parameter '" + ParamKey + "'"); + parameters[ParamKey]->SetValue(ParamVal); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** * Will be called by the parser to change the audio output channel for * playback on a particular sampler channel. */ -String LSCPServer::SetAudioOutputChannel(uint AudioOutputChannel, uint uiSamplerChannel) { - dmsg(2,("LSCPServer: SetAudioOutputChannel(AudioOutputChannel=%d, SamplerChannel=%d)\n", AudioOutputChannel, uiSamplerChannel)); - return "ERR:0:Not implemented yet.\r\n"; +String LSCPServer::SetAudioOutputChannel(uint ChannelAudioOutputChannel, uint AudioOutputDeviceInputChannel, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetAudioOutputChannel(ChannelAudioOutputChannel=%d, AudioOutputDeviceInputChannel=%d, SamplerChannel=%d)\n",ChannelAudioOutputChannel,AudioOutputDeviceInputChannel,uiSamplerChannel)); + return "ERR:0:Not implemented yet.\r\n"; //FIXME: Add support for this in resultset class? } -String LSCPServer::SetMIDIInputType(MidiInputDevice::type_t MidiInputType, uint uiSamplerChannel) { - dmsg(2,("LSCPServer: SetMIDIInputType(MidiInputType=%d, SamplerChannel=%d)\n", MidiInputType, uiSamplerChannel)); - result_t result; +String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel)); + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); - if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); - pSamplerChannel->SetMidiInputDevice(MidiInputType); - result.type = result_type_success; + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + std::map devices = pSampler->GetAudioOutputDevices(); + AudioOutputDevice* pDevice = devices[AudioDeviceId]; + if (!pDevice) throw LinuxSamplerException("There is no audio output device with index " + ToString(AudioDeviceId)); + pSamplerChannel->SetAudioOutputDevice(pDevice); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } -/** - * Will be called by the parser to change the MIDI input port on which the - * engine of a particular sampler channel should listen to. - */ -String LSCPServer::SetMIDIInputPort(String MIDIInputPort, uint uiSamplerChannel) { - dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIInputPort=%s, Samplerchannel=%d)\n", MIDIInputPort.c_str(), uiSamplerChannel)); - result_t result; +String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel)); + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); - if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); - if (!pSamplerChannel->GetMidiInputDevice()) throw LinuxSamplerException("No MIDI input device connected yet"); - pSamplerChannel->GetMidiInputDevice()->SetInputPort(MIDIInputPort.c_str()); - result.type = result_type_success; + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + // Driver type name aliasing... + if (AudioOutputDriver == "ALSA") AudioOutputDriver = "Alsa"; + if (AudioOutputDriver == "JACK") AudioOutputDriver = "Jack"; + // Check if there's one audio output device already created + // for the intended audio driver type (AudioOutputDriver)... + AudioOutputDevice *pDevice = NULL; + std::map devices = pSampler->GetAudioOutputDevices(); + std::map::iterator iter = devices.begin(); + for (; iter != devices.end(); iter++) { + if ((iter->second)->Driver() == AudioOutputDriver) { + pDevice = iter->second; + break; + } + } + // If it doesn't exist, create a new one with default parameters... + if (pDevice == NULL) { + std::map params; + pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params); + } + // Must have a device... + if (pDevice == NULL) + throw LinuxSamplerException("Internal error: could not create audio output device."); + // Set it as the current channel device... + pSamplerChannel->SetAudioOutputDevice(pDevice); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetMIDIInputPort(uint MIDIPort, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIPort=%d, SamplerChannel=%d)\n",MIDIPort,uiSamplerChannel)); + LSCPResultSet result; + try { + SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + pSamplerChannel->SetMidiInputPort(MIDIPort); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n",MIDIChannel,uiSamplerChannel)); + LSCPResultSet result; + try { + SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + pSamplerChannel->SetMidiInputChannel((MidiInputDevice::MidiInputPort::midi_chan_t) MIDIChannel); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +String LSCPServer::SetMIDIInputDevice(uint MIDIDeviceId, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetMIDIInputDevice(MIDIDeviceId=%d, SamplerChannel=%d)\n",MIDIDeviceId,uiSamplerChannel)); + LSCPResultSet result; + try { + SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + std::map devices = pSampler->GetMidiInputDevices(); + MidiInputDevice* pDevice = devices[MIDIDeviceId]; + if (!pDevice) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId)); + pSamplerChannel->SetMidiInputDevice(pDevice); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); +} + +String LSCPServer::SetMIDIInputType(String MidiInputDriver, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetMIDIInputType(String MidiInputDriver=%s, SamplerChannel=%d)\n",MidiInputDriver.c_str(),uiSamplerChannel)); + LSCPResultSet result; + try { + SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + // Driver type name aliasing... + if (MidiInputDriver == "ALSA") MidiInputDriver = "Alsa"; + // Check if there's one MIDI input device already created + // for the intended MIDI driver type (MidiInputDriver)... + MidiInputDevice *pDevice = NULL; + std::map devices = pSampler->GetMidiInputDevices(); + std::map::iterator iter = devices.begin(); + for (; iter != devices.end(); iter++) { + if ((iter->second)->Driver() == MidiInputDriver) { + pDevice = iter->second; + break; + } + } + // If it doesn't exist, create a new one with default parameters... + if (pDevice == NULL) { + std::map params; + pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params); + // Make it with at least one initial port. + std::map parameters = pDevice->DeviceParameters(); + parameters["ports"]->SetValue("1"); + } + // Must have a device... + if (pDevice == NULL) + throw LinuxSamplerException("Internal error: could not create MIDI input device."); + // Set it as the current channel device... + pSamplerChannel->SetMidiInputDevice(pDevice); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); } /** - * Will be called by the parser to change the MIDI input channel on which the + * Will be called by the parser to change the MIDI input device, port and channel on which * engine of a particular sampler channel should listen to. */ -String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) { - dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n", MIDIChannel, uiSamplerChannel)); - result_t result; +String LSCPServer::SetMIDIInput(uint MIDIDeviceId, uint MIDIPort, uint MIDIChannel, uint uiSamplerChannel) { + dmsg(2,("LSCPServer: SetMIDIInput(MIDIDeviceId=%d, MIDIPort=%d, MIDIChannel=%d, SamplerChannel=%d)\n", MIDIDeviceId, MIDIPort, MIDIChannel, uiSamplerChannel)); + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); - if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); - if (!pSamplerChannel->GetMidiInputDevice()) throw LinuxSamplerException("No MIDI input device connected yet"); - MidiInputDevice::type_t oldtype = pSamplerChannel->GetMidiInputDevice()->Type(); - pSamplerChannel->SetMidiInputDevice(oldtype, (MidiInputDevice::midi_chan_t) MIDIChannel); - - result.type = result_type_success; + if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); + std::map devices = pSampler->GetMidiInputDevices(); + MidiInputDevice* pDevice = devices[MIDIDeviceId]; + if (!pDevice) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId)); + pSamplerChannel->SetMidiInput(pDevice, MIDIPort, (MidiInputDevice::MidiInputPort::midi_chan_t) MIDIChannel); } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -418,22 +1250,18 @@ */ String LSCPServer::SetVolume(double Volume, uint uiSamplerChannel) { dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", Volume, uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); if (!pEngine) throw LinuxSamplerException("No engine loaded on channel"); pEngine->Volume(Volume); - result.type = result_type_success; } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** @@ -441,38 +1269,88 @@ */ String LSCPServer::ResetChannel(uint uiSamplerChannel) { dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel)); - result_t result; + LSCPResultSet result; try { SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel); if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds"); Engine* pEngine = pSamplerChannel->GetEngine(); if (!pEngine) throw LinuxSamplerException("No engine loaded on channel"); pEngine->Reset(); - result.type = result_type_success; } catch (LinuxSamplerException e) { - e.PrintMessage(); - result.type = result_type_error; - result.code = LSCP_ERR_UNKNOWN; - result.message = e.Message(); + result.Error(e); } - return ConvertResult(result); + return result.Produce(); } /** * Will be called by the parser to subscribe a client (frontend) on the * server for receiving event messages. */ -String LSCPServer::SubscribeNotification(uint UDPPort) { - dmsg(2,("LSCPServer: SubscribeNotification(UDPPort=%d)\n", UDPPort)); - return "ERR:0:Not implemented yet.\r\n"; +String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) { + dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str())); + LSCPResultSet result; + SubscriptionMutex.Lock(); + eventSubscriptions[type].push_back(currentSocket); + SubscriptionMutex.Unlock(); + return result.Produce(); } /** * Will be called by the parser to unsubscribe a client on the server * for not receiving further event messages. */ -String LSCPServer::UnsubscribeNotification(String SessionID) { - dmsg(2,("LSCPServer: UnsubscribeNotification(SessionID=%s)\n", SessionID.c_str())); - return "ERR:0:Not implemented yet.\r\n"; +String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) { + dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str())); + LSCPResultSet result; + SubscriptionMutex.Lock(); + eventSubscriptions[type].remove(currentSocket); + SubscriptionMutex.Unlock(); + return result.Produce(); +} + +/** + * Will be called by the parser to enable or disable echo mode; if echo + * mode is enabled, all commands from the client will (immediately) be + * echoed back to the client. + */ +String LSCPServer::SetEcho(yyparse_param_t* pSession, double boolean_value) { + dmsg(2,("LSCPServer: SetEcho(val=%f)\n", boolean_value)); + LSCPResultSet result; + try { + if (boolean_value == 0) pSession->bVerbose = false; + else if (boolean_value == 1) pSession->bVerbose = true; + else throw LinuxSamplerException("Not a boolean value, must either be 0 or 1"); + } + catch (LinuxSamplerException e) { + result.Error(e); + } + return result.Produce(); +} + +// Instrument loader constructor. +LSCPLoadInstrument::LSCPLoadInstrument(Engine* pEngine, String Filename, uint uiInstrument) + : Thread(false, 0, -4) +{ + this->pEngine = pEngine; + this->Filename = Filename; + this->uiInstrument = uiInstrument; +} + +// Instrument loader process. +int LSCPLoadInstrument::Main() +{ + try { + pEngine->LoadInstrument(Filename.c_str(), uiInstrument); + } + + catch (LinuxSamplerException e) { + e.PrintMessage(); + } + + // Always re-enable the engine. + pEngine->Enable(); + + // FIXME: Shoot ourselves on the foot? + delete this; }