1 // example_client.c
2 //
3 /****************************************************************************
4    liblscp - LinuxSampler Control Protocol API
5    Copyright (C) 2004-2021, rncbc aka Rui Nuno Capela. All rights reserved.
6 
7    This program is free software; you can redistribute it and/or
8    modify it under the terms of the GNU General Public License
9    as published by the Free Software Foundation; either version 2
10    of the License, or (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 along
18    with this program; if not, write to the Free Software Foundation, Inc.,
19    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20 
21 *****************************************************************************/
22 
23 #include "lscp/client.h"
24 #include "lscp/device.h"
25 
26 #include <time.h>
27 
28 #define SERVER_PORT 8888
29 
30 #if defined(WIN32)
31 static WSADATA _wsaData;
32 #endif
33 
34 ////////////////////////////////////////////////////////////////////////
35 
client_callback(lscp_client_t * pClient,lscp_event_t event,const char * pchData,int cchData,void * pvData)36 lscp_status_t client_callback ( lscp_client_t *pClient, lscp_event_t event, const char *pchData, int cchData, void *pvData )
37 {
38 	lscp_status_t ret = LSCP_FAILED;
39 
40 	char *pszData = (char *) malloc(cchData + 1);
41 	if (pszData) {
42 		memcpy(pszData, pchData, cchData);
43 		pszData[cchData] = (char) 0;
44 		printf("client_callback: event=%s (0x%04x) [%s]\n", lscp_event_to_text(event), (int) event, pszData);
45 		free(pszData);
46 		ret = LSCP_OK;
47 	}
48 
49 	return ret;
50 }
51 
52 ////////////////////////////////////////////////////////////////////////
53 
client_test_int(int i)54 int client_test_int ( int i )
55 {
56 	printf("%d\n", i);
57 	return (i >= 0 ? 0 : 1);
58 }
59 
60 
client_test_status(lscp_status_t s)61 int client_test_status ( lscp_status_t s )
62 {
63 	const char *pszStatus;
64 
65 	switch (s) {
66 	case LSCP_OK:         pszStatus = "OK";       break;
67 	case LSCP_FAILED:     pszStatus = "FAILED";   break;
68 	case LSCP_ERROR:      pszStatus = "ERROR";    break;
69 	case LSCP_WARNING:    pszStatus = "WARNING";  break;
70 	case LSCP_TIMEOUT:    pszStatus = "TIMEOUT";  break;
71 	case LSCP_QUIT:       pszStatus = "QUIT";     break;
72 	default:              pszStatus = "NONE";     break;
73 	}
74 	printf("%s\n", pszStatus);
75 	return (s == LSCP_OK ? 0 : 1);
76 }
77 
78 
client_test_isplit(int * piSplit)79 int client_test_isplit ( int *piSplit )
80 {
81 	int i;
82 
83 	printf("{");
84 	for (i = 0; piSplit && piSplit[i] >= 0; i++) {
85 		if (i > 0)
86 			printf(",");
87 		printf(" %d", piSplit[i]);
88 	}
89 	printf(" }\n");
90 	return 0;
91 }
92 
93 
client_test_szsplit(char ** ppszSplit)94 int client_test_szsplit ( char **ppszSplit )
95 {
96 	int i;
97 
98 	printf("{");
99 	for (i = 0; ppszSplit && ppszSplit[i]; i++) {
100 		if (i > 0)
101 			printf(",");
102 		printf(" %s", ppszSplit[i]);
103 	}
104 	printf(" }\n");
105 	return 0;
106 }
107 
108 
client_test_params(lscp_param_t * pParams)109 int client_test_params ( lscp_param_t *pParams )
110 {
111 	int i;
112 
113 	printf("{");
114 	for (i = 0; pParams && pParams[i].key; i++) {
115 		if (i > 0)
116 			printf(",");
117 		printf(" %s='%s'", pParams[i].key, pParams[i].value);
118 	}
119 	printf(" }\n");
120 	return 0;
121 }
122 
123 
client_test_midi_instruments(lscp_midi_instrument_t * pInstrs)124 int client_test_midi_instruments ( lscp_midi_instrument_t *pInstrs )
125 {
126 	int i;
127 
128 	printf("{");
129 	for (i = 0; pInstrs && pInstrs[i].prog >= 0; i++) {
130 		if (i > 0)
131 			printf(",");
132 		printf("{%d,%d,%d}", pInstrs[i].map, pInstrs[i].bank, pInstrs[i].prog);
133 	}
134 	printf(" }\n");
135 	return 0;
136 }
137 
138 
client_test_param_info(lscp_param_info_t * pParamInfo)139 int client_test_param_info ( lscp_param_info_t *pParamInfo )
140 {
141 	const char *pszType;
142 
143 	if (pParamInfo == NULL) {
144 		printf("(nil)\n");
145 		return 1;
146 	}
147 	switch (pParamInfo->type) {
148 	case LSCP_TYPE_BOOL:      pszType = "BOOL";   break;
149 	case LSCP_TYPE_INT:       pszType = "INT";    break;
150 	case LSCP_TYPE_FLOAT:     pszType = "FLOAT";  break;
151 	case LSCP_TYPE_STRING:    pszType = "STRING"; break;
152 	default:                  pszType = "NONE";   break;
153 	}
154 	printf("{\n");
155 	printf("    param_info.type          = %d (%s)\n", (int) pParamInfo->type, pszType);
156 	printf("    param_info.description   = %s\n", pParamInfo->description);
157 	printf("    param_info.mandatory     = %d\n", pParamInfo->mandatory);
158 	printf("    param_info.fix           = %d\n", pParamInfo->fix);
159 	printf("    param_info.multiplicity  = %d\n", pParamInfo->multiplicity);
160 	printf("    param_info.depends       = "); client_test_szsplit(pParamInfo->depends);
161 	printf("    param_info.defaultv      = %s\n", pParamInfo->defaultv);
162 	printf("    param_info.range_min     = %s\n", pParamInfo->range_min);
163 	printf("    param_info.range_max     = %s\n", pParamInfo->range_max);
164 	printf("    param_info.possibilities = "); client_test_szsplit(pParamInfo->possibilities);
165 	printf("  }\n");
166 	return 0;
167 }
168 
169 
client_test_driver_info(lscp_driver_info_t * pDriverInfo)170 int client_test_driver_info ( lscp_driver_info_t *pDriverInfo )
171 {
172 	if (pDriverInfo == NULL) {
173 		printf("(nil)\n");
174 		return 1;
175 	}
176 	printf("{\n");
177 	printf("    driver_info.description = %s\n", pDriverInfo->description);
178 	printf("    driver_info.version     = %s\n", pDriverInfo->version);
179 	printf("    driver_info.parameters  = "); client_test_szsplit(pDriverInfo->parameters);
180 	printf("  }\n");
181 	return 0;
182 }
183 
184 
client_test_device_info(lscp_device_info_t * pDeviceInfo)185 int client_test_device_info ( lscp_device_info_t *pDeviceInfo )
186 {
187 	if (pDeviceInfo == NULL) {
188 		printf("(nil)\n");
189 		return 1;
190 	}
191 	printf("{\n");
192 	printf("    device_info.driver = %s\n", pDeviceInfo->driver);
193 	printf("    device_info.params = "); client_test_params(pDeviceInfo->params);
194 	printf("  }\n");
195 	return 0;
196 }
197 
198 
client_test_device_port_info(lscp_device_port_info_t * pDevicePortInfo)199 int client_test_device_port_info ( lscp_device_port_info_t *pDevicePortInfo )
200 {
201 	if (pDevicePortInfo == NULL) {
202 		printf("(nil)\n");
203 		return 1;
204 	}
205 	printf("{\n");
206 	printf("    device_port_info.name   = %s\n", pDevicePortInfo->name);
207 	printf("    device_port_info.params = "); client_test_params(pDevicePortInfo->params);
208 	printf("  }\n");
209 	return 0;
210 }
211 
212 
client_test_server_info(lscp_server_info_t * pServerInfo)213 int client_test_server_info ( lscp_server_info_t *pServerInfo )
214 {
215 	if (pServerInfo == NULL) {
216 		printf("(nil)\n");
217 		return 1;
218 	}
219 	printf("{\n");
220 	printf("    server_info.description      = %s\n", pServerInfo->description);
221 	printf("    server_info.version          = %s\n", pServerInfo->version);
222 	printf("    server_info.protocol_version = %s\n", pServerInfo->protocol_version);
223 	printf("  }\n");
224 	return 0;
225 }
226 
227 
client_test_engine_info(lscp_engine_info_t * pEngineInfo)228 int client_test_engine_info ( lscp_engine_info_t *pEngineInfo )
229 {
230 	if (pEngineInfo == NULL) {
231 		printf("(nil)\n");
232 		return 1;
233 	}
234 	printf("{\n");
235 	printf("    engine_info.description = %s\n", pEngineInfo->description);
236 	printf("    engine_info.version     = %s\n", pEngineInfo->version);
237 	printf("  }\n");
238 	return 0;
239 }
240 
241 
client_test_channel_info(lscp_channel_info_t * pChannelInfo)242 int client_test_channel_info ( lscp_channel_info_t *pChannelInfo )
243 {
244 	if (pChannelInfo == NULL) {
245 		printf("(nil)\n");
246 		return 1;
247 	}
248 	printf("{\n");
249 	printf("    channel_info.engine_name       = %s\n", pChannelInfo->engine_name);
250 	printf("    channel_info.audio_device      = %d\n", pChannelInfo->audio_device);
251 	printf("    channel_info.audio_channels    = %d\n", pChannelInfo->audio_channels);
252 	printf("    channel_info.audio_routing     = "); client_test_isplit(pChannelInfo->audio_routing);
253 	printf("    channel_info.instrument_file   = %s\n", pChannelInfo->instrument_file);
254 	printf("    channel_info.instrument_nr     = %d\n", pChannelInfo->instrument_nr);
255 	printf("    channel_info.instrument_name   = %s\n", pChannelInfo->instrument_name);
256 	printf("    channel_info.instrument_status = %d\n", pChannelInfo->instrument_status);
257 	printf("    channel_info.midi_device       = %d\n", pChannelInfo->midi_device);
258 	printf("    channel_info.midi_port         = %d\n", pChannelInfo->midi_port);
259 	printf("    channel_info.midi_channel      = %d\n", pChannelInfo->midi_channel);
260 	printf("    channel_info.midi_map          = %d\n", pChannelInfo->midi_map);
261 	printf("    channel_info.volume            = %g\n", pChannelInfo->volume);
262 	printf("    channel_info.mute              = %d\n", pChannelInfo->mute);
263 	printf("    channel_info.solo              = %d\n", pChannelInfo->solo);
264 	printf("  }\n");
265 	return 0;
266 }
267 
268 
client_test_fxsend_info(lscp_fxsend_info_t * pFxSendInfo)269 int client_test_fxsend_info ( lscp_fxsend_info_t *pFxSendInfo )
270 {
271 	if (pFxSendInfo == NULL) {
272 		printf("(nil)\n");
273 		return 1;
274 	}
275 	printf("{\n");
276 	printf("    fxsend_info.engine_name     = %s\n", pFxSendInfo->name);
277 	printf("    fxsend_info.midi_controller = %d\n", pFxSendInfo->midi_controller);
278 	printf("    fxsend_info.audio_routing   = "); client_test_isplit(pFxSendInfo->audio_routing);
279 	printf("    fxsend_info.level           = %g\n", pFxSendInfo->level);
280 	printf("  }\n");
281 	return 0;
282 }
283 
284 
client_test_buffer_fill(lscp_buffer_fill_t * pBufferFill)285 int client_test_buffer_fill ( lscp_buffer_fill_t *pBufferFill )
286 {
287 	if (pBufferFill == NULL) {
288 		printf("(nil)\n");
289 		return 1;
290 	}
291 	printf("{ <%p> }\n", pBufferFill);
292 	return 0;
293 }
294 
295 
client_test_load_mode(lscp_load_mode_t load_mode)296 int client_test_load_mode ( lscp_load_mode_t load_mode )
297 {
298 	const char *pszLoadMode;
299 
300 	switch (load_mode) {
301 	case LSCP_LOAD_ON_DEMAND:      pszLoadMode = "ON_DEMAND";      break;
302 	case LSCP_LOAD_ON_DEMAND_HOLD: pszLoadMode = "ON_DEMAND_HOLD"; break;
303 	case LSCP_LOAD_PERSISTENT:     pszLoadMode = "PERSISTENT";     break;
304 	default:                       pszLoadMode = "DEFAULT";        break;
305 	}
306 	printf("%s\n", pszLoadMode);
307 	return 0;
308 }
309 
310 
client_test_midi_instrument_info(lscp_midi_instrument_info_t * pInstrInfo)311 int client_test_midi_instrument_info ( lscp_midi_instrument_info_t *pInstrInfo )
312 {
313 	if (pInstrInfo == NULL) {
314 		printf("(nil)\n");
315 		return 1;
316 	}
317 	printf("{\n");
318 	printf("    midi_instrument_info.name            = %s\n", pInstrInfo->name);
319 	printf("    midi_instrument_info.engine_name     = %s\n", pInstrInfo->engine_name);
320 	printf("    midi_instrument_info.instrument_file = %s\n", pInstrInfo->instrument_file);
321 	printf("    midi_instrument_info.instrument_nr   = %d\n", pInstrInfo->instrument_nr);
322 	printf("    midi_instrument_info.instrument_name = %s\n", pInstrInfo->instrument_name);
323 	printf("    midi_instrument_info.load_mode       = "); client_test_load_mode(pInstrInfo->load_mode);
324 	printf("    midi_instrument_info.volume          = %g\n", pInstrInfo->volume);
325 	printf("  }\n");
326 	return 0;
327 }
328 
329 
330 ////////////////////////////////////////////////////////////////////////
331 
332 static int g_test_step  = 0;
333 static int g_test_count = 0;
334 static int g_test_fails = 0;
335 
336 
client_test_start(clock_t * pclk)337 void  client_test_start   ( clock_t *pclk ) { *pclk = clock(); }
client_test_elapsed(clock_t * pclk)338 float client_test_elapsed ( clock_t *pclk ) { return (float) ((long) clock() - *pclk) / (float) CLOCKS_PER_SEC; }
339 
340 typedef int *                        isplit;
341 typedef char **                      szsplit;
342 typedef lscp_status_t                status;
343 typedef lscp_driver_info_t *         driver_info;
344 typedef lscp_device_info_t *         device_info;
345 typedef lscp_device_port_info_t *    device_port_info;
346 typedef lscp_param_info_t  *         param_info;
347 typedef lscp_server_info_t *         server_info;
348 typedef lscp_engine_info_t *         engine_info;
349 typedef lscp_channel_info_t *        channel_info;
350 typedef lscp_buffer_fill_t *         buffer_fill;
351 typedef lscp_fxsend_info_t *         fxsend_info;
352 typedef lscp_midi_instrument_t *     midi_instruments;
353 typedef lscp_midi_instrument_info_t *midi_instrument_info;
354 
355 #define CLIENT_TEST(p, t, x) { clock_t c; g_test_count++; \
356 	printf("\n" #x ":\n"); client_test_start(&c); \
357 	printf("  elapsed=%gs  errno=%d  result='%s...' ret=", \
358 		client_test_elapsed(&c), \
359 		lscp_client_get_errno(p), \
360 		lscp_client_get_result(p)); \
361 	if (client_test_##t((t)(x))) { g_test_fails++; getchar(); } \
362 	else if (g_test_step) getchar(); }
363 
364 
client_test_engine(lscp_client_t * pClient,const char * pszEngine,const char * pszAudioDriver,int iAudioDevice,const char * pszMidiDriver,int iMidiDevice)365 void client_test_engine ( lscp_client_t *pClient, const char *pszEngine, const char *pszAudioDriver, int iAudioDevice, const char *pszMidiDriver, int iMidiDevice )
366 {
367 	int iSamplerChannel;
368 	int iFxSend;
369 
370 	printf("\n--- pszEngine=\"%s\" pszAudioDevice=\"%s\" iAudioDevice=%d pszMidiDevice=\"%s\" iMidiDevice=%d ---\n", pszEngine, pszAudioDriver, iAudioDevice, pszMidiDriver, iMidiDevice);
371 	CLIENT_TEST(pClient, engine_info, lscp_get_engine_info(pClient, pszEngine));
372 	CLIENT_TEST(pClient, int, lscp_get_total_voice_count(pClient));
373 	CLIENT_TEST(pClient, int, lscp_get_total_voice_count_max(pClient));
374 	CLIENT_TEST(pClient, int, lscp_get_channels(pClient));
375 	CLIENT_TEST(pClient, isplit, lscp_list_channels(pClient));
376 	CLIENT_TEST(pClient, int, iSamplerChannel = lscp_add_channel(pClient));
377 	printf("\n--- iSamplerChannel=%d ---\n", iSamplerChannel);
378 	CLIENT_TEST(pClient, channel_info, lscp_get_channel_info(pClient, iSamplerChannel));
379 	CLIENT_TEST(pClient, status, lscp_load_engine(pClient, pszEngine, iSamplerChannel));
380 	CLIENT_TEST(pClient, status, lscp_load_instrument(pClient, "DefaultInstrument.gig", 0, iSamplerChannel));
381 	CLIENT_TEST(pClient, int, lscp_get_channel_voice_count(pClient, iSamplerChannel));
382 	CLIENT_TEST(pClient, int, lscp_get_channel_stream_count(pClient, iSamplerChannel));
383 	CLIENT_TEST(pClient, int, lscp_get_channel_stream_usage(pClient, iSamplerChannel));
384 	CLIENT_TEST(pClient, buffer_fill, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_BYTES, iSamplerChannel));
385 	CLIENT_TEST(pClient, buffer_fill, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_PERCENTAGE, iSamplerChannel));
386 	CLIENT_TEST(pClient, status, lscp_set_channel_audio_type(pClient, iSamplerChannel, pszAudioDriver));
387 	CLIENT_TEST(pClient, status, lscp_set_channel_audio_device(pClient, iSamplerChannel, 0));
388 	CLIENT_TEST(pClient, status, lscp_set_channel_audio_channel(pClient, iSamplerChannel, 0, 1));
389 	CLIENT_TEST(pClient, status, lscp_set_channel_midi_type(pClient, iSamplerChannel, pszMidiDriver));
390 	CLIENT_TEST(pClient, status, lscp_set_channel_midi_device(pClient, iSamplerChannel, 0));
391 	CLIENT_TEST(pClient, status, lscp_set_channel_midi_channel(pClient, iSamplerChannel, 0));
392 	CLIENT_TEST(pClient, status, lscp_set_channel_midi_port(pClient, iSamplerChannel, 0));
393 	CLIENT_TEST(pClient, status, lscp_set_channel_volume(pClient, iSamplerChannel, 0.5));
394 	CLIENT_TEST(pClient, status, lscp_set_channel_mute(pClient, iSamplerChannel, 1));
395 	CLIENT_TEST(pClient, status, lscp_set_channel_solo(pClient, iSamplerChannel, 1));
396 	CLIENT_TEST(pClient, int, iFxSend = lscp_create_fxsend(pClient, iSamplerChannel, 90, "DummyFxSend"));
397 	CLIENT_TEST(pClient, int, lscp_get_fxsends(pClient, iSamplerChannel));
398 	CLIENT_TEST(pClient, isplit, lscp_list_fxsends(pClient, iSamplerChannel));
399 	CLIENT_TEST(pClient, fxsend_info, lscp_get_fxsend_info(pClient, iSamplerChannel, iFxSend));
400 	CLIENT_TEST(pClient, status, lscp_set_fxsend_midi_controller(pClient, iSamplerChannel, iFxSend, 99));
401 	CLIENT_TEST(pClient, status, lscp_set_fxsend_audio_channel(pClient, iSamplerChannel, iFxSend, 0, 1));
402 	CLIENT_TEST(pClient, status, lscp_set_fxsend_level(pClient, iSamplerChannel, iFxSend, 0.12f));
403 	CLIENT_TEST(pClient, status, lscp_destroy_fxsend(pClient, iSamplerChannel, iFxSend));
404 	CLIENT_TEST(pClient, channel_info, lscp_get_channel_info(pClient, iSamplerChannel));
405 	CLIENT_TEST(pClient, status, lscp_reset_channel(pClient, iSamplerChannel));
406 	CLIENT_TEST(pClient, status, lscp_remove_channel(pClient, iSamplerChannel));
407 }
408 
409 
client_test_midi_port(lscp_client_t * pClient,int iMidiDevice,int iMidiPort)410 void client_test_midi_port ( lscp_client_t *pClient, int iMidiDevice, int iMidiPort )
411 {
412 	lscp_device_port_info_t *pMidiPortInfo;
413 	const char *pszParam;
414 	int i;
415 
416 	printf("\n--- iMidiDevice=%d iMidiPort=%d ---\n", iMidiDevice, iMidiPort);
417 	CLIENT_TEST(pClient, device_port_info, pMidiPortInfo = lscp_get_midi_port_info(pClient, iMidiDevice, iMidiPort));
418 	if (pMidiPortInfo && pMidiPortInfo->params) {
419 		for (i = 0; pMidiPortInfo->params[i].key; i++) {
420 			pszParam = pMidiPortInfo->params[i].key;
421 			printf("\n--- iMidiDevice=%d iMidiPort=%d pszParam=\"%s\" ---\n", iMidiDevice, iMidiPort, pszParam);
422 			CLIENT_TEST(pClient, param_info, lscp_get_midi_port_param_info(pClient, iMidiDevice, iMidiPort, pszParam));
423 		}
424 	}
425 }
426 
427 
client_test_audio_channel(lscp_client_t * pClient,int iAudioDevice,int iAudioChannel)428 void client_test_audio_channel ( lscp_client_t *pClient, int iAudioDevice, int iAudioChannel )
429 {
430 	lscp_device_port_info_t *pAudioChannelInfo;
431 	const char *pszParam;
432 	int i;
433 
434 	printf("\n--- iAudioDevice=%d iAudioChannel=%d ---\n", iAudioDevice, iAudioChannel);
435 	CLIENT_TEST(pClient, device_port_info, pAudioChannelInfo = lscp_get_audio_channel_info(pClient, iAudioDevice, iAudioChannel));
436 	if (pAudioChannelInfo && pAudioChannelInfo->params) {
437 		for (i = 0; pAudioChannelInfo->params[i].key; i++) {
438 			pszParam = pAudioChannelInfo->params[i].key;
439 			printf("\n--- iAudioDevice=%d iAudioChannel=%d pszParam=\"%s\" ---\n", iAudioDevice, iAudioChannel, pszParam);
440 			CLIENT_TEST(pClient, param_info, lscp_get_audio_channel_param_info(pClient, iAudioDevice, iAudioChannel, pszParam));
441 		}
442 	}
443 }
444 
445 
client_test_midi_device(lscp_client_t * pClient,int iMidiDevice)446 void client_test_midi_device ( lscp_client_t *pClient, int iMidiDevice )
447 {
448 	lscp_device_info_t *pDeviceInfo;
449 	const char *pszValue;
450 	int iMidiPort, iMidiPorts;
451 
452 	printf("\n--- iMidiDevice=%d ---\n", iMidiDevice);
453 	CLIENT_TEST(pClient, device_info, pDeviceInfo = lscp_get_midi_device_info(pClient, iMidiDevice));
454 	if (pDeviceInfo && pDeviceInfo->params) {
455 		pszValue = lscp_get_param_value(pDeviceInfo->params, "ports");
456 		if (pszValue) {
457 			iMidiPorts = atoi(pszValue);
458 			for (iMidiPort = 0; iMidiPort < iMidiPorts; iMidiPort++)
459 				client_test_midi_port(pClient, iMidiDevice, iMidiPort);
460 		}
461 	}
462 }
463 
464 
client_test_audio_device(lscp_client_t * pClient,int iAudioDevice)465 void client_test_audio_device ( lscp_client_t *pClient, int iAudioDevice )
466 {
467 	lscp_device_info_t *pDeviceInfo;
468 	const char *pszValue;
469 	int iAudioChannel, iAudioChannels;
470 
471 	printf("\n--- iAudioDevice=%d ---\n", iAudioDevice);
472 	CLIENT_TEST(pClient, device_info, pDeviceInfo = lscp_get_audio_device_info(pClient, iAudioDevice));
473 	if (pDeviceInfo && pDeviceInfo->params) {
474 		pszValue = lscp_get_param_value(pDeviceInfo->params, "channels");
475 		if (pszValue) {
476 			iAudioChannels = atoi(pszValue);
477 			for (iAudioChannel = 0; iAudioChannel < iAudioChannels; iAudioChannel++)
478 				client_test_audio_channel(pClient, iAudioDevice, iAudioChannel);
479 		}
480 	}
481 }
482 
483 
client_test_midi_driver(lscp_client_t * pClient,const char * pszMidiDriver)484 void client_test_midi_driver ( lscp_client_t *pClient, const char *pszMidiDriver )
485 {
486 	lscp_driver_info_t *pDriverInfo;
487 	const char *pszParam;
488 	int i;
489 
490 	printf("\n--- pszMidiDriver=\"%s\" ---\n", pszMidiDriver);
491 	CLIENT_TEST(pClient, driver_info, pDriverInfo = lscp_get_midi_driver_info(pClient, pszMidiDriver));
492 	if (pDriverInfo && pDriverInfo->parameters) {
493 		for (i = 0; pDriverInfo->parameters[i]; i++) {
494 			pszParam = pDriverInfo->parameters[i];
495 			printf("\n--- pszMidiDriver=\"%s\" pszParam=\"%s\" ---\n", pszMidiDriver, pszParam);
496 			CLIENT_TEST(pClient, param_info, lscp_get_midi_driver_param_info(pClient, pszMidiDriver, pszParam, NULL));
497 		}
498 	}
499 }
500 
501 
client_test_audio_driver(lscp_client_t * pClient,const char * pszAudioDriver)502 void client_test_audio_driver ( lscp_client_t *pClient, const char *pszAudioDriver )
503 {
504 	lscp_driver_info_t *pDriverInfo;
505 	const char *pszParam;
506 	int i;
507 
508 	printf("\n--- pszAudioDriver=\"%s\" ---\n", pszAudioDriver);
509 	CLIENT_TEST(pClient, driver_info, pDriverInfo = lscp_get_audio_driver_info(pClient, pszAudioDriver));
510 	if (pDriverInfo && pDriverInfo->parameters) {
511 		for (i = 0; pDriverInfo->parameters[i]; i++) {
512 			pszParam = pDriverInfo->parameters[i];
513 			printf("\n--- pszAudioDriver=\"%s\" pszParam=\"%s\" ---\n", pszAudioDriver, pszParam);
514 			CLIENT_TEST(pClient, param_info, lscp_get_audio_driver_param_info(pClient, pszAudioDriver, pszParam, NULL));
515 		}
516 	}
517 }
518 
519 
client_test_all(lscp_client_t * pClient,int step)520 void client_test_all ( lscp_client_t *pClient, int step )
521 {
522 	const char **ppszAudioDrivers, **ppszMidiDrivers, **ppszEngines;
523 	const char *pszAudioDriver, *pszMidiDriver, *pszEngine = 0;
524 	int iAudioDriver, iMidiDriver, iEngine;
525 	int iAudio, iAudioDevice, iMidi, iMidiDevice;
526 	int iNewAudioDevice, iNewMidiDevice;
527 	int *piAudioDevices, *piMidiDevices;
528 	lscp_midi_instrument_t midi_instr;
529 	int i, j, k;
530 
531 	g_test_step  = step;
532 	g_test_count = 0;
533 	g_test_fails = 0;
534 
535 	CLIENT_TEST(pClient, server_info, lscp_get_server_info(pClient));
536 
537 	CLIENT_TEST(pClient, int, lscp_get_available_audio_drivers(pClient));
538 	CLIENT_TEST(pClient, szsplit, ppszAudioDrivers = lscp_list_available_audio_drivers(pClient));
539 	if (ppszAudioDrivers == NULL) {
540 		fprintf(stderr, "client_test: No audio drivers available.\n");
541 		return;
542 	}
543 
544 	CLIENT_TEST(pClient, int, lscp_get_available_midi_drivers(pClient));
545 	CLIENT_TEST(pClient, szsplit, ppszMidiDrivers = lscp_list_available_midi_drivers(pClient));
546 	if (ppszMidiDrivers == NULL) {
547 		fprintf(stderr, "client_test: No MIDI drivers available.\n");
548 		return;
549 	}
550 
551 	CLIENT_TEST(pClient, int, lscp_get_available_engines(pClient));
552 	CLIENT_TEST(pClient, szsplit, ppszEngines = lscp_list_available_engines(pClient));
553 	if (ppszEngines == NULL) {
554 		fprintf(stderr, "client_test: No engines available.\n");
555 		return;
556 	}
557 
558 	for (iAudioDriver = 0; ppszAudioDrivers[iAudioDriver]; iAudioDriver++) {
559 		pszAudioDriver = ppszAudioDrivers[iAudioDriver];
560 		client_test_audio_driver(pClient, pszAudioDriver);
561 		CLIENT_TEST(pClient, int, iNewAudioDevice = lscp_create_audio_device(pClient, pszAudioDriver, NULL));
562 		CLIENT_TEST(pClient, int, lscp_get_audio_devices(pClient));
563 		CLIENT_TEST(pClient, isplit, piAudioDevices = lscp_list_audio_devices(pClient));
564 		for (iAudio = 0; piAudioDevices && piAudioDevices[iAudio] >= 0; iAudio++) {
565 			iAudioDevice = piAudioDevices[iAudio];
566 			client_test_audio_device(pClient, iAudioDevice);
567 			for (iMidiDriver = 0; ppszMidiDrivers[iMidiDriver]; iMidiDriver++) {
568 				pszMidiDriver = ppszMidiDrivers[iMidiDriver];
569 				client_test_midi_driver(pClient, pszMidiDriver);
570 				CLIENT_TEST(pClient, int, iNewMidiDevice = lscp_create_midi_device(pClient, pszMidiDriver, NULL));
571 				CLIENT_TEST(pClient, int, lscp_get_midi_devices(pClient));
572 				CLIENT_TEST(pClient, isplit, piMidiDevices = lscp_list_midi_devices(pClient));
573 				for (iMidi = 0; piMidiDevices && piMidiDevices[iMidi] >= 0; iMidi++) {
574 					iMidiDevice = piMidiDevices[iMidi];
575 					client_test_midi_device(pClient, iMidiDevice);
576 					for (iEngine = 0; ppszEngines[iEngine]; iEngine++) {
577 						pszEngine = ppszEngines[iEngine];
578 						client_test_engine(pClient, pszEngine, pszAudioDriver, iAudioDevice, pszMidiDriver, iMidiDevice);
579 					}
580 				}
581 				CLIENT_TEST(pClient, status, lscp_destroy_midi_device(pClient, iNewMidiDevice));
582 			}
583 		}
584 		CLIENT_TEST(pClient, status, lscp_destroy_audio_device(pClient, iNewAudioDevice));
585 	}
586 
587 	for (i = 0; i < 2; i++) {
588 		CLIENT_TEST(pClient, int, lscp_add_midi_instrument_map(pClient, NULL));
589 		for (j = 0; j < 4; j++) {
590 			for (k = 0; k < 8; k++) {
591 				midi_instr.map  = i;
592 				midi_instr.bank = j;
593 				midi_instr.prog = k;
594 				CLIENT_TEST(pClient, status, lscp_map_midi_instrument(pClient, &midi_instr, pszEngine, "DefaultInstrument.gig", 0, 1.0f, LSCP_LOAD_ON_DEMAND, "DummyName"));
595 			}
596 		}
597 		CLIENT_TEST(pClient, status, lscp_set_midi_instrument_map_name(pClient, i, "DummyMapName"));
598 	}
599 	CLIENT_TEST(pClient, int, lscp_get_midi_instruments(pClient, LSCP_MIDI_MAP_ALL));
600 	CLIENT_TEST(pClient, midi_instruments, lscp_list_midi_instruments(pClient, LSCP_MIDI_MAP_ALL));
601 	for (i = 0; i < 2; i++) {
602 		for (j = 0; j < 4; j++) {
603 			for (k = 0; k < 8; k++) {
604 				midi_instr.map  = i;
605 				midi_instr.bank = j;
606 				midi_instr.prog = k;
607 				CLIENT_TEST(pClient, midi_instrument_info, lscp_get_midi_instrument_info(pClient, &midi_instr));
608 				CLIENT_TEST(pClient, status, lscp_unmap_midi_instrument(pClient, &midi_instr));
609 			}
610 		}
611 		CLIENT_TEST(pClient, int, lscp_remove_midi_instrument_map(pClient, i));
612 	}
613 	CLIENT_TEST(pClient, status, lscp_clear_midi_instruments(pClient, LSCP_MIDI_MAP_ALL));
614 
615 	CLIENT_TEST(pClient, status, lscp_set_volume(pClient, 0.123f));
616 	CLIENT_TEST(pClient, int, (int) (100.0f * lscp_get_volume(pClient)));
617 
618 	CLIENT_TEST(pClient, status, lscp_reset_sampler(pClient));
619 
620 	printf("\n\n");
621 	printf("  Total: %d tests, %d failed.\n\n", g_test_count, g_test_fails);
622 }
623 
624 
625 ////////////////////////////////////////////////////////////////////////
626 
client_usage(void)627 void client_usage (void)
628 {
629 	printf("\n  %s %s (Build: %s)\n", lscp_client_package(), lscp_client_version(), lscp_client_build());
630 
631 	fputs("\n  Available commands: help, test[step], exit, quit, subscribe, unsubscribe", stdout);
632 	fputs("\n  (all else are sent verbatim to server)\n\n", stdout);
633 
634 }
635 
client_prompt(void)636 void client_prompt (void)
637 {
638 	fputs("lscp_client> ", stdout);
639 }
640 
main(int argc,char * argv[])641 int main (int argc, char *argv[] )
642 {
643 	lscp_client_t *pClient;
644 	char *pszHost = "localhost";
645 	char  szLine[1024];
646 	int  cchLine;
647 	lscp_status_t ret;
648 
649 #if defined(WIN32)
650 	if (WSAStartup(MAKEWORD(1, 1), &_wsaData) != 0) {
651 		fprintf(stderr, "lscp_client: WSAStartup failed.\n");
652 		return -1;
653 	}
654 #endif
655 
656 	if (argc > 1)
657 		pszHost = argv[1];
658 
659 	pClient = lscp_client_create(pszHost, SERVER_PORT, client_callback, NULL);
660 	if (pClient == NULL)
661 		return -1;
662 
663 	client_usage();
664 	client_prompt();
665 
666 	while (fgets(szLine, sizeof(szLine) - 3, stdin)) {
667 
668 		cchLine = strlen(szLine);
669 		while (cchLine > 0 && (szLine[cchLine - 1] == '\n' || szLine[cchLine - 1] == '\r'))
670 			cchLine--;
671 		szLine[cchLine] = '\0';
672 
673 		if (strcmp(szLine, "exit") == 0 || strcmp(szLine, "quit") == 0)
674 			break;
675 		else
676 		if (strcmp(szLine, "subscribe") == 0)
677 			lscp_client_subscribe(pClient, LSCP_EVENT_MISCELLANEOUS);
678 		else
679 		if (strcmp(szLine, "unsubscribe") == 0)
680 			lscp_client_unsubscribe(pClient, LSCP_EVENT_MISCELLANEOUS);
681 		else
682 		if (strcmp(szLine, "test") == 0)
683 			client_test_all(pClient, 0);
684 		else
685 		if (strcmp(szLine, "teststep") == 0 || strcmp(szLine, "test step") == 0)
686 			client_test_all(pClient, 1);
687 		else
688 		if (cchLine > 0 && strcmp(szLine, "help") != 0) {
689 			szLine[cchLine++] = '\r';
690 			szLine[cchLine++] = '\n';
691 			szLine[cchLine]   = '\0';
692 			ret = lscp_client_query(pClient, szLine);
693 			printf("%s\n(errno = %d)\n", lscp_client_get_result(pClient), lscp_client_get_errno(pClient));
694 			if (ret == LSCP_QUIT)
695 				break;
696 		}
697 		else client_usage();
698 
699 		client_prompt();
700 	}
701 
702 	lscp_client_destroy(pClient);
703 
704 #if defined(WIN32)
705 	WSACleanup();
706 #endif
707 
708 	return 0;
709 }
710 
711 // end of example_client.c
712