2 * Copyright (C) 2005 Andre Noll <maan@tuebingen.mpg.de>
4 * Licensed under the GPL v2. For licencing details see COPYING.
7 /** \file audiod.c The paraslash's audio daemon. */
9 #include <netinet/in.h>
10 #include <sys/socket.h>
12 #include <sys/types.h>
13 #include <arpa/inet.h>
20 #include "audiod.lsg.h"
21 #include "recv_cmd.lsg.h"
27 #include "buffer_tree.h"
30 #include "grab_client.h"
41 /** Array of error strings. */
44 static struct lls_parse_result *lpr;
45 #define CMD_PTR (lls_cmd(0, audiod_suite))
46 #define OPT_RESULT(_name) (lls_opt_result(LSG_AUDIOD_PARA_AUDIOD_OPT_ ## _name, lpr))
47 #define OPT_GIVEN(_name) (lls_opt_given(OPT_RESULT(_name)))
48 #define OPT_STRING_VAL(_name) (lls_string_val(0, OPT_RESULT(_name)))
49 #define OPT_UINT32_VAL(_name) (lls_uint32_val(0, OPT_RESULT(_name)))
50 #define ENUM_STRING_VAL(_name) (lls_enum_string_val(OPT_UINT32_VAL(_name), \
51 lls_opt(LSG_AUDIOD_PARA_AUDIOD_OPT_ ## _name, CMD_PTR)))
53 __printf_2_3 void (*para_log)(int, const char*, ...) = daemon_log;
54 /** define the array containing all supported audio formats */
55 const char *audio_formats[] = {AUDIOD_AUDIO_FORMAT_ARRAY NULL};
57 /** Defines how audiod handles one supported audio format. */
58 struct audio_format_info {
59 /** the receiver for this audio format */
61 /** Parsed receiver command line. */
62 struct lls_parse_result *receiver_lpr;
63 /** the number of filters that should be activated for this audio format */
64 unsigned int num_filters;
65 /** Array of filter numbers to be activated. */
66 unsigned *filter_nums;
67 /** Pointer to the array of filter configurations. */
69 /** Parsed filter command line, one parse result per filter. */
70 struct lls_parse_result **filter_lpr;
71 /** the number of filters that should be activated for this audio format */
72 unsigned int num_writers;
73 /** Array of writer IDs to be activated. */
75 /** Parsed writer command line(s) */
76 struct lls_parse_result **writer_lpr;
77 /** do not start receiver/filters/writer before this time */
78 struct timeval restart_barrier;
81 /* Describes one instance of a receiver-filter-writer chain. */
83 /* Number of the audio format in this slot. */
85 /* The stream_start status item announced by para_server. */
86 struct timeval server_stream_start;
87 /* The offset status item announced by para_server. */
88 unsigned offset_seconds;
89 /* The seconds_total status item announced by para_server. */
90 unsigned seconds_total;
91 /* The receiver info associated with this slot. */
92 struct receiver_node *receiver_node;
93 /* The array of filter nodes. */
94 struct filter_node *fns;
95 /* The array of writers attached to the last filter. */
96 struct writer_node *wns;
99 #define RECEIVER_CMD(_a) lls_cmd((_a)->receiver_num, recv_cmd_suite)
100 #define RECEIVER(_a) ((const struct receiver *)lls_user_data(RECEIVER_CMD(_a)))
102 /** Maximal number of simultaneous instances. */
103 #define MAX_STREAM_SLOTS 5
105 /** Iterate over all slots. */
106 #define FOR_EACH_SLOT(_slot) for (_slot = 0; _slot < MAX_STREAM_SLOTS; _slot++)
109 * para_audiod uses \p MAX_STREAM_SLOTS different slots, each of which may
110 * be associated with a receiver/filter/writer triple. This array holds all
111 * information on the status of these slots.
113 * \sa struct slot_info
115 struct slot_info slot[MAX_STREAM_SLOTS];
117 /** The vss status flags audiod is interested in. */
118 enum vss_status_flags {
119 /** Whether the 'N' flag is set. */
120 VSS_STATUS_FLAG_NEXT = 1,
121 /** The 'P' flag is set. */
122 VSS_STATUS_FLAG_PLAYING = 2,
126 * The scheduler instance of para_audiod.
128 * This is needed also in audiod_command.c (for the tasks command), so it can
129 * not be made static.
131 struct sched sched = {.max_fileno = 0};
133 /* The task for obtaining para_server's status (para_client stat). */
135 /** The associated task structure of audiod. */
137 /** Client data associated with the stat task. */
138 struct client_task *ct;
139 /** Do not restart client command until this time. */
140 struct timeval restart_barrier;
141 /** Last time we received status data from para_server. */
142 struct timeval last_status_read;
144 /** The offset value announced by para_server. */
146 /** The length of the current audio file as announced by para_server. */
148 /** The start of the current stream from the view of para_server. */
149 struct timeval server_stream_start;
150 /** The average time deviation between para_server and para_audiod. */
151 struct timeval sa_time_diff;
152 /** Whether client time is ahead of server time. */
153 int sa_time_diff_sign;
154 /** The 'P' and the 'N' flags as announced by para_server. */
155 enum vss_status_flags vss_status;
156 /** Number of times the clock difference is to be checked. */
157 unsigned clock_diff_count;
158 /** When to start the next check for clock difference. */
159 struct timeval clock_diff_barrier;
160 /** Number of the audio format as announced by para_server. */
161 int current_audio_format_num;
162 /* The status task btrn is the child of the client task. */
163 struct btr_node *btrn;
166 /** The array of status items sent by para_server. */
167 char *stat_item_values[NUM_STAT_ITEMS] = {NULL};
170 * the current mode of operation of which can be changed by the on/off/cycle
171 * commands. It is either, AUDIOD_OFF, AUDIOD_ON or AUDIOD_STANDBY.
173 int audiod_status = AUDIOD_ON;
175 static char *socket_name;
176 static struct audio_format_info afi[NUM_AUDIO_FORMATS];
177 static struct signal_task *signal_task;
178 static struct status_task status_task_struct;
179 static uid_t *uid_whitelist;
182 * the task that calls the status command of para_server
184 * \sa struct status_task
186 static struct status_task *stat_task = &status_task_struct;
188 struct command_task {
189 /** The local listening socket. */
191 /** the associated task structure */
195 /** iterate over all supported audio formats */
196 #define FOR_EACH_AUDIO_FORMAT(af) for (af = 0; af < NUM_AUDIO_FORMATS; af++)
199 * Get the audio format number.
201 * \param name The name of the audio format.
203 * \return The audio format number on success, -E_UNSUPPORTED_AUDIO_FORMAT if
204 * \a name is not a supported audio format.
206 static int get_audio_format_num(const char *name)
210 while (para_isspace(*name))
212 FOR_EACH_AUDIO_FORMAT(i)
213 if (!strcmp(name, audio_formats[i]))
215 return -E_UNSUPPORTED_AUDIO_FORMAT;
219 * Return the flags for the \a decoder_flags status item.
221 * Allocates a string which contains one octal digit per slot. Bit zero (value
222 * 1) is set if a receiver is active. Bit one (value 2) and bit three (value 4)
223 * have the analogous meaning for filter and writer, respectively.
225 * \return String that must be freed by the caller.
227 __malloc char *audiod_get_decoder_flags(void)
230 char flags[MAX_STREAM_SLOTS + 1];
233 struct slot_info *s = &slot[i];
235 if (s->receiver_node)
243 flags[MAX_STREAM_SLOTS] = '\0';
244 return para_strdup(flags);
247 static int get_matching_audio_format_nums(const char *re)
252 ret = para_regcomp(&preg, re, REG_EXTENDED | REG_NOSUB);
256 FOR_EACH_AUDIO_FORMAT(i)
257 if (regexec(&preg, audio_formats[i], 0, NULL, 0) != REG_NOMATCH)
263 static int get_play_time_slot_num(void)
265 int i, oldest_slot = -1;
266 struct timeval oldest_wstime = {0, 0};
269 struct slot_info *s = &slot[i];
270 struct timeval wstime;
271 if (!s->wns || !s->wns[0].btrn)
273 btr_get_node_start(s->wns[0].btrn, &wstime);
274 if (oldest_slot >= 0 && tv_diff(&wstime, &oldest_wstime, NULL) > 0)
276 oldest_wstime = wstime;
283 * Compute the play time based on information of the current slot.
285 * This computes a string of the form "0:07 [3:33] (3%/3:40)" using information
286 * from the status items received from para_server and the start time of the
287 * (first) writer of the current slot.
289 * It has to take into account that the stream was probably not started at
290 * the beginning of the file, that the clock between the server and the client
291 * host may differ and that playback of the stream was delayed, e.g. because
292 * the prebuffer filter is used in the filter configuration.
294 * If no writer is active, for example because para_audiod runs in standby
295 * mode, an approximation based only on the status items is computed and the
296 * returned string is prefixed with "~".
298 * \return A string that must be freed by the caller.
300 char *get_time_string(void)
302 int ret, seconds = 0, length = stat_task->length_seconds;
303 struct timeval *tmp, sum, sss, /* server stream start */
304 rstime, /* receiver start time */
305 wstime, /* writer start time */
306 wtime, /* now - writer start */
307 rskip; /* receiver start - sss */
308 int slot_num = get_play_time_slot_num();
309 struct slot_info *s = slot_num < 0? NULL : &slot[slot_num];
310 bool writer_active = s && s->wns && s->wns[0].btrn;
313 if (audiod_status == AUDIOD_OFF)
315 if (stat_task->server_stream_start.tv_sec == 0) {
316 if (stat_task->vss_status & VSS_STATUS_FLAG_PLAYING)
317 goto out; /* server is about to change file */
318 if (length > 0) /* paused */
320 goto empty; /* stopped */
323 * Valid status items and playing, set length and tmp to the stream
324 * start. We use the writer start time from the slot info and fall back
325 * to the info from current status items if no writer is active yet.
327 tmp = &stat_task->server_stream_start;
329 btr_get_node_start(s->wns[0].btrn, &wstime);
330 if (wstime.tv_sec != 0) { /* writer wrote something */
331 if (s->server_stream_start.tv_sec == 0) {
332 /* copy status info to slot */
333 s->server_stream_start = stat_task->server_stream_start;
334 s->offset_seconds = stat_task->offset_seconds;
335 s->seconds_total = stat_task->length_seconds;
337 length = s->seconds_total;
338 tmp = &s->server_stream_start;
341 if (stat_task->sa_time_diff_sign > 0)
342 tv_diff(tmp, &stat_task->sa_time_diff, &sss);
344 tv_add(tmp, &stat_task->sa_time_diff, &sss);
345 if (!writer_active) {
347 tv_diff(now, &sss, &diff);
348 seconds = diff.tv_sec + stat_task->offset_seconds;
351 tv_diff(now, &wstime, &wtime);
352 //PARA_CRIT_LOG("offset %d\n", s->offset_seconds);
353 seconds = s->offset_seconds;
354 if (s->receiver_node->btrn) {
355 btr_get_node_start(s->receiver_node->btrn, &rstime);
356 ret = tv_diff(&rstime, &sss, &rskip);
357 if (ret > 0 && rskip.tv_sec > 2) {
358 /* audiod was started in the middle of the stream */
359 tv_add(&wtime, &rskip, &sum);
360 seconds += sum.tv_sec;
362 seconds += wtime.tv_sec;
364 seconds += wtime.tv_sec;
366 seconds = PARA_MIN(seconds, length);
367 seconds = PARA_MAX(seconds, 0);
369 "%s%d:%02d [%d:%02d] (%d%%/%d:%02d)",
373 (length - seconds) / 60,
374 (length - seconds) % 60,
375 length? (seconds * 100 + length / 2) / length : 0,
379 //PARA_DEBUG_LOG("slot %d: %s\n", slot_num, msg);
382 return para_strdup(NULL);
385 static void parse_config_or_die(void)
388 char *cf, *errctx = NULL;
392 if (OPT_GIVEN(CONFIG_FILE))
393 cf = para_strdup(OPT_STRING_VAL(CONFIG_FILE));
395 char *home = para_homedir();
396 cf = make_message("%s/.paraslash/audiod.conf", home);
399 ret = mmap_full_file(cf, O_RDONLY, &map, &sz, NULL);
401 if (ret != -E_EMPTY && ret != -ERRNO_TO_PARA_ERROR(ENOENT))
403 if (ret == -ERRNO_TO_PARA_ERROR(ENOENT) && OPT_GIVEN(CONFIG_FILE))
408 struct lls_parse_result *cf_lpr, *merged_lpr;
409 ret = lls(lls_convert_config(map, sz, NULL, &cf_argv, &errctx));
410 para_munmap(map, sz);
414 ret = lls(lls_parse(cf_argc, cf_argv, CMD_PTR, &cf_lpr, &errctx));
415 lls_free_argv(cf_argv);
418 ret = lls(lls_merge(lpr, cf_lpr, CMD_PTR, &merged_lpr,
420 lls_free_parse_result(cf_lpr, CMD_PTR);
423 lls_free_parse_result(lpr, CMD_PTR);
426 daemon_set_loglevel(ENUM_STRING_VAL(LOGLEVEL));
427 if (OPT_GIVEN(USER_ALLOW)) {
428 uint32_t n = OPT_GIVEN(USER_ALLOW);
431 uid_whitelist = para_malloc(n * sizeof(uid_t));
432 for (i = 0; i < n; i++) {
433 const char *arg = lls_string_val(i,
434 OPT_RESULT(USER_ALLOW));
437 ret = para_atoi32(arg, &val);
439 uid_whitelist[i] = val;
442 errno = 0; /* see getpwnam(3) */
445 PARA_EMERG_LOG("invalid username: %s\n", arg);
449 uid_whitelist[i] = pw->pw_uid;
457 PARA_ERROR_LOG("%s\n", errctx);
459 lls_free_parse_result(lpr, CMD_PTR);
460 PARA_EMERG_LOG("%s\n", para_strerror(-ret));
465 static void setup_signal_handling(void)
467 signal_task = signal_init_or_die();
468 para_install_sighandler(SIGINT);
469 para_install_sighandler(SIGTERM);
470 para_install_sighandler(SIGHUP);
471 para_sigaction(SIGPIPE, SIG_IGN);
474 static void clear_slot(int slot_num)
476 struct slot_info *s = &slot[slot_num];
478 PARA_INFO_LOG("clearing slot %d\n", slot_num);
479 memset(s, 0, sizeof(struct slot_info));
483 static void close_receiver(int slot_num)
485 struct slot_info *s = &slot[slot_num];
486 struct audio_format_info *a;
488 if (s->format < 0 || !s->receiver_node)
491 PARA_NOTICE_LOG("closing %s receiver in slot %d\n",
492 audio_formats[s->format], slot_num);
493 RECEIVER(a)->close(s->receiver_node);
494 btr_remove_node(&s->receiver_node->btrn);
495 task_reap(&s->receiver_node->task);
496 free(s->receiver_node);
497 s->receiver_node = NULL;
498 stat_task->current_audio_format_num = -1;
499 tv_add(now, &(struct timeval)EMBRACE(0, 200 * 1000),
500 &a->restart_barrier);
503 static void writer_cleanup(struct writer_node *wn)
507 PARA_INFO_LOG("closing %s\n", writer_name(wn->wid));
508 writer_get(wn->wid)->close(wn);
509 btr_remove_node(&wn->btrn);
510 task_reap(&wn->task);
513 static void close_writers(struct slot_info *s)
515 struct audio_format_info *a;
522 if (a->num_writers == 0)
523 writer_cleanup(s->wns);
525 for (i = 0; i < a->num_writers; i++)
526 writer_cleanup(s->wns + i);
532 static void close_filters(struct slot_info *s)
535 struct audio_format_info *a = afi + s->format;
536 if (a->num_filters == 0)
538 for (i = a->num_filters - 1; i >= 0; i--) {
539 struct filter_node *fn = s->fns + i;
540 const struct filter *f;
544 f = filter_get(fn->filter_num);
547 btr_remove_node(&fn->btrn);
548 task_reap(&fn->task);
554 static void notify_receivers(int error)
559 struct slot_info *s = slot + i;
562 if (!s->receiver_node)
564 task_notify(s->receiver_node->task, error);
568 static int get_empty_slot(void)
579 if (s->wns || s->receiver_node || s->fns)
584 return -E_NO_MORE_SLOTS;
587 static void open_filters(struct slot_info *s)
589 struct audio_format_info *a = afi + s->format;
590 struct filter_node *fn;
591 int nf = a->num_filters;
592 struct btr_node *parent;
597 PARA_INFO_LOG("opening %s filters\n", audio_formats[s->format]);
598 assert(s->fns == NULL);
599 s->fns = para_calloc(nf * sizeof(struct filter_node));
600 parent = s->receiver_node->btrn;
601 for (i = 0; i < nf; i++) {
604 const struct filter *f = filter_get(a->filter_nums[i]);
606 fn->filter_num = a->filter_nums[i];
607 fn->conf = a->filter_conf[i];
608 fn->lpr = a->filter_lpr[i];
609 name = filter_name(fn->filter_num);
610 fn->btrn = btr_new_node(&(struct btr_node_description)
611 EMBRACE(.name = name, .parent = parent,
612 .handler = f->execute, .context = fn));
616 sprintf(buf, "%s (slot %d)", name, (int)(s - slot));
617 fn->task = task_register(&(struct task_info) {
619 .pre_select = f->pre_select,
620 .post_select = f->post_select,
624 PARA_NOTICE_LOG("%s filter %d/%d (%s) started in slot %d\n",
625 audio_formats[s->format], i, nf, name, (int)(s - slot));
629 static void open_writers(struct slot_info *s)
632 struct audio_format_info *a = afi + s->format;
633 struct writer_node *wn;
634 struct btr_node *parent = s->fns[a->num_filters - 1].btrn;
636 assert(s->wns == NULL);
637 s->wns = para_calloc(PARA_MAX(1U, a->num_writers)
638 * sizeof(struct writer_node));
639 for (i = 0; i < a->num_writers; i++) {
641 wn->wid = a->wids[i];
642 wn->lpr = a->writer_lpr[i];
643 register_writer_node(wn, parent, &sched);
644 PARA_NOTICE_LOG("%s writer started in slot %d\n",
645 writer_name(a->wids[i]), (int)(s - slot));
649 /* returns slot num on success */
650 static int open_receiver(int format)
652 struct audio_format_info *a = &afi[format];
655 const struct receiver *r = RECEIVER(a);
656 const char *name = lls_command_name(RECEIVER_CMD(a));
657 struct receiver_node *rn;
659 tv_add(now, &(struct timeval)EMBRACE(2, 0), &a->restart_barrier);
660 ret = get_empty_slot();
664 rn = para_calloc(sizeof(*rn));
666 rn->lpr = a->receiver_lpr;
667 rn->btrn = btr_new_node(&(struct btr_node_description)
668 EMBRACE(.name = name, .context = rn));
671 btr_remove_node(&rn->btrn);
677 s->receiver_node = rn;
678 PARA_NOTICE_LOG("started %s: %s receiver in slot %d\n",
679 audio_formats[format], name, slot_num);
680 rn->task = task_register(&(struct task_info) {
682 .pre_select = r->pre_select,
683 .post_select = r->post_select,
689 static bool receiver_running(void)
692 long unsigned ss1 = stat_task->server_stream_start.tv_sec;
695 struct slot_info *s = &slot[i];
696 long unsigned ss2 = s->server_stream_start.tv_sec;
698 if (!s->receiver_node)
700 if (task_status(s->receiver_node->task) >= 0)
709 * Return the root node of the current buffer tree.
711 * This is only used for stream grabbing.
713 * \return \p NULL if no slot is currently active. If more than one buffer tree
714 * exists, the node corresponding to the most recently started receiver is
717 struct btr_node *audiod_get_btr_root(void)
719 int i, newest_slot = -1;
720 struct timeval newest_rstime = {0, 0};
723 struct slot_info *s = &slot[i];
724 struct timeval rstime;
725 if (!s->receiver_node)
727 if (task_status(s->receiver_node->task) < 0)
729 btr_get_node_start(s->receiver_node->btrn, &rstime);
730 if (newest_slot >= 0 && tv_diff(&rstime, &newest_rstime, NULL) < 0)
732 newest_rstime = rstime;
735 if (newest_slot == -1)
737 return slot[newest_slot].receiver_node->btrn;
740 /* whether a new instance of a decoder should be started. */
741 static bool must_start_decoder(void)
743 int cafn = stat_task->current_audio_format_num;
744 unsigned vs = stat_task->vss_status;
746 if (audiod_status != AUDIOD_ON)
752 if (vs & VSS_STATUS_FLAG_NEXT)
754 if (!(vs & VSS_STATUS_FLAG_PLAYING))
756 if (receiver_running())
758 if (tv_diff(now, &afi[cafn].restart_barrier, NULL) < 0)
763 static void compute_time_diff(const struct timeval *status_time)
765 struct timeval tmp, diff;
766 static unsigned count;
767 int sign, sa_time_diff_sign = stat_task->sa_time_diff_sign;
768 const struct timeval max_deviation = {0, 500 * 1000};
769 const int time_smooth = 5;
771 sign = tv_diff(status_time, now, &diff);
772 // PARA_NOTICE_LOG("%s: sign = %i, sa_time_diff_sign = %i\n", __func__,
773 // sign, sa_time_diff_sign);
775 sa_time_diff_sign = sign;
776 stat_task->sa_time_diff = diff;
781 int s = tv_diff(&diff, &stat_task->sa_time_diff, &tmp);
782 if (tv_diff(&max_deviation, &tmp, NULL) < 0)
783 PARA_WARNING_LOG("time diff jump: %lums\n",
787 sa_time_diff_sign = tv_convex_combination(
788 sa_time_diff_sign * time_smooth, &stat_task->sa_time_diff,
789 count > 10? sign : sign * time_smooth, &diff,
791 stat_task->sa_time_diff = tmp;
792 PARA_INFO_LOG("time diff (cur/avg): %s%lums/%s%lums\n",
795 sa_time_diff_sign < 0? "-" : "+",
796 tv2ms(&stat_task->sa_time_diff)
799 stat_task->sa_time_diff_sign = sa_time_diff_sign;
802 static int update_item(int itemnum, char *buf)
804 long unsigned sec, usec;
806 if (stat_task->clock_diff_count && itemnum != SI_CURRENT_TIME)
808 free(stat_item_values[itemnum]);
809 stat_item_values[itemnum] = para_strdup(buf);
810 stat_client_write_item(itemnum);
812 case SI_STATUS_FLAGS:
813 stat_task->vss_status = 0;
814 if (strchr(buf, 'N'))
815 stat_task->vss_status |= VSS_STATUS_FLAG_NEXT;
816 if (strchr(buf, 'P'))
817 stat_task->vss_status |= VSS_STATUS_FLAG_PLAYING;
820 stat_task->offset_seconds = atoi(buf);
822 case SI_SECONDS_TOTAL:
823 stat_task->length_seconds = atoi(buf);
825 case SI_STREAM_START:
826 if (sscanf(buf, "%lu.%lu", &sec, &usec) == 2) {
827 stat_task->server_stream_start.tv_sec = sec;
828 stat_task->server_stream_start.tv_usec = usec;
831 case SI_CURRENT_TIME:
832 if (sscanf(buf, "%lu.%lu", &sec, &usec) == 2) {
833 struct timeval tv = {sec, usec};
834 compute_time_diff(&tv);
838 stat_task->current_audio_format_num
839 = get_audio_format_num(buf);
844 static int parse_stream_command(const char *txt, const char **cmd)
847 char *re, *p = strchr(txt, ':');
850 return -E_MISSING_COLON;
853 re = malloc(len + 1);
854 strncpy(re, txt, len);
856 ret = get_matching_audio_format_nums(re);
861 static int add_filter(int format, const char *cmdline)
863 struct audio_format_info *a = &afi[format];
864 int filter_num, nf = a->num_filters;
866 struct lls_parse_result *flpr;
868 filter_num = filter_setup(cmdline, &cfg, &flpr);
869 a->filter_lpr = para_realloc(a->filter_lpr,
870 (nf + 1) * sizeof(flpr));
871 a->filter_conf = para_realloc(a->filter_conf,
872 (nf + 1) * sizeof(void *));
873 a->filter_nums = para_realloc(a->filter_nums,
874 (nf + 1) * sizeof(unsigned));
876 a->filter_nums[nf] = filter_num;
877 a->filter_conf[nf] = cfg;
878 a->filter_lpr[nf] = flpr;
880 PARA_INFO_LOG("%s filter %d: %s\n", audio_formats[format], nf,
881 filter_name(filter_num));
885 static int parse_writer_args(void)
889 struct audio_format_info *a;
891 for (i = 0; i < OPT_GIVEN(WRITER); i++) {
894 ret = parse_stream_command(lls_string_val(i,
895 OPT_RESULT(WRITER)), &cmd);
899 FOR_EACH_AUDIO_FORMAT(j) {
901 if ((af_mask & (1 << j)) == 0) /* no match */
904 a->wids = para_realloc(a->wids, (nw + 1) * sizeof(int));
905 a->writer_lpr = para_realloc(a->writer_lpr,
906 (nw + 1) * sizeof(struct lls_parse_result *));
907 a->wids[nw] = check_writer_arg_or_die(cmd,
909 PARA_INFO_LOG("%s writer #%d: %s\n", audio_formats[j],
910 nw, writer_name(a->wids[nw]));
914 /* Use default writer for audio formats which are not yet set up. */
915 FOR_EACH_AUDIO_FORMAT(i) {
917 if (a->num_writers > 0)
918 continue; /* already set up */
920 a->wids = para_malloc(sizeof(int));
921 a->writer_lpr = para_malloc(sizeof(struct lls_parse_result *));
922 a->wids[0] = check_writer_arg_or_die(NULL, a->writer_lpr);
923 PARA_INFO_LOG("%s writer: %s (default)\n", audio_formats[i],
924 writer_name(a->wids[0]));
929 static int parse_receiver_args(void)
933 struct audio_format_info *a;
935 FOR_EACH_AUDIO_FORMAT(i)
936 afi[i].receiver_num = -1;
937 for (i = OPT_GIVEN(RECEIVER) - 1; i >= 0; i--) {
940 ret = parse_stream_command(lls_string_val(i,
941 OPT_RESULT(RECEIVER)), &arg);
945 FOR_EACH_AUDIO_FORMAT(j) {
947 if ((af_mask & (1 << j)) == 0) /* no match */
950 * If multiple receivers are given for this audio format, the
951 * last one wins and we have to free the previous receiver
952 * config here. Since we are iterating backwards, the winning
953 * receiver arg is in fact the first one given.
955 lls_free_parse_result(a->receiver_lpr, RECEIVER_CMD(a));
956 a->receiver_num = check_receiver_arg(arg, &a->receiver_lpr);
960 * Use the default receiver for those audio formats for which no
961 * receiver was specified.
963 FOR_EACH_AUDIO_FORMAT(i) {
965 if (a->receiver_num >= 0)
967 a->receiver_num = check_receiver_arg(NULL, &a->receiver_lpr);
969 FOR_EACH_AUDIO_FORMAT(i) {
971 PARA_INFO_LOG("receiving %s streams via %s receiver\n",
972 audio_formats[i], lls_command_name(RECEIVER_CMD(a)));
979 static int init_default_filters(void)
983 FOR_EACH_AUDIO_FORMAT(i) {
984 struct audio_format_info *a = &afi[i];
985 const char *name = lls_command_name(RECEIVER_CMD(a));
990 continue; /* no default -- nothing to to */
992 * udp and dccp streams are fec-encoded, so add fecdec as the
995 if (strcmp(name, "udp") == 0 || strcmp(name, "dccp") == 0) {
996 tmp = para_strdup("fecdec");
1002 /* add "dec" to audio format name */
1003 tmp = make_message("%sdec", audio_formats[i]);
1004 for (j = 1; filter_get(j); j++)
1005 if (!strcmp(tmp, filter_name(j)))
1008 ret = -E_UNSUPPORTED_FILTER;
1011 tmp = para_strdup(filter_name(j));
1012 ret = add_filter(i, tmp);
1016 PARA_INFO_LOG("%s -> default filter: %s\n", audio_formats[i],
1023 static int parse_filter_args(void)
1025 int i, j, ret, af_mask, num_matches;
1027 for (i = 0; i < OPT_GIVEN(FILTER); i++) {
1029 ret = parse_stream_command(lls_string_val(i,
1030 OPT_RESULT(FILTER)), &arg);
1035 FOR_EACH_AUDIO_FORMAT(j) {
1036 if ((af_mask & (1 << j)) == 0) /* no match */
1038 ret = add_filter(j, arg);
1043 if (num_matches == 0)
1044 PARA_WARNING_LOG("ignoring filter spec: %s\n",
1045 lls_string_val(i, OPT_RESULT(FILTER)));
1047 ret = init_default_filters(); /* use default values for the rest */
1052 static int parse_stream_args(void)
1056 ret = parse_receiver_args();
1059 ret = parse_filter_args();
1062 ret = parse_writer_args();
1068 /* does not unlink socket on errors */
1069 static void init_local_socket(struct command_task *ct)
1071 if (OPT_GIVEN(SOCKET))
1072 socket_name = para_strdup(OPT_STRING_VAL(SOCKET));
1074 char *hn = para_hostname();
1075 socket_name = make_message("/var/paraslash/audiod_socket.%s",
1079 PARA_NOTICE_LOG("local socket: %s\n", socket_name);
1080 if (OPT_GIVEN(FORCE))
1081 unlink(socket_name);
1082 ct->fd = create_local_socket(socket_name);
1085 PARA_EMERG_LOG("%s\n", para_strerror(-ct->fd));
1089 static int signal_post_select(struct sched *s, void *context)
1091 struct signal_task *st = context;
1094 ret = task_get_notification(st->task);
1097 signum = para_next_signal(&s->rfds);
1102 PARA_NOTICE_LOG("received signal %d\n", signum);
1103 task_notify_all(s, E_AUDIOD_SIGNAL);
1104 return -E_AUDIOD_SIGNAL;
1109 static void command_pre_select(struct sched *s, void *context)
1111 struct command_task *ct = context;
1112 para_fd_set(ct->fd, &s->rfds, &s->max_fileno);
1115 static int command_post_select(struct sched *s, void *context)
1118 struct command_task *ct = context;
1119 static struct timeval last_status_dump;
1120 struct timeval tmp, delay;
1123 ret = task_get_notification(ct->task);
1126 ret = handle_connect(ct->fd, &s->rfds);
1128 PARA_ERROR_LOG("%s\n", para_strerror(-ret));
1129 if (ret == -E_AUDIOD_TERM) {
1130 task_notify_all(s, -ret);
1138 /* if last status dump was less than 500ms ago, do nothing */
1140 delay.tv_usec = 500 * 1000;
1141 tv_add(&last_status_dump, &delay, &tmp);
1142 if (tv_diff(now, &tmp, NULL) < 0)
1146 * If last status dump was more than 5s ago, force update. Otherwise,
1147 * update only those items that have changed.
1151 tv_add(&last_status_dump, &delay, &tmp);
1152 if (tv_diff(now, &tmp, NULL) > 0)
1155 audiod_status_dump(force);
1156 last_status_dump = *now;
1160 static void init_command_task(struct command_task *ct)
1162 init_local_socket(ct); /* doesn't return on errors */
1164 ct->task = task_register(&(struct task_info) {
1166 .pre_select = command_pre_select,
1167 .post_select = command_post_select,
1172 static void close_stat_pipe(void)
1176 task_reap(&stat_task->ct->task);
1177 client_close(stat_task->ct);
1178 stat_task->ct = NULL;
1179 clear_and_dump_items();
1180 stat_task->length_seconds = 0;
1181 stat_task->offset_seconds = 0;
1182 stat_task->vss_status = 0;
1183 stat_task->current_audio_format_num = -1;
1184 audiod_status_dump(true);
1187 /* avoid busy loop if server is down */
1188 static void set_stat_task_restart_barrier(unsigned seconds)
1190 struct timeval delay = {seconds, 0};
1191 tv_add(now, &delay, &stat_task->restart_barrier);
1194 static bool must_close_slot(int slot_num)
1196 struct slot_info *s = &slot[slot_num];
1197 struct audio_format_info *a = afi + s->format;
1202 if (s->receiver_node && task_status(s->receiver_node->task) >= 0)
1204 for (i = 0; i < a->num_filters; i++)
1205 if (s->fns && task_status(s->fns[i].task) >= 0)
1207 if (a->num_writers > 0) {
1208 for (i = 0; i < a->num_writers; i++)
1209 if (s->wns && task_status(s->wns[i].task) >= 0)
1212 if (s->wns && task_status(s->wns[0].task) >= 0)
1218 static void close_slot(int slot_num)
1220 struct slot_info *s = slot + slot_num;
1222 PARA_INFO_LOG("closing slot %d\n", slot_num);
1225 close_receiver(slot_num);
1226 clear_slot(slot_num);
1229 static void close_unused_slots(void)
1235 if (must_close_slot(i)) {
1240 audiod_status_dump(true);
1244 * Cleanup all resources.
1246 * This performs various cleanups, removes the audiod socket and closes the
1247 * connection to para_server.
1249 static void audiod_cleanup(void)
1252 unlink(socket_name);
1254 close_unused_slots();
1255 close_stat_clients();
1256 free(uid_whitelist);
1260 * Check if any receivers/filters/writers need to be started and do so if
1263 static void start_stop_decoders(void)
1266 struct slot_info *sl;
1268 close_unused_slots();
1269 if (audiod_status != AUDIOD_ON ||
1270 !(stat_task->vss_status & VSS_STATUS_FLAG_PLAYING))
1271 return notify_receivers(E_NOT_PLAYING);
1272 if (!must_start_decoder())
1274 ret = open_receiver(stat_task->current_audio_format_num);
1276 PARA_ERROR_LOG("%s\n", para_strerror(-ret));
1282 activate_grab_clients(&sched);
1283 btr_log_tree(sl->receiver_node->btrn, LL_NOTICE);
1284 audiod_status_dump(true);
1287 static void status_pre_select(struct sched *s, void *context)
1289 struct status_task *st = context;
1290 int i, ret, cafn = stat_task->current_audio_format_num;
1292 if (must_start_decoder())
1295 if (must_close_slot(i))
1297 ret = btr_node_status(st->btrn, st->min_iqs, BTR_NT_LEAF);
1300 if (st->ct && audiod_status == AUDIOD_OFF)
1302 if (!st->ct && audiod_status != AUDIOD_OFF)
1303 sched_request_barrier_or_min_delay(&st->restart_barrier, s);
1305 sched_request_barrier(&afi[cafn].restart_barrier, s);
1307 * If para_server is playing we'd like to have a smooth time display
1308 * even if we are running in standby mode. So we request a timeout that
1309 * expires at the next full second.
1311 if (stat_task->vss_status & VSS_STATUS_FLAG_PLAYING)
1312 sched_request_timeout_ms(1000 - now->tv_usec / 1000, s);
1318 /* restart the client task if necessary */
1319 static int status_post_select(struct sched *s, void *context)
1321 struct status_task *st = context;
1324 ret = task_get_notification(st->task);
1327 if (audiod_status == AUDIOD_OFF) {
1330 if (task_status(st->ct->task) >= 0) {
1331 task_notify(st->ct->task, E_AUDIOD_OFF);
1335 st->clock_diff_count = OPT_UINT32_VAL(CLOCK_DIFF_COUNT);
1342 ret = btr_node_status(st->btrn, st->min_iqs, BTR_NT_LEAF);
1347 if (st->ct->status != CL_EXECUTING)
1350 struct timeval diff;
1351 tv_diff(now, &st->last_status_read, &diff);
1352 if (diff.tv_sec > 61)
1353 task_notify(st->ct->task, E_STATUS_TIMEOUT);
1356 btr_merge(st->btrn, st->min_iqs);
1357 sz = btr_next_buffer(st->btrn, &buf);
1358 ret = for_each_stat_item(buf, sz, update_item);
1360 task_notify(st->ct->task, -ret);
1364 btr_consume(st->btrn, sz - ret);
1365 st->last_status_read = *now;
1367 } else /* current status item crosses buffers */
1368 st->min_iqs = sz + 1;
1371 btr_drain(st->btrn);
1372 st->current_audio_format_num = -1;
1373 if (tv_diff(now, &st->restart_barrier, NULL) < 0)
1375 if (st->clock_diff_count) { /* get status only one time */
1376 char *argv[] = {"audiod", "--", "stat", "-p", "-n=1", NULL};
1378 PARA_INFO_LOG("clock diff count: %u\n", st->clock_diff_count);
1379 st->clock_diff_count--;
1380 client_open(argc, argv, &st->ct, NULL, NULL, st->btrn, s);
1381 set_stat_task_restart_barrier(2);
1384 char *argv[] = {"audiod", "--", "stat", "-p", NULL};
1386 client_open(argc, argv, &st->ct, NULL, NULL, st->btrn, s);
1387 set_stat_task_restart_barrier(5);
1389 free(stat_item_values[SI_BASENAME]);
1390 stat_item_values[SI_BASENAME] = para_strdup(
1391 "no connection to para_server");
1392 stat_client_write_item(SI_BASENAME);
1393 st->last_status_read = *now;
1395 start_stop_decoders();
1399 static void init_status_task(struct status_task *st)
1401 memset(st, 0, sizeof(struct status_task));
1402 st->sa_time_diff_sign = 1;
1403 st->clock_diff_count = OPT_UINT32_VAL(CLOCK_DIFF_COUNT);
1404 st->current_audio_format_num = -1;
1405 st->btrn = btr_new_node(&(struct btr_node_description)
1406 EMBRACE(.name = "stat"));
1408 stat_task->task = task_register(&(struct task_info) {
1410 .pre_select = status_pre_select,
1411 .post_select = status_post_select,
1412 .context = stat_task,
1416 static void set_initial_status(void)
1418 audiod_status = AUDIOD_ON;
1419 if (!OPT_GIVEN(MODE))
1421 if (!strcmp(OPT_STRING_VAL(MODE), "sb")) {
1422 audiod_status = AUDIOD_STANDBY;
1425 if (!strcmp(OPT_STRING_VAL(MODE), "off")) {
1426 audiod_status = AUDIOD_OFF;
1429 if (strcmp(OPT_STRING_VAL(MODE), "on"))
1430 PARA_WARNING_LOG("invalid mode\n");
1434 * Lookup the given UID in the whitelist.
1436 * The whitelist is the array of arguments to the --user-allow opion. If the
1437 * option was not given, the array is empty, in which case the check succeeds.
1439 * \param uid User ID to look up.
1441 * \return True if --user-allow was not given, or if uid matches an element of
1444 bool uid_is_whitelisted(uid_t uid)
1448 if (!OPT_GIVEN(USER_ALLOW))
1450 for (i = 0; i < OPT_GIVEN(USER_ALLOW); i++)
1451 if (uid == uid_whitelist[i])
1456 static void handle_help_flags(void)
1459 bool d = OPT_GIVEN(DETAILED_HELP);
1462 help = lls_long_help(CMD_PTR);
1463 else if (OPT_GIVEN(HELP))
1464 help = lls_short_help(CMD_PTR);
1467 printf("%s\n", help);
1469 print_receiver_helps(d);
1470 print_filter_helps(d);
1471 print_writer_helps(d);
1476 * the main function of para_audiod
1478 * \param argc usual argument count
1479 * \param argv usual argument vector
1481 * \return EXIT_SUCCESS or EXIT_FAILURE
1483 * \sa para_audiod(1)
1485 int main(int argc, char *argv[])
1488 struct command_task command_task_struct, *cmd_task = &command_task_struct;
1492 ret = lls(lls_parse(argc, argv, CMD_PTR, &lpr, &errctx));
1495 daemon_set_loglevel(ENUM_STRING_VAL(LOGLEVEL));
1496 daemon_drop_privileges_or_die(OPT_STRING_VAL(USER),
1497 OPT_STRING_VAL(GROUP));
1498 version_handle_flag("audiod", OPT_GIVEN(VERSION));
1499 handle_help_flags();
1500 parse_config_or_die();
1501 init_random_seed_or_die();
1502 daemon_set_priority(OPT_UINT32_VAL(PRIORITY));
1504 if (daemon_init_colors_or_die(OPT_UINT32_VAL(COLOR), COLOR_AUTO,
1505 COLOR_NO, OPT_GIVEN(LOGFILE))) {
1506 for (i = 0; i < OPT_GIVEN(LOG_COLOR); i++)
1507 daemon_set_log_color_or_die(lls_string_val(i,
1508 OPT_RESULT(LOG_COLOR)));
1510 daemon_set_flag(DF_LOG_TIME);
1511 daemon_set_flag(DF_LOG_HOSTNAME);
1512 daemon_set_flag(DF_LOG_LL);
1513 if (OPT_GIVEN(LOG_TIMING))
1514 daemon_set_flag(DF_LOG_TIMING);
1515 if (OPT_GIVEN(LOGFILE)) {
1516 daemon_set_logfile(OPT_STRING_VAL(LOGFILE));
1517 daemon_open_log_or_die();
1519 ret = parse_stream_args();
1521 PARA_EMERG_LOG("%s\n", para_strerror(-ret));
1524 daemon_log_welcome("audiod");
1525 daemon_set_start_time();
1526 set_initial_status();
1529 setup_signal_handling();
1531 init_status_task(stat_task);
1532 init_command_task(cmd_task);
1534 if (OPT_GIVEN(DAEMON))
1535 daemonize(false /* parent exits immediately */);
1537 signal_task->task = task_register(&(struct task_info) {
1539 .pre_select = signal_pre_select,
1540 .post_select = signal_post_select,
1541 .context = signal_task,
1544 sched.default_timeout.tv_sec = 2;
1545 sched.default_timeout.tv_usec = 999 * 1000;
1546 ret = schedule(&sched);
1548 sched_shutdown(&sched);
1549 signal_shutdown(signal_task);
1552 lls_free_parse_result(lpr, CMD_PTR);
1554 PARA_ERROR_LOG("%s\n", errctx);
1556 PARA_EMERG_LOG("%s\n", para_strerror(-ret));
1557 return ret < 0? EXIT_FAILURE : EXIT_SUCCESS;