trunk/rdesktop/rdpsnd_libao.c

/* -*- c-basic-offset: 8 -*-
   rdesktop: A Remote Desktop Protocol client.
   Sound Channel Process Functions - libao-driver
   Copyright (C) Matthew Chapman 2003
   Copyright (C) GuoJunBo guojunbo@ict.ac.cn 2003
   Copyright (C) Michael Gernoth mike@zerfleddert.de 2005-2006

   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., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include "rdesktop.h"
#include "rdpsnd.h"
#include "rdpsnd_dsp.h"
#include <unistd.h>
#include <fcntl.h>
#include <errno.h>
#include <ao/ao.h>
#include <sys/time.h>

#define WAVEOUTBUF      16

static ao_device *o_device = NULL;
static int default_driver;
static BOOL reopened;
static char *libao_device = NULL;

BOOL
libao_open(void)
{
        ao_sample_format format;

        ao_initialize();

        if (libao_device)
        {
                default_driver = ao_driver_id(libao_device);
        }
        else
        {
                default_driver = ao_default_driver_id();
        }

        format.bits = 16;
        format.channels = 2;
        format.rate = 44100;
        format.byte_format = AO_FMT_LITTLE;

        o_device = ao_open_live(default_driver, &format, NULL);
        if (o_device == NULL)
        {
                return False;
        }

        g_dsp_fd = 0;
        rdpsnd_queue_init();

        reopened = True;

        return True;
}

void
libao_close(void)
{
        /* Ack all remaining packets */
        while (!rdpsnd_queue_empty())
        {
                rdpsnd_send_completion(rdpsnd_queue_current_packet()->tick,
                                       rdpsnd_queue_current_packet()->index);
                rdpsnd_queue_next();
        }

        if (o_device != NULL)
                ao_close(o_device);

        ao_shutdown();
}

BOOL
libao_set_format(WAVEFORMATEX * pwfx)
{
        ao_sample_format format;

        format.bits = pwfx->wBitsPerSample;
        format.channels = pwfx->nChannels;
        format.rate = 44100;
        format.byte_format = AO_FMT_LITTLE;

        if (o_device != NULL)
                ao_close(o_device);

        o_device = ao_open_live(default_driver, &format, NULL);
        if (o_device == NULL)
        {
                return False;
        }

        if (rdpsnd_dsp_resample_set(44100, pwfx->wBitsPerSample, pwfx->nChannels) == False)
        {
                return False;
        }

        reopened = True;

        return True;
}

void
libao_play(void)
{
        struct audio_packet *packet;
        STREAM out;
        int len;
        static long prev_s, prev_us;
        unsigned int duration;
        struct timeval tv;
        int next_tick;

        if (reopened)
        {
                reopened = False;
                gettimeofday(&tv, NULL);
                prev_s = tv.tv_sec;
                prev_us = tv.tv_usec;
        }

        if (rdpsnd_queue_empty())
        {
                g_dsp_busy = 0;
                return;
        }

        packet = rdpsnd_queue_current_packet();
        out = &packet->s;

        next_tick = rdpsnd_queue_next_tick();

        len = (WAVEOUTBUF > (out->end - out->p)) ? (out->end - out->p) : WAVEOUTBUF;
        ao_play(o_device, (char *) out->p, len);
        out->p += len;

        gettimeofday(&tv, NULL);

        duration = ((tv.tv_sec - prev_s) * 1000000 + (tv.tv_usec - prev_us)) / 1000;

        if (packet->tick > next_tick)
                next_tick += 65536;

        if ((out->p == out->end) || duration > next_tick - packet->tick + 500)
        {
                prev_s = tv.tv_sec;
                prev_us = tv.tv_usec;

                if (abs((next_tick - packet->tick) - duration) > 20)
                {
                        DEBUG(("duration: %d, calc: %d, ", duration, next_tick - packet->tick));
                        DEBUG(("last: %d, is: %d, should: %d\n", packet->tick,
                               (packet->tick + duration) % 65536, next_tick % 65536));
                }

                rdpsnd_send_completion(((packet->tick + duration) % 65536), packet->index);
                rdpsnd_queue_next();
        }

        g_dsp_busy = 1;
        return;
}

struct audio_driver *
libao_register(char *options)
{
        static struct audio_driver libao_driver;
        struct ao_info *libao_info;
        static char description[101];

        libao_driver.wave_out_write = rdpsnd_queue_write;
        libao_driver.wave_out_open = libao_open;
        libao_driver.wave_out_close = libao_close;
        libao_driver.wave_out_format_supported = rdpsnd_dsp_resample_supported;
        libao_driver.wave_out_set_format = libao_set_format;
        libao_driver.wave_out_volume = rdpsnd_dsp_softvol_set;
        libao_driver.wave_out_play = libao_play;
        libao_driver.name = xstrdup("libao");
        libao_driver.description = description;
        libao_driver.need_byteswap_on_be = 0;
        libao_driver.need_resampling = 1;
        libao_driver.next = NULL;

        ao_initialize();

        libao_info = ao_driver_info(ao_default_driver_id());

        if (libao_info)
        {
                snprintf(description, 100, "libao output driver, default device: %s",
                         libao_info->short_name);
        }
        else
        {
                snprintf(description, 100, "libao output driver, default device: none");
        }

        ao_shutdown();

        if (options)
        {
                libao_device = xstrdup(options);
        }

        return &libao_driver;
}
1	/* -- c-basic-offset: 8 --
2	rdesktop: A Remote Desktop Protocol client.
3	Sound Channel Process Functions - libao-driver
4	Copyright (C) Matthew Chapman 2003
5	Copyright (C) GuoJunBo guojunbo@ict.ac.cn 2003
6	Copyright (C) Michael Gernoth mike@zerfleddert.de 2005-2006
7
8	This program is free software; you can redistribute it and/or modify
9	it under the terms of the GNU General Public License as published by
10	the Free Software Foundation; either version 2 of the License, or
11	(at your option) any later version.
12
13	This program is distributed in the hope that it will be useful,
14	but WITHOUT ANY WARRANTY; without even the implied warranty of
15	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16	GNU General Public License for more details.
17
18	You should have received a copy of the GNU General Public License
19	along with this program; if not, write to the Free Software
20	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21	*/
22
23	#include "rdesktop.h"
24	#include "rdpsnd.h"
25	#include "rdpsnd_dsp.h"
26	#include <unistd.h>
27	#include <fcntl.h>
28	#include <errno.h>
29	#include <ao/ao.h>
30	#include <sys/time.h>
31
32	#define WAVEOUTBUF 16
33
34	static ao_device *o_device = NULL;
35	static int default_driver;
36	static BOOL reopened;
37	static char *libao_device = NULL;
38
39	BOOL
40	libao_open(void)
41	{
42	ao_sample_format format;
43
44	ao_initialize();
45
46	if (libao_device)
47	{
48	default_driver = ao_driver_id(libao_device);
49	}
50	else
51	{
52	default_driver = ao_default_driver_id();
53	}
54
55	format.bits = 16;
56	format.channels = 2;
57	format.rate = 44100;
58	format.byte_format = AO_FMT_LITTLE;
59
60	o_device = ao_open_live(default_driver, &format, NULL);
61	if (o_device == NULL)
62	{
63	return False;
64	}
65
66	g_dsp_fd = 0;
67	rdpsnd_queue_init();
68
69	reopened = True;
70
71	return True;
72	}
73
74	void
75	libao_close(void)
76	{
77	/* Ack all remaining packets */
78	while (!rdpsnd_queue_empty())
79	{
80	rdpsnd_send_completion(rdpsnd_queue_current_packet()->tick,
81	rdpsnd_queue_current_packet()->index);
82	rdpsnd_queue_next();
83	}
84
85	if (o_device != NULL)
86	ao_close(o_device);
87
88	ao_shutdown();
89	}
90
91	BOOL
92	libao_set_format(WAVEFORMATEX * pwfx)
93	{
94	ao_sample_format format;
95
96	format.bits = pwfx->wBitsPerSample;
97	format.channels = pwfx->nChannels;
98	format.rate = 44100;
99	format.byte_format = AO_FMT_LITTLE;
100
101	if (o_device != NULL)
102	ao_close(o_device);
103
104	o_device = ao_open_live(default_driver, &format, NULL);
105	if (o_device == NULL)
106	{
107	return False;
108	}
109
110	if (rdpsnd_dsp_resample_set(44100, pwfx->wBitsPerSample, pwfx->nChannels) == False)
111	{
112	return False;
113	}
114
115	reopened = True;
116
117	return True;
118	}
119
120	void
121	libao_play(void)
122	{
123	struct audio_packet *packet;
124	STREAM out;
125	int len;
126	static long prev_s, prev_us;
127	unsigned int duration;
128	struct timeval tv;
129	int next_tick;
130
131	if (reopened)
132	{
133	reopened = False;
134	gettimeofday(&tv, NULL);
135	prev_s = tv.tv_sec;
136	prev_us = tv.tv_usec;
137	}
138
139	if (rdpsnd_queue_empty())
140	{
141	g_dsp_busy = 0;
142	return;
143	}
144
145	packet = rdpsnd_queue_current_packet();
146	out = &packet->s;
147
148	next_tick = rdpsnd_queue_next_tick();
149
150	len = (WAVEOUTBUF > (out->end - out->p)) ? (out->end - out->p) : WAVEOUTBUF;
151	ao_play(o_device, (char *) out->p, len);
152	out->p += len;
153
154	gettimeofday(&tv, NULL);
155
156	duration = ((tv.tv_sec - prev_s) * 1000000 + (tv.tv_usec - prev_us)) / 1000;
157
158	if (packet->tick > next_tick)
159	next_tick += 65536;
160
161	if ((out->p == out->end) \|\| duration > next_tick - packet->tick + 500)
162	{
163	prev_s = tv.tv_sec;
164	prev_us = tv.tv_usec;
165
166	if (abs((next_tick - packet->tick) - duration) > 20)
167	{
168	DEBUG(("duration: %d, calc: %d, ", duration, next_tick - packet->tick));
169	DEBUG(("last: %d, is: %d, should: %d\n", packet->tick,
170	(packet->tick + duration) % 65536, next_tick % 65536));
171	}
172
173	rdpsnd_send_completion(((packet->tick + duration) % 65536), packet->index);
174	rdpsnd_queue_next();
175	}
176
177	g_dsp_busy = 1;
178	return;
179	}
180
181	struct audio_driver *
182	libao_register(char *options)
183	{
184	static struct audio_driver libao_driver;
185	struct ao_info *libao_info;
186	static char description[101];
187
188	libao_driver.wave_out_write = rdpsnd_queue_write;
189	libao_driver.wave_out_open = libao_open;
190	libao_driver.wave_out_close = libao_close;
191	libao_driver.wave_out_format_supported = rdpsnd_dsp_resample_supported;
192	libao_driver.wave_out_set_format = libao_set_format;
193	libao_driver.wave_out_volume = rdpsnd_dsp_softvol_set;
194	libao_driver.wave_out_play = libao_play;
195	libao_driver.name = xstrdup("libao");
196	libao_driver.description = description;
197	libao_driver.need_byteswap_on_be = 0;
198	libao_driver.need_resampling = 1;
199	libao_driver.next = NULL;
200
201	ao_initialize();
202
203	libao_info = ao_driver_info(ao_default_driver_id());
204
205	if (libao_info)
206	{
207	snprintf(description, 100, "libao output driver, default device: %s",
208	libao_info->short_name);
209	}
210	else
211	{
212	snprintf(description, 100, "libao output driver, default device: none");
213	}
214
215	ao_shutdown();
216
217	if (options)
218	{
219	libao_device = xstrdup(options);
220	}
221
222	return &libao_driver;
223	}