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