polyp/cli-command.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as published
   8   by the Free Software Foundation; either version 2 of the License,
   9   or (at your option) any later version.
  10
  11   polypaudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with polypaudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <stdio.h>
  27 #include <string.h>
  28 #include <assert.h>
  29 #include <stdlib.h>
  30 #include <errno.h>
  31
  32 #include "cli-command.h"
  33 #include "module.h"
  34 #include "sink.h"
  35 #include "source.h"
  36 #include "client.h"
  37 #include "sink-input.h"
  38 #include "source-output.h"
  39 #include "tokenizer.h"
  40 #include "strbuf.h"
  41 #include "namereg.h"
  42 #include "cli-text.h"
  43 #include "scache.h"
  44 #include "sample-util.h"
  45 #include "sound-file.h"
  46 #include "play-memchunk.h"
  47 #include "autoload.h"
  48 #include "xmalloc.h"
  49 #include "sound-file-stream.h"
  50 #include "props.h"
  51 #include "util.h"
  52
  53 struct command {
  54     const char *name;
  55     int (*proc) (struct pa_core *c, struct pa_tokenizer*t, struct pa_strbuf *buf, int *fail);
  56     const char *help;
  57     unsigned args;
  58 };
  59
  60 #define INCLUDE_META ".include"
  61 #define FAIL_META ".fail"
  62 #define NOFAIL_META ".nofail"
  63
  64 /* Prototypes for all available commands */
  65 static int pa_cli_command_exit(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  66 static int pa_cli_command_help(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  67 static int pa_cli_command_modules(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  68 static int pa_cli_command_clients(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  69 static int pa_cli_command_sinks(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  70 static int pa_cli_command_sources(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  71 static int pa_cli_command_sink_inputs(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  72 static int pa_cli_command_source_outputs(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  73 static int pa_cli_command_stat(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  74 static int pa_cli_command_info(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  75 static int pa_cli_command_load(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  76 static int pa_cli_command_unload(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  77 static int pa_cli_command_sink_volume(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  78 static int pa_cli_command_sink_input_volume(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  79 static int pa_cli_command_sink_default(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  80 static int pa_cli_command_source_default(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  81 static int pa_cli_command_kill_client(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  82 static int pa_cli_command_kill_sink_input(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  83 static int pa_cli_command_kill_source_output(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  84 static int pa_cli_command_scache_play(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  85 static int pa_cli_command_scache_remove(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  86 static int pa_cli_command_scache_list(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  87 static int pa_cli_command_scache_load(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  88 static int pa_cli_command_scache_load_dir(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  89 static int pa_cli_command_play_file(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  90 static int pa_cli_command_autoload_list(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  91 static int pa_cli_command_autoload_add(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  92 static int pa_cli_command_autoload_remove(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  93 static int pa_cli_command_dump(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  94 static int pa_cli_command_list_props(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail);
  95
  96
  97 /* A method table for all available commands */
  98
  99 static const struct command commands[] = {
 100     { "exit",                    pa_cli_command_exit,               "Terminate the daemon",         1 },
 101     { "help",                    pa_cli_command_help,               "Show this help",               1 },
 102     { "list-modules",            pa_cli_command_modules,            "List loaded modules",          1 },
 103     { "list-sinks",              pa_cli_command_sinks,              "List loaded sinks",            1 },
 104     { "list-sources",            pa_cli_command_sources,            "List loaded sources",          1 },
 105     { "list-clients",            pa_cli_command_clients,            "List loaded clients",          1 },
 106     { "list-sink-inputs",        pa_cli_command_sink_inputs,        "List sink inputs",             1 },
 107     { "list-source-outputs",     pa_cli_command_source_outputs,     "List source outputs",          1 },
 108     { "stat",                    pa_cli_command_stat,               "Show memory block statistics", 1 },
 109     { "info",                    pa_cli_command_info,               "Show comprehensive status",    1 },
 110     { "ls",                      pa_cli_command_info,               NULL,                           1 },
 111     { "list",                    pa_cli_command_info,               NULL,                           1 },
 112     { "load-module",             pa_cli_command_load,               "Load a module (args: name, arguments)",                     3},
 113     { "unload-module",           pa_cli_command_unload,             "Unload a module (args: index)",                             2},
 114     { "set-sink-volume",         pa_cli_command_sink_volume,        "Set the volume of a sink (args: index|name, volume)",             3},
 115     { "set-sink-input-volume",   pa_cli_command_sink_input_volume,  "Set the volume of a sink input (args: index|name, volume)", 3},
 116     { "set-default-sink",        pa_cli_command_sink_default,       "Set the default sink (args: index|name)", 2},
 117     { "set-default-source",      pa_cli_command_source_default,     "Set the default source (args: index|name)", 2},
 118     { "kill-client",             pa_cli_command_kill_client,        "Kill a client (args: index)", 2},
 119     { "kill-sink-input",         pa_cli_command_kill_sink_input,    "Kill a sink input (args: index)", 2},
 120     { "kill-source-output",      pa_cli_command_kill_source_output, "Kill a source output (args: index)", 2},
 121     { "list-samples",            pa_cli_command_scache_list,        "List all entries in the sample cache", 1},
 122     { "play-sample",             pa_cli_command_scache_play,        "Play a sample from the sample cache (args: name, sink|index)", 3},
 123     { "remove-sample",           pa_cli_command_scache_remove,      "Remove a sample from the sample cache (args: name)", 2},
 124     { "load-sample",             pa_cli_command_scache_load,        "Load a sound file into the sample cache (args: name, filename)", 3},
 125     { "load-sample-lazy",        pa_cli_command_scache_load,        "Lazily load a sound file into the sample cache (args: name, filename)", 3},
 126     { "load-sample-dir-lazy",    pa_cli_command_scache_load_dir,    "Lazily load all files in a directory into the sample cache (args: pathname)", 2},
 127     { "play-file",               pa_cli_command_play_file,          "Play a sound file (args: filename, sink|index)", 3},
 128     { "list-autoload",           pa_cli_command_autoload_list,      "List autoload entries", 1},
 129     { "add-autoload-sink",       pa_cli_command_autoload_add,       "Add autoload entry for a sink (args: sink, module name, arguments)", 4},
 130     { "add-autoload-source",     pa_cli_command_autoload_add,       "Add autoload entry for a source (args: source, module name, arguments)", 4},
 131     { "remove-autoload-sink",    pa_cli_command_autoload_remove,    "Remove autoload entry for a sink (args: name)", 2},
 132     { "remove-autoload-source",  pa_cli_command_autoload_remove,    "Remove autoload entry for a source (args: name)", 2},
 133     { "dump",                    pa_cli_command_dump,               "Dump daemon configuration", 1},
 134     { "list-props",              pa_cli_command_list_props,         NULL, 1},
 135     { NULL, NULL, NULL, 0 }
 136 };
 137
 138 static const char whitespace[] = " \t\n\r";
 139 static const char linebreak[] = "\n\r";
 140
 141 static uint32_t parse_index(const char *n) {
 142     uint32_t index;
 143
 144     if (pa_atou(n, &index) < 0)
 145         return (uint32_t) PA_IDXSET_INVALID;
 146
 147     return index;
 148 }
 149
 150 static int pa_cli_command_exit(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 151     assert(c && c->mainloop && t);
 152     c->mainloop->quit(c->mainloop, 0);
 153     return 0;
 154 }
 155
 156 static int pa_cli_command_help(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 157     const struct command*command;
 158     assert(c && t && buf);
 159
 160     pa_strbuf_puts(buf, "Available commands:\n");
 161
 162     for (command = commands; command->name; command++)
 163         if (command->help)
 164             pa_strbuf_printf(buf, "    %-25s %s\n", command->name, command->help);
 165     return 0;
 166 }
 167
 168 static int pa_cli_command_modules(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 169     char *s;
 170     assert(c && t);
 171     s = pa_module_list_to_string(c);
 172     assert(s);
 173     pa_strbuf_puts(buf, s);
 174     pa_xfree(s);
 175     return 0;
 176 }
 177
 178 static int pa_cli_command_clients(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 179     char *s;
 180     assert(c && t);
 181     s = pa_client_list_to_string(c);
 182     assert(s);
 183     pa_strbuf_puts(buf, s);
 184     pa_xfree(s);
 185     return 0;
 186 }
 187
 188 static int pa_cli_command_sinks(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 189     char *s;
 190     assert(c && t);
 191     s = pa_sink_list_to_string(c);
 192     assert(s);
 193     pa_strbuf_puts(buf, s);
 194     pa_xfree(s);
 195     return 0;
 196 }
 197
 198 static int pa_cli_command_sources(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 199     char *s;
 200     assert(c && t);
 201     s = pa_source_list_to_string(c);
 202     assert(s);
 203     pa_strbuf_puts(buf, s);
 204     pa_xfree(s);
 205     return 0;
 206 }
 207
 208 static int pa_cli_command_sink_inputs(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 209     char *s;
 210     assert(c && t);
 211     s = pa_sink_input_list_to_string(c);
 212     assert(s);
 213     pa_strbuf_puts(buf, s);
 214     pa_xfree(s);
 215     return 0;
 216 }
 217
 218 static int pa_cli_command_source_outputs(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 219     char *s;
 220     assert(c && t);
 221     s = pa_source_output_list_to_string(c);
 222     assert(s);
 223     pa_strbuf_puts(buf, s);
 224     pa_xfree(s);
 225     return 0;
 226 }
 227
 228 static int pa_cli_command_stat(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 229     char s[256];
 230     assert(c && t);
 231
 232     pa_bytes_snprint(s, sizeof(s), c->memblock_stat->total_size);
 233     pa_strbuf_printf(buf, "Memory blocks currently allocated: %u, size: %s.\n",
 234                      c->memblock_stat->total,
 235                      s);
 236
 237     pa_bytes_snprint(s, sizeof(s), c->memblock_stat->allocated_size);
 238     pa_strbuf_printf(buf, "Memory blocks allocated during the whole lifetime: %u, size: %s.\n",
 239                      c->memblock_stat->allocated,
 240                      s);
 241
 242     pa_bytes_snprint(s, sizeof(s), pa_scache_total_size(c));
 243     pa_strbuf_printf(buf, "Total sample cache size: %s.\n", s);
 244
 245     pa_sample_spec_snprint(s, sizeof(s), &c->default_sample_spec);
 246     pa_strbuf_printf(buf, "Default sample spec: %s\n", s);
 247
 248     pa_strbuf_printf(buf, "Default sink name: %s\n"
 249                      "Default source name: %s\n",
 250                      pa_namereg_get_default_sink_name(c),
 251                      pa_namereg_get_default_source_name(c));
 252
 253     return 0;
 254 }
 255
 256 static int pa_cli_command_info(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 257     assert(c && t);
 258     pa_cli_command_stat(c, t, buf, fail);
 259     pa_cli_command_modules(c, t, buf, fail);
 260     pa_cli_command_sinks(c, t, buf, fail);
 261     pa_cli_command_sources(c, t, buf, fail);
 262     pa_cli_command_clients(c, t, buf, fail);
 263     pa_cli_command_sink_inputs(c, t, buf, fail);
 264     pa_cli_command_source_outputs(c, t, buf, fail);
 265     pa_cli_command_scache_list(c, t, buf, fail);
 266     pa_cli_command_autoload_list(c, t, buf, fail);
 267     return 0;
 268 }
 269
 270 static int pa_cli_command_load(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 271     struct pa_module *m;
 272     const char *name;
 273     assert(c && t);
 274
 275     if (!(name = pa_tokenizer_get(t, 1))) {
 276         pa_strbuf_puts(buf, "You need to specify the module name and optionally arguments.\n");
 277         return -1;
 278     }
 279
 280     if (!(m = pa_module_load(c, name,  pa_tokenizer_get(t, 2)))) {
 281         pa_strbuf_puts(buf, "Module load failed.\n");
 282         return -1;
 283     }
 284
 285     return 0;
 286 }
 287
 288 static int pa_cli_command_unload(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 289     struct pa_module *m;
 290     uint32_t index;
 291     const char *i;
 292     char *e;
 293     assert(c && t);
 294
 295     if (!(i = pa_tokenizer_get(t, 1))) {
 296         pa_strbuf_puts(buf, "You need to specify the module index.\n");
 297         return -1;
 298     }
 299
 300     index = (uint32_t) strtoul(i, &e, 10);
 301     if (*e || !(m = pa_idxset_get_by_index(c->modules, index))) {
 302         pa_strbuf_puts(buf, "Invalid module index.\n");
 303         return -1;
 304     }
 305
 306     pa_module_unload_request(m);
 307     return 0;
 308 }
 309
 310 static int pa_cli_command_sink_volume(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 311     const char *n, *v;
 312     struct pa_sink *sink;
 313     uint32_t volume;
 314
 315     if (!(n = pa_tokenizer_get(t, 1))) {
 316         pa_strbuf_puts(buf, "You need to specify a sink either by its name or its index.\n");
 317         return -1;
 318     }
 319
 320     if (!(v = pa_tokenizer_get(t, 2))) {
 321         pa_strbuf_puts(buf, "You need to specify a volume >= 0. (0 is muted, 0x100 is normal volume)\n");
 322         return -1;
 323     }
 324
 325     if (pa_atou(v, &volume) < 0) {
 326         pa_strbuf_puts(buf, "Failed to parse volume.\n");
 327         return -1;
 328     }
 329
 330     if (!(sink = pa_namereg_get(c, n, PA_NAMEREG_SINK, 1))) {
 331         pa_strbuf_puts(buf, "No sink found by this name or index.\n");
 332         return -1;
 333     }
 334
 335     pa_sink_set_volume(sink, (uint32_t) volume);
 336     return 0;
 337 }
 338
 339 static int pa_cli_command_sink_input_volume(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 340     const char *n, *v;
 341     struct pa_sink_input *si;
 342     uint32_t volume;
 343     uint32_t index;
 344
 345     if (!(n = pa_tokenizer_get(t, 1))) {
 346         pa_strbuf_puts(buf, "You need to specify a sink input by its index.\n");
 347         return -1;
 348     }
 349
 350     if ((index = parse_index(n)) == PA_IDXSET_INVALID) {
 351         pa_strbuf_puts(buf, "Failed to parse index.\n");
 352         return -1;
 353     }
 354
 355     if (!(v = pa_tokenizer_get(t, 2))) {
 356         pa_strbuf_puts(buf, "You need to specify a volume >= 0. (0 is muted, 0x100 is normal volume)\n");
 357         return -1;
 358     }
 359
 360     if (pa_atou(v, &volume) < 0) {
 361         pa_strbuf_puts(buf, "Failed to parse volume.\n");
 362         return -1;
 363     }
 364
 365     if (!(si = pa_idxset_get_by_index(c->sink_inputs, (uint32_t) index))) {
 366         pa_strbuf_puts(buf, "No sink input found with this index.\n");
 367         return -1;
 368     }
 369
 370     pa_sink_input_set_volume(si, (uint32_t) volume);
 371     return 0;
 372 }
 373
 374 static int pa_cli_command_sink_default(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 375     const char *n;
 376     assert(c && t);
 377
 378     if (!(n = pa_tokenizer_get(t, 1))) {
 379         pa_strbuf_puts(buf, "You need to specify a sink either by its name or its index.\n");
 380         return -1;
 381     }
 382
 383     pa_namereg_set_default(c, n, PA_NAMEREG_SINK);
 384     return 0;
 385 }
 386
 387 static int pa_cli_command_source_default(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 388     const char *n;
 389     assert(c && t);
 390
 391     if (!(n = pa_tokenizer_get(t, 1))) {
 392         pa_strbuf_puts(buf, "You need to specify a source either by its name or its index.\n");
 393         return -1;
 394     }
 395
 396     pa_namereg_set_default(c, n, PA_NAMEREG_SOURCE);
 397     return 0;
 398 }
 399
 400 static int pa_cli_command_kill_client(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 401     const char *n;
 402     struct pa_client *client;
 403     uint32_t index;
 404     assert(c && t);
 405
 406     if (!(n = pa_tokenizer_get(t, 1))) {
 407         pa_strbuf_puts(buf, "You need to specify a client by its index.\n");
 408         return -1;
 409     }
 410
 411     if ((index = parse_index(n)) == PA_IDXSET_INVALID) {
 412         pa_strbuf_puts(buf, "Failed to parse index.\n");
 413         return -1;
 414     }
 415
 416     if (!(client = pa_idxset_get_by_index(c->clients, index))) {
 417         pa_strbuf_puts(buf, "No client found by this index.\n");
 418         return -1;
 419     }
 420
 421     pa_client_kill(client);
 422     return 0;
 423 }
 424
 425 static int pa_cli_command_kill_sink_input(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 426     const char *n;
 427     struct pa_sink_input *sink_input;
 428     uint32_t index;
 429     assert(c && t);
 430
 431     if (!(n = pa_tokenizer_get(t, 1))) {
 432         pa_strbuf_puts(buf, "You need to specify a sink input by its index.\n");
 433         return -1;
 434     }
 435
 436     if ((index = parse_index(n)) == PA_IDXSET_INVALID) {
 437         pa_strbuf_puts(buf, "Failed to parse index.\n");
 438         return -1;
 439     }
 440
 441     if (!(sink_input = pa_idxset_get_by_index(c->sink_inputs, index))) {
 442         pa_strbuf_puts(buf, "No sink input found by this index.\n");
 443         return -1;
 444     }
 445
 446     pa_sink_input_kill(sink_input);
 447     return 0;
 448 }
 449
 450 static int pa_cli_command_kill_source_output(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 451     const char *n;
 452     struct pa_source_output *source_output;
 453     uint32_t index;
 454     assert(c && t);
 455
 456     if (!(n = pa_tokenizer_get(t, 1))) {
 457         pa_strbuf_puts(buf, "You need to specify a source output by its index.\n");
 458         return -1;
 459     }
 460
 461     if ((index = parse_index(n)) == PA_IDXSET_INVALID) {
 462         pa_strbuf_puts(buf, "Failed to parse index.\n");
 463         return -1;
 464     }
 465
 466     if (!(source_output = pa_idxset_get_by_index(c->source_outputs, index))) {
 467         pa_strbuf_puts(buf, "No source output found by this index.\n");
 468         return -1;
 469     }
 470
 471     pa_source_output_kill(source_output);
 472     return 0;
 473 }
 474
 475 static int pa_cli_command_scache_list(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 476     char *s;
 477     assert(c && t);
 478     s = pa_scache_list_to_string(c);
 479     assert(s);
 480     pa_strbuf_puts(buf, s);
 481     pa_xfree(s);
 482     return 0;
 483 }
 484
 485 static int pa_cli_command_scache_play(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 486     const char *n, *sink_name;
 487     struct pa_sink *sink;
 488     assert(c && t && buf && fail);
 489
 490     if (!(n = pa_tokenizer_get(t, 1)) || !(sink_name = pa_tokenizer_get(t, 2))) {
 491         pa_strbuf_puts(buf, "You need to specify a sample name and a sink name.\n");
 492         return -1;
 493     }
 494
 495     if (!(sink = pa_namereg_get(c, sink_name, PA_NAMEREG_SINK, 1))) {
 496         pa_strbuf_puts(buf, "No sink by that name.\n");
 497         return -1;
 498     }
 499
 500     if (pa_scache_play_item(c, n, sink, PA_VOLUME_NORM) < 0) {
 501         pa_strbuf_puts(buf, "Failed to play sample.\n");
 502         return -1;
 503     }
 504
 505     return 0;
 506 }
 507
 508 static int pa_cli_command_scache_remove(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 509     const char *n;
 510     assert(c && t && buf && fail);
 511
 512     if (!(n = pa_tokenizer_get(t, 1))) {
 513         pa_strbuf_puts(buf, "You need to specify a sample name.\n");
 514         return -1;
 515     }
 516
 517     if (pa_scache_remove_item(c, n) < 0) {
 518         pa_strbuf_puts(buf, "Failed to remove sample.\n");
 519         return -1;
 520     }
 521
 522     return 0;
 523 }
 524
 525 static int pa_cli_command_scache_load(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 526     const char *fname, *n;
 527     int r;
 528     assert(c && t && buf && fail);
 529
 530     if (!(fname = pa_tokenizer_get(t, 2)) || !(n = pa_tokenizer_get(t, 1))) {
 531         pa_strbuf_puts(buf, "You need to specify a file name and a sample name.\n");
 532         return -1;
 533     }
 534
 535     if (strstr(pa_tokenizer_get(t, 0), "lazy"))
 536         r = pa_scache_add_file_lazy(c, n, fname, NULL);
 537     else
 538         r = pa_scache_add_file(c, n, fname, NULL);
 539
 540     if (r < 0)
 541         pa_strbuf_puts(buf, "Failed to load sound file.\n");
 542
 543     return 0;
 544 }
 545
 546 static int pa_cli_command_scache_load_dir(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 547     const char *pname;
 548     assert(c && t && buf && fail);
 549
 550     if (!(pname = pa_tokenizer_get(t, 1))) {
 551         pa_strbuf_puts(buf, "You need to specify a path name.\n");
 552         return -1;
 553     }
 554
 555     if (pa_scache_add_directory_lazy(c, pname) < 0) {
 556         pa_strbuf_puts(buf, "Failed to load directory.\n");
 557         return -1;
 558     }
 559
 560     return 0;
 561 }
 562
 563 static int pa_cli_command_play_file(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 564     const char *fname, *sink_name;
 565     struct pa_sink *sink;
 566     assert(c && t && buf && fail);
 567
 568     if (!(fname = pa_tokenizer_get(t, 1)) || !(sink_name = pa_tokenizer_get(t, 2))) {
 569         pa_strbuf_puts(buf, "You need to specify a file name and a sink name.\n");
 570         return -1;
 571     }
 572
 573     if (!(sink = pa_namereg_get(c, sink_name, PA_NAMEREG_SINK, 1))) {
 574         pa_strbuf_puts(buf, "No sink by that name.\n");
 575         return -1;
 576     }
 577
 578
 579     return pa_play_file(sink, fname, PA_VOLUME_NORM);
 580 }
 581
 582 static int pa_cli_command_autoload_add(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 583     const char *a, *b;
 584     assert(c && t && buf && fail);
 585
 586     if (!(a = pa_tokenizer_get(t, 1)) || !(b = pa_tokenizer_get(t, 2))) {
 587         pa_strbuf_puts(buf, "You need to specify a device name, a filename or a module name and optionally module arguments\n");
 588         return -1;
 589     }
 590
 591     pa_autoload_add(c, a, strstr(pa_tokenizer_get(t, 0), "sink") ? PA_NAMEREG_SINK : PA_NAMEREG_SOURCE, b, pa_tokenizer_get(t, 3), NULL);
 592
 593     return 0;
 594 }
 595
 596 static int pa_cli_command_autoload_remove(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 597     const char *name;
 598     assert(c && t && buf && fail);
 599
 600     if (!(name = pa_tokenizer_get(t, 1))) {
 601         pa_strbuf_puts(buf, "You need to specify a device name\n");
 602         return -1;
 603     }
 604
 605     if (pa_autoload_remove_by_name(c, name, strstr(pa_tokenizer_get(t, 0), "sink") ? PA_NAMEREG_SINK : PA_NAMEREG_SOURCE) < 0) {
 606         pa_strbuf_puts(buf, "Failed to remove autload entry\n");
 607         return -1;
 608     }
 609
 610     return 0;
 611 }
 612
 613 static int pa_cli_command_autoload_list(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 614     char *s;
 615     assert(c && t);
 616     s = pa_autoload_list_to_string(c);
 617     assert(s);
 618     pa_strbuf_puts(buf, s);
 619     pa_xfree(s);
 620     return 0;
 621 }
 622
 623 static int pa_cli_command_list_props(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 624     assert(c && t);
 625     pa_property_dump(c, buf);
 626     return 0;
 627 }
 628
 629 static int pa_cli_command_dump(struct pa_core *c, struct pa_tokenizer *t, struct pa_strbuf *buf, int *fail) {
 630     struct pa_module *m;
 631     struct pa_sink *s;
 632     int nl;
 633     const char *p;
 634     uint32_t index;
 635     char txt[256];
 636     time_t now;
 637     void *i;
 638     struct pa_autoload_entry *a;
 639
 640     assert(c && t);
 641
 642     time(&now);
 643
 644     pa_strbuf_printf(buf, "### Configuration dump generated at %s\n", ctime_r(&now, txt));
 645
 646
 647     for (m = pa_idxset_first(c->modules, &index); m; m = pa_idxset_next(c->modules, &index)) {
 648         if (m->auto_unload)
 649             continue;
 650
 651         pa_strbuf_printf(buf, "load-module %s", m->name);
 652
 653         if (m->argument)
 654             pa_strbuf_printf(buf, " %s", m->argument);
 655
 656         pa_strbuf_puts(buf, "\n");
 657     }
 658
 659     nl = 0;
 660
 661     for (s = pa_idxset_first(c->sinks, &index); s; s = pa_idxset_next(c->sinks, &index)) {
 662         if (s->volume == PA_VOLUME_NORM)
 663             continue;
 664
 665         if (s->owner && s->owner->auto_unload)
 666             continue;
 667
 668         if (!nl) {
 669             pa_strbuf_puts(buf, "\n");
 670             nl = 1;
 671         }
 672
 673         pa_strbuf_printf(buf, "set-sink-volume %s 0x%03x\n", s->name, s->volume);
 674     }
 675
 676
 677     if (c->autoload_hashmap) {
 678         nl = 0;
 679
 680         i = NULL;
 681         while ((a = pa_hashmap_iterate(c->autoload_hashmap, &i, NULL))) {
 682
 683             if (!nl) {
 684                 pa_strbuf_puts(buf, "\n");
 685                 nl = 1;
 686             }
 687
 688             pa_strbuf_printf(buf, "add-autoload-%s %s %s", a->type == PA_NAMEREG_SINK ? "sink" : "source", a->name, a->module);
 689
 690             if (a->argument)
 691                 pa_strbuf_printf(buf, " %s", a->argument);
 692
 693             pa_strbuf_puts(buf, "\n");
 694         }
 695     }
 696
 697     nl = 0;
 698
 699     if ((p = pa_namereg_get_default_sink_name(c))) {
 700         if (!nl) {
 701             pa_strbuf_puts(buf, "\n");
 702             nl = 1;
 703         }
 704         pa_strbuf_printf(buf, "set-default-sink %s\n", p);
 705     }
 706
 707     if ((p = pa_namereg_get_default_source_name(c))) {
 708         if (!nl) {
 709             pa_strbuf_puts(buf, "\n");
 710             nl = 1;
 711         }
 712         pa_strbuf_printf(buf, "set-default-source %s\n", p);
 713     }
 714
 715     pa_strbuf_puts(buf, "\n### EOF\n");
 716
 717     return 0;
 718 }
 719
 720
 721 int pa_cli_command_execute_line(struct pa_core *c, const char *s, struct pa_strbuf *buf, int *fail) {
 722     const char *cs;
 723
 724     cs = s+strspn(s, whitespace);
 725
 726     if (*cs == '#' || !*cs)
 727         return 0;
 728     else if (*cs == '.') {
 729         if (!strcmp(cs, FAIL_META))
 730             *fail = 1;
 731         else if (!strcmp(cs, NOFAIL_META))
 732             *fail = 0;
 733         else {
 734             size_t l;
 735             l = strcspn(cs, whitespace);
 736
 737             if (l == sizeof(INCLUDE_META)-1 && !strncmp(cs, INCLUDE_META, l)) {
 738                 const char *filename = cs+l+strspn(cs+l, whitespace);
 739
 740                 if (pa_cli_command_execute_file(c, filename, buf, fail) < 0)
 741                     if (*fail) return -1;
 742             } else {
 743                 pa_strbuf_printf(buf, "Invalid meta command: %s\n", cs);
 744                 if (*fail) return -1;
 745             }
 746         }
 747     } else {
 748         const struct command*command;
 749         int unknown = 1;
 750         size_t l;
 751
 752         l = strcspn(cs, whitespace);
 753
 754         for (command = commands; command->name; command++)
 755             if (strlen(command->name) == l && !strncmp(cs, command->name, l)) {
 756                 int ret;
 757                 struct pa_tokenizer *t = pa_tokenizer_new(cs, command->args);
 758                 assert(t);
 759                 ret = command->proc(c, t, buf, fail);
 760                 pa_tokenizer_free(t);
 761                 unknown = 0;
 762
 763                 if (ret < 0 && *fail)
 764                     return -1;
 765
 766                 break;
 767             }
 768
 769         if (unknown) {
 770             pa_strbuf_printf(buf, "Unknown command: %s\n", cs);
 771             if (*fail)
 772                 return -1;
 773         }
 774     }
 775
 776     return 0;
 777 }
 778
 779 int pa_cli_command_execute_file(struct pa_core *c, const char *fn, struct pa_strbuf *buf, int *fail) {
 780     char line[256];
 781     FILE *f = NULL;
 782     int ret = -1;
 783     assert(c && fn && buf);
 784
 785     if (!(f = fopen(fn, "r"))) {
 786         pa_strbuf_printf(buf, "open('%s') failed: %s\n", fn, strerror(errno));
 787         if (!*fail)
 788             ret = 0;
 789         goto fail;
 790     }
 791
 792     while (fgets(line, sizeof(line), f)) {
 793         char *e = line + strcspn(line, linebreak);
 794         *e = 0;
 795
 796         if (pa_cli_command_execute_line(c, line, buf, fail) < 0 && *fail)
 797             goto fail;
 798     }
 799
 800     ret = 0;
 801
 802 fail:
 803     if (f)
 804         fclose(f);
 805
 806     return ret;
 807 }
 808
 809 int pa_cli_command_execute(struct pa_core *c, const char *s, struct pa_strbuf *buf, int *fail) {
 810     const char *p;
 811     assert(c && s && buf && fail);
 812
 813     p = s;
 814     while (*p) {
 815         size_t l = strcspn(p, linebreak);
 816         char *line = pa_xstrndup(p, l);
 817
 818         if (pa_cli_command_execute_line(c, line, buf, fail) < 0&& *fail) {
 819             pa_xfree(line);
 820             return -1;
 821         }
 822         pa_xfree(line);
 823
 824         p += l;
 825         p += strspn(p, linebreak);
 826     }
 827
 828     return 0;
 829 }