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