fade.c: Fix client_cmd()
[paraslash.git] / fade.c
1 /*
2 * Copyright (C) 1998-2007 Andre Noll <maan@systemlinux.org>
3 *
4 * Licensed under the GPL v2. For licencing details see COPYING.
5 */
6
7 /** \file fade.c a volume fader and alarm clock */
8
9 #include <sys/types.h>
10 #include <dirent.h>
11
12 #include "fade.cmdline.h"
13 #include "para.h"
14 #include "fd.h"
15
16 #include <stropts.h>
17 #include <ctype.h>
18 #include <curses.h>
19 #include <stdlib.h> /* EXIT_SUCCESS */
20 #include <unistd.h>
21 #include <signal.h>
22 #include <string.h>
23 #include <limits.h>
24 #include <linux/soundcard.h>
25 #include "string.h"
26
27
28 struct fade_args_info conf;
29
30 void para_log(__a_unused int ll, const char *fmt,...)
31 {
32 va_list argp;
33 time_t t1;
34 struct tm *tm;
35
36 time(&t1);
37 tm = localtime(&t1);
38 printf("%d:%02d:%02d ", tm->tm_hour, tm->tm_min, tm->tm_sec);
39 va_start(argp, fmt);
40 vprintf(fmt, argp);
41 va_end(argp);
42 }
43
44 /*
45 * open mixer device
46 */
47 static int open_mixer(void)
48 {
49 return open(conf.mixer_device_arg, O_RDWR, 0);
50 }
51
52 /*
53 * get volume via mixer_fd
54 */
55 static int do_get_vol(int mixer_fd)
56 {
57 int volume;
58
59 if (ioctl(mixer_fd, MIXER_READ(SOUND_MIXER_VOLUME), &volume) < 0)
60 return -1;
61 /* take the mean value of left and right volume */
62 return (volume % 256 + (volume >> 8)) / 2;
63 }
64
65 /*
66 * open mixer, get volume and close mixer
67 */
68 static int get_vol(void)
69 {
70 int mixer_fd;
71 int volume;
72
73 mixer_fd = open_mixer();
74 if (mixer_fd < 0)
75 return -1;
76 volume = do_get_vol(mixer_fd);
77 close(mixer_fd);
78 return volume;
79 }
80
81 /*
82 * set volume via mixer_fd
83 */
84 static int do_set_vol(int mixer_fd, int volume)
85 {
86 int tmp = (volume << 8) + volume;
87
88 if (ioctl(mixer_fd, MIXER_WRITE(SOUND_MIXER_VOLUME), &tmp) < 0)
89 return -1;
90 return 1;
91 }
92
93 /*
94 * open mixer, set volume and close mixer
95 */
96 static int set_vol(int volume)
97 {
98 int mixer_fd, ret = open_mixer();
99
100 if (ret < 0)
101 return ret;
102 mixer_fd = ret;
103 ret = do_set_vol(mixer_fd, volume);
104 close(mixer_fd);
105 return ret;
106 }
107
108 /*
109 * Open mixer, get volume, fade to new_vol in secs seconds and
110 * close mixer
111 */
112 static void fade(int new_vol, int fade_time)
113 {
114 int vol, mixer_fd, diff, incr;
115 unsigned secs;
116 struct timespec ts;
117 unsigned long long tmp, tmp2; /* Careful with that axe, Eugene! */
118
119 if (fade_time <= 0)
120 return;
121 secs = fade_time;
122 PARA_NOTICE_LOG("fading to %d in %d seconds\n", new_vol, secs);
123 mixer_fd = open_mixer();
124 if (mixer_fd < 0)
125 return;
126 vol = do_get_vol(mixer_fd);
127 if (vol < 0)
128 goto out;
129 diff = new_vol - vol;
130 if (!diff) {
131 sleep(secs);
132 goto out;
133 }
134 incr = diff > 0? 1: -1;
135 diff = diff > 0? diff: -diff;
136 tmp = secs * 1000 / diff;
137 tmp2 = tmp % 1000;
138 while ((new_vol - vol) * incr > 0) {
139 ts.tv_nsec = tmp2 * 1000000; /* really nec ?*/
140 ts.tv_sec = tmp / 1000; /* really nec ?*/
141 //printf("ts.tv_sec: %i\n", ts.tv_nsec);
142 vol += incr;
143 if (do_set_vol(mixer_fd, vol) < 0)
144 goto out;
145 //printf("vol = %i\n", vol);
146 nanosleep(&ts, NULL);
147 }
148 out:
149 close(mixer_fd);
150 }
151
152 static void client_cmd(const char *cmd)
153 {
154 int ret, fds[3] = {0, 0, 0};
155 pid_t pid;
156 char *cmdline = make_message(BINDIR "/para_client %s", cmd);
157
158 PARA_INFO_LOG("%s\n", cmdline);
159 ret = para_exec_cmdline_pid(&pid, cmdline, fds);
160 free(cmdline);
161 if (ret < 0)
162 exit(EXIT_FAILURE);
163 do
164 ret = wait(NULL);
165 while (ret != -1 && errno != ECHILD);
166 }
167
168 static void change_afs_mode_and_play(char *afs_mode)
169 {
170 char *cmd;
171
172 client_cmd("stop");
173 if (!afs_mode)
174 return;
175 cmd = make_message("select %s\n", afs_mode);
176 client_cmd(cmd);
177 free(cmd);
178 client_cmd("play");
179 }
180
181 /*
182 * sleep
183 */
184 static void sweet_dreams(void)
185 {
186 time_t t1, wake_time_epoch;
187 unsigned int delay;
188 struct tm *tm;
189 int min = conf.wake_min_arg;
190 char *fa_mode = conf.fa_mode_arg;
191 char *wake_mode = conf.wake_mode_arg;
192 char *sleep_mode = conf.sleep_mode_arg;
193 int wf = conf.wake_fade_arg;
194 int sf = conf.fa_fade_arg;
195 int wv = conf.wake_vol_arg;
196 int sv = conf.fa_vol_arg;
197 int iv = conf.sleep_ivol_arg;
198
199 /* calculate wake time */
200 time(&t1);
201 if (conf.wake_hour_given) {
202 int hour = conf.wake_hour_arg;
203 tm = localtime(&t1);
204 if (tm->tm_hour > hour || (tm->tm_hour == hour && tm->tm_min> min)) {
205 t1 += 86400; /* wake time is tomorrow */
206 tm = localtime(&t1);
207 }
208 tm->tm_hour = hour;
209 tm->tm_min = min;
210 tm->tm_sec = 0;
211 } else {
212 t1 += 9 * 60 * 60; /* nine hours from now */
213 PARA_INFO_LOG("default wake time: %lu\n", t1);
214 tm = localtime(&t1);
215 }
216 wake_time_epoch = mktime(tm);
217 PARA_INFO_LOG("waketime: %s", asctime(tm));
218 client_cmd("stop");
219 sleep(1);
220 if (sf) {
221 PARA_INFO_LOG("initial volume: %d\n", iv);
222 set_vol(iv);
223 change_afs_mode_and_play(fa_mode);
224 fade(sv, sf);
225 } else
226 set_vol(sf);
227 change_afs_mode_and_play(sleep_mode);
228 if (!wf)
229 return;
230 for (;;) {
231 time(&t1);
232 if (wake_time_epoch <= t1 + wf)
233 break;
234 delay = wake_time_epoch - t1 - wf;
235 PARA_INFO_LOG("sleeping %u seconds (%u:%02u)\n",
236 delay, delay / 3600,
237 (delay % 3600) / 60);
238 sleep(delay);
239 }
240 change_afs_mode_and_play(wake_mode);
241 fade(wv, wf);
242 PARA_INFO_LOG("fade complete, returning\n");
243 }
244
245 static void snooze(void)
246 {
247 unsigned sleep_time;
248
249 if (conf.snooze_time_arg <= 0)
250 return;
251 sleep_time = conf.snooze_time_arg;
252 if (get_vol() < conf.snooze_out_vol_arg)
253 set_vol(conf.snooze_out_vol_arg);
254 else
255 fade(conf.snooze_out_vol_arg, conf.snooze_out_fade_arg);
256 client_cmd("pause");
257 PARA_NOTICE_LOG("%d seconds snooze time...\n", conf.snooze_time_arg);
258 sleep(sleep_time);
259 client_cmd("play");
260 fade(conf.snooze_in_vol_arg, conf.snooze_in_fade_arg);
261 }
262
263 static int configfile_exists(void)
264 {
265 static char *config_file;
266
267 if (!conf.config_file_given) {
268 char *home = para_homedir();
269 free(config_file);
270 config_file = make_message("%s/.paraslash/fade.conf", home);
271 free(home);
272 conf.config_file_arg = config_file;
273 }
274 return file_exists(conf.config_file_arg);
275 }
276
277
278 int main(int argc, char *argv[])
279 {
280 int ret;
281
282 if (fade_cmdline_parser(argc, argv, &conf))
283 exit(EXIT_FAILURE);
284 HANDLE_VERSION_FLAG("fade", conf);
285 ret = configfile_exists();
286 if (!ret && conf.config_file_given) {
287 PARA_EMERG_LOG("can not read config file %s\n",
288 conf.config_file_arg);
289 exit(EXIT_FAILURE);
290 }
291 if (ret) {
292 struct fade_cmdline_parser_params params = {
293 .override = 0,
294 .initialize = 0,
295 .check_required = 0,
296 .check_ambiguity = 0
297 };
298 fade_cmdline_parser_config_file(conf.config_file_arg,
299 &conf, &params);
300 }
301 ret = open_mixer();
302 if (ret < 0) {
303 PARA_EMERG_LOG("can not open mixer device %s.",
304 conf.mixer_device_arg);
305 exit(EXIT_FAILURE);
306 }
307 close(ret);
308 ret = 0;
309 // setlinebuf(stdout);
310 if (!strcmp(conf.mode_arg, "sleep")) {
311 sweet_dreams();
312 goto out;
313 }
314 if (!strcmp(conf.mode_arg, "fade")) {
315 fade(conf.fade_vol_arg, conf.fade_time_arg);
316 goto out;
317 }
318 if (!strcmp(conf.mode_arg, "snooze")) {
319 snooze();
320 goto out;
321 }
322 ret = -1;
323 out:
324 return ret < 0? EXIT_FAILURE : EXIT_SUCCESS;
325 }