para_server: Don't link with stat.o.
[paraslash.git] / fade.c
diff --git a/fade.c b/fade.c
index 8da9113..7f88447 100644 (file)
--- a/fade.c
+++ b/fade.c
@@ -1,42 +1,34 @@
 /*
- * Copyright (C) 1998-2007 Andre Noll <maan@systemlinux.org>
+ * Copyright (C) 1998-2009 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 linux. */
+
+#include <sys/types.h>
+#include <dirent.h>
 
 #include "fade.cmdline.h"
 #include "para.h"
 #include "fd.h"
 
-#include <stropts.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 <sys/soundcard.h>
 #include "string.h"
+#include "error.h"
 
 
+INIT_FADE_ERRLISTS;
 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;
@@ -55,11 +47,7 @@ void para_log(__a_unused int ll, const char *fmt,...)
  */
 static int open_mixer(void)
 {
-       int mixer_fd;
-
-       if ((mixer_fd = open(conf.mixer_device_arg, O_RDWR, 0)) < 0)
-               return -1;
-       return mixer_fd;
+       return para_open(conf.mixer_device_arg, O_RDWR, 42);
 }
 
 /*
@@ -70,7 +58,7 @@ static int do_get_vol(int mixer_fd)
        int volume;
 
        if (ioctl(mixer_fd, MIXER_READ(SOUND_MIXER_VOLUME), &volume) < 0)
-               return -1;
+               return -ERRNO_TO_PARA_ERROR(errno);
        /* take the mean value of left and right volume */
        return (volume % 256 + (volume >> 8)) / 2;
 }
@@ -85,7 +73,7 @@ static int get_vol(void)
 
        mixer_fd = open_mixer();
        if (mixer_fd < 0)
-               return -1;
+               return mixer_fd;
        volume = do_get_vol(mixer_fd);
        close(mixer_fd);
        return volume;
@@ -96,10 +84,10 @@ static int get_vol(void)
  */
 static int do_set_vol(int mixer_fd, int volume)
 {
-       int tmp;
-       tmp = (volume << 8) + volume;
+       int tmp = (volume << 8) + volume;
+
        if (ioctl(mixer_fd, MIXER_WRITE(SOUND_MIXER_VOLUME), &tmp) < 0)
-               return 0;
+               return -ERRNO_TO_PARA_ERROR(errno);
        return 1;
 }
 
@@ -108,18 +96,13 @@ static int do_set_vol(int mixer_fd, int volume)
  */
 static int set_vol(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 = do_set_vol(mixer_fd, volume);
        close(mixer_fd);
-out:
        return ret;
 }
 
@@ -127,23 +110,25 @@ out:
  * Open mixer, get volume, fade to new_vol in secs seconds and
  * close mixer
  */
-static void fade(int new_vol, int fade_time)
+static int fade(int new_vol, int fade_time)
 {
-       int vol, mixer_fd = -1, diff, incr;
+       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)
-               goto out;
+               return 1;
        secs = fade_time;
        PARA_NOTICE_LOG("fading to %d in %d seconds\n", new_vol, secs);
-       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 = do_get_vol(mixer_fd);
+       if (ret < 0)
                goto out;
+       vol = ret;
        diff = new_vol - vol;
        if (!diff) {
                sleep(secs);
@@ -158,46 +143,65 @@ static void fade(int new_vol, int fade_time)
                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 = do_set_vol(mixer_fd, vol);
+               if (ret < 0)
                        goto out;
                //printf("vol = %i\n", vol);
                nanosleep(&ts, NULL);
        }
 out:
-       if (mixer_fd >= 0)
-               close(mixer_fd);
+       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\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 min = conf.wake_min_arg;
-       char *fa_stream = conf.fa_stream_arg;
-       char *wake_stream = conf.wake_stream_arg;
-       //char *current_stream = stat_items[STREAM].content;
+       int ret, min = conf.wake_min_arg;
+       char *fa_mode = conf.fa_mode_arg;
+       char *wake_mode = conf.wake_mode_arg;
+       char *sleep_mode = conf.sleep_mode_arg;
        int wf = conf.wake_fade_arg;
        int sf = conf.fa_fade_arg;
        int wv = conf.wake_vol_arg;
        int sv = conf.fa_vol_arg;
        int iv = conf.sleep_ivol_arg;
-       char *cmd, *sleep_stream = conf.sleep_stream_given?
-               conf.sleep_stream_arg : NULL;
 
        /* calculate wake time */
        time(&t1);
@@ -212,61 +216,69 @@ static void sweet_dreams(void)
                tm->tm_min = min;
                tm->tm_sec = 0;
        } else {
-               t1 += 8 * 60 * 60;
+               t1 += 9 * 60 * 60; /* nine hours from now */
                PARA_INFO_LOG("default wake time: %lu\n", t1);
                tm = localtime(&t1);
        }
        wake_time_epoch = mktime(tm);
        PARA_INFO_LOG("waketime: %s", asctime(tm));
+       client_cmd("stop");
+       sleep(1);
        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);
+               ret = set_vol(iv);
+               if (ret < 0)
+                       return ret;
+               change_afs_mode_and_play(fa_mode);
+               ret = fade(sv, sf);
+               if (ret < 0)
+                       return ret;
+       } else {
+               ret = set_vol(sf);
+               if (ret < 0)
+                       return ret;
        }
-       if (sleep_stream) {
-               cmd = make_message("csp %s\n", sleep_stream);
-               client_cmd(cmd);
-               free(cmd);
-       } else
+       if (conf.sleep_mode_given)
+               change_afs_mode_and_play(sleep_mode);
+       else
                client_cmd("stop");
        if (!wf)
-               return;
+               return 1;
        for (;;) {
                time(&t1);
                if (wake_time_epoch <= t1 + wf)
                        break;
                delay = wake_time_epoch - t1 - wf;
                PARA_INFO_LOG("sleeping %u seconds (%u:%02u)\n",
-                       delay, delay / 3600, 
+                       delay, delay / 3600,
                        (delay % 3600) / 60);
                sleep(delay);
        }
-       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(wake_mode);
+       ret = fade(wv, wf);
+       PARA_INFO_LOG("fade complete, returning\n");
+       return ret;
 }
 
-static void snooze(void)
+static int snooze(void)
 {
+       int ret;
        unsigned sleep_time;
 
        if (conf.snooze_time_arg <= 0)
-               return;
+               return 1;
        sleep_time = conf.snooze_time_arg;
        if (get_vol() < conf.snooze_out_vol_arg)
-               set_vol(conf.snooze_out_vol_arg);
+               ret = set_vol(conf.snooze_out_vol_arg);
        else
-               fade(conf.snooze_out_vol_arg, conf.snooze_out_fade_arg);
+               ret = fade(conf.snooze_out_vol_arg, conf.snooze_out_fade_arg);
+       if (ret < 0)
+               return ret;
        client_cmd("pause");
        PARA_NOTICE_LOG("%d seconds snooze time...\n", conf.snooze_time_arg);
        sleep(sleep_time);
        client_cmd("play");
-       fade(conf.snooze_in_vol_arg, conf.snooze_in_fade_arg);
+       return fade(conf.snooze_in_vol_arg, conf.snooze_in_fade_arg);
 }
 
 static int configfile_exists(void)
@@ -283,7 +295,6 @@ static int configfile_exists(void)
        return file_exists(conf.config_file_arg);
 }
 
-
 int main(int argc, char *argv[])
 {
        int ret;
@@ -297,30 +308,31 @@ int main(int argc, char *argv[])
                        conf.config_file_arg);
                exit(EXIT_FAILURE);
        }
-       if (ret)
-               fade_cmdline_parser_configfile(conf.config_file_arg,
-                       &conf, 0, 0, 0);
-       if ((ret = open_mixer()) < 0) {
-               PARA_EMERG_LOG("can not open mixer device %s.",
-                       conf.mixer_device_arg);
-               exit(EXIT_FAILURE);
-       } else
-               close(ret);
-       ret = 0;
-       setlinebuf(stdout);
+       if (ret) {
+               struct fade_cmdline_parser_params params = {
+                       .override = 0,
+                       .initialize = 0,
+                       .check_required = 0,
+                       .check_ambiguity = 0
+               };
+               fade_cmdline_parser_config_file(conf.config_file_arg,
+                       &conf, &params);
+       }
        if (!strcmp(conf.mode_arg, "sleep")) {
-               sweet_dreams();
+               ret = sweet_dreams();
                goto out;
        }
        if (!strcmp(conf.mode_arg, "fade")) {
-               fade(conf.fade_vol_arg, conf.fade_time_arg);
+               ret = fade(conf.fade_vol_arg, conf.fade_time_arg);
                goto out;
        }
        if (!strcmp(conf.mode_arg, "snooze")) {
-               snooze();
+               ret = snooze();
                goto out;
        }
-       ret = -1;
+       ret = -E_FADE_SYNTAX;
 out:
-       return ret;
+       if (ret < 0)
+               PARA_EMERG_LOG("%s\n", para_strerror(-ret));
+       return ret < 0? EXIT_FAILURE : EXIT_SUCCESS;
 }