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, const char *pchBuffer, int cchBuffer, void *pvData )
{
    lscp_status_t ret = LSCP_OK;

    char *pszBuffer = (char *) malloc(cchBuffer + 1);
    if (pszBuffer) {
        memcpy(pszBuffer, pchBuffer, cchBuffer);
        pszBuffer[cchBuffer] = (char) 0;
        printf("client_callback: [%s]\n", pszBuffer);
        free(pszBuffer);
    }
    else ret = LSCP_FAILED;

    return ret;
}

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

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; }

#define CLIENT_TEST(p, x) { clock_t c; void *v;\
    printf(#x ":\n"); client_test_start(&c); v = (void *) (x); \
    printf("  elapsed=%gs\n", client_test_elapsed(&c)); \
    printf("  ret=%p (%d)\n", v, (int) v); \
    printf("  errno=%d\n", lscp_client_get_errno(p)); \
    printf("  result=\"%s\"\n", lscp_client_get_result(p)); }

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

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

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

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

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

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

    for (iAudioDriver = 0; ppszAudioDrivers[iAudioDriver]; iAudioDriver++) {
     pszAudioDriver = ppszAudioDrivers[iAudioDriver];
     printf("\n--- pszAudioDriver=\"%s\" ---\n", pszAudioDriver);
     CLIENT_TEST(pClient, lscp_get_audio_driver_info(pClient, pszAudioDriver));
     for (iMidiDriver = 0; ppszMidiDrivers[iMidiDriver]; iMidiDriver++) {
      pszMidiDriver = ppszMidiDrivers[iMidiDriver];
      printf("\n--- pszMidiDriver=\"%s\" ---\n", pszMidiDriver);
      CLIENT_TEST(pClient, lscp_get_midi_driver_info(pClient, pszMidiDriver));
      for (iEngine = 0; ppszEngines[iEngine]; iEngine++) {
        pszEngine = ppszEngines[iEngine];
        printf("\n--- pszEngine=\"%s\" ---\n", pszEngine);
        CLIENT_TEST(pClient, lscp_get_engine_info(pClient, pszEngine));
        CLIENT_TEST(pClient, lscp_get_channels(pClient));
        CLIENT_TEST(pClient, lscp_list_channels(pClient));
        CLIENT_TEST(pClient, iSamplerChannel = lscp_add_channel(pClient));
        printf(">>> iSamplerChannel=\"%d\"\n", iSamplerChannel);
        CLIENT_TEST(pClient, lscp_get_channel_info(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_load_engine(pClient, pszEngine, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_load_instrument(pClient, "DefaultInstrument.gig", 0, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_get_channel_voice_count(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_get_channel_stream_count(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_BYTES, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_PERCENTAGE, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_set_channel_audio_type(pClient, iSamplerChannel, pszAudioDriver));
        CLIENT_TEST(pClient, lscp_set_channel_audio_channel(pClient, iSamplerChannel, 0, 1));
        CLIENT_TEST(pClient, lscp_set_channel_midi_type(pClient, iSamplerChannel, pszMidiDriver));
        CLIENT_TEST(pClient, lscp_set_channel_midi_channel(pClient, iSamplerChannel, 0));
        CLIENT_TEST(pClient, lscp_set_channel_midi_port(pClient, iSamplerChannel, 0));
        CLIENT_TEST(pClient, lscp_set_channel_volume(pClient, iSamplerChannel, 0.5));
        CLIENT_TEST(pClient, lscp_get_channel_info(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_reset_channel(pClient, iSamplerChannel));
        CLIENT_TEST(pClient, lscp_remove_channel(pClient, iSamplerChannel));
        printf("\n");
      }
     }
    }

}

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

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

    fputs("\n  Available client commands: help, test, 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);
        else
        if (strcmp(szLine, "unsubscribe") == 0)
            lscp_client_unsubscribe(pClient);
        else
        if (strcmp(szLine, "test") == 0)
            client_test(pClient);
        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			lscp_status_t client_callback ( lscp_client_t pClient, const char pchBuffer, int cchBuffer, void *pvData )
36			{
37			lscp_status_t ret = LSCP_OK;
38
39			char pszBuffer = (char ) malloc(cchBuffer + 1);
40			if (pszBuffer) {
41			memcpy(pszBuffer, pchBuffer, cchBuffer);
42			pszBuffer[cchBuffer] = (char) 0;
43			printf("client_callback: [%s]\n", pszBuffer);
44			free(pszBuffer);
45			}
46			else ret = LSCP_FAILED;
47
48			return ret;
49			}
50
51			////////////////////////////////////////////////////////////////////////
52
53			void client_test_start ( clock_t pclk ) { pclk = clock(); }
54			float client_test_elapsed ( clock_t pclk ) { return (float) ((long) clock() - pclk) / (float) CLOCKS_PER_SEC; }
55
56			#define CLIENT_TEST(p, x) { clock_t c; void *v;\
57			printf(#x ":\n"); client_test_start(&c); v = (void *) (x); \
58			printf(" elapsed=%gs\n", client_test_elapsed(&c)); \
59			printf(" ret=%p (%d)\n", v, (int) v); \
60			printf(" errno=%d\n", lscp_client_get_errno(p)); \
61			printf(" result=\"%s\"\n", lscp_client_get_result(p)); }
62
63			void client_test ( lscp_client_t *pClient )
64			{
65			const char ppszAudioDrivers, ppszMidiDrivers, **ppszEngines;
66			const char pszAudioDriver, pszMidiDriver, *pszEngine;
67			int iAudioDriver, iMidiDriver, iEngine;
68			int iSamplerChannel;
69
70			CLIENT_TEST(pClient, ppszAudioDrivers = lscp_get_available_audio_drivers(pClient));
71			if (ppszAudioDrivers == NULL) {
72			fprintf(stderr, "client_test: No audio drivers available.\n");
73			return;
74			}
75
76			CLIENT_TEST(pClient, ppszMidiDrivers = lscp_get_available_midi_drivers(pClient));
77			if (ppszMidiDrivers == NULL) {
78			fprintf(stderr, "client_test: No MIDI drivers available.\n");
79			return;
80			}
81
82			CLIENT_TEST(pClient, ppszEngines = lscp_get_available_engines(pClient));
83			if (ppszEngines == NULL) {
84			fprintf(stderr, "client_test: No engines available.\n");
85			return;
86			}
87
88	capela	125	CLIENT_TEST(pClient, lscp_get_audio_devices(pClient));
89			CLIENT_TEST(pClient, lscp_list_audio_devices(pClient));
90
91			CLIENT_TEST(pClient, lscp_get_midi_devices(pClient));
92			CLIENT_TEST(pClient, lscp_list_midi_devices(pClient));
93
94	capela	103	for (iAudioDriver = 0; ppszAudioDrivers[iAudioDriver]; iAudioDriver++) {
95			pszAudioDriver = ppszAudioDrivers[iAudioDriver];
96			printf("\n--- pszAudioDriver=\"%s\" ---\n", pszAudioDriver);
97			CLIENT_TEST(pClient, lscp_get_audio_driver_info(pClient, pszAudioDriver));
98			for (iMidiDriver = 0; ppszMidiDrivers[iMidiDriver]; iMidiDriver++) {
99			pszMidiDriver = ppszMidiDrivers[iMidiDriver];
100			printf("\n--- pszMidiDriver=\"%s\" ---\n", pszMidiDriver);
101			CLIENT_TEST(pClient, lscp_get_midi_driver_info(pClient, pszMidiDriver));
102			for (iEngine = 0; ppszEngines[iEngine]; iEngine++) {
103			pszEngine = ppszEngines[iEngine];
104			printf("\n--- pszEngine=\"%s\" ---\n", pszEngine);
105			CLIENT_TEST(pClient, lscp_get_engine_info(pClient, pszEngine));
106			CLIENT_TEST(pClient, lscp_get_channels(pClient));
107	capela	125	CLIENT_TEST(pClient, lscp_list_channels(pClient));
108	capela	103	CLIENT_TEST(pClient, iSamplerChannel = lscp_add_channel(pClient));
109			printf(">>> iSamplerChannel=\"%d\"\n", iSamplerChannel);
110			CLIENT_TEST(pClient, lscp_get_channel_info(pClient, iSamplerChannel));
111			CLIENT_TEST(pClient, lscp_load_engine(pClient, pszEngine, iSamplerChannel));
112			CLIENT_TEST(pClient, lscp_load_instrument(pClient, "DefaultInstrument.gig", 0, iSamplerChannel));
113			CLIENT_TEST(pClient, lscp_get_channel_voice_count(pClient, iSamplerChannel));
114			CLIENT_TEST(pClient, lscp_get_channel_stream_count(pClient, iSamplerChannel));
115			CLIENT_TEST(pClient, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_BYTES, iSamplerChannel));
116			CLIENT_TEST(pClient, lscp_get_channel_buffer_fill(pClient, LSCP_USAGE_PERCENTAGE, iSamplerChannel));
117			CLIENT_TEST(pClient, lscp_set_channel_audio_type(pClient, iSamplerChannel, pszAudioDriver));
118			CLIENT_TEST(pClient, lscp_set_channel_audio_channel(pClient, iSamplerChannel, 0, 1));
119			CLIENT_TEST(pClient, lscp_set_channel_midi_type(pClient, iSamplerChannel, pszMidiDriver));
120			CLIENT_TEST(pClient, lscp_set_channel_midi_channel(pClient, iSamplerChannel, 0));
121			CLIENT_TEST(pClient, lscp_set_channel_midi_port(pClient, iSamplerChannel, 0));
122			CLIENT_TEST(pClient, lscp_set_channel_volume(pClient, iSamplerChannel, 0.5));
123			CLIENT_TEST(pClient, lscp_get_channel_info(pClient, iSamplerChannel));
124			CLIENT_TEST(pClient, lscp_reset_channel(pClient, iSamplerChannel));
125			CLIENT_TEST(pClient, lscp_remove_channel(pClient, iSamplerChannel));
126			printf("\n");
127			}
128			}
129			}
130
131			}
132
133			////////////////////////////////////////////////////////////////////////
134
135			void client_usage (void)
136			{
137			printf("\n %s %s (Build: %s)\n", lscp_client_package(), lscp_client_version(), lscp_client_build());
138
139			fputs("\n Available client commands: help, test, exit, quit, subscribe, unsubscribe", stdout);
140			fputs("\n (all else are sent verbatim to server)\n\n", stdout);
141
142			}
143
144			void client_prompt (void)
145			{
146			fputs("lscp_client> ", stdout);
147			}
148
149			int main (int argc, char *argv[] )
150			{
151			lscp_client_t *pClient;
152			char *pszHost = "localhost";
153			char szLine[1024];
154			int cchLine;
155			lscp_status_t ret;
156
157			#if defined(WIN32)
158			if (WSAStartup(MAKEWORD(1, 1), &_wsaData) != 0) {
159			fprintf(stderr, "lscp_client: WSAStartup failed.\n");
160			return -1;
161			}
162			#endif
163
164			if (argc > 1)
165			pszHost = argv[1];
166
167			pClient = lscp_client_create(pszHost, SERVER_PORT, client_callback, NULL);
168			if (pClient == NULL)
169			return -1;
170
171			client_usage();
172			client_prompt();
173
174			while (fgets(szLine, sizeof(szLine) - 3, stdin)) {
175
176			cchLine = strlen(szLine);
177			while (cchLine > 0 && (szLine[cchLine - 1] == '\n' \|\| szLine[cchLine - 1] == '\r'))
178			cchLine--;
179			szLine[cchLine] = '\0';
180
181			if (strcmp(szLine, "exit") == 0 \|\| strcmp(szLine, "quit") == 0)
182			break;
183			else
184			if (strcmp(szLine, "subscribe") == 0)
185			lscp_client_subscribe(pClient);
186			else
187			if (strcmp(szLine, "unsubscribe") == 0)
188			lscp_client_unsubscribe(pClient);
189			else
190			if (strcmp(szLine, "test") == 0)
191			client_test(pClient);
192			else
193			if (cchLine > 0 && strcmp(szLine, "help") != 0) {
194			szLine[cchLine++] = '\r';
195			szLine[cchLine++] = '\n';
196			szLine[cchLine] = '\0';
197			ret = lscp_client_query(pClient, szLine);
198			printf("%s\n(errno = %d)\n", lscp_client_get_result(pClient), lscp_client_get_errno(pClient));
199			if (ret == LSCP_QUIT)
200			break;
201			}
202			else client_usage();
203
204			client_prompt();
205			}
206
207			lscp_client_destroy(pClient);
208
209			#if defined(WIN32)
210			WSACleanup();
211			#endif
212
213			return 0;
214			}
215
216			// end of example_client.c