trunk/examples/example_client.c

// example_client.c
//
/****************************************************************************
   Copyright (C) 2004, rncbc aka Rui Nuno Capela. All rights reserved.

   This program is free software; you can redistribute it and/or
   modify it under the terms of the GNU General Public License
   as published by the Free Software Foundation; either version 2
   of the License, or (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

*****************************************************************************/

#include "lscp/client.h"
#include "lscp/device.h"

#include <time.h>

#define SERVER_PORT 8888

#if defined(WIN32)
static WSADATA _wsaData;
#endif

////////////////////////////////////////////////////////////////////////

lscp_status_t client_callback ( lscp_client_t *pClient, lscp_event_t event, const char *pchData, int cchData, void *pvData )
{
    lscp_status_t ret = LSCP_FAILED;

    char *pszData = (char *) malloc(cchData + 1);
    if (pszData) {
        memcpy(pszData, pchData, cchData);
        pszData[cchData] = (char) 0;
        printf("client_callback: event=%s (0x%04x) [%s]\n", lscp_event_to_text(event), (int) event, pszData);
        free(pszData);
        ret = LSCP_OK;
    }

    return ret;
}

////////////////////////////////////////////////////////////////////////

int client_test_int ( int i )
{
    printf("%d\n", i);
    return (i >= 0 ? 0 : 1);
}

int client_test_status ( lscp_status_t s )
{
    const char *pszStatus;

    switch (s) {
      case LSCP_OK:         pszStatus = "OK";       break;
      case LSCP_FAILED:     pszStatus = "FAILED";   break;
      case LSCP_ERROR:      pszStatus = "ERROR";    break;
      case LSCP_WARNING:    pszStatus = "WARNING";  break;
      case LSCP_TIMEOUT:    pszStatus = "TIMEOUT";  break;
      case LSCP_QUIT:       pszStatus = "QUIT";     break;
      default:              pszStatus = "NONE";     break;
    }
    printf("%s\n", pszStatus);
    return (s == LSCP_OK ? 0 : 1);
}


int client_test_isplit ( int *piSplit )
{
    int i;

    printf("{");
    for (i = 0; piSplit && piSplit[i] >= 0; i++) {
        if (i > 0)
            printf(",");
        printf(" %d", piSplit[i]);
    }
    printf(" }\n");
    return 0;
}

int client_test_szsplit ( char **ppszSplit )
{
    int i;

    printf("{");
    for (i = 0; ppszSplit && ppszSplit[i]; i++) {
        if (i > 0)
            printf(",");
        printf(" %s", ppszSplit[i]);
    }
    printf(" }\n");
    return 0;
}

int client_test_params ( lscp_param_t *pParams )
{
    int i;

    printf("{");
    for (i = 0; pParams && pParams[i].key; i++) {
        if (i > 0)
            printf(",");
        printf(" %s='%s'", pParams[i].key, pParams[i].value);
    }
    printf(" }\n");
    return 0;
}

int client_test_param_info ( lscp_param_info_t *pParamInfo )
{
    const char *pszType;
    
    if (pParamInfo == NULL) {
        printf("(nil)\n");
        return 1;
    }
    switch (pParamInfo->type) {
      case LSCP_TYPE_BOOL:      pszType = "BOOL";   break;
      case LSCP_TYPE_INT:       pszType = "INT";    break;
      case LSCP_TYPE_FLOAT:     pszType = "FLOAT";  break;
      case LSCP_TYPE_STRING:    pszType = "STRING"; break;
      default:                  pszType = "NONE";   break;
    }
    printf("{\n");
    printf("    param_info.type                = %d (%s)\n", (int) pParamInfo->type, pszType);
    printf("    param_info.description         = %s\n", pParamInfo->description);
    printf("    param_info.mandatory           = %d\n", pParamInfo->mandatory);
    printf("    param_info.fix                 = %d\n", pParamInfo->fix);
    printf("    param_info.multiplicity        = %d\n", pParamInfo->multiplicity);
    printf("    param_info.depends             = "); client_test_szsplit(pParamInfo->depends);
    printf("    param_info.defaultv            = %s\n", pParamInfo->defaultv);
    printf("    param_info.range_min           = %s\n", pParamInfo->range_min);
    printf("    param_info.range_max           = %s\n", pParamInfo->range_max);
    printf("    param_info.possibilities       = "); client_test_szsplit(pParamInfo->possibilities);
    printf("  }\n");
    return 0;
}

int client_test_driver_info ( lscp_driver_info_t *pDriverInfo )
{
    if (pDriverInfo == NULL) {
        printf("(nil)\n");
        return 1;
    }
    printf("{\n");
    printf("    driver_info.description        = %s\n", pDriverInfo->description);
    printf("    driver_info.version            = %s\n", pDriverInfo->version);
    printf("    driver_info.parameters         = "); client_test_szsplit(pDriverInfo->parameters);
    printf("  }\n");
    return 0;
}

int client_test_device_info ( lscp_device_info_t *pDeviceInfo )
{
    if (pDeviceInfo == NULL) {
        printf("(nil)\n");
        return 1;
    }
    printf("{\n");
    printf("    device_info.driver             = %s\n", pDeviceInfo->driver);
    printf("    device_info.params             = "); client_test_params(pDeviceInfo->params);
    printf("  }\n");
    return 0;
}

int client_test_device_port_info ( lscp_device_port_info_t *pDevicePortInfo )
{
    if (pDevicePortInfo == NULL) {
        printf("(nil)\n");
        return 1;
    }
    printf("{\n");
    printf("    device_port_info.name          = %s\n", pDevicePortInfo->name);
    printf("    device_port_info.params        = "); client_test_params(pDevicePortInfo->params);
    printf("  }\n");
    return 0;
}

int client_test_engine_info ( lscp_engine_info_t *pEngineInfo )
{
    if (pEngineInfo == NULL) {
        printf("(nil)\n");
        return 1;
    }
    printf("{\n");
    printf("    engine_info.description        = %s\n", pEngineInfo->description);
    printf("    engine_info.version            = %s\n", pEngineInfo->version);
    printf("  }\n");
    return 0;
}

int client_test_channel_info ( lscp_channel_info_t *pChannelInfo )
{
    if (pChannelInfo == NULL) {
        printf("(nil)\n");
        return 1;
    }
    printf("{\n");
    printf("    channel_info.engine_name       = %s\n", pChannelInfo->engine_name);
    printf("    channel_info.audio_device      = %d\n", pChannelInfo->audio_device);
    printf("    channel_info.audio_channels    = %d\n", pChannelInfo->audio_channels);
    printf("    channel_info.audio_routing     = "); client_test_szsplit(pChannelInfo->audio_routing);
    printf("    channel_info.instrument_file   = %s\n", pChannelInfo->instrument_file);
    printf("    channel_info.instrument_nr     = %d\n", pChannelInfo->instrument_nr);
    printf("    channel_info.instrument_status = %d\n", pChannelInfo->instrument_status);
    printf("    channel_info.midi_device       = %d\n", pChannelInfo->midi_device);
    printf("    channel_info.midi_port         = %d\n", pChannelInfo->midi_port);
    printf("    channel_info.midi_channel      = %d\n", pChannelInfo->midi_channel);
    printf("    channel_info.volume            = %g\n", pChannelInfo->volume);
    printf("  }\n");
    return 0;
}

int client_test_buffer_fill ( lscp_buffer_fill_t *pBufferFill )
{
    if (pBufferFill == NULL) {
        printf("(nil)\n");
        return 1;
    }
    printf("{ <%p> }\n", pBufferFill);
    return 0;
}

////////////////////////////////////////////////////////////////////////

static int g_test_step  = 0;
static int g_test_count = 0;
static int g_test_fails = 0;


void  client_test_start   ( clock_t *pclk ) { *pclk = clock(); }
float client_test_elapsed ( clock_t *pclk ) { return (float) ((long) clock() - *pclk) / (float) CLOCKS_PER_SEC; }

typedef int *                       isplit;
typedef char **                     szsplit;
typedef lscp_status_t               status;
typedef lscp_driver_info_t *        driver_info;
typedef lscp_device_info_t *        device_info;
typedef lscp_device_port_info_t *   device_port_info;
typedef lscp_param_info_t  *        param_info;
typedef lscp_engine_info_t *        engine_info;
typedef lscp_channel_info_t *       channel_info;
typedef lscp_buffer_fill_t *        buffer_fill;

#define CLIENT_TEST(p, t, x) { clock_t c; void *v; g_test_count++; \
    printf("\n" #x ":\n"); client_test_start(&c); v = (void *) (x); \
    printf("  elapsed=%gs  errno=%d  result='%s...' ret=", \
        client_test_elapsed(&c), \
        lscp_client_get_errno(p), \
        lscp_client_get_result(p)); \
    if (client_test_##t((t)(v))) { g_test_fails++; getchar(); } \
    else if (g_test_step) getchar(); }


void client_test ( lscp_client_t *pClient )
{
    const char **ppszAudioDrivers, **ppszMidiDrivers, **ppszEngines;
    const char *pszAudioDriver, *pszMidiDriver, *pszEngine;
    int iAudioDriver, iMidiDriver, iEngine;
    int iAudioDevice, iMidiDevice;
    int iSamplerChannel;

    g_test_count = 0;
    g_test_fails = 0;

    CLIENT_TEST(pClient, szsplit, ppszAudioDrivers = lscp_get_available_audio_drivers(pClient));
    if (ppszAudioDrivers == NULL) {
        fprintf(stderr, "client_test: No audio drivers available.\n");
        return;
    }

    CLIENT_TEST(pClient, szsplit, ppszMidiDrivers = lscp_get_available_midi_drivers(pClient));
    if (ppszMidiDrivers == NULL) {
        fprintf(stderr, "client_test: No MIDI drivers available.\n");
        return;
    }

    CLIENT_TEST(pClient, szsplit, ppszEngines = lscp_get_available_engines(pClient));
    if (ppszEngines == NULL) {
        fprintf(stderr, "client_test: No engines available.\n");
        return;
    }

    CLIENT_TEST(pClient, int, lscp_get_audio_devices(pClient));
    CLIENT_TEST(pClient, isplit, lscp_list_audio_devices(pClient));

    CLIENT_TEST(pClient, int, lscp_get_midi_devices(pClient));
    CLIENT_TEST(pClient, isplit, lscp_list_midi_devices(pClient));

    for (iAudioDriver = 0; ppszAudioDrivers[iAudioDriver]; iAudioDriver++) {
     pszAudioDriver = ppszAudioDrivers[iAudioDriver];
     printf("\n--- pszAudioDriver=\"%s\" ---\n", pszAudioDriver);
     CLIENT_TEST(pClient, driver_info, lscp_get_audio_driver_info(pClient, pszAudioDriver));
     CLIENT_TEST(pClient, param_info, lscp_get_audio_driver_param_info(pClient, pszAudioDriver, "active", NULL));
     CLIENT_TEST(pClient, int, iAudioDevice = lscp_create_audio_device(pClient, pszAudioDriver, NULL));
     CLIENT_TEST(pClient, device_info, lscp_get_audio_device_info(pClient, iAudioDevice));
     for (iMidiDriver = 0; ppszMidiDrivers[iMidiDriver]; iMidiDriver++) {
      pszMidiDriver = ppszMidiDrivers[iMidiDriver];
      printf("\n--- pszMidiDriver=\"%s\" ---\n", pszMidiDriver);
      CLIENT_TEST(pClient, driver_info, lscp_get_midi_driver_info(pClient, pszMidiDriver));
      CLIENT_TEST(pClient, param_info, lscp_get_midi_driver_param_info(pClient, pszMidiDriver, "active", NULL));
      CLIENT_TEST(pClient, int, iMidiDevice = lscp_create_midi_device(pClient, pszMidiDriver, NULL));
      CLIENT_TEST(pClient, device_info, lscp_get_midi_device_info(pClient, iMidiDevice));
      for (iEngine = 0; ppszEngines[iEngine]; iEngine++) {
        pszEngine = ppszEngines[iEngine];
        printf("\n--- pszEngine=\"%s\" ---\n", pszEngine);
        CLIENT_TEST(pClient, engine_info, lscp_get_engine_info(pClient, pszEngine));
        CLIENT_TEST(pClient, int, lscp_get_channels(pClient));
        CLIENT_TEST(pClient, isplit, lscp_list_channels(pClient));
        CLIENT_TEST(pClient, int, iSamplerChannel = lscp_add_channel(pClient));
        CLIENT_TEST(pClient, channel_info, lscp_get_channel_info(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, status, lscp_load_engine(pClient, pszEngine, iSamplerChannel));
        CLIENT_TEST(pClient, status, lscp_load_instrument(pClient, "DefaultInstrument.gig", 0, iSamplerChannel));
        CLIENT_TEST(pClient, int, lscp_get_channel_voice_count(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, int, lscp_get_channel_stream_count(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, int, lscp_get_channel_stream_usage(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, buffer_fill, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_BYTES, iSamplerChannel));
        CLIENT_TEST(pClient, buffer_fill, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_PERCENTAGE, iSamplerChannel));
        CLIENT_TEST(pClient, status, lscp_set_channel_audio_type(pClient, iSamplerChannel, pszAudioDriver));
        CLIENT_TEST(pClient, status, lscp_set_channel_audio_device(pClient, iSamplerChannel, 0));
        CLIENT_TEST(pClient, status, lscp_set_channel_audio_channel(pClient, iSamplerChannel, 0, 1));
        CLIENT_TEST(pClient, status, lscp_set_channel_midi_type(pClient, iSamplerChannel, pszMidiDriver));
        CLIENT_TEST(pClient, status, lscp_set_channel_midi_device(pClient, iSamplerChannel, 0));
        CLIENT_TEST(pClient, status, lscp_set_channel_midi_channel(pClient, iSamplerChannel, 0));
        CLIENT_TEST(pClient, status, lscp_set_channel_midi_port(pClient, iSamplerChannel, 0));
        CLIENT_TEST(pClient, status, lscp_set_channel_volume(pClient, iSamplerChannel, 0.5));
        CLIENT_TEST(pClient, channel_info, lscp_get_channel_info(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, status, lscp_reset_channel(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, status, lscp_remove_channel(pClient, iSamplerChannel));
      }
      CLIENT_TEST(pClient, status, lscp_destroy_midi_device(pClient, iMidiDevice));
     }
     CLIENT_TEST(pClient, status, lscp_destroy_audio_device(pClient, iAudioDevice));
    }
    printf("\n");
    printf("  Total: %d tests, %d failed.\n\n", g_test_count, g_test_fails);
}

////////////////////////////////////////////////////////////////////////

void client_usage (void)
{
    printf("\n  %s %s (Build: %s)\n", lscp_client_package(), lscp_client_version(), lscp_client_build());

    fputs("\n  Available commands: help, test[step], exit, quit, subscribe, unsubscribe", stdout);
    fputs("\n  (all else are sent verbatim to server)\n\n", stdout);

}

void client_prompt (void)
{
    fputs("lscp_client> ", stdout);
}

int main (int argc, char *argv[] )
{
    lscp_client_t *pClient;
    char *pszHost = "localhost";
    char  szLine[1024];
    int  cchLine;
    lscp_status_t ret;

#if defined(WIN32)
    if (WSAStartup(MAKEWORD(1, 1), &_wsaData) != 0) {
        fprintf(stderr, "lscp_client: WSAStartup failed.\n");
        return -1;
    }
#endif

    if (argc > 1)
        pszHost = argv[1];

    pClient = lscp_client_create(pszHost, SERVER_PORT, client_callback, NULL);
    if (pClient == NULL)
        return -1;

    client_usage();
    client_prompt();

    while (fgets(szLine, sizeof(szLine) - 3, stdin)) {

        cchLine = strlen(szLine);
        while (cchLine > 0 && (szLine[cchLine - 1] == '\n' || szLine[cchLine - 1] == '\r'))
            cchLine--;
        szLine[cchLine] = '\0';

        if (strcmp(szLine, "exit") == 0 || strcmp(szLine, "quit") == 0)
            break;
        else
        if (strcmp(szLine, "subscribe") == 0)
            lscp_client_subscribe(pClient, LSCP_EVENT_MISCELLANEOUS);
        else
        if (strcmp(szLine, "unsubscribe") == 0)
            lscp_client_unsubscribe(pClient, LSCP_EVENT_MISCELLANEOUS);
        else
        if (strcmp(szLine, "test") == 0)
            client_test(pClient);
        else
        if (strcmp(szLine, "teststep") == 0 || strcmp(szLine, "test step") == 0) {
            g_test_step = 1;
            client_test(pClient);
            g_test_step = 0;
        }
        else
        if (cchLine > 0 && strcmp(szLine, "help") != 0) {
            szLine[cchLine++] = '\r';
            szLine[cchLine++] = '\n';
            szLine[cchLine]   = '\0';
            ret = lscp_client_query(pClient, szLine);
            printf("%s\n(errno = %d)\n", lscp_client_get_result(pClient), lscp_client_get_errno(pClient));
            if (ret == LSCP_QUIT)
                break;
        }
        else client_usage();

        client_prompt();
    }

    lscp_client_destroy(pClient);

#if defined(WIN32)
    WSACleanup();
#endif

    return 0;
}

// end of example_client.c
1	capela	103	// example_client.c
2			//
3			/****************************************************************************
4			Copyright (C) 2004, rncbc aka Rui Nuno Capela. All rights reserved.
5
6			This program is free software; you can redistribute it and/or
7			modify it under the terms of the GNU General Public License
8			as published by the Free Software Foundation; either version 2
9			of the License, or (at your option) any later version.
10
11			This program is distributed in the hope that it will be useful,
12			but WITHOUT ANY WARRANTY; without even the implied warranty of
13			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14			GNU General Public License for more details.
15
16			You should have received a copy of the GNU General Public License
17			along with this program; if not, write to the Free Software
18			Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19
20			*****************************************************************************/
21
22			#include "lscp/client.h"
23			#include "lscp/device.h"
24
25			#include <time.h>
26
27			#define SERVER_PORT 8888
28
29			#if defined(WIN32)
30			static WSADATA _wsaData;
31			#endif
32
33			////////////////////////////////////////////////////////////////////////
34
35	capela	147	lscp_status_t client_callback ( lscp_client_t pClient, lscp_event_t event, const char pchData, int cchData, void *pvData )
36	capela	103	{
37	capela	147	lscp_status_t ret = LSCP_FAILED;
38	capela	103
39	capela	147	char pszData = (char ) malloc(cchData + 1);
40			if (pszData) {
41			memcpy(pszData, pchData, cchData);
42			pszData[cchData] = (char) 0;
43			printf("client_callback: event=%s (0x%04x) [%s]\n", lscp_event_to_text(event), (int) event, pszData);
44			free(pszData);
45			ret = LSCP_OK;
46	capela	103	}
47
48			return ret;
49			}
50
51			////////////////////////////////////////////////////////////////////////
52
53	capela	188	int client_test_int ( int i )
54	capela	187	{
55			printf("%d\n", i);
56	capela	188	return (i >= 0 ? 0 : 1);
57	capela	187	}
58
59	capela	188	int client_test_status ( lscp_status_t s )
60	capela	187	{
61			const char *pszStatus;
62	capela	188
63	capela	187	switch (s) {
64			case LSCP_OK: pszStatus = "OK"; break;
65			case LSCP_FAILED: pszStatus = "FAILED"; break;
66			case LSCP_ERROR: pszStatus = "ERROR"; break;
67			case LSCP_WARNING: pszStatus = "WARNING"; break;
68			case LSCP_TIMEOUT: pszStatus = "TIMEOUT"; break;
69			case LSCP_QUIT: pszStatus = "QUIT"; break;
70			default: pszStatus = "NONE"; break;
71			}
72			printf("%s\n", pszStatus);
73	capela	188	return (s == LSCP_OK ? 0 : 1);
74	capela	187	}
75
76
77	capela	188	int client_test_isplit ( int *piSplit )
78	capela	187	{
79			int i;
80
81			printf("{");
82			for (i = 0; piSplit && piSplit[i] >= 0; i++) {
83			if (i > 0)
84			printf(",");
85			printf(" %d", piSplit[i]);
86			}
87			printf(" }\n");
88	capela	188	return 0;
89	capela	187	}
90
91	capela	188	int client_test_szsplit ( char **ppszSplit )
92	capela	187	{
93			int i;
94
95			printf("{");
96			for (i = 0; ppszSplit && ppszSplit[i]; i++) {
97			if (i > 0)
98			printf(",");
99			printf(" %s", ppszSplit[i]);
100			}
101			printf(" }\n");
102	capela	188	return 0;
103	capela	187	}
104
105	capela	188	int client_test_params ( lscp_param_t *pParams )
106	capela	187	{
107			int i;
108
109			printf("{");
110			for (i = 0; pParams && pParams[i].key; i++) {
111			if (i > 0)
112			printf(",");
113			printf(" %s='%s'", pParams[i].key, pParams[i].value);
114			}
115			printf(" }\n");
116	capela	188	return 0;
117	capela	187	}
118
119	capela	188	int client_test_param_info ( lscp_param_info_t *pParamInfo )
120	capela	187	{
121			const char *pszType;
122
123			if (pParamInfo == NULL) {
124			printf("(nil)\n");
125	capela	188	return 1;
126	capela	187	}
127			switch (pParamInfo->type) {
128			case LSCP_TYPE_BOOL: pszType = "BOOL"; break;
129			case LSCP_TYPE_INT: pszType = "INT"; break;
130			case LSCP_TYPE_FLOAT: pszType = "FLOAT"; break;
131			case LSCP_TYPE_STRING: pszType = "STRING"; break;
132			default: pszType = "NONE"; break;
133			}
134			printf("{\n");
135			printf(" param_info.type = %d (%s)\n", (int) pParamInfo->type, pszType);
136			printf(" param_info.description = %s\n", pParamInfo->description);
137			printf(" param_info.mandatory = %d\n", pParamInfo->mandatory);
138			printf(" param_info.fix = %d\n", pParamInfo->fix);
139			printf(" param_info.multiplicity = %d\n", pParamInfo->multiplicity);
140			printf(" param_info.depends = "); client_test_szsplit(pParamInfo->depends);
141			printf(" param_info.defaultv = %s\n", pParamInfo->defaultv);
142			printf(" param_info.range_min = %s\n", pParamInfo->range_min);
143			printf(" param_info.range_max = %s\n", pParamInfo->range_max);
144			printf(" param_info.possibilities = "); client_test_szsplit(pParamInfo->possibilities);
145			printf(" }\n");
146	capela	188	return 0;
147	capela	187	}
148
149	capela	188	int client_test_driver_info ( lscp_driver_info_t *pDriverInfo )
150	capela	187	{
151			if (pDriverInfo == NULL) {
152			printf("(nil)\n");
153	capela	188	return 1;
154	capela	187	}
155			printf("{\n");
156			printf(" driver_info.description = %s\n", pDriverInfo->description);
157			printf(" driver_info.version = %s\n", pDriverInfo->version);
158			printf(" driver_info.parameters = "); client_test_szsplit(pDriverInfo->parameters);
159			printf(" }\n");
160	capela	188	return 0;
161	capela	187	}
162
163	capela	188	int client_test_device_info ( lscp_device_info_t *pDeviceInfo )
164	capela	187	{
165			if (pDeviceInfo == NULL) {
166			printf("(nil)\n");
167	capela	188	return 1;
168	capela	187	}
169			printf("{\n");
170			printf(" device_info.driver = %s\n", pDeviceInfo->driver);
171			printf(" device_info.params = "); client_test_params(pDeviceInfo->params);
172			printf(" }\n");
173	capela	188	return 0;
174	capela	187	}
175
176	capela	188	int client_test_device_port_info ( lscp_device_port_info_t *pDevicePortInfo )
177	capela	187	{
178			if (pDevicePortInfo == NULL) {
179			printf("(nil)\n");
180	capela	188	return 1;
181	capela	187	}
182			printf("{\n");
183			printf(" device_port_info.name = %s\n", pDevicePortInfo->name);
184			printf(" device_port_info.params = "); client_test_params(pDevicePortInfo->params);
185			printf(" }\n");
186	capela	188	return 0;
187	capela	187	}
188
189	capela	188	int client_test_engine_info ( lscp_engine_info_t *pEngineInfo )
190	capela	187	{
191			if (pEngineInfo == NULL) {
192			printf("(nil)\n");
193	capela	188	return 1;
194	capela	187	}
195			printf("{\n");
196			printf(" engine_info.description = %s\n", pEngineInfo->description);
197			printf(" engine_info.version = %s\n", pEngineInfo->version);
198			printf(" }\n");
199	capela	188	return 0;
200	capela	187	}
201
202	capela	188	int client_test_channel_info ( lscp_channel_info_t *pChannelInfo )
203	capela	187	{
204			if (pChannelInfo == NULL) {
205			printf("(nil)\n");
206	capela	188	return 1;
207	capela	187	}
208			printf("{\n");
209			printf(" channel_info.engine_name = %s\n", pChannelInfo->engine_name);
210			printf(" channel_info.audio_device = %d\n", pChannelInfo->audio_device);
211			printf(" channel_info.audio_channels = %d\n", pChannelInfo->audio_channels);
212			printf(" channel_info.audio_routing = "); client_test_szsplit(pChannelInfo->audio_routing);
213			printf(" channel_info.instrument_file = %s\n", pChannelInfo->instrument_file);
214			printf(" channel_info.instrument_nr = %d\n", pChannelInfo->instrument_nr);
215			printf(" channel_info.instrument_status = %d\n", pChannelInfo->instrument_status);
216			printf(" channel_info.midi_device = %d\n", pChannelInfo->midi_device);
217			printf(" channel_info.midi_port = %d\n", pChannelInfo->midi_port);
218			printf(" channel_info.midi_channel = %d\n", pChannelInfo->midi_channel);
219			printf(" channel_info.volume = %g\n", pChannelInfo->volume);
220			printf(" }\n");
221	capela	188	return 0;
222	capela	187	}
223
224	capela	188	int client_test_buffer_fill ( lscp_buffer_fill_t *pBufferFill )
225	capela	187	{
226	capela	188	if (pBufferFill == NULL) {
227			printf("(nil)\n");
228			return 1;
229			}
230	capela	187	printf("{ <%p> }\n", pBufferFill);
231	capela	188	return 0;
232	capela	187	}
233
234			////////////////////////////////////////////////////////////////////////
235
236	capela	188	static int g_test_step = 0;
237			static int g_test_count = 0;
238			static int g_test_fails = 0;
239	capela	187
240	capela	188
241	capela	103	void client_test_start ( clock_t pclk ) { pclk = clock(); }
242			float client_test_elapsed ( clock_t pclk ) { return (float) ((long) clock() - pclk) / (float) CLOCKS_PER_SEC; }
243
244	capela	187	typedef int * isplit;
245			typedef char ** szsplit;
246			typedef lscp_status_t status;
247			typedef lscp_driver_info_t * driver_info;
248			typedef lscp_device_info_t * device_info;
249			typedef lscp_device_port_info_t * device_port_info;
250			typedef lscp_param_info_t * param_info;
251			typedef lscp_engine_info_t * engine_info;
252			typedef lscp_channel_info_t * channel_info;
253			typedef lscp_buffer_fill_t * buffer_fill;
254	capela	103
255	capela	188	#define CLIENT_TEST(p, t, x) { clock_t c; void *v; g_test_count++; \
256	capela	187	printf("\n" #x ":\n"); client_test_start(&c); v = (void *) (x); \
257			printf(" elapsed=%gs errno=%d result='%s...' ret=", \
258			client_test_elapsed(&c), \
259			lscp_client_get_errno(p), \
260			lscp_client_get_result(p)); \
261	capela	188	if (client_test_##t((t)(v))) { g_test_fails++; getchar(); } \
262			else if (g_test_step) getchar(); }
263	capela	187
264
265	capela	103	void client_test ( lscp_client_t *pClient )
266			{
267			const char ppszAudioDrivers, ppszMidiDrivers, **ppszEngines;
268			const char pszAudioDriver, pszMidiDriver, *pszEngine;
269			int iAudioDriver, iMidiDriver, iEngine;
270	capela	171	int iAudioDevice, iMidiDevice;
271	capela	103	int iSamplerChannel;
272
273	capela	188	g_test_count = 0;
274			g_test_fails = 0;
275
276	capela	187	CLIENT_TEST(pClient, szsplit, ppszAudioDrivers = lscp_get_available_audio_drivers(pClient));
277	capela	103	if (ppszAudioDrivers == NULL) {
278			fprintf(stderr, "client_test: No audio drivers available.\n");
279			return;
280			}
281
282	capela	187	CLIENT_TEST(pClient, szsplit, ppszMidiDrivers = lscp_get_available_midi_drivers(pClient));
283	capela	103	if (ppszMidiDrivers == NULL) {
284			fprintf(stderr, "client_test: No MIDI drivers available.\n");
285			return;
286			}
287
288	capela	187	CLIENT_TEST(pClient, szsplit, ppszEngines = lscp_get_available_engines(pClient));
289	capela	103	if (ppszEngines == NULL) {
290			fprintf(stderr, "client_test: No engines available.\n");
291			return;
292			}
293
294	capela	187	CLIENT_TEST(pClient, int, lscp_get_audio_devices(pClient));
295			CLIENT_TEST(pClient, isplit, lscp_list_audio_devices(pClient));
296	capela	125
297	capela	187	CLIENT_TEST(pClient, int, lscp_get_midi_devices(pClient));
298			CLIENT_TEST(pClient, isplit, lscp_list_midi_devices(pClient));
299	capela	125
300	capela	103	for (iAudioDriver = 0; ppszAudioDrivers[iAudioDriver]; iAudioDriver++) {
301			pszAudioDriver = ppszAudioDrivers[iAudioDriver];
302			printf("\n--- pszAudioDriver=\"%s\" ---\n", pszAudioDriver);
303	capela	187	CLIENT_TEST(pClient, driver_info, lscp_get_audio_driver_info(pClient, pszAudioDriver));
304			CLIENT_TEST(pClient, param_info, lscp_get_audio_driver_param_info(pClient, pszAudioDriver, "active", NULL));
305			CLIENT_TEST(pClient, int, iAudioDevice = lscp_create_audio_device(pClient, pszAudioDriver, NULL));
306			CLIENT_TEST(pClient, device_info, lscp_get_audio_device_info(pClient, iAudioDevice));
307	capela	103	for (iMidiDriver = 0; ppszMidiDrivers[iMidiDriver]; iMidiDriver++) {
308			pszMidiDriver = ppszMidiDrivers[iMidiDriver];
309			printf("\n--- pszMidiDriver=\"%s\" ---\n", pszMidiDriver);
310	capela	187	CLIENT_TEST(pClient, driver_info, lscp_get_midi_driver_info(pClient, pszMidiDriver));
311			CLIENT_TEST(pClient, param_info, lscp_get_midi_driver_param_info(pClient, pszMidiDriver, "active", NULL));
312			CLIENT_TEST(pClient, int, iMidiDevice = lscp_create_midi_device(pClient, pszMidiDriver, NULL));
313			CLIENT_TEST(pClient, device_info, lscp_get_midi_device_info(pClient, iMidiDevice));
314	capela	103	for (iEngine = 0; ppszEngines[iEngine]; iEngine++) {
315			pszEngine = ppszEngines[iEngine];
316			printf("\n--- pszEngine=\"%s\" ---\n", pszEngine);
317	capela	187	CLIENT_TEST(pClient, engine_info, lscp_get_engine_info(pClient, pszEngine));
318			CLIENT_TEST(pClient, int, lscp_get_channels(pClient));
319			CLIENT_TEST(pClient, isplit, lscp_list_channels(pClient));
320			CLIENT_TEST(pClient, int, iSamplerChannel = lscp_add_channel(pClient));
321			CLIENT_TEST(pClient, channel_info, lscp_get_channel_info(pClient, iSamplerChannel));
322			CLIENT_TEST(pClient, status, lscp_load_engine(pClient, pszEngine, iSamplerChannel));
323			CLIENT_TEST(pClient, status, lscp_load_instrument(pClient, "DefaultInstrument.gig", 0, iSamplerChannel));
324			CLIENT_TEST(pClient, int, lscp_get_channel_voice_count(pClient, iSamplerChannel));
325			CLIENT_TEST(pClient, int, lscp_get_channel_stream_count(pClient, iSamplerChannel));
326			CLIENT_TEST(pClient, int, lscp_get_channel_stream_usage(pClient, iSamplerChannel));
327			CLIENT_TEST(pClient, buffer_fill, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_BYTES, iSamplerChannel));
328			CLIENT_TEST(pClient, buffer_fill, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_PERCENTAGE, iSamplerChannel));
329			CLIENT_TEST(pClient, status, lscp_set_channel_audio_type(pClient, iSamplerChannel, pszAudioDriver));
330			CLIENT_TEST(pClient, status, lscp_set_channel_audio_device(pClient, iSamplerChannel, 0));
331			CLIENT_TEST(pClient, status, lscp_set_channel_audio_channel(pClient, iSamplerChannel, 0, 1));
332			CLIENT_TEST(pClient, status, lscp_set_channel_midi_type(pClient, iSamplerChannel, pszMidiDriver));
333			CLIENT_TEST(pClient, status, lscp_set_channel_midi_device(pClient, iSamplerChannel, 0));
334			CLIENT_TEST(pClient, status, lscp_set_channel_midi_channel(pClient, iSamplerChannel, 0));
335			CLIENT_TEST(pClient, status, lscp_set_channel_midi_port(pClient, iSamplerChannel, 0));
336			CLIENT_TEST(pClient, status, lscp_set_channel_volume(pClient, iSamplerChannel, 0.5));
337			CLIENT_TEST(pClient, channel_info, lscp_get_channel_info(pClient, iSamplerChannel));
338			CLIENT_TEST(pClient, status, lscp_reset_channel(pClient, iSamplerChannel));
339			CLIENT_TEST(pClient, status, lscp_remove_channel(pClient, iSamplerChannel));
340	capela	103	}
341	capela	187	CLIENT_TEST(pClient, status, lscp_destroy_midi_device(pClient, iMidiDevice));
342	capela	103	}
343	capela	187	CLIENT_TEST(pClient, status, lscp_destroy_audio_device(pClient, iAudioDevice));
344	capela	103	}
345	capela	188	printf("\n");
346			printf(" Total: %d tests, %d failed.\n\n", g_test_count, g_test_fails);
347	capela	103	}
348
349			////////////////////////////////////////////////////////////////////////
350
351			void client_usage (void)
352			{
353			printf("\n %s %s (Build: %s)\n", lscp_client_package(), lscp_client_version(), lscp_client_build());
354
355	capela	188	fputs("\n Available commands: help, test[step], exit, quit, subscribe, unsubscribe", stdout);
356	capela	103	fputs("\n (all else are sent verbatim to server)\n\n", stdout);
357
358			}
359
360			void client_prompt (void)
361			{
362			fputs("lscp_client> ", stdout);
363			}
364
365			int main (int argc, char *argv[] )
366			{
367			lscp_client_t *pClient;
368			char *pszHost = "localhost";
369			char szLine[1024];
370			int cchLine;
371			lscp_status_t ret;
372
373			#if defined(WIN32)
374			if (WSAStartup(MAKEWORD(1, 1), &_wsaData) != 0) {
375			fprintf(stderr, "lscp_client: WSAStartup failed.\n");
376			return -1;
377			}
378			#endif
379
380			if (argc > 1)
381			pszHost = argv[1];
382
383			pClient = lscp_client_create(pszHost, SERVER_PORT, client_callback, NULL);
384			if (pClient == NULL)
385			return -1;
386
387			client_usage();
388			client_prompt();
389
390			while (fgets(szLine, sizeof(szLine) - 3, stdin)) {
391
392			cchLine = strlen(szLine);
393			while (cchLine > 0 && (szLine[cchLine - 1] == '\n' \|\| szLine[cchLine - 1] == '\r'))
394			cchLine--;
395			szLine[cchLine] = '\0';
396
397			if (strcmp(szLine, "exit") == 0 \|\| strcmp(szLine, "quit") == 0)
398			break;
399			else
400			if (strcmp(szLine, "subscribe") == 0)
401	capela	146	lscp_client_subscribe(pClient, LSCP_EVENT_MISCELLANEOUS);
402	capela	103	else
403			if (strcmp(szLine, "unsubscribe") == 0)
404	capela	146	lscp_client_unsubscribe(pClient, LSCP_EVENT_MISCELLANEOUS);
405	capela	103	else
406			if (strcmp(szLine, "test") == 0)
407			client_test(pClient);
408			else
409	capela	188	if (strcmp(szLine, "teststep") == 0 \|\| strcmp(szLine, "test step") == 0) {
410			g_test_step = 1;
411	capela	187	client_test(pClient);
412	capela	188	g_test_step = 0;
413	capela	187	}
414			else
415	capela	103	if (cchLine > 0 && strcmp(szLine, "help") != 0) {
416			szLine[cchLine++] = '\r';
417			szLine[cchLine++] = '\n';
418			szLine[cchLine] = '\0';
419			ret = lscp_client_query(pClient, szLine);
420			printf("%s\n(errno = %d)\n", lscp_client_get_result(pClient), lscp_client_get_errno(pClient));
421			if (ret == LSCP_QUIT)
422			break;
423			}
424			else client_usage();
425
426			client_prompt();
427			}
428
429			lscp_client_destroy(pClient);
430
431			#if defined(WIN32)
432			WSACleanup();
433			#endif
434
435			return 0;
436			}
437
438			// end of example_client.c