[libpicofe.git] / sndout_sdl.c

/*
 * (C) notaz, 2013
 *
 * This work is licensed under the terms of any of these licenses
 * (at your option):
 *  - GNU GPL, version 2 or later.
 *  - GNU LGPL, version 2.1 or later.
 *  - MAME license.
 * See the COPYING file in the top-level directory.
 */

#include <SDL.h>
#include "sndout_sdl.h"

// ~1/3s at 44kHz
// set this to power of 2
#define BUF_LEN 32768
#define BUF_MASK (BUF_LEN - 1)

static short buf[BUF_LEN];
static int buf_w, buf_r;
static int started;

static void callback(void *userdata, Uint8 *stream, int len)
{
	int have = (buf_w - buf_r) & BUF_MASK;
	int buf_left = BUF_LEN - buf_r;

	len /= 2;
	if (have > len)
		have = len;
	if (have > 0) {
		if (have > buf_left) {
			memcpy(stream, buf + buf_r, buf_left * 2);
			stream += buf_left * 2;
			buf_r = 0;
			have -= buf_left;
			len -= buf_left;
		}
		memcpy(stream, buf + buf_r, have * 2);
		stream += have * 2;
		buf_r = (buf_r + have) & BUF_MASK;
		len -= have;
	}

	if (len > 0) {
		// put in some silence..
		memset(stream, 0, len * 2);
	}
}

int sndout_sdl_init(void)
{
	int ret;

	ret = SDL_InitSubSystem(SDL_INIT_AUDIO);
	if (ret != 0)
		return -1;

	return 0;
}

int sndout_sdl_start(int rate, int stereo)
{
	SDL_AudioSpec desired;
	int samples, shift;
	int ret;

	if (started)
		sndout_sdl_stop();

	desired.freq = rate;
	desired.format = AUDIO_S16LSB;
	desired.channels = stereo ? 2 : 1;
	desired.callback = callback;
	desired.userdata = NULL;

	samples = rate * 4 * 16 / 1000;
	for (shift = 8; (1 << shift) < samples; shift++)
		;
	desired.samples = 1 << shift;

	ret = SDL_OpenAudio(&desired, NULL);
	if (ret != 0) {
		fprintf(stderr, "SDL_OpenAudio: %s\n", SDL_GetError());
		return -1;
	}

	buf_w = buf_r = 0;

	SDL_PauseAudio(0);
	started = 1;

	return 0;
}

void sndout_sdl_stop(void)
{
	SDL_PauseAudio(1);
	SDL_CloseAudio();
	started = 0;
}

void sndout_sdl_wait(void)
{
	int left;

	while (1)
	{
		left = (buf_r - buf_w - 2) & BUF_MASK;
		if (left >= BUF_LEN / 2)
			break;

		SDL_Delay(4);
	}
}

int sndout_sdl_write_nb(const void *samples, int len)
{
	int maxlen = (buf_r - buf_w - 2) & BUF_MASK;
	int buf_left = BUF_LEN - buf_w;
	int retval;

	len /= 2;
	if (len > maxlen)
		// not enough space
		len = maxlen;
	if (len == 0)
		// totally full
		return 0;

	retval = len;

	if (len > buf_left) {
		memcpy(buf + buf_w, samples, buf_left * 2);
		samples = (const short *)samples + buf_left;
		len -= buf_left;
		buf_w = 0;
	}
	memcpy(buf + buf_w, samples, len * 2);
	buf_w = (buf_w + len) & BUF_MASK;

	return retval;
}

void sndout_sdl_exit(void)
{
	if (started)
		sndout_sdl_stop();
	SDL_QuitSubSystem(SDL_INIT_AUDIO);
}
Commit	Line	Data
26d3ca0d GI	1	/*
	2	* (C) notaz, 2013
	3	*
	4	* This work is licensed under the terms of any of these licenses
	5	* (at your option):
	6	* - GNU GPL, version 2 or later.
	7	* - GNU LGPL, version 2.1 or later.
	8	* - MAME license.
	9	* See the COPYING file in the top-level directory.
	10	*/
	11
	12	#include <SDL.h>
	13	#include "sndout_sdl.h"
	14
	15	// ~1/3s at 44kHz
	16	// set this to power of 2
	17	#define BUF_LEN 32768
	18	#define BUF_MASK (BUF_LEN - 1)
	19
	20	static short buf[BUF_LEN];
	21	static int buf_w, buf_r;
	22	static int started;
	23
	24	static void callback(void userdata, Uint8 stream, int len)
	25	{
	26	int have = (buf_w - buf_r) & BUF_MASK;
	27	int buf_left = BUF_LEN - buf_r;
	28
	29	len /= 2;
	30	if (have > len)
	31	have = len;
	32	if (have > 0) {
	33	if (have > buf_left) {
	34	memcpy(stream, buf + buf_r, buf_left * 2);
	35	stream += buf_left * 2;
	36	buf_r = 0;
	37	have -= buf_left;
	38	len -= buf_left;
	39	}
	40	memcpy(stream, buf + buf_r, have * 2);
	41	stream += have * 2;
	42	buf_r = (buf_r + have) & BUF_MASK;
	43	len -= have;
	44	}
	45
	46	if (len > 0) {
	47	// put in some silence..
	48	memset(stream, 0, len * 2);
	49	}
	50	}
	51
	52	int sndout_sdl_init(void)
	53	{
	54	int ret;
	55
	56	ret = SDL_InitSubSystem(SDL_INIT_AUDIO);
	57	if (ret != 0)
	58	return -1;
	59
	60	return 0;
	61	}
	62
	63	int sndout_sdl_start(int rate, int stereo)
	64	{
65	SDL_AudioSpec desired;
66	int samples, shift;
67	int ret;
68
69	if (started)
70	sndout_sdl_stop();
71
72	desired.freq = rate;
73	desired.format = AUDIO_S16LSB;
74	desired.channels = stereo ? 2 : 1;
75	desired.callback = callback;
76	desired.userdata = NULL;
77
78	samples = rate * 4 * 16 / 1000;
79	for (shift = 8; (1 << shift) < samples; shift++)
80	;
81	desired.samples = 1 << shift;
82
83	ret = SDL_OpenAudio(&desired, NULL);
84	if (ret != 0) {
85	fprintf(stderr, "SDL_OpenAudio: %s\n", SDL_GetError());
86	return -1;
87	}
88
89	buf_w = buf_r = 0;
90
91	SDL_PauseAudio(0);
92	started = 1;
93
94	return 0;
95	}
96
97	void sndout_sdl_stop(void)
98	{
99	SDL_PauseAudio(1);
100	SDL_CloseAudio();
101	started = 0;
102	}
103
104	void sndout_sdl_wait(void)
105	{
106	int left;
107
108	while (1)
109	{
110	left = (buf_r - buf_w - 2) & BUF_MASK;
111	if (left >= BUF_LEN / 2)
112	break;
113
114	SDL_Delay(4);
115	}
116	}
117
118	int sndout_sdl_write_nb(const void *samples, int len)
119	{
120	int maxlen = (buf_r - buf_w - 2) & BUF_MASK;
121	int buf_left = BUF_LEN - buf_w;
122	int retval;
123
124	len /= 2;
125	if (len > maxlen)
126	// not enough space
127	len = maxlen;
128	if (len == 0)
129	// totally full
130	return 0;
131
132	retval = len;
133
134	if (len > buf_left) {
135	memcpy(buf + buf_w, samples, buf_left * 2);
136	samples = (const short *)samples + buf_left;
137	len -= buf_left;
138	buf_w = 0;
139	}
140	memcpy(buf + buf_w, samples, len * 2);
141	buf_w = (buf_w + len) & BUF_MASK;
142
143	return retval;
144	}
145
146	void sndout_sdl_exit(void)
147	{
148	if (started)
149	sndout_sdl_stop();
150	SDL_QuitSubSystem(SDL_INIT_AUDIO);
151	}