diff src/sound.c @ 4429:bf770f11132b

[gaim-migrate @ 4704] (15:41:59) Robot101: the hunk that got left out in the cold. its a good thing when things compile committer: Tailor Script <[e-mail]>

--- a/src/sound.c	Sun Jan 26 19:39:43 2003 +0000
+++ b/src/sound.c	Sun Jan 26 20:41:49 2003 +0000
@@ -40,17 +40,10 @@
 #include <sys/types.h>
 #include <sys/stat.h>
 
-#ifdef ESD_SOUND
-#include <esd.h>
-#endif
-
-#ifdef ARTSC_SOUND
-#include <artsc.h>
-#endif
-
-#ifdef NAS_SOUND
-#include <audio/audiolib.h>
-#endif
+#ifdef USE_AO
+#include <ao/ao.h>
+#include <audiofile.h>
+#endif /* USE_AO */
 
 #include "gaim.h"
 
@@ -58,6 +51,10 @@
 #include "win32dep.h"
 #endif
 
+#ifdef USE_AO
+static gboolean ao_initialized = FALSE;
+#endif /* USE_AO */
+
 gboolean mute_sounds = 0;
 
 /* description, option bit, default sound file             *
@@ -79,370 +76,109 @@
 	{N_("Someone says your name in chat"), OPT_SOUND_CHAT_NICK, "redalert.wav"}
 };
 
-#ifndef _WIN32
-static int check_dev(char *dev)
-{
-	struct stat stat_buf;
-	uid_t user = getuid();
-	gid_t group = getgid(), other_groups[32];
-	int i, numgroups;
-
-	if ((numgroups = getgroups(32, other_groups)) == -1)
-		return 0;
-	if (stat(dev, &stat_buf))
-		return 0;
-	if (user == stat_buf.st_uid && stat_buf.st_mode & S_IWUSR)
-		return 1;
-	if (stat_buf.st_mode & S_IWGRP) {
-		if (group == stat_buf.st_gid)
-			return 1;
-		for (i = 0; i < numgroups; i++)
-			if (other_groups[i] == stat_buf.st_gid)
-				return 1;
-	}
-	if (stat_buf.st_mode & S_IWOTH)
-		return 1;
-	return 0;
-}
-
-static void play_audio_file(char *file)
-{
-	/* here we can assume that we can write to /dev/audio */
-	char *buf;
-	struct stat info;
-	int fd = open(file, O_RDONLY);
-	if (fd <= 0) {
-		return;
-	}
-	fstat(fd, &info);
-	if (info.st_size < 24)
-		return;
-	buf = malloc(info.st_size + 1);
-	read(fd, buf, 24);
-	read(fd, buf, info.st_size - 24);
-	close(fd);
-
-	fd = open("/dev/audio", O_WRONLY | O_EXCL | O_NDELAY);
-	if (fd < 0) {
-		free(buf);
-		return;
-	}
-	write(fd, buf, info.st_size - 24);
-	free(buf);
-	close(fd);
-}
-
-static int can_play_audio()
-{
-	return check_dev("/dev/audio");
-}
-
-#ifdef ESD_SOUND
-
-int esd_fd;
-
-static int can_play_esd()
-{
-	esd_format_t format = ESD_BITS16 | ESD_STREAM | ESD_PLAY | ESD_MONO;
-
-	esd_fd = esd_play_stream(format, 8012, NULL, "gaim");
-
-	if (esd_fd < 0) {
-		return 0;
-	}
-
-	return 1;
-}
-
-#endif /* ESD_SOUND */
-
-#ifdef ARTSC_SOUND
-
-/*
-** This routine converts from ulaw to 16 bit linear.
-**
-** Craig Reese: IDA/Supercomputing Research Center
-** 29 September 1989
-**
-** References:
-** 1) CCITT Recommendation G.711  (very difficult to follow)
-** 2) MIL-STD-188-113,"Interoperability and Performance Standards
-**     for Analog-to_Digital Conversion Techniques,"
-**     17 February 1987
-**
-** Input: 8 bit ulaw sample
-** Output: signed 16 bit linear sample
-** Z-note -- this is from libaudiofile.  Thanks guys!
-*/
-
-static int _af_ulaw2linear(unsigned char ulawbyte)
-{
-	static int exp_lut[8] = { 0, 132, 396, 924, 1980, 4092, 8316, 16764 };
-	int sign, exponent, mantissa, sample;
-
-	ulawbyte = ~ulawbyte;
-	sign = (ulawbyte & 0x80);
-	exponent = (ulawbyte >> 4) & 0x07;
-	mantissa = ulawbyte & 0x0F;
-	sample = exp_lut[exponent] + (mantissa << (exponent + 3));
-	if (sign != 0)
-		sample = -sample;
-
-	return (sample);
-}
-
-static int play_artsc(unsigned char *data, int size)
-{
-	arts_stream_t stream;
-	guint16 *lineardata;
-	int result = 1;
-	int error;
-	int i;
-
-	lineardata = g_malloc(size * 2);
-
-	for (i = 0; i < size; i++) {
-		lineardata[i] = _af_ulaw2linear(data[i]);
-	}
-
-	stream = arts_play_stream(8012, 16, 1, "gaim");
-
-	error = arts_write(stream, lineardata, size);
-	if (error < 0) {
-		result = 0;
-	}
-
-	arts_close_stream(stream);
-
-	g_free(lineardata);
-
-	arts_free();
-
-	return result;
-}
-
-static int can_play_artsc()
-{
-	int error;
-
-	error = arts_init();
-	if (error < 0)
-		return 0;
-
-	return 1;
-}
-
-static int artsc_play_file(char *file)
-{
-	struct stat stat_buf;
-	unsigned char *buf = NULL;
-	int result = 0;
-	int fd = -1;
-
-	if (!can_play_artsc())
-		return 0;
-
-	fd = open(file, O_RDONLY);
-	if (fd < 0)
-		return 0;
-
-	if (fstat(fd, &stat_buf)) {
-		close(fd);
-		return 0;
-	}
-
-	if (!stat_buf.st_size) {
-		close(fd);
-		return 0;
-	}
-
-	buf = g_malloc(stat_buf.st_size);
-	if (!buf) {
-		close(fd);
-		return 0;
-	}
-
-	if (read(fd, buf, stat_buf.st_size) < 0) {
-		g_free(buf);
-		close(fd);
-		return 0;
-	}
-
-	result = play_artsc(buf, stat_buf.st_size);
-
-	g_free(buf);
-	close(fd);
-	return result;
-}
-
-#endif /* ARTSC_SOUND */
-
-#ifdef NAS_SOUND
-
-char nas_server[] = "localhost";
-AuServer *nas_serv = NULL;
-
-static AuBool NasEventHandler(AuServer * aud, AuEvent * ev, AuEventHandlerRec * handler)
-{
-	AuElementNotifyEvent *event = (AuElementNotifyEvent *) ev;
-
-	if (ev->type == AuEventTypeElementNotify) {
-		switch (event->kind) {
-		case AuElementNotifyKindState:
-			switch (event->cur_state) {
-			case AuStateStop:
-				_exit(0);
-			}
-			break;
-		}
-	}
-	return AuTrue;
-}
-
-
-static int play_nas(unsigned char *data, int size)
-{
-	AuDeviceID device = AuNone;
-	AuFlowID flow;
-	AuElement elements[3];
-	int i, n, w;
-
-	/* look for an output device */
-	for (i = 0; i < AuServerNumDevices(nas_serv); i++) {
-		if ((AuDeviceKind(AuServerDevice(nas_serv, i)) ==
-		     AuComponentKindPhysicalOutput) &&
-		    AuDeviceNumTracks(AuServerDevice(nas_serv, i)) == 1) {
-			device = AuDeviceIdentifier(AuServerDevice(nas_serv, i));
-			break;
-		}
-	}
-
-	if (device == AuNone)
-		return 0;
-
-	if (!(flow = AuCreateFlow(nas_serv, NULL)))
-		return 0;
-
-
-	AuMakeElementImportClient(&elements[0], 8012, AuFormatULAW8, 1, AuTrue, size, size / 2, 0, NULL);
-	AuMakeElementExportDevice(&elements[1], 0, device, 8012, AuUnlimitedSamples, 0, NULL);
-	AuSetElements(nas_serv, flow, AuTrue, 2, elements, NULL);
-
-	AuStartFlow(nas_serv, flow, NULL);
-
-	AuWriteElement(nas_serv, flow, 0, size, data, AuTrue, NULL);
-
-	AuRegisterEventHandler(nas_serv, AuEventHandlerIDMask, 0, flow, NasEventHandler, NULL);
-
-	while (1) {
-		AuHandleEvents(nas_serv);
-	}
-
-	return 1;
-}
-
-static int can_play_nas()
-{
-	if ((nas_serv = AuOpenServer(NULL, 0, NULL, 0, NULL, NULL)))
-		return 1;
-	return 0;
-}
-
-static int play_nas_file(char *file)
-{
-	struct stat stat_buf;
-	char *buf;
-	int ret;
-	int fd = open(file, O_RDONLY);
-	if (fd <= 0)
-		return 0;
-
-	if (!can_play_nas())
-		return 0;
-
-	if (stat(file, &stat_buf))
-		return 0;
-
-	if (!stat_buf.st_size)
-		return 0;
-
-	buf = malloc(stat_buf.st_size);
-	read(fd, buf, stat_buf.st_size);
-	ret = play_nas(buf, stat_buf.st_size);
-	free(buf);
-	return ret;
-}
-
-#endif /* NAS_SOUND */
-
-#endif /* !_WIN32 */
-
 void play_file(char *filename)
 {
 #ifndef _WIN32
-	int pid;
+#ifdef USE_AO
+	int ao_driver;
+#endif /* USE_AO */
+	pid_t pid;
 #endif
+
 	if (awaymessage && !(sound_options & OPT_SOUND_WHEN_AWAY))
 		return; /* check here in case a buddy pounce plays a file while away */
-	
+
 	if (sound_options & OPT_SOUND_BEEP) {
 		gdk_beep();
 		return;
 	}
 
-	else if (sound_options & OPT_SOUND_NORMAL) {
-		debug_printf("attempting to play audio file with internal method -- this is unlikely to work\n");
+#ifndef _WIN32
+	if (!g_file_test(filename, G_FILE_TEST_EXISTS)) {
+		gchar *tmp = g_strdup_printf(_("Unable to play sound because the chosen filename (%s) does not exist."), filename);
+		do_error_dialog(tmp, NULL, GAIM_ERROR);
+		g_free(tmp);
+		return;
 	}
-#ifndef _WIN32
+
+	if (sound_options & OPT_SOUND_CMD) {
+		gchar *command = NULL;
+		GError *error = NULL;
+
+		if (!sound_cmd[0]) {
+			do_error_dialog(_("Unable to play sound because the 'Command' sound method has been chosen, but no command has been set."), NULL, GAIM_ERROR);
+			return;
+		}
+
+		command = g_strdup_printf(sound_cmd, filename);
+
+		if (g_spawn_command_line_async(command, &error) == FALSE) {
+			gchar *tmp = g_strdup_printf(_("Unable to play sound because the configured sound command could not be launched: %s"), error->message);
+			do_error_dialog(tmp, NULL, GAIM_ERROR);
+			g_free(tmp);
+			g_error_free(error);
+		}
+
+		g_free(command);
+		return;
+	}
+
+#ifdef USE_AO
+	if (!ao_initialized) {
+		ao_initialize();
+	}
+
+	ao_driver = ao_default_driver_id();
+
+	if (ao_driver == -1) {
+		do_error_dialog(_("Unable to play sound because no suitable driver could be found."), NULL, GAIM_ERROR);
+		return;
+	}
+
 	pid = fork();
 
 	if (pid < 0)
 		return;
 	else if (pid == 0) {
-		alarm(30);
-		
-		if ((sound_options & OPT_SOUND_CMD) && sound_cmd[0]) {
-			char *args[4];
-			char command[4096];
+		AFfilehandle file = afOpenFile(filename, "rb", NULL);
+		if(file) {
+			ao_device *device;
+			ao_sample_format format;
 
-			g_snprintf(command, sizeof(command), sound_cmd, filename);
+			int in_fmt;
+			int bytes_per_frame;
+
+			format.rate = afGetRate(file, AF_DEFAULT_TRACK);
+			format.channels = afGetChannels(file, AF_DEFAULT_TRACK);
+			afGetSampleFormat(file, AF_DEFAULT_TRACK, &in_fmt,
+					&format.bits);
+
+			bytes_per_frame = format.bits * format.channels / 8;
 
-			args[0] = "sh";
-			args[1] = "-c";
-			args[2] = command;
-			args[3] = NULL;
-			execvp(args[0], args);
-			_exit(0);
-		}
-#ifdef ESD_SOUND
-		else if (sound_options & OPT_SOUND_ESD) {
-			if (esd_play_file(NULL, filename, 1))
-				_exit(0);
+			device = ao_open_live(ao_driver, &format, NULL);
+
+			if (device) {
+				int frames_read;
+				char buf[4096];
+				int buf_frames = sizeof(buf) / bytes_per_frame;
+
+				while((frames_read = afReadFrames(file, AF_DEFAULT_TRACK,
+								buf, buf_frames))) {
+					if(!ao_play(device, buf, frames_read * bytes_per_frame))
+						break;
+				}
+				ao_close(device);
+			}
+
+			ao_shutdown();
+			afCloseFile(file);
 		}
-#endif
-
-#ifdef ARTSC_SOUND
-		else if (sound_options & OPT_SOUND_ARTSC) {
-			if (artsc_play_file(filename))
-				_exit(0);
-		}
-#endif
-
-#ifdef NAS_SOUND
-		else if (sound_options & OPT_SOUND_NAS) {
-			if (play_nas_file(filename))
-				_exit(0);
-		}
-#endif
-
-		else if ((sound_options & OPT_SOUND_NORMAL) &&
-			 can_play_audio()) {
-			play_audio_file(filename);
-			_exit(0);
-		}
-
 		_exit(0);
 	}
+#else /* USE_AO */
+	gdk_beep();
+#endif /* USE_AO */
+
 #else /* _WIN32 */
 	debug_printf("Playing %s\n", filename);
 	if (!PlaySound(filename, 0, SND_ASYNC | SND_FILENAME))
@@ -450,13 +186,21 @@
 #endif
 }
 
+void sound_quit() {
+#ifdef USE_AO
+	if (ao_initialized) {
+		ao_shutdown();
+	}
+#endif
+}
+
 extern int logins_not_muted;
 
 void play_sound(int sound)
 {
 	if (mute_sounds)
 		return;
-	
+
 	if ((sound == SND_BUDDY_ARRIVE) && !logins_not_muted)
 		return;