2 * Copyright (C) 1998 Andre Noll <maan@tuebingen.mpg.de>
4 * Licensed under the GPL v2. For licencing details see COPYING.
7 /** \file mixer.c A volume fader and alarm clock for OSS. */
12 #include "mixer.lsg.h"
20 /** Array of error strings. */
23 enum mixer_id {MIXER_ENUM};
24 static char *mixer_name[] = {MIXER_NAMES};
26 static struct mixer supported_mixer[] = {MIXER_ARRAY};
27 #define FOR_EACH_MIXER(i) for ((i) = 0; (i) < NUM_SUPPORTED_MIXERS; (i)++)
29 static struct lls_parse_result *lpr, *sub_lpr;
31 #define CMD_PTR(_cmd) (lls_cmd(LSG_MIXER_CMD_ ## _cmd, mixer_suite))
32 #define OPT_RESULT(_cmd, _opt) (lls_opt_result( \
33 LSG_MIXER_ ## _cmd ## _OPT_ ## _opt, (LSG_MIXER_CMD_ ## _cmd == 0)? lpr : sub_lpr))
34 #define OPT_GIVEN(_cmd, _opt) (lls_opt_given(OPT_RESULT(_cmd, _opt)))
35 #define OPT_STRING_VAL(_cmd, _opt) (lls_string_val(0, OPT_RESULT(_cmd, _opt)))
36 #define OPT_UINT32_VAL(_cmd, _opt) (lls_uint32_val(0, OPT_RESULT(_cmd, _opt)))
38 typedef int (*mixer_subcommand_handler_t)(struct mixer *, struct mixer_handle *);
40 #define EXPORT_CMD(_cmd) const mixer_subcommand_handler_t \
41 lsg_mixer_com_ ## _cmd ## _user_data = &com_ ## _cmd;
44 static __printf_2_3 void date_log(int ll, const char *fmt, ...)
54 fprintf(stderr, "%d:%02d:%02d ", tm->tm_hour, tm->tm_min, tm->tm_sec);
59 __printf_2_3 void (*para_log)(int, const char*, ...) = date_log;
61 static int set_channel(struct mixer *m, struct mixer_handle *h, const char *channel)
64 PARA_NOTICE_LOG("using %s mixer channel\n", channel?
66 return m->set_channel(h, channel);
69 /* Fade to new volume in fade_time seconds. */
70 static int fade(struct mixer *m, struct mixer_handle *h, uint32_t new_vol,
73 int vol, diff, incr, ret;
76 unsigned long long tmp, tmp2; /* Careful with that axe, Eugene! */
79 return m->set(h, new_vol);
85 PARA_NOTICE_LOG("fading %s from %d to %u in %u seconds\n",
86 OPT_STRING_VAL(PARA_MIXER, MIXER_CHANNEL), vol, new_vol, secs);
92 incr = diff > 0? 1: -1;
93 diff = diff > 0? diff: -diff;
94 tmp = secs * 1000 / diff;
96 while ((new_vol - vol) * incr > 0) {
97 ts.tv_nsec = tmp2 * 1000000; /* really nec ?*/
98 ts.tv_sec = tmp / 1000; /* really nec ?*/
99 //printf("ts.tv_sec: %i\n", ts.tv_nsec);
101 ret = m->set(h, vol);
104 //printf("vol = %i\n", vol);
105 nanosleep(&ts, NULL);
110 static int com_fade(struct mixer *m, struct mixer_handle *h)
112 uint32_t new_vol = OPT_UINT32_VAL(FADE, FADE_VOL);
113 uint32_t fade_time = OPT_UINT32_VAL(FADE, FADE_TIME);
114 return fade(m, h, new_vol, fade_time);
118 static void client_cmd(const char *cmd)
120 int ret, status, fds[3] = {0, 0, 0};
122 char *cmdline = make_message(BINDIR "/para_client %s", cmd);
124 PARA_NOTICE_LOG("%s\n", cmdline);
125 ret = para_exec_cmdline_pid(&pid, cmdline, fds);
128 PARA_ERROR_LOG("%s\n", para_strerror(-ret));
132 pid = waitpid(pid, &status, 0);
133 while (pid == -1 && errno == EINTR);
135 PARA_ERROR_LOG("%s\n", strerror(errno));
138 if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
142 PARA_EMERG_LOG("command \"%s\" failed\n", cmd);
146 static void change_afs_mode(const char *afs_mode)
153 cmd = make_message("select %s", afs_mode);
158 static int set_initial_volume(struct mixer *m, struct mixer_handle *h)
162 for (i = 0; i < OPT_GIVEN(SLEEP, IVOL); i++) {
163 const char *val = lls_string_val(i, OPT_RESULT(SLEEP, IVOL));
164 char *p, *ch, *arg = para_strdup(val);
166 p = strchr(arg, ':');
175 ret = para_atoi32(p, &iv);
180 ret = set_channel(m, h, ch);
184 PARA_WARNING_LOG("ignoring channel %s\n", ch);
187 PARA_INFO_LOG("initial volume %s: %d\n", ch, iv);
197 static int com_sleep(struct mixer *m, struct mixer_handle *h)
199 time_t t1, wake_time_epoch;
203 const char *wake_time = OPT_STRING_VAL(SLEEP, WAKE_TIME);
204 const char *fo_mood = OPT_STRING_VAL(SLEEP, FO_MOOD);
205 const char *fi_mood = OPT_STRING_VAL(SLEEP, FI_MOOD);
206 const char *sleep_mood = OPT_STRING_VAL(SLEEP, SLEEP_MOOD);
207 int fit = OPT_UINT32_VAL(SLEEP, FI_TIME);
208 int fot = OPT_UINT32_VAL(SLEEP, FO_TIME);
209 int fiv = OPT_UINT32_VAL(SLEEP, FI_VOL);
210 int fov = OPT_UINT32_VAL(SLEEP, FO_VOL);
211 int32_t hour, min = 0;
213 char *wt = para_strdup(wake_time + (wake_time[0] == '+'));
215 /* calculate wake time */
217 tmp = strchr(wt, ':');
221 ret = para_atoi32(tmp, &min);
227 ret = para_atoi32(wt, &hour);
231 if (wake_time[0] == '+') { /* relative */
232 t1 += hour * 60 * 60 + min * 60;
236 if (tm->tm_hour > hour || (tm->tm_hour == hour && tm->tm_min> min)) {
237 t1 += 86400; /* wake time is tomorrow */
244 wake_time_epoch = mktime(tm);
245 PARA_INFO_LOG("waketime: %d:%02d\n", tm->tm_hour, tm->tm_min);
249 ret = set_initial_volume(m, h);
252 change_afs_mode(fo_mood);
254 ret = set_channel(m, h, OPT_STRING_VAL(PARA_MIXER, MIXER_CHANNEL));
257 ret = fade(m, h, fov, fot);
261 ret = m->set(h, fov);
265 if (OPT_GIVEN(SLEEP, SLEEP_MOOD)) {
266 change_afs_mode(sleep_mood);
272 change_afs_mode(fi_mood);
275 if (wake_time_epoch <= t1 + fit)
277 delay = wake_time_epoch - t1 - fit;
278 PARA_INFO_LOG("sleeping %u seconds (%u:%02u)\n",
280 (delay % 3600) / 60);
284 ret = fade(m, h, fiv, fit);
285 PARA_INFO_LOG("fade complete, returning\n");
290 static int com_snooze(struct mixer *m, struct mixer_handle *h)
294 if (OPT_UINT32_VAL(SNOOZE, SO_TIME) == 0)
300 if (val < OPT_UINT32_VAL(SNOOZE, SO_VOL))
301 ret = m->set(h, OPT_UINT32_VAL(SNOOZE, SO_VOL));
303 ret = fade(m, h, OPT_UINT32_VAL(SNOOZE, SO_VOL),
304 OPT_UINT32_VAL(SNOOZE, SO_TIME));
308 PARA_NOTICE_LOG("%" PRIu32 " seconds snooze time...\n",
309 OPT_UINT32_VAL(SNOOZE, SNOOZE_TIME));
310 sleep(OPT_UINT32_VAL(SNOOZE, SNOOZE_TIME));
312 return fade(m, h, OPT_UINT32_VAL(SNOOZE, SI_VOL),
313 OPT_UINT32_VAL(SNOOZE, SI_TIME));
317 static void init_mixers(void)
322 struct mixer *m = &supported_mixer[i];
323 PARA_DEBUG_LOG("initializing mixer API #%d (%s)\n",
329 static int com_set(struct mixer *m, struct mixer_handle *h)
331 return m->set(h, OPT_UINT32_VAL(SET, VAL));
335 static struct mixer *get_mixer_or_die(void)
339 if (!OPT_GIVEN(PARA_MIXER, MIXER_API))
343 if (!strcmp(mixer_name[i],
344 OPT_STRING_VAL(PARA_MIXER, MIXER_API)))
346 if (i < NUM_SUPPORTED_MIXERS) {
347 PARA_NOTICE_LOG("using %s mixer API\n", mixer_name[i]);
348 return supported_mixer + i;
350 printf("available mixer APIs: ");
352 int d = (i == DEFAULT_MIXER);
353 printf("%s%s%s ", d? "[" : "", mixer_name[i], d? "]" : "");
359 static void show_subcommands(void)
361 const struct lls_command *cmd;
363 printf("Subcommands:\n");
364 for (i = 1; (cmd = lls_cmd(i, mixer_suite)); i++) {
365 const char *name = lls_command_name(cmd);
366 const char *purpose = lls_purpose(cmd);
367 printf("%-20s%s\n", name, purpose);
372 static int com_help(__a_unused struct mixer *m, __a_unused struct mixer_handle *h)
374 const struct lls_command *cmd;
375 const struct lls_opt_result *r_l = OPT_RESULT(HELP, LONG);
380 ret = lls_check_arg_count(sub_lpr, 0, 1, NULL);
383 if (lls_num_inputs(sub_lpr) == 0) {
387 name = lls_input(0, sub_lpr);
388 ret = lls(lls_lookup_subcmd(name, mixer_suite, &errctx));
391 PARA_ERROR_LOG("%s\n", errctx);
395 cmd = lls_cmd(ret, mixer_suite);
396 if (lls_opt_given(r_l))
397 txt = lls_long_help(cmd);
399 txt = lls_short_help(cmd);
406 static void handle_help_flags(void)
410 if (OPT_GIVEN(PARA_MIXER, DETAILED_HELP))
411 help = lls_long_help(CMD_PTR(PARA_MIXER));
412 else if (OPT_GIVEN(PARA_MIXER, HELP))
413 help = lls_short_help(CMD_PTR(PARA_MIXER));
422 static int parse_and_merge_config_file(const struct lls_command *cmd)
427 char *cf, *errctx = NULL;
428 struct lls_parse_result **lprp, *cf_lpr, *merged_lpr;
431 const char *subcmd_name;
433 if (cmd == lls_cmd(0, mixer_suite)) {
438 subcmd_name = lls_command_name(cmd);
440 if (OPT_GIVEN(PARA_MIXER, CONFIG_FILE))
441 cf = para_strdup(OPT_STRING_VAL(PARA_MIXER, CONFIG_FILE));
443 char *home = para_homedir();
444 cf = make_message("%s/.paraslash/mixer.conf", home);
447 ret = mmap_full_file(cf, O_RDONLY, &map, &sz, NULL);
449 if (ret != -E_EMPTY && ret != -ERRNO_TO_PARA_ERROR(ENOENT))
451 if (ret == -ERRNO_TO_PARA_ERROR(ENOENT) &&
452 OPT_GIVEN(PARA_MIXER, CONFIG_FILE))
455 ret = lls(lls_convert_config(map, sz, subcmd_name, &cf_argv, &errctx));
456 para_munmap(map, sz);
460 ret = lls(lls_parse(cf_argc, cf_argv, cmd, &cf_lpr, &errctx));
461 lls_free_argv(cf_argv);
464 ret = lls(lls_merge(*lprp, cf_lpr, cmd, &merged_lpr, &errctx));
465 lls_free_parse_result(cf_lpr, cmd);
468 lls_free_parse_result(*lprp, cmd);
470 loglevel = OPT_UINT32_VAL(PARA_MIXER, LOGLEVEL);
476 PARA_ERROR_LOG("%s\n", errctx);
482 * The main function of para_mixer.
484 * The executable is linked with the alsa or the oss mixer API, or both. It has
485 * a custom log function which prefixes log messages with the current date.
487 * \param argc Argument counter.
488 * \param argv Argument vector.
490 * \return EXIT_SUCCESS or EXIT_FAILURE.
492 int main(int argc, char *argv[])
494 const struct lls_command *cmd = CMD_PTR(PARA_MIXER);
499 struct mixer_handle *h;
502 ret = lls(lls_parse(argc, argv, cmd, &lpr, &errctx));
505 loglevel = OPT_UINT32_VAL(PARA_MIXER, LOGLEVEL);
506 version_handle_flag("mixer", OPT_GIVEN(PARA_MIXER, VERSION));
509 n = lls_num_inputs(lpr);
515 ret = parse_and_merge_config_file(cmd);
518 subcmd = lls_input(0, lpr);
519 ret = lls(lls_lookup_subcmd(subcmd, mixer_suite, &errctx));
522 cmd = lls_cmd(ret, mixer_suite);
523 ret = lls(lls_parse(n, argv + argc - n, cmd, &sub_lpr, &errctx));
526 ret = parse_and_merge_config_file(cmd);
530 m = get_mixer_or_die();
531 ret = m->open(OPT_STRING_VAL(PARA_MIXER, MIXER_DEVICE), &h);
534 ret = set_channel(m, h, OPT_STRING_VAL(PARA_MIXER, MIXER_CHANNEL));
535 if (ret == -E_BAD_CHANNEL) {
536 char *channels = m->get_channels(h);
537 printf("Available channels: %s\n", channels);
542 ret = (*(mixer_subcommand_handler_t *)(lls_user_data(cmd)))(m ,h);
546 lls_free_parse_result(sub_lpr, cmd);
548 lls_free_parse_result(lpr, CMD_PTR(PARA_MIXER));
553 PARA_ERROR_LOG("%s\n", errctx);
555 PARA_EMERG_LOG("%s\n", para_strerror(-ret));