X-Git-Url: http://git.tuebingen.mpg.de/?p=paraslash.git;a=blobdiff_plain;f=fade.c;h=d9f93ccf6c9f0f0452c748e2db0fbe67cfda200a;hp=b42e4a1c713c6b660c4c32a2c382bcef7f82cac4;hb=e908ea4515b36e37f70bfffde83f43ffc26d9009;hpb=6570e0e4433a5e5d7987697716a1f993c96eb1bb

diff --git a/fade.c b/fade.c
index b42e4a1c..d9f93ccf 100644
--- a/fade.c
+++ b/fade.c
@@ -1,42 +1,33 @@
 /*
- * Copyright (C) 1998-2005 Andre Noll <maan@systemlinux.org>
+ * Copyright (C) 1998-2010 Andre Noll <maan@systemlinux.org>
  *
- *     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, USA.
+ * Licensed under the GPL v2. For licencing details see COPYING.
  */
 
-/** \file fade.c a volume fader and alarm clock */
+/** \file fade.c A volume fader and alarm clock for OSS. */
 
-#include "fade.cmdline.h"
-#include "para.h"
-#include "fd.h"
-
-#include <stropts.h>
+#include <regex.h>
+#include <sys/types.h>
+#include <dirent.h>
+#include <sys/ioctl.h>
 #include <ctype.h>
-#include <curses.h>
 #include <stdlib.h> /* EXIT_SUCCESS */
 #include <unistd.h>
 #include <signal.h>
 #include <string.h>
 #include <limits.h>
-#include <linux/soundcard.h>
-#include "string.h"
+#include <sys/soundcard.h>
 
+#include "fade.cmdline.h"
+#include "para.h"
+#include "fd.h"
+#include "string.h"
+#include "error.h"
 
-struct fade_args_info args_info;
+INIT_FADE_ERRLISTS;
+static struct fade_args_info conf;
 
-void para_log(__a_unused int ll, const char *fmt,...)
+__printf_2_3 void para_log(__a_unused int ll, const char *fmt, ...)
 {
 	va_list argp;
 	time_t t1;
@@ -51,102 +42,119 @@ void para_log(__a_unused int ll, const char *fmt,...)
 }
 
 /*
- * open mixer device
+ * Open the mixer device.
  */
 static int open_mixer(void)
 {
-	int mixer_fd;
-
-	if ((mixer_fd = open(args_info.mixer_device_arg, O_RDWR, 0)) < 0)
-		return -1;
-	return mixer_fd;
+	PARA_INFO_LOG("opening %s\n", conf.mixer_device_arg);
+	return para_open(conf.mixer_device_arg, O_RDWR, 42);
 }
 
 /*
- * get volume via mixer_fd
+ * Get channel volume via mixer_fd.
  */
-static int do_get_vol(int mixer_fd)
+static int get_mixer_channel(int mixer_fd)
 {
 	int volume;
 
-	if (ioctl(mixer_fd, MIXER_READ(SOUND_MIXER_VOLUME), &volume) < 0)
-		return -1;
+	if (ioctl(mixer_fd, MIXER_READ(conf.mixer_channel_arg), &volume) < 0)
+		return -ERRNO_TO_PARA_ERROR(errno);
 	/* take the mean value of left and right volume */
 	return (volume % 256 + (volume >> 8)) / 2;
 }
 
 /*
- * open mixer, get volume and close mixer
+ * Open mixer, get volume and close mixer.
  */
-static int get_vol(void)
+static int open_and_get_mixer_channel(void)
 {
 	int mixer_fd;
 	int volume;
 
 	mixer_fd = open_mixer();
 	if (mixer_fd < 0)
-		return -1;
-	volume = do_get_vol(mixer_fd);
+		return mixer_fd;
+	volume = get_mixer_channel(mixer_fd);
 	close(mixer_fd);
 	return volume;
 }
 
 /*
- * set volume via mixer_fd
+ * Set channel volume via mixer_fd.
  */
-static int do_set_vol(int mixer_fd, int volume)
+static int set_mixer_channel(int mixer_fd, int volume)
 {
-	int tmp;
-	tmp = (volume << 8) + volume;
-	if (ioctl(mixer_fd, MIXER_WRITE(SOUND_MIXER_VOLUME), &tmp) < 0)
-		return 0;
+	int tmp = (volume << 8) + volume;
+
+	if (ioctl(mixer_fd, MIXER_WRITE(conf.mixer_channel_arg), &tmp) < 0)
+		return -ERRNO_TO_PARA_ERROR(errno);
 	return 1;
 }
 
 /*
- * open mixer, set volume and close mixer
+ * Open mixer, set volume and close mixer.
  */
-static int set_vol(int volume)
+static int open_and_set_mixer_channel(int volume)
 {
-	int mixer_fd;
-	int ret;
+	int mixer_fd, ret = open_mixer();
 
-	mixer_fd = open_mixer();
-	ret = 0;
-	if (mixer_fd < 0)
-		goto out;
-	if (!do_set_vol(mixer_fd, volume))
-		goto out;
-	ret = 1;
+	if (ret < 0)
+		return ret;
+	mixer_fd = ret;
+	ret = set_mixer_channel(mixer_fd, volume);
 	close(mixer_fd);
-out:
 	return ret;
 }
 
+static void fixup_mixer_channel_arg(void)
+{
+	int val = SOUND_MIXER_VOLUME; /* STFU, gcc */
+
+	switch (conf.mixer_channel_arg) {
+		case mixer_channel_arg_volume: val = SOUND_MIXER_VOLUME; break;
+		case mixer_channel_arg_bass: val = SOUND_MIXER_BASS; break;
+		case mixer_channel_arg_treble: val = SOUND_MIXER_TREBLE; break;
+		case mixer_channel_arg_synth: val = SOUND_MIXER_SYNTH; break;
+		case mixer_channel_arg_pcm: val = SOUND_MIXER_PCM; break;
+		case mixer_channel_arg_speaker: val = SOUND_MIXER_SPEAKER; break;
+		case mixer_channel_arg_line: val = SOUND_MIXER_LINE; break;
+		case mixer_channel_arg_mic: val = SOUND_MIXER_MIC; break;
+		case mixer_channel_arg_cd: val = SOUND_MIXER_CD; break;
+		case mixer_channel_arg_imix: val = SOUND_MIXER_IMIX; break;
+		case mixer_channel_arg_altpcm: val = SOUND_MIXER_ALTPCM; break;
+		case mixer_channel_arg_reclev: val = SOUND_MIXER_RECLEV; break;
+		case mixer_channel_arg_igain: val = SOUND_MIXER_IGAIN; break;
+		case mixer_channel_arg_ogain: val = SOUND_MIXER_OGAIN; break;
+	}
+	conf.mixer_channel_arg = val;
+}
+
 /*
  * Open mixer, get volume, fade to new_vol in secs seconds and
- * close mixer
+ * close mixer.
  */
-static int fade(int new_vol, unsigned int secs)
+static int fade(int new_vol, int fade_time)
 {
-	int vol, mixer_fd = -1, diff, incr, ret;
+	int vol, mixer_fd, diff, incr, ret;
+	unsigned secs;
 	struct timespec ts;
 	unsigned long long tmp, tmp2; /* Careful with that axe, Eugene! */
 
+	if (fade_time <= 0)
+		return 1;
+	secs = fade_time;
 	PARA_NOTICE_LOG("fading to %d in %d seconds\n", new_vol, secs);
-	ret = 0;
-	if (!secs)
-		goto out;
-	mixer_fd = open_mixer();
-	if (mixer_fd < 0)
-		goto out;
-	vol = do_get_vol(mixer_fd);
-	if (vol < 0)
+	ret = open_mixer();
+	if (ret < 0)
+		return ret;
+	mixer_fd = ret;
+	ret = get_mixer_channel(mixer_fd);
+	if (ret < 0)
 		goto out;
+	vol = ret;
 	diff = new_vol - vol;
 	if (!diff) {
 		sleep(secs);
-		ret = 1;
 		goto out;
 	}
 	incr = diff > 0? 1: -1;
@@ -158,159 +166,195 @@ static int fade(int new_vol, unsigned int secs)
 		ts.tv_sec = tmp / 1000; /* really nec ?*/
 		//printf("ts.tv_sec: %i\n", ts.tv_nsec);
 		vol += incr;
-		if (!do_set_vol(mixer_fd, vol))
+		ret = set_mixer_channel(mixer_fd, vol);
+		if (ret < 0)
 			goto out;
 		//printf("vol = %i\n", vol);
 		nanosleep(&ts, NULL);
 	}
 out:
-	if (mixer_fd >= 0)
-		close(mixer_fd);
-	return 1;
+	close(mixer_fd);
+	return ret;
 }
 
-static int client_cmd(const char *cmd,...)
+static void client_cmd(const char *cmd)
 {
 	int ret, fds[3] = {0, 0, 0};
 	pid_t pid;
 	char *cmdline = make_message(BINDIR "/para_client %s", cmd);
-	PARA_INFO_LOG("%s", cmdline);
+
+	PARA_INFO_LOG("%s\n", cmdline);
 	ret = para_exec_cmdline_pid(&pid, cmdline, fds);
 	free(cmdline);
-	return ret;
+	if (ret < 0) {
+		PARA_EMERG_LOG("%s\n", para_strerror(-ret));
+		exit(EXIT_FAILURE);
+	}
+	do
+		ret = wait(NULL);
+	while (ret != -1 && errno != ECHILD);
+}
+
+static void change_afs_mode_and_play(char *afs_mode)
+{
+	char *cmd;
+
+	client_cmd("stop");
+	if (!afs_mode)
+		return;
+	cmd = make_message("select %s\n", afs_mode);
+	client_cmd(cmd);
+	free(cmd);
+	client_cmd("play");
 }
 
 /*
  * sleep
  */
-static void sweet_dreams(void)
+static int sweet_dreams(void)
 {
 	time_t t1, wake_time_epoch;
 	unsigned int delay;
 	struct tm *tm;
-	int hour = args_info.wake_hour_arg;
-	int min = args_info.wake_min_arg;
-	char *fa_stream = args_info.fa_stream_arg;
-	char *wake_stream = args_info.wake_stream_arg;
-	//char *current_stream = stat_items[STREAM].content;
-	int wf = args_info.wake_fade_arg;
-	int sf = args_info.fa_fade_arg;
-	int wv = args_info.wake_vol_arg;
-	int sv = args_info.fa_vol_arg;
-	int iv = args_info.sleep_ivol_arg;
-	char *cmd, *sleep_stream = args_info.sleep_stream_given?
-		args_info.sleep_stream_arg : NULL;
+	int ret, min = conf.wake_min_arg;
+	char *fo_mood = conf.fo_mood_arg;
+	char *fi_mood = conf.fi_mood_arg;
+	char *sleep_mood = conf.sleep_mood_arg;
+	int fit = conf.fi_time_arg;
+	int fot = conf.fo_time_arg;
+	int fiv = conf.fi_vol_arg;
+	int fov = conf.fo_vol_arg;
+	int iv = conf.ivol_arg;
 
-	if (sf) {
-		PARA_INFO_LOG("initial volume: %d\n", iv);
-		set_vol(iv);
-		cmd = make_message("csp %s\n", fa_stream);
-		client_cmd(cmd);
-		free(cmd);
-		fade(sv, sf);
-	}
-	if (sleep_stream) {
-		cmd = make_message("csp %s\n", sleep_stream);
-		client_cmd(cmd);
-		free(cmd);
-	} else
-		client_cmd("stop");
-	if (!wf)
-		return;
 	/* calculate wake time */
 	time(&t1);
-	tm = localtime(&t1);
-	if (tm->tm_hour > hour || (tm->tm_hour == hour && tm->tm_min> min)) {
-		/* wake time is tomorrow */
-		t1 += 86400;
+	if (conf.wake_hour_given) {
+		int hour = conf.wake_hour_arg;
+		tm = localtime(&t1);
+		if (tm->tm_hour > hour || (tm->tm_hour == hour && tm->tm_min> min)) {
+			t1 += 86400; /* wake time is tomorrow */
+			tm = localtime(&t1);
+		}
+		tm->tm_hour = hour;
+		tm->tm_min = min;
+		tm->tm_sec = 0;
+	} else {
+		t1 += 9 * 60 * 60; /* nine hours from now */
+		PARA_INFO_LOG("default wake time: %lu\n", (long unsigned)t1);
 		tm = localtime(&t1);
-		t1 -= 86400;
 	}
-	tm->tm_hour = hour;
-	tm->tm_min = min;
-	tm->tm_sec = 0;
 	wake_time_epoch = mktime(tm);
 	PARA_INFO_LOG("waketime: %s", asctime(tm));
-	while (wake_time_epoch > t1 + wf) {
-		delay = wake_time_epoch - t1 - wf;
+	client_cmd("stop");
+	sleep(1);
+	if (fot) {
+		PARA_INFO_LOG("initial volume: %d\n", iv);
+		ret = open_and_set_mixer_channel(iv);
+		if (ret < 0)
+			return ret;
+		change_afs_mode_and_play(fo_mood);
+		ret = fade(fov, fot);
+		if (ret < 0)
+			return ret;
+	} else {
+		ret = open_and_set_mixer_channel(fov);
+		if (ret < 0)
+			return ret;
+	}
+	if (conf.sleep_mood_given)
+		change_afs_mode_and_play(sleep_mood);
+	else
+		client_cmd("stop");
+	if (!fit)
+		return 1;
+	for (;;) {
+		time(&t1);
+		if (wake_time_epoch <= t1 + fit)
+			break;
+		delay = wake_time_epoch - t1 - fit;
 		PARA_INFO_LOG("sleeping %u seconds (%u:%02u)\n",
-			delay, delay / 3600, 
+			delay, delay / 3600,
 			(delay % 3600) / 60);
 		sleep(delay);
-		time(&t1);
 	}
-	cmd = make_message("csp %s\n", wake_stream);
-	client_cmd(cmd);
-	free(cmd);
-	fade(wv, wf);
-	PARA_INFO_LOG("%s", "fade complete, returning\n");
+	change_afs_mode_and_play(fi_mood);
+	ret = fade(fiv, fit);
+	PARA_INFO_LOG("fade complete, returning\n");
+	return ret;
 }
 
-static void snooze(void)
+static int snooze(void)
 {
-	if (get_vol() < args_info.snooze_out_vol_arg)
-		set_vol(args_info.snooze_out_vol_arg);
+	int ret;
+	unsigned sleep_time;
+
+	if (conf.so_time_arg <= 0)
+		return 1;
+	sleep_time = conf.so_time_arg;
+	if (open_and_get_mixer_channel() < conf.so_vol_arg)
+		ret = open_and_set_mixer_channel(conf.so_vol_arg);
 	else
-		fade(args_info.snooze_out_vol_arg, args_info.snooze_out_fade_arg);
+		ret = fade(conf.so_vol_arg, conf.so_time_arg);
+	if (ret < 0)
+		return ret;
 	client_cmd("pause");
-	PARA_NOTICE_LOG("%d seconds snooze time...\n", args_info.snooze_time_arg);
-	sleep(args_info.snooze_time_arg);
+	PARA_NOTICE_LOG("%d seconds snooze time...\n", conf.snooze_time_arg);
+	sleep(sleep_time);
 	client_cmd("play");
-	fade(args_info.snooze_in_vol_arg, args_info.snooze_in_fade_arg);
+	return fade(conf.si_vol_arg, conf.si_time_arg);
 }
 
 static int configfile_exists(void)
 {
-        static char *config_file;
+	static char *config_file;
 
-        if (!args_info.config_file_given) {
+	if (!conf.config_file_given) {
 		char *home = para_homedir();
-		const char *conf = ".paraslash/fade.conf";
 		free(config_file);
-		config_file = make_message("%s/%s", home, conf);
+		config_file = make_message("%s/.paraslash/fade.conf", home);
 		free(home);
-                args_info.config_file_arg = config_file;
-        }
-        return file_exists(args_info.config_file_arg);
+		conf.config_file_arg = config_file;
+	}
+	return file_exists(conf.config_file_arg);
 }
 
-
 int main(int argc, char *argv[])
 {
 	int ret;
 
-	if (fade_cmdline_parser(argc, argv, &args_info))
+	if (fade_cmdline_parser(argc, argv, &conf))
 		exit(EXIT_FAILURE);
+	HANDLE_VERSION_FLAG("fade", conf);
 	ret = configfile_exists();
-	if (!ret && args_info.config_file_given) {
+	if (!ret && conf.config_file_given) {
 		PARA_EMERG_LOG("can not read config file %s\n",
-			args_info.config_file_arg);
-		exit(EXIT_FAILURE);
-	}
-	if (ret)
-		fade_cmdline_parser_configfile(args_info.config_file_arg,
-			&args_info, 0, 0, 0);
-	if ((ret = open_mixer()) < 0) {
-		PARA_EMERG_LOG("can not open mixer device %s.",
-			args_info.mixer_device_arg);
+			conf.config_file_arg);
 		exit(EXIT_FAILURE);
-	} else
-		close(ret);
-	ret = 0;
-	setlinebuf(stdout);
-	if (!strcmp(args_info.mode_arg, "sleep")) {
-		sweet_dreams();
-		goto out;
 	}
-	if (!strcmp(args_info.mode_arg, "fade")) {
-		fade(args_info.fade_vol_arg, args_info.fade_time_arg);
-		goto out;
+	if (ret) {
+		struct fade_cmdline_parser_params params = {
+			.override = 0,
+			.initialize = 0,
+			.check_required = 0,
+			.check_ambiguity = 0,
+			.print_errors = 1
+		};
+		fade_cmdline_parser_config_file(conf.config_file_arg,
+			&conf, &params);
 	}
-	if (!strcmp(args_info.mode_arg, "snooze")) {
-		snooze();
-		goto out;
+	fixup_mixer_channel_arg();
+	switch (conf.mode_arg) {
+	case mode_arg_sleep:
+		ret = sweet_dreams();
+		break;
+	case mode_arg_fade:
+		ret = fade(conf.fade_vol_arg, conf.fade_time_arg);
+		break;
+	case mode_arg_snooze:
+		ret = snooze();
+		break;
 	}
-	ret = -1;
-out:
-	return ret;
+	if (ret < 0)
+		PARA_EMERG_LOG("%s\n", para_strerror(-ret));
+	return ret < 0? EXIT_FAILURE : EXIT_SUCCESS;
 }