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