audiod_command.c

   1 /*
   2  * Copyright (C) 2005-2008 Andre Noll <maan@systemlinux.org>
   3  *
   4  * Licensed under the GPL v2. For licencing details see COPYING.
   5  */
   6
   7 /** \file audiod_command.c commands for para_audiod */
   8
   9 #include <sys/types.h>
  10 #include <dirent.h>
  11
  12 #include "para.h"
  13 #include "audiod.cmdline.h"
  14 #include "list.h"
  15 #include "close_on_fork.h"
  16 #include "sched.h"
  17 #include "filter.h"
  18 #include "grab_client.cmdline.h"
  19 #include "grab_client.h"
  20
  21 #include "error.h"
  22 #include "audiod.h"
  23 #include "net.h"
  24 #include "daemon.h"
  25 #include "string.h"
  26 #include "fd.h"
  27 #include "audiod_command_list.h"
  28
  29 /** iterate over the array of all audiod commands */
  30 #define FOR_EACH_COMMAND(c) for (c = 0; audiod_cmds[c].name; c++)
  31
  32 static int client_write(int fd, const char *buf)
  33 {
  34         size_t len = strlen(buf);
  35         return write(fd, buf, len) != len? -E_CLIENT_WRITE: 1;
  36 }
  37
  38 static char *get_time_string(struct timeval *newest_stime)
  39 {
  40         struct timeval diff, adj_stream_start, tmp;
  41         int total = 0, use_server_time = 1,
  42                 length_seconds = stat_task->length_seconds;
  43
  44         if (!stat_task->playing) {
  45                 if (length_seconds)
  46                         return NULL;
  47                 return make_message("%s:\n", status_item_list[SI_PLAY_TIME]);
  48         }
  49         if (audiod_status == AUDIOD_OFF)
  50                 goto out;
  51         if (stat_task->sa_time_diff_sign > 0)
  52                 tv_diff(&stat_task->server_stream_start, &stat_task->sa_time_diff,
  53                         &adj_stream_start);
  54         else
  55                 tv_add(&stat_task->server_stream_start, &stat_task->sa_time_diff,
  56                         &adj_stream_start);
  57         tmp = adj_stream_start;
  58         if (newest_stime && audiod_status == AUDIOD_ON) {
  59                 tv_diff(newest_stime, &adj_stream_start, &diff);
  60                 if (tv2ms(&diff) < 5000) {
  61                         tmp = *newest_stime;
  62                         use_server_time = 0;
  63                 }
  64         }
  65         tv_diff(now, &tmp, &diff);
  66         total = diff.tv_sec + stat_task->offset_seconds;
  67         if (total > length_seconds)
  68                 total = length_seconds;
  69         if (total < 0)
  70                 total = 0;
  71 out:
  72         return make_message(
  73                 "%s: %s%d:%02d [%d:%02d] (%d%%/%d:%02d)\n",
  74                 status_item_list[SI_PLAY_TIME],
  75                 use_server_time? "~" : "",
  76                 total / 60,
  77                 total % 60,
  78                 (length_seconds - total) / 60,
  79                 (length_seconds - total) % 60,
  80                 length_seconds? (total * 100 + length_seconds / 2) /
  81                         length_seconds : 0,
  82                 length_seconds / 60,
  83                 length_seconds % 60
  84         );
  85 }
  86
  87 __malloc static char *audiod_status_string(void)
  88 {
  89         const char *status = (audiod_status == AUDIOD_ON)?
  90                 "on" : (audiod_status == AUDIOD_OFF)? "off": "sb";
  91         return make_message("%s: %s\n", status_item_list[SI_AUDIOD_STATUS], status);
  92 }
  93
  94 static struct timeval *wstime(void)
  95 {
  96         int i;
  97         struct timeval *max = NULL;
  98         FOR_EACH_SLOT(i) {
  99                 struct slot_info *s = &slot[i];
 100                 if (!s->wng)
 101                         continue;
 102                 if (max && tv_diff(&s->wstime, max, NULL) <= 0)
 103                         continue;
 104                 max = &s->wstime;
 105         }
 106         return max;
 107 }
 108 __malloc static char *decoder_flags(void)
 109 {
 110         int i;
 111         char flags[MAX_STREAM_SLOTS + 1];
 112
 113         FOR_EACH_SLOT(i) {
 114                 struct slot_info *s = &slot[i];
 115                 char flag = '0';
 116                 if (s->receiver_node)
 117                         flag += 1;
 118                 if (s->wng)
 119                         flag += 2;
 120                 flags[i] = flag;
 121         }
 122         flags[MAX_STREAM_SLOTS] = '\0';
 123         return make_message("%s: %s\n", status_item_list[SI_DECODER_FLAGS],
 124                 flags);
 125 }
 126
 127 static int dump_commands(int fd)
 128 {
 129         char *buf = para_strdup(""), *tmp = NULL;
 130         int i;
 131         ssize_t ret;
 132
 133         FOR_EACH_COMMAND(i) {
 134                 tmp = make_message("%s%s\t%s\n", buf, audiod_cmds[i].name,
 135                         audiod_cmds[i].description);
 136                 free(buf);
 137                 buf = tmp;
 138         }
 139         ret = client_write(fd, buf);
 140         free(buf);
 141         return ret;
 142 }
 143
 144 /*
 145  * command handlers don't close their fd on errors (ret < 0) so that
 146  * its caller can send an error message. Otherwise (ret >= 0) it's up
 147  * to each individual command to close the fd if necessary.
 148  */
 149
 150 int com_help(int fd, int argc, char **argv)
 151 {
 152         int i, ret;
 153         char *buf;
 154         const char *dflt = "No such command. Available commands:\n";
 155
 156         if (argc < 2) {
 157                 ret = dump_commands(fd);
 158                 goto out;
 159         }
 160         FOR_EACH_COMMAND(i) {
 161                 if (strcmp(audiod_cmds[i].name, argv[1]))
 162                         continue;
 163                 buf = make_message(
 164                         "NAME\n\t%s -- %s\n"
 165                         "SYNOPSIS\n\tpara_audioc %s\n"
 166                         "DESCRIPTION\n%s\n",
 167                         argv[1],
 168                         audiod_cmds[i].description,
 169                         audiod_cmds[i].usage,
 170                         audiod_cmds[i].help
 171                 );
 172                 ret = client_write(fd, buf);
 173                 free(buf);
 174                 goto out;
 175         }
 176         ret = client_write(fd, dflt);
 177         if (ret > 0)
 178                 ret = dump_commands(fd);
 179 out:
 180         if (ret >= 0)
 181                 close(fd);
 182         return ret;
 183 }
 184
 185 int com_tasks(int fd, __a_unused int argc, __a_unused char **argv)
 186 {
 187         char *tl = get_task_list();
 188         int ret = 1;
 189         if (tl)
 190                 ret = client_write(fd, tl);
 191         free(tl);
 192         if (ret > 0)
 193                 close(fd);
 194         return ret;
 195 }
 196
 197 int com_kill(int fd, int argc, char **argv)
 198 {
 199         int i, ret = 1;
 200         if (argc < 2)
 201                 return -E_AUDIOD_SYNTAX;
 202         for (i = 1; i < argc; i++) {
 203                 ret = kill_task(argv[i]);
 204                 if (ret < 0)
 205                         break;
 206         }
 207         if (ret > 0)
 208                 close(fd);
 209         return ret;
 210 }
 211
 212 int com_stat(int fd, __a_unused int argc, __a_unused char **argv)
 213 {
 214         int i, ret;
 215         char *buf = NULL;
 216         long unsigned mask = ~0LU;
 217
 218         if (argc > 1) {
 219                 mask = 0;
 220                 for (i = 1; i < argc; i++) {
 221                         ret = stat_item_valid(argv[i]);
 222                         if (ret < 0)
 223                                 return ret;
 224                         mask |= (1 << ret);
 225                 }
 226         }
 227         PARA_INFO_LOG("mask: 0x%lx\n", mask);
 228         if (mask & (1 << SI_PLAY_TIME)) {
 229                 struct timeval *t = wstime();
 230                 char *ts = get_time_string(t);
 231                 if (ts) {
 232                         ret = client_write(fd, ts);
 233                         if (ret < 0)
 234                                 goto out;
 235                         free(ts);
 236                 }
 237         }
 238         if (mask & (1 << SI_AUDIOD_UPTIME)) {
 239                 char *tmp, *us = uptime_str();
 240                 tmp = make_message("%s: %s\n",
 241                         status_item_list[SI_AUDIOD_UPTIME], us);
 242                 free(us);
 243                 ret = client_write(fd, tmp);
 244                 if (ret < 0)
 245                         goto out;
 246                 free(tmp);
 247         }
 248         if (mask & (1 << SI_AUDIOD_STATUS)) {
 249                 char *s = audiod_status_string();
 250                 ret = client_write(fd, s);
 251                 if (ret < 0)
 252                         goto out;
 253                 free(s);
 254         }
 255         if (mask & (1 << SI_DECODER_FLAGS)) {
 256                 char *df = decoder_flags();
 257                 ret = client_write(fd, df);
 258                 if (ret < 0)
 259                         goto out;
 260                 free(df);
 261         }
 262         FOR_EACH_STATUS_ITEM(i) {
 263                 char *tmp, *v;
 264                 if (!((1 << i) & mask))
 265                         continue;
 266                 v = stat_task->stat_item_values[i];
 267                 tmp = make_message("%s%s%s", buf? buf: "",
 268                         v? v : "", v? "\n" : "");
 269                 free(buf);
 270                 buf = tmp;
 271         }
 272         ret = client_write(fd, buf);
 273 out:
 274         if (ret > 0)
 275                 ret = stat_client_add(fd, mask);
 276         free(buf);
 277         return ret;
 278 }
 279
 280 static struct filter_node *find_filter_node(int slot_num, int format, int filternum)
 281 {
 282         int i;
 283
 284         FOR_EACH_SLOT(i) {
 285                 struct slot_info *s = &slot[i];
 286                 if (s->format < 0 || !s->fc)
 287                         continue;
 288                 if (slot_num >= 0 && slot_num != i)
 289                         continue;
 290                 if (format >= 0 && s->format != format)
 291                         continue;
 292                 if (num_filters(i) <= filternum)
 293                         continue;
 294                 /* success */
 295                 return  s->fc->filter_nodes + filternum;
 296         }
 297         return NULL;
 298 }
 299
 300 int com_grab(int fd, char *cmdline)
 301 {
 302         struct grab_client *gc;
 303         struct filter_node *fn;
 304         int i, err;
 305         char *msg;
 306
 307         gc = grab_client_new(fd, cmdline, &err);
 308         if (!gc)
 309                 goto err_out;
 310         fn = find_filter_node(gc->conf->slot_arg, gc->audio_format_num, gc->conf->filter_num_arg);
 311         if (fn)
 312                 activate_grab_client(gc, fn);
 313         return 1;
 314 err_out:
 315         if (err != -E_GC_HELP_GIVEN && err != -E_GC_VERSION_GIVEN)
 316                 return err;
 317         if (err == -E_GC_HELP_GIVEN) {
 318                 msg = make_message("%s\n\n", grab_client_args_info_usage);
 319                 for (i = 0; grab_client_args_info_help[i]; i++) {
 320                         char *tmp = make_message("%s%s\n", msg,
 321                                 grab_client_args_info_help[i]);
 322                         free(msg);
 323                         msg = tmp;
 324                 }
 325         } else
 326                 msg = make_message("%s %s\n",
 327                         GRAB_CLIENT_CMDLINE_PARSER_PACKAGE,
 328                         GRAB_CLIENT_CMDLINE_PARSER_VERSION);
 329         err = client_write(fd, msg);
 330         free(msg);
 331         if (err < 0)
 332                 return err;
 333         close(fd);
 334         return 1;
 335 }
 336
 337 __noreturn int com_term(int fd, __a_unused int argc, __a_unused char **argv)
 338 {
 339         close(fd);
 340         clean_exit(EXIT_SUCCESS, "terminating on user request");
 341 }
 342
 343 int com_on(int fd, __a_unused int argc, __a_unused char **argv)
 344 {
 345         audiod_status = AUDIOD_ON;
 346         close(fd);
 347         return 1;
 348 }
 349
 350 int com_off(int fd, __a_unused int argc, __a_unused char **argv)
 351 {
 352         audiod_status = AUDIOD_OFF;
 353         close(fd);
 354         return 1;
 355 }
 356
 357 int com_sb(int fd, __a_unused int argc, __a_unused char **argv)
 358 {
 359         audiod_status = AUDIOD_STANDBY;
 360         close(fd);
 361         return 1;
 362 }
 363
 364 int com_cycle(int fd, int argc, char **argv)
 365 {
 366         switch (audiod_status) {
 367                 case  AUDIOD_ON:
 368                         return com_sb(fd, argc, argv);
 369                         break;
 370                 case  AUDIOD_OFF:
 371                         return com_on(fd, argc, argv);
 372                         break;
 373                 case  AUDIOD_STANDBY:
 374                         return com_off(fd, argc, argv);
 375                         break;
 376         }
 377         close(fd);
 378         return 1;
 379 }
 380
 381 static int check_perms(uid_t uid)
 382 {
 383         int i;
 384
 385         if (!conf.user_allow_given)
 386                 return 1;
 387         for (i = 0; i < conf.user_allow_given; i++)
 388                 if (uid == conf.user_allow_arg[i])
 389                         return 1;
 390         return -E_UCRED_PERM;
 391 }
 392
 393 /**
 394  * handle arriving connections on the local socket
 395  *
 396  * \param accept_fd the fd to call accept() on
 397  *
 398  * This is called whenever para_audiod's main task detects an incoming
 399  * connection by the readability of \a accept_fd. This function reads the
 400  * command sent by the peer, checks the connecting user's permissions by using
 401  * unix socket credentials (if supported by the OS) and calls the corresponding
 402  * command handler if permissions are OK.
 403  *
 404  * \return positive on success, negative on errors
 405  *
 406  * \sa para_accept(), recv_cred_buffer()
 407  * */
 408 int handle_connect(int accept_fd)
 409 {
 410         int i, argc, ret, clifd = -1;
 411         char *cmd = NULL, *p, *buf = para_calloc(MAXLINE), **argv = NULL;
 412         struct sockaddr_un unix_addr;
 413         uid_t uid;
 414
 415         ret = para_accept(accept_fd, &unix_addr, sizeof(struct sockaddr_un));
 416         if (ret < 0)
 417                 goto out;
 418         clifd = ret;
 419         ret = recv_cred_buffer(clifd, buf, MAXLINE - 1);
 420         if (ret < 0)
 421                 goto out;
 422         uid = ret;
 423         PARA_INFO_LOG("connection from user %i, buf: %s\n",  ret, buf);
 424         ret = check_perms(uid);
 425         if (ret < 0)
 426                 goto out;
 427         ret = -E_INVALID_AUDIOD_CMD;
 428         cmd = para_strdup(buf);
 429         p = strchr(cmd, '\n');
 430         if (!p)
 431                 p = "";
 432         else {
 433                 *p = '\0';
 434                 p++;
 435         }
 436         for (i = 0; audiod_cmds[i].name; i++) {
 437                 int j;
 438                 if (strcmp(audiod_cmds[i].name, cmd))
 439                         continue;
 440                 if (audiod_cmds[i].handler) {
 441                         argc = split_args(buf, &argv, "\n");
 442                         PARA_INFO_LOG("argv[0]: %s, argc= %d\n", argv[0], argc);
 443                         ret = audiod_cmds[i].handler(clifd, argc, argv);
 444                         goto out;
 445                 }
 446                 for (j = 0; p[j]; j++)
 447                         if (p[j] == '\n')
 448                                 p[j] = ' ';
 449                 PARA_INFO_LOG("cmd: %s, options: %s\n", cmd, p);
 450                 ret = audiod_cmds[i].line_handler(clifd, p);
 451                 goto out;
 452         }
 453         ret = -E_INVALID_AUDIOD_CMD;
 454 out:
 455         free(cmd);
 456         free(buf);
 457         free(argv);
 458         if (clifd > 0 && ret < 0 && ret != -E_CLIENT_WRITE) {
 459                 char *tmp = make_message("%s\n", para_strerror(-ret));
 460                 client_write(clifd, tmp);
 461                 free(tmp);
 462                 close(clifd);
 463         }
 464         return ret;
 465 }
 466 /**
 467  * send the current audiod status to all connected stat clients
 468  */
 469 void audiod_status_dump(void)
 470 {
 471         struct timeval *t = wstime();
 472         char *old, *new, *tmp;
 473
 474         old = stat_task->stat_item_values[SI_PLAY_TIME];
 475         new = get_time_string(t);
 476         if (new) {
 477                 if (!old || strcmp(old, new)) {
 478                         free(old);
 479                         stat_client_write(new, SI_PLAY_TIME);
 480                         stat_task->stat_item_values[SI_PLAY_TIME] = new;
 481                 } else
 482                         free(new);
 483         }
 484
 485         new = uptime_str();
 486         old = stat_task->stat_item_values[SI_AUDIOD_UPTIME];
 487         if (!old || strcmp(old, new)) {
 488                 free(old);
 489                 tmp = make_message("%s: %s\n",
 490                         status_item_list[SI_AUDIOD_UPTIME], new);
 491                 stat_client_write(tmp, SI_AUDIOD_UPTIME);
 492                 free(tmp);
 493                 stat_task->stat_item_values[SI_AUDIOD_UPTIME] = new;
 494         } else
 495                 free(new);
 496
 497         old = stat_task->stat_item_values[SI_AUDIOD_STATUS];
 498         new = audiod_status_string();
 499         if (!old || strcmp(old, new)) {
 500                 free(old);
 501                 stat_client_write(new, SI_AUDIOD_STATUS);
 502                 stat_task->stat_item_values[SI_AUDIOD_STATUS] = new;
 503         } else
 504                 free(new);
 505
 506         old = stat_task->stat_item_values[SI_DECODER_FLAGS];
 507         new = decoder_flags();
 508         if (!old || strcmp(old, new)) {
 509                 free(old);
 510                 stat_client_write(new, SI_DECODER_FLAGS);
 511                 stat_task->stat_item_values[SI_DECODER_FLAGS] = new;
 512         } else
 513                 free(new);
 514 }
 515
 516 /**
 517  * send empty status list
 518  *
 519  * Send to  each connected client the full status item list
 520  * with empty values.
 521  */
 522 void dump_empty_status(void)
 523 {
 524         int i;
 525
 526         FOR_EACH_STATUS_ITEM(i) {
 527                 char *tmp = make_message("%s:\n", status_item_list[i]);
 528                 stat_client_write(tmp, i);
 529                 free(tmp);
 530                 free(stat_task->stat_item_values[i]);
 531                 stat_task->stat_item_values[i] = NULL;
 532         }
 533 }