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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 120 - (show annotations) (download)
Sat Jun 12 07:29:37 2004 UTC (19 years, 9 months ago) by senkov
File size: 17227 byte(s)
* Error handling in resultset class, rewrite lscpserver to use resultset.

1 /***************************************************************************
2 * *
3 * LinuxSampler - modular, streaming capable sampler *
4 * *
5 * Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6 * *
7 * This program is free software; you can redistribute it and/or modify *
8 * it under the terms of the GNU General Public License as published by *
9 * the Free Software Foundation; either version 2 of the License, or *
10 * (at your option) any later version. *
11 * *
12 * This program is distributed in the hope that it will be useful, *
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
15 * GNU General Public License for more details. *
16 * *
17 * You should have received a copy of the GNU General Public License *
18 * along with this program; if not, write to the Free Software *
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
20 * MA 02111-1307 USA *
21 ***************************************************************************/
22
23 #include "lscpserver.h"
24 #include "lscpresultset.h"
25
26 #include "../engines/gig/Engine.h"
27
28 LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) {
29 this->pSampler = pSampler;
30 }
31
32 int LSCPServer::Main() {
33 hSocket = socket(AF_INET, SOCK_STREAM, 0);
34 if (hSocket < 0) {
35 std::cerr << "LSCPServer: Could not create server socket." << std::endl;
36 //return -1;
37 exit(EXIT_FAILURE);
38 }
39
40 SocketAddress.sin_family = AF_INET;
41 SocketAddress.sin_port = htons(LSCP_PORT);
42 SocketAddress.sin_addr.s_addr = htonl(INADDR_ANY);
43
44 if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {
45 std::cerr << "LSCPServer: Could not bind server socket." << std::endl;
46 close(hSocket);
47 //return -1;
48 exit(EXIT_FAILURE);
49 }
50
51 listen(hSocket, 1);
52 dmsg(1,("LSCPServer: Server running.\n")); // server running
53
54 // now wait for client connections and handle their requests
55 sockaddr_in client;
56 int length = sizeof(client);
57 while (true) {
58 hSession = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length);
59 if (hSession < 0) {
60 std::cerr << "LSCPServer: Client connection failed." << std::endl;
61 close(hSocket);
62 //return -1;
63 exit(EXIT_FAILURE);
64 }
65
66 dmsg(1,("LSCPServer: Client connection established.\n"));
67 //send(hSession, "Welcome!\r\n", 10, 0);
68
69 // Parser invocation
70 yyparse_param_t yyparse_param;
71 yyparse_param.pServer = this;
72 yylex_init(&yyparse_param.pScanner);
73 while (yyparse(&yyparse_param) == LSCP_SYNTAX_ERROR); // recall parser in case of syntax error
74 yylex_destroy(yyparse_param.pScanner);
75
76 close(hSession);
77 dmsg(1,("LSCPServer: Client connection terminated.\n"));
78 }
79 }
80
81 /**
82 * Will be called by the parser whenever it wants to send an answer to the
83 * client / frontend.
84 *
85 * @param ReturnMessage - message that will be send to the client
86 */
87 void LSCPServer::AnswerClient(String ReturnMessage) {
88 dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));
89 send(hSession, ReturnMessage.c_str(), ReturnMessage.size(), 0);
90 }
91
92 /**
93 * Will be called by the parser to load an instrument.
94 */
95 String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel) {
96 dmsg(2,("LSCPServer: LoadInstrument(Filename=%s,Instrument=%d,SamplerChannel=%d)\n", Filename.c_str(), uiInstrument, uiSamplerChannel));
97 LSCPResultSet result;
98 try {
99 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
100 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
101 Engine* pEngine = pSamplerChannel->GetEngine();
102 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
103 pEngine->LoadInstrument(Filename.c_str(), uiInstrument);
104 }
105 catch (LinuxSamplerException e) {
106 result.Error(e);
107 }
108 return result.Produce();
109 }
110
111 /**
112 * Will be called by the parser to load and deploy an engine.
113 */
114 String LSCPServer::LoadEngine(String EngineName, uint uiSamplerChannel) {
115 dmsg(2,("LSCPServer: LoadEngine(EngineName=%s,SamplerChannel=%d)\n", EngineName.c_str(), uiSamplerChannel));
116 LSCPResultSet result;
117 try {
118 Engine::type_t type;
119 if ((EngineName == "GigEngine") || (EngineName == "gig")) type = Engine::type_gig;
120 else throw LinuxSamplerException("Unknown engine type");
121 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
122 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
123 pSamplerChannel->LoadEngine(type);
124 }
125 catch (LinuxSamplerException e) {
126 result.Error(e);
127 }
128 return result.Produce();
129 }
130
131 /**
132 * Will be called by the parser to get the amount of sampler channels.
133 */
134 String LSCPServer::GetChannels() {
135 dmsg(2,("LSCPServer: GetChannels()\n"));
136 LSCPResultSet result;
137 result.Add(pSampler->SamplerChannels());
138 return result.Produce();
139 }
140
141 /**
142 * Will be called by the parser to add a sampler channel.
143 */
144 String LSCPServer::AddChannel() {
145 dmsg(2,("LSCPServer: AddChannel()\n"));
146 SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();
147 LSCPResultSet result(pSamplerChannel->Index());
148 return result.Produce();
149 }
150
151 /**
152 * Will be called by the parser to remove a sampler channel.
153 */
154 String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
155 dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
156 LSCPResultSet result;
157 pSampler->RemoveSamplerChannel(uiSamplerChannel);
158 return result.Produce();
159 }
160
161 /**
162 * Will be called by the parser to get all available engines.
163 */
164 String LSCPServer::GetAvailableEngines() {
165 dmsg(2,("LSCPServer: GetAvailableEngines()\n"));
166 LSCPResultSet result("GigEngine");
167 return result.Produce();
168 }
169
170 /**
171 * Will be called by the parser to get descriptions for a particular engine.
172 */
173 String LSCPServer::GetEngineInfo(String EngineName) {
174 dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
175 LSCPResultSet result;
176 try {
177 if ((EngineName == "GigEngine") || (EngineName == "gig")) {
178 Engine* pEngine = new LinuxSampler::gig::Engine;
179 result.Add(pEngine->Description());
180 delete pEngine;
181 }
182 else throw LinuxSamplerException("Unknown engine type");
183 }
184 catch (LinuxSamplerException e) {
185 result.Error(e);
186 }
187 return result.Produce();
188 }
189
190 /**
191 * Will be called by the parser to get informations about a particular
192 * sampler channel.
193 */
194 String LSCPServer::GetChannelInfo(uint uiSamplerChannel) {
195 dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel));
196 LSCPResultSet result;
197 try {
198 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
199 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
200 Engine* pEngine = pSamplerChannel->GetEngine();
201
202 //Defaults values
203 String EngineName = "NONE";
204 float Volume = 0;
205 String InstrumentFileName = "NONE";
206 int InstrumentIndex = 0;
207
208 if (pEngine) {
209 EngineName = pEngine->EngineName();
210 Volume = pEngine->Volume();
211 int iIdx = pEngine->InstrumentIndex();
212 if (iIdx != -1) {
213 InstrumentFileName = pEngine->InstrumentFileName();
214 InstrumentIndex = iIdx;
215 }
216 }
217
218 result.Add("ENGINE_NAME", EngineName);
219 result.Add("VOLUME", Volume);
220
221 //Some hardcoded stuff for now to make GUI look good
222 result.Add("AUDIO_OUTPUT_DEVICE", "0");
223 result.Add("AUDIO_OUTPUT_CHANNELS", "2");
224 result.Add("AUDIO_OUTPUT_ROUTING", "0,1");
225
226 result.Add("INSTRUMENT_FILE", InstrumentFileName);
227 result.Add("INSTRUMENT_NR", InstrumentIndex);
228
229 //Some more hardcoded stuff for now to make GUI look good
230 result.Add("MIDI_INPUT_DEVICE", "0");
231 result.Add("MIDI_INPUT_PORT", "0");
232 result.Add("MIDI_INPUT_CHANNEL", "1");
233 }
234 catch (LinuxSamplerException e) {
235 result.Error(e);
236 }
237 return result.Produce();
238 }
239
240 /**
241 * Will be called by the parser to get the amount of active voices on a
242 * particular sampler channel.
243 */
244 String LSCPServer::GetVoiceCount(uint uiSamplerChannel) {
245 dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
246 LSCPResultSet result;
247 try {
248 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
249 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
250 Engine* pEngine = pSamplerChannel->GetEngine();
251 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
252 result.Add(pEngine->VoiceCount());
253 }
254 catch (LinuxSamplerException e) {
255 result.Error(e);
256 }
257 return result.Produce();
258 }
259
260 /**
261 * Will be called by the parser to get the amount of active disk streams on a
262 * particular sampler channel.
263 */
264 String LSCPServer::GetStreamCount(uint uiSamplerChannel) {
265 dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
266 LSCPResultSet result;
267 try {
268 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
269 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
270 Engine* pEngine = pSamplerChannel->GetEngine();
271 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
272 result.Add(pEngine->DiskStreamCount());
273 }
274 catch (LinuxSamplerException e) {
275 result.Error(e);
276 }
277 return result.Produce();
278 }
279
280 /**
281 * Will be called by the parser to get the buffer fill states of all disk
282 * streams on a particular sampler channel.
283 */
284 String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) {
285 dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
286 LSCPResultSet result;
287 try {
288 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
289 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
290 Engine* pEngine = pSamplerChannel->GetEngine();
291 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
292 if (!pEngine->DiskStreamSupported()) return "NA\r\n"; //FIXME: Update resultset class to support "NA"
293 switch (ResponseType) {
294 case fill_response_bytes:
295 result.Add(pEngine->DiskStreamBufferFillBytes());
296 case fill_response_percentage:
297 result.Add(pEngine->DiskStreamBufferFillPercentage());
298 default:
299 throw LinuxSamplerException("Unknown fill response type");
300 }
301 }
302 catch (LinuxSamplerException e) {
303 result.Error(e);
304 }
305 return result.Produce();
306 }
307
308 /**
309 * Will be called by the parser to change the audio output type on a
310 * particular sampler channel.
311 */
312 String LSCPServer::SetAudioOutputType(AudioOutputDevice::type_t AudioOutputType, uint uiSamplerChannel) {
313 dmsg(2,("LSCPServer: SetAudioOutputType(AudioOutputType=%d, SamplerChannel=%d)\n", AudioOutputType, uiSamplerChannel));
314 LSCPResultSet result;
315 try {
316 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
317 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
318 pSamplerChannel->SetAudioOutputDevice(AudioOutputType);
319 }
320 catch (LinuxSamplerException e) {
321 result.Error(e);
322 }
323 return result.Produce();
324 }
325
326 /**
327 * Will be called by the parser to change the audio output channel for
328 * playback on a particular sampler channel.
329 */
330 String LSCPServer::SetAudioOutputChannel(uint AudioOutputChannel, uint uiSamplerChannel) {
331 dmsg(2,("LSCPServer: SetAudioOutputChannel(AudioOutputChannel=%d, SamplerChannel=%d)\n", AudioOutputChannel, uiSamplerChannel));
332 return "ERR:0:Not implemented yet.\r\n"; //FIXME: Add support for this in resultset class?
333 }
334
335 String LSCPServer::SetMIDIInputType(MidiInputDevice::type_t MidiInputType, uint uiSamplerChannel) {
336 dmsg(2,("LSCPServer: SetMIDIInputType(MidiInputType=%d, SamplerChannel=%d)\n", MidiInputType, uiSamplerChannel));
337 LSCPResultSet result;
338 try {
339 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
340 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
341 pSamplerChannel->SetMidiInputDevice(MidiInputType);
342 }
343 catch (LinuxSamplerException e) {
344 result.Error(e);
345 }
346 return result.Produce();
347 }
348
349 /**
350 * Will be called by the parser to change the MIDI input port on which the
351 * engine of a particular sampler channel should listen to.
352 */
353 String LSCPServer::SetMIDIInputPort(String MIDIInputPort, uint uiSamplerChannel) {
354 dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIInputPort=%s, Samplerchannel=%d)\n", MIDIInputPort.c_str(), uiSamplerChannel));
355 LSCPResultSet result;
356 try {
357 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
358 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
359 if (!pSamplerChannel->GetMidiInputDevice()) throw LinuxSamplerException("No MIDI input device connected yet");
360 pSamplerChannel->GetMidiInputDevice()->SetInputPort(MIDIInputPort.c_str());
361 }
362 catch (LinuxSamplerException e) {
363 result.Error(e);
364 }
365 return result.Produce();
366 }
367
368 /**
369 * Will be called by the parser to change the MIDI input channel on which the
370 * engine of a particular sampler channel should listen to.
371 */
372 String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) {
373 dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n", MIDIChannel, uiSamplerChannel));
374 LSCPResultSet result;
375 try {
376 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
377 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
378 if (!pSamplerChannel->GetMidiInputDevice()) throw LinuxSamplerException("No MIDI input device connected yet");
379 MidiInputDevice::type_t oldtype = pSamplerChannel->GetMidiInputDevice()->Type();
380 pSamplerChannel->SetMidiInputDevice(oldtype, (MidiInputDevice::midi_chan_t) MIDIChannel);
381 }
382 catch (LinuxSamplerException e) {
383 result.Error(e);
384 }
385 return result.Produce();
386 }
387
388 /**
389 * Will be called by the parser to change the global volume factor on a
390 * particular sampler channel.
391 */
392 String LSCPServer::SetVolume(double Volume, uint uiSamplerChannel) {
393 dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", Volume, uiSamplerChannel));
394 LSCPResultSet result;
395 try {
396 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
397 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
398 Engine* pEngine = pSamplerChannel->GetEngine();
399 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
400 pEngine->Volume(Volume);
401 }
402 catch (LinuxSamplerException e) {
403 result.Error(e);
404 }
405 return result.Produce();
406 }
407
408 /**
409 * Will be called by the parser to reset a particular sampler channel.
410 */
411 String LSCPServer::ResetChannel(uint uiSamplerChannel) {
412 dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
413 LSCPResultSet result;
414 try {
415 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
416 if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
417 Engine* pEngine = pSamplerChannel->GetEngine();
418 if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
419 pEngine->Reset();
420 }
421 catch (LinuxSamplerException e) {
422 result.Error(e);
423 }
424 return result.Produce();
425 }
426
427 /**
428 * Will be called by the parser to subscribe a client (frontend) on the
429 * server for receiving event messages.
430 */
431 String LSCPServer::SubscribeNotification(uint UDPPort) {
432 dmsg(2,("LSCPServer: SubscribeNotification(UDPPort=%d)\n", UDPPort));
433 return "ERR:0:Not implemented yet.\r\n";
434 }
435
436 /**
437 * Will be called by the parser to unsubscribe a client on the server
438 * for not receiving further event messages.
439 */
440 String LSCPServer::UnsubscribeNotification(String SessionID) {
441 dmsg(2,("LSCPServer: UnsubscribeNotification(SessionID=%s)\n", SessionID.c_str()));
442 return "ERR:0:Not implemented yet.\r\n";
443 }

  ViewVC Help
Powered by ViewVC