rdesktop/trunk/rdpsnd_libao.c

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

   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 WAVEOUTLEN      16

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

void libao_play(void);

void
libao_add_fds(int *n, fd_set * rfds, fd_set * wfds, struct timeval *tv)
{
        /* We need to be called rather often... */
        if (o_device != NULL && !rdpsnd_queue_empty())
                FD_SET(0, wfds);
}

void
libao_check_fds(fd_set * rfds, fd_set * wfds)
{
        if (o_device == NULL)
                return;

        if (!rdpsnd_queue_empty())
                libao_play();
}

RD_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_NATIVE;


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

        reopened = True;

        return True;
}

void
libao_close(void)
{
        /* Ack all remaining packets */
        while (!rdpsnd_queue_empty())
        {
                rdpsnd_queue_next(0);
        }

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

        o_device = NULL;

        ao_shutdown();
}

RD_BOOL
libao_set_format(RD_WAVEFORMATEX * pwfx)
{
        ao_sample_format format;

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

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

        /* We shouldn't be called if the queue is empty, but still */
        if (rdpsnd_queue_empty())
                return;

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

        next_tick = rdpsnd_queue_next_tick();

        len = (WAVEOUTLEN > (out->end - out->p)) ? (out->end - out->p) : WAVEOUTLEN;
        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)
        {
                unsigned int delay_us;

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

                delay_us = ((out->size / 4) * (1000000 / 44100));

                rdpsnd_queue_next(delay_us);
        }
}

struct audio_driver *
libao_register(char *options)
{
        static struct audio_driver libao_driver;

        memset(&libao_driver, 0, sizeof(libao_driver));

        libao_driver.name = "libao";
        libao_driver.description = "libao output driver, default device: system dependent";

        libao_driver.add_fds = libao_add_fds;
        libao_driver.check_fds = libao_check_fds;

        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.need_byteswap_on_be = 1;
        libao_driver.need_resampling = 1;

        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-2008
5	Copyright (C) GuoJunBo guojunbo@ict.ac.cn 2003
6	Copyright (C) Michael Gernoth mike@zerfleddert.de 2005-2008
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 WAVEOUTLEN 16
33
34	static ao_device *o_device = NULL;
35	static int default_driver;
36	static RD_BOOL reopened;
37	static char *libao_device = NULL;
38
39	void libao_play(void);
40
41	void
42	libao_add_fds(int n, fd_set rfds, fd_set * wfds, struct timeval *tv)
43	{
44	/* We need to be called rather often... */
45	if (o_device != NULL && !rdpsnd_queue_empty())
46	FD_SET(0, wfds);
47	}
48
49	void
50	libao_check_fds(fd_set * rfds, fd_set * wfds)
51	{
52	if (o_device == NULL)
53	return;
54
55	if (!rdpsnd_queue_empty())
56	libao_play();
57	}
58
59	RD_BOOL
60	libao_open(void)
61	{
62	ao_sample_format format;
63
64	ao_initialize();
65
66	if (libao_device)
67	{
68	default_driver = ao_driver_id(libao_device);
69	}
70	else
71	{
72	default_driver = ao_default_driver_id();
73	}
74
75	format.bits = 16;
76	format.channels = 2;
77	format.rate = 44100;
78	format.byte_format = AO_FMT_NATIVE;
79
80
81	o_device = ao_open_live(default_driver, &format, NULL);
82	if (o_device == NULL)
83	{
84	return False;
85	}
86
87	reopened = True;
88
89	return True;
90	}
91
92	void
93	libao_close(void)
94	{
95	/* Ack all remaining packets */
96	while (!rdpsnd_queue_empty())
97	{
98	rdpsnd_queue_next(0);
99	}
100
101	if (o_device != NULL)
102	ao_close(o_device);
103
104	o_device = NULL;
105
106	ao_shutdown();
107	}
108
109	RD_BOOL
110	libao_set_format(RD_WAVEFORMATEX * pwfx)
111	{
112	ao_sample_format format;
113
114	format.bits = pwfx->wBitsPerSample;
115	format.channels = pwfx->nChannels;
116	format.rate = 44100;
117	format.byte_format = AO_FMT_NATIVE;
118
119	if (o_device != NULL)
120	ao_close(o_device);
121
122	o_device = ao_open_live(default_driver, &format, NULL);
123	if (o_device == NULL)
124	{
125	return False;
126	}
127
128	if (rdpsnd_dsp_resample_set(44100, pwfx->wBitsPerSample, pwfx->nChannels) == False)
129	{
130	return False;
131	}
132
133	reopened = True;
134
135	return True;
136	}
137
138	void
139	libao_play(void)
140	{
141	struct audio_packet *packet;
142	STREAM out;
143	int len;
144	static long prev_s, prev_us;
145	unsigned int duration;
146	struct timeval tv;
147	int next_tick;
148
149	if (reopened)
150	{
151	reopened = False;
152	gettimeofday(&tv, NULL);
153	prev_s = tv.tv_sec;
154	prev_us = tv.tv_usec;
155	}
156
157	/* We shouldn't be called if the queue is empty, but still */
158	if (rdpsnd_queue_empty())
159	return;
160
161	packet = rdpsnd_queue_current_packet();
162	out = &packet->s;
163
164	next_tick = rdpsnd_queue_next_tick();
165
166	len = (WAVEOUTLEN > (out->end - out->p)) ? (out->end - out->p) : WAVEOUTLEN;
167	ao_play(o_device, (char *) out->p, len);
168	out->p += len;
169
170	gettimeofday(&tv, NULL);
171
172	duration = ((tv.tv_sec - prev_s) * 1000000 + (tv.tv_usec - prev_us)) / 1000;
173
174	if (packet->tick > next_tick)
175	next_tick += 65536;
176
177	if ((out->p == out->end) \|\| duration > next_tick - packet->tick + 500)
178	{
179	unsigned int delay_us;
180
181	prev_s = tv.tv_sec;
182	prev_us = tv.tv_usec;
183
184	if (abs((next_tick - packet->tick) - duration) > 20)
185	{
186	DEBUG(("duration: %d, calc: %d, ", duration, next_tick - packet->tick));
187	DEBUG(("last: %d, is: %d, should: %d\n", packet->tick,
188	(packet->tick + duration) % 65536, next_tick % 65536));
189	}
190
191	delay_us = ((out->size / 4) * (1000000 / 44100));
192
193	rdpsnd_queue_next(delay_us);
194	}
195	}
196
197	struct audio_driver *
198	libao_register(char *options)
199	{
200	static struct audio_driver libao_driver;
201
202	memset(&libao_driver, 0, sizeof(libao_driver));
203
204	libao_driver.name = "libao";
205	libao_driver.description = "libao output driver, default device: system dependent";
206
207	libao_driver.add_fds = libao_add_fds;
208	libao_driver.check_fds = libao_check_fds;
209
210	libao_driver.wave_out_open = libao_open;
211	libao_driver.wave_out_close = libao_close;
212	libao_driver.wave_out_format_supported = rdpsnd_dsp_resample_supported;
213	libao_driver.wave_out_set_format = libao_set_format;
214	libao_driver.wave_out_volume = rdpsnd_dsp_softvol_set;
215
216	libao_driver.need_byteswap_on_be = 1;
217	libao_driver.need_resampling = 1;
218
219	if (options)
220	{
221	libao_device = xstrdup(options);
222	}
223
224	return &libao_driver;
225	}