]> code.delx.au - pulseaudio/blob - src/utils/pactl.c
pactl: Print sink-input/source-output corked status
[pulseaudio] / src / utils / pactl.c
1 /***
2 This file is part of PulseAudio.
3
4 Copyright 2004-2006 Lennart Poettering
5
6 PulseAudio 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.1 of the License,
9 or (at your option) any later version.
10
11 PulseAudio 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 PulseAudio; 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 <signal.h>
27 #include <string.h>
28 #include <errno.h>
29 #include <unistd.h>
30 #include <assert.h>
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <getopt.h>
34 #include <locale.h>
35 #include <ctype.h>
36
37 #include <sndfile.h>
38
39 #include <pulse/pulseaudio.h>
40 #include <pulse/ext-device-restore.h>
41
42 #include <pulsecore/i18n.h>
43 #include <pulsecore/macro.h>
44 #include <pulsecore/core-util.h>
45 #include <pulsecore/log.h>
46 #include <pulsecore/sndfile-util.h>
47
48 static pa_context *context = NULL;
49 static pa_mainloop_api *mainloop_api = NULL;
50
51 static char
52 *list_type = NULL,
53 *sample_name = NULL,
54 *sink_name = NULL,
55 *source_name = NULL,
56 *module_name = NULL,
57 *module_args = NULL,
58 *card_name = NULL,
59 *profile_name = NULL,
60 *port_name = NULL,
61 *formats = NULL;
62
63 static uint32_t
64 sink_input_idx = PA_INVALID_INDEX,
65 source_output_idx = PA_INVALID_INDEX,
66 sink_idx = PA_INVALID_INDEX;
67
68 static pa_bool_t short_list_format = FALSE;
69 static uint32_t module_index;
70 static pa_bool_t suspend;
71 static pa_bool_t mute;
72 static pa_volume_t volume;
73 static enum volume_flags {
74 VOL_UINT = 0,
75 VOL_PERCENT = 1,
76 VOL_LINEAR = 2,
77 VOL_DECIBEL = 3,
78 VOL_ABSOLUTE = 0 << 4,
79 VOL_RELATIVE = 1 << 4,
80 } volume_flags;
81
82 static pa_proplist *proplist = NULL;
83
84 static SNDFILE *sndfile = NULL;
85 static pa_stream *sample_stream = NULL;
86 static pa_sample_spec sample_spec;
87 static pa_channel_map channel_map;
88 static size_t sample_length = 0;
89 static int actions = 1;
90
91 static pa_bool_t nl = FALSE;
92
93 static enum {
94 NONE,
95 EXIT,
96 STAT,
97 INFO,
98 UPLOAD_SAMPLE,
99 PLAY_SAMPLE,
100 REMOVE_SAMPLE,
101 LIST,
102 MOVE_SINK_INPUT,
103 MOVE_SOURCE_OUTPUT,
104 LOAD_MODULE,
105 UNLOAD_MODULE,
106 SUSPEND_SINK,
107 SUSPEND_SOURCE,
108 SET_CARD_PROFILE,
109 SET_SINK_PORT,
110 SET_SOURCE_PORT,
111 SET_SINK_VOLUME,
112 SET_SOURCE_VOLUME,
113 SET_SINK_INPUT_VOLUME,
114 SET_SOURCE_OUTPUT_VOLUME,
115 SET_SINK_MUTE,
116 SET_SOURCE_MUTE,
117 SET_SINK_INPUT_MUTE,
118 SET_SOURCE_OUTPUT_MUTE,
119 SET_SINK_FORMATS,
120 SUBSCRIBE
121 } action = NONE;
122
123 static void quit(int ret) {
124 pa_assert(mainloop_api);
125 mainloop_api->quit(mainloop_api, ret);
126 }
127
128 static void context_drain_complete(pa_context *c, void *userdata) {
129 pa_context_disconnect(c);
130 }
131
132 static void drain(void) {
133 pa_operation *o;
134
135 if (!(o = pa_context_drain(context, context_drain_complete, NULL)))
136 pa_context_disconnect(context);
137 else
138 pa_operation_unref(o);
139 }
140
141 static void complete_action(void) {
142 pa_assert(actions > 0);
143
144 if (!(--actions))
145 drain();
146 }
147
148 static void stat_callback(pa_context *c, const pa_stat_info *i, void *userdata) {
149 char s[PA_BYTES_SNPRINT_MAX];
150 if (!i) {
151 pa_log(_("Failed to get statistics: %s"), pa_strerror(pa_context_errno(c)));
152 quit(1);
153 return;
154 }
155
156 pa_bytes_snprint(s, sizeof(s), i->memblock_total_size);
157 printf(_("Currently in use: %u blocks containing %s bytes total.\n"), i->memblock_total, s);
158
159 pa_bytes_snprint(s, sizeof(s), i->memblock_allocated_size);
160 printf(_("Allocated during whole lifetime: %u blocks containing %s bytes total.\n"), i->memblock_allocated, s);
161
162 pa_bytes_snprint(s, sizeof(s), i->scache_size);
163 printf(_("Sample cache size: %s\n"), s);
164
165 complete_action();
166 }
167
168 static void get_server_info_callback(pa_context *c, const pa_server_info *i, void *useerdata) {
169 char ss[PA_SAMPLE_SPEC_SNPRINT_MAX], cm[PA_CHANNEL_MAP_SNPRINT_MAX];
170
171 if (!i) {
172 pa_log(_("Failed to get server information: %s"), pa_strerror(pa_context_errno(c)));
173 quit(1);
174 return;
175 }
176
177 printf(_("Server String: %s\n"
178 "Library Protocol Version: %u\n"
179 "Server Protocol Version: %u\n"
180 "Is Local: %s\n"
181 "Client Index: %u\n"
182 "Tile Size: %zu\n"),
183 pa_context_get_server(c),
184 pa_context_get_protocol_version(c),
185 pa_context_get_server_protocol_version(c),
186 pa_yes_no(pa_context_is_local(c)),
187 pa_context_get_index(c),
188 pa_context_get_tile_size(c, NULL));
189
190 pa_sample_spec_snprint(ss, sizeof(ss), &i->sample_spec);
191 pa_channel_map_snprint(cm, sizeof(cm), &i->channel_map);
192
193 printf(_("User Name: %s\n"
194 "Host Name: %s\n"
195 "Server Name: %s\n"
196 "Server Version: %s\n"
197 "Default Sample Specification: %s\n"
198 "Default Channel Map: %s\n"
199 "Default Sink: %s\n"
200 "Default Source: %s\n"
201 "Cookie: %04x:%04x\n"),
202 i->user_name,
203 i->host_name,
204 i->server_name,
205 i->server_version,
206 ss,
207 cm,
208 i->default_sink_name,
209 i->default_source_name,
210 i->cookie >> 16,
211 i->cookie & 0xFFFFU);
212
213 complete_action();
214 }
215
216 static const char* get_available_str_ynonly(int available)
217 {
218 switch (available) {
219 case PA_PORT_AVAILABLE_YES: return ", available";
220 case PA_PORT_AVAILABLE_NO: return ", not available";
221 }
222 return "";
223 }
224
225 static void get_sink_info_callback(pa_context *c, const pa_sink_info *i, int is_last, void *userdata) {
226
227 static const char *state_table[] = {
228 [1+PA_SINK_INVALID_STATE] = "n/a",
229 [1+PA_SINK_RUNNING] = "RUNNING",
230 [1+PA_SINK_IDLE] = "IDLE",
231 [1+PA_SINK_SUSPENDED] = "SUSPENDED"
232 };
233
234 char
235 s[PA_SAMPLE_SPEC_SNPRINT_MAX],
236 cv[PA_CVOLUME_SNPRINT_MAX],
237 cvdb[PA_SW_CVOLUME_SNPRINT_DB_MAX],
238 v[PA_VOLUME_SNPRINT_MAX],
239 vdb[PA_SW_VOLUME_SNPRINT_DB_MAX],
240 cm[PA_CHANNEL_MAP_SNPRINT_MAX],
241 f[PA_FORMAT_INFO_SNPRINT_MAX];
242 char *pl;
243
244 if (is_last < 0) {
245 pa_log(_("Failed to get sink information: %s"), pa_strerror(pa_context_errno(c)));
246 quit(1);
247 return;
248 }
249
250 if (is_last) {
251 complete_action();
252 return;
253 }
254
255 pa_assert(i);
256
257 if (nl && !short_list_format)
258 printf("\n");
259 nl = TRUE;
260
261 if (short_list_format) {
262 printf("%u\t%s\t%s\t%s\t%s\n",
263 i->index,
264 i->name,
265 pa_strnull(i->driver),
266 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec),
267 state_table[1+i->state]);
268 return;
269 }
270
271 printf(_("Sink #%u\n"
272 "\tState: %s\n"
273 "\tName: %s\n"
274 "\tDescription: %s\n"
275 "\tDriver: %s\n"
276 "\tSample Specification: %s\n"
277 "\tChannel Map: %s\n"
278 "\tOwner Module: %u\n"
279 "\tMute: %s\n"
280 "\tVolume: %s%s%s\n"
281 "\t balance %0.2f\n"
282 "\tBase Volume: %s%s%s\n"
283 "\tMonitor Source: %s\n"
284 "\tLatency: %0.0f usec, configured %0.0f usec\n"
285 "\tFlags: %s%s%s%s%s%s%s\n"
286 "\tProperties:\n\t\t%s\n"),
287 i->index,
288 state_table[1+i->state],
289 i->name,
290 pa_strnull(i->description),
291 pa_strnull(i->driver),
292 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec),
293 pa_channel_map_snprint(cm, sizeof(cm), &i->channel_map),
294 i->owner_module,
295 pa_yes_no(i->mute),
296 pa_cvolume_snprint(cv, sizeof(cv), &i->volume),
297 i->flags & PA_SINK_DECIBEL_VOLUME ? "\n\t " : "",
298 i->flags & PA_SINK_DECIBEL_VOLUME ? pa_sw_cvolume_snprint_dB(cvdb, sizeof(cvdb), &i->volume) : "",
299 pa_cvolume_get_balance(&i->volume, &i->channel_map),
300 pa_volume_snprint(v, sizeof(v), i->base_volume),
301 i->flags & PA_SINK_DECIBEL_VOLUME ? "\n\t " : "",
302 i->flags & PA_SINK_DECIBEL_VOLUME ? pa_sw_volume_snprint_dB(vdb, sizeof(vdb), i->base_volume) : "",
303 pa_strnull(i->monitor_source_name),
304 (double) i->latency, (double) i->configured_latency,
305 i->flags & PA_SINK_HARDWARE ? "HARDWARE " : "",
306 i->flags & PA_SINK_NETWORK ? "NETWORK " : "",
307 i->flags & PA_SINK_HW_MUTE_CTRL ? "HW_MUTE_CTRL " : "",
308 i->flags & PA_SINK_HW_VOLUME_CTRL ? "HW_VOLUME_CTRL " : "",
309 i->flags & PA_SINK_DECIBEL_VOLUME ? "DECIBEL_VOLUME " : "",
310 i->flags & PA_SINK_LATENCY ? "LATENCY " : "",
311 i->flags & PA_SINK_SET_FORMATS ? "SET_FORMATS " : "",
312 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
313
314 pa_xfree(pl);
315
316 if (i->ports) {
317 pa_sink_port_info **p;
318
319 printf(_("\tPorts:\n"));
320 for (p = i->ports; *p; p++)
321 printf("\t\t%s: %s (priority: %u%s)\n", (*p)->name, (*p)->description, (*p)->priority,
322 get_available_str_ynonly((*p)->available));
323 }
324
325 if (i->active_port)
326 printf(_("\tActive Port: %s\n"),
327 i->active_port->name);
328
329 if (i->formats) {
330 uint8_t j;
331
332 printf(_("\tFormats:\n"));
333 for (j = 0; j < i->n_formats; j++)
334 printf("\t\t%s\n", pa_format_info_snprint(f, sizeof(f), i->formats[j]));
335 }
336 }
337
338 static void get_source_info_callback(pa_context *c, const pa_source_info *i, int is_last, void *userdata) {
339
340 static const char *state_table[] = {
341 [1+PA_SOURCE_INVALID_STATE] = "n/a",
342 [1+PA_SOURCE_RUNNING] = "RUNNING",
343 [1+PA_SOURCE_IDLE] = "IDLE",
344 [1+PA_SOURCE_SUSPENDED] = "SUSPENDED"
345 };
346
347 char
348 s[PA_SAMPLE_SPEC_SNPRINT_MAX],
349 cv[PA_CVOLUME_SNPRINT_MAX],
350 cvdb[PA_SW_CVOLUME_SNPRINT_DB_MAX],
351 v[PA_VOLUME_SNPRINT_MAX],
352 vdb[PA_SW_VOLUME_SNPRINT_DB_MAX],
353 cm[PA_CHANNEL_MAP_SNPRINT_MAX],
354 f[PA_FORMAT_INFO_SNPRINT_MAX];
355 char *pl;
356
357 if (is_last < 0) {
358 pa_log(_("Failed to get source information: %s"), pa_strerror(pa_context_errno(c)));
359 quit(1);
360 return;
361 }
362
363 if (is_last) {
364 complete_action();
365 return;
366 }
367
368 pa_assert(i);
369
370 if (nl && !short_list_format)
371 printf("\n");
372 nl = TRUE;
373
374 if (short_list_format) {
375 printf("%u\t%s\t%s\t%s\t%s\n",
376 i->index,
377 i->name,
378 pa_strnull(i->driver),
379 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec),
380 state_table[1+i->state]);
381 return;
382 }
383
384 printf(_("Source #%u\n"
385 "\tState: %s\n"
386 "\tName: %s\n"
387 "\tDescription: %s\n"
388 "\tDriver: %s\n"
389 "\tSample Specification: %s\n"
390 "\tChannel Map: %s\n"
391 "\tOwner Module: %u\n"
392 "\tMute: %s\n"
393 "\tVolume: %s%s%s\n"
394 "\t balance %0.2f\n"
395 "\tBase Volume: %s%s%s\n"
396 "\tMonitor of Sink: %s\n"
397 "\tLatency: %0.0f usec, configured %0.0f usec\n"
398 "\tFlags: %s%s%s%s%s%s\n"
399 "\tProperties:\n\t\t%s\n"),
400 i->index,
401 state_table[1+i->state],
402 i->name,
403 pa_strnull(i->description),
404 pa_strnull(i->driver),
405 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec),
406 pa_channel_map_snprint(cm, sizeof(cm), &i->channel_map),
407 i->owner_module,
408 pa_yes_no(i->mute),
409 pa_cvolume_snprint(cv, sizeof(cv), &i->volume),
410 i->flags & PA_SOURCE_DECIBEL_VOLUME ? "\n\t " : "",
411 i->flags & PA_SOURCE_DECIBEL_VOLUME ? pa_sw_cvolume_snprint_dB(cvdb, sizeof(cvdb), &i->volume) : "",
412 pa_cvolume_get_balance(&i->volume, &i->channel_map),
413 pa_volume_snprint(v, sizeof(v), i->base_volume),
414 i->flags & PA_SOURCE_DECIBEL_VOLUME ? "\n\t " : "",
415 i->flags & PA_SOURCE_DECIBEL_VOLUME ? pa_sw_volume_snprint_dB(vdb, sizeof(vdb), i->base_volume) : "",
416 i->monitor_of_sink_name ? i->monitor_of_sink_name : _("n/a"),
417 (double) i->latency, (double) i->configured_latency,
418 i->flags & PA_SOURCE_HARDWARE ? "HARDWARE " : "",
419 i->flags & PA_SOURCE_NETWORK ? "NETWORK " : "",
420 i->flags & PA_SOURCE_HW_MUTE_CTRL ? "HW_MUTE_CTRL " : "",
421 i->flags & PA_SOURCE_HW_VOLUME_CTRL ? "HW_VOLUME_CTRL " : "",
422 i->flags & PA_SOURCE_DECIBEL_VOLUME ? "DECIBEL_VOLUME " : "",
423 i->flags & PA_SOURCE_LATENCY ? "LATENCY " : "",
424 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
425
426 pa_xfree(pl);
427
428 if (i->ports) {
429 pa_source_port_info **p;
430
431 printf(_("\tPorts:\n"));
432 for (p = i->ports; *p; p++)
433 printf("\t\t%s: %s (priority: %u%s)\n", (*p)->name, (*p)->description, (*p)->priority,
434 get_available_str_ynonly((*p)->available));
435 }
436
437 if (i->active_port)
438 printf(_("\tActive Port: %s\n"),
439 i->active_port->name);
440
441 if (i->formats) {
442 uint8_t j;
443
444 printf(_("\tFormats:\n"));
445 for (j = 0; j < i->n_formats; j++)
446 printf("\t\t%s\n", pa_format_info_snprint(f, sizeof(f), i->formats[j]));
447 }
448 }
449
450 static void get_module_info_callback(pa_context *c, const pa_module_info *i, int is_last, void *userdata) {
451 char t[32];
452 char *pl;
453
454 if (is_last < 0) {
455 pa_log(_("Failed to get module information: %s"), pa_strerror(pa_context_errno(c)));
456 quit(1);
457 return;
458 }
459
460 if (is_last) {
461 complete_action();
462 return;
463 }
464
465 pa_assert(i);
466
467 if (nl && !short_list_format)
468 printf("\n");
469 nl = TRUE;
470
471 pa_snprintf(t, sizeof(t), "%u", i->n_used);
472
473 if (short_list_format) {
474 printf("%u\t%s\t%s\t\n", i->index, i->name, i->argument ? i->argument : "");
475 return;
476 }
477
478 printf(_("Module #%u\n"
479 "\tName: %s\n"
480 "\tArgument: %s\n"
481 "\tUsage counter: %s\n"
482 "\tProperties:\n\t\t%s\n"),
483 i->index,
484 i->name,
485 i->argument ? i->argument : "",
486 i->n_used != PA_INVALID_INDEX ? t : _("n/a"),
487 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
488
489 pa_xfree(pl);
490 }
491
492 static void get_client_info_callback(pa_context *c, const pa_client_info *i, int is_last, void *userdata) {
493 char t[32];
494 char *pl;
495
496 if (is_last < 0) {
497 pa_log(_("Failed to get client information: %s"), pa_strerror(pa_context_errno(c)));
498 quit(1);
499 return;
500 }
501
502 if (is_last) {
503 complete_action();
504 return;
505 }
506
507 pa_assert(i);
508
509 if (nl && !short_list_format)
510 printf("\n");
511 nl = TRUE;
512
513 pa_snprintf(t, sizeof(t), "%u", i->owner_module);
514
515 if (short_list_format) {
516 printf("%u\t%s\t%s\n",
517 i->index,
518 pa_strnull(i->driver),
519 pa_strnull(pa_proplist_gets(i->proplist, PA_PROP_APPLICATION_PROCESS_BINARY)));
520 return;
521 }
522
523 printf(_("Client #%u\n"
524 "\tDriver: %s\n"
525 "\tOwner Module: %s\n"
526 "\tProperties:\n\t\t%s\n"),
527 i->index,
528 pa_strnull(i->driver),
529 i->owner_module != PA_INVALID_INDEX ? t : _("n/a"),
530 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
531
532 pa_xfree(pl);
533 }
534
535 static void get_card_info_callback(pa_context *c, const pa_card_info *i, int is_last, void *userdata) {
536 char t[32];
537 char *pl;
538
539 if (is_last < 0) {
540 pa_log(_("Failed to get card information: %s"), pa_strerror(pa_context_errno(c)));
541 complete_action();
542 return;
543 }
544
545 if (is_last) {
546 complete_action();
547 return;
548 }
549
550 pa_assert(i);
551
552 if (nl && !short_list_format)
553 printf("\n");
554 nl = TRUE;
555
556 pa_snprintf(t, sizeof(t), "%u", i->owner_module);
557
558 if (short_list_format) {
559 printf("%u\t%s\t%s\n", i->index, i->name, pa_strnull(i->driver));
560 return;
561 }
562
563 printf(_("Card #%u\n"
564 "\tName: %s\n"
565 "\tDriver: %s\n"
566 "\tOwner Module: %s\n"
567 "\tProperties:\n\t\t%s\n"),
568 i->index,
569 i->name,
570 pa_strnull(i->driver),
571 i->owner_module != PA_INVALID_INDEX ? t : _("n/a"),
572 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
573
574 if (i->profiles) {
575 pa_card_profile_info *p;
576
577 printf(_("\tProfiles:\n"));
578 for (p = i->profiles; p->name; p++)
579 printf("\t\t%s: %s (sinks: %u, sources: %u, priority. %u)\n", p->name, p->description, p->n_sinks, p->n_sources, p->priority);
580 }
581
582 if (i->active_profile)
583 printf(_("\tActive Profile: %s\n"),
584 i->active_profile->name);
585
586 if (i->ports) {
587 pa_card_port_info **p;
588
589 printf(_("\tPorts:\n"));
590 for (p = i->ports; *p; p++) {
591 pa_card_profile_info **pr = (*p)->profiles;
592 printf(_("\t\t%s: %s (priority: %u%s)\n"), (*p)->name, (*p)->description, (*p)->priority,
593 get_available_str_ynonly((*p)->available));
594
595 if (pr) {
596 printf(_("\t\t\tPart of profile(s): %s"), pa_strnull((*pr)->name));
597 pr++;
598 while (*pr) {
599 printf(", %s", pa_strnull((*pr)->name));
600 pr++;
601 }
602 printf("\n");
603 }
604 }
605 }
606
607 pa_xfree(pl);
608 }
609
610 static void get_sink_input_info_callback(pa_context *c, const pa_sink_input_info *i, int is_last, void *userdata) {
611 char t[32], k[32], s[PA_SAMPLE_SPEC_SNPRINT_MAX], cv[PA_CVOLUME_SNPRINT_MAX], cvdb[PA_SW_CVOLUME_SNPRINT_DB_MAX], cm[PA_CHANNEL_MAP_SNPRINT_MAX], f[PA_FORMAT_INFO_SNPRINT_MAX];
612 char *pl;
613
614 if (is_last < 0) {
615 pa_log(_("Failed to get sink input information: %s"), pa_strerror(pa_context_errno(c)));
616 quit(1);
617 return;
618 }
619
620 if (is_last) {
621 complete_action();
622 return;
623 }
624
625 pa_assert(i);
626
627 if (nl && !short_list_format)
628 printf("\n");
629 nl = TRUE;
630
631 pa_snprintf(t, sizeof(t), "%u", i->owner_module);
632 pa_snprintf(k, sizeof(k), "%u", i->client);
633
634 if (short_list_format) {
635 printf("%u\t%u\t%s\t%s\t%s\n",
636 i->index,
637 i->sink,
638 i->client != PA_INVALID_INDEX ? k : "-",
639 pa_strnull(i->driver),
640 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec));
641 return;
642 }
643
644 printf(_("Sink Input #%u\n"
645 "\tDriver: %s\n"
646 "\tOwner Module: %s\n"
647 "\tClient: %s\n"
648 "\tSink: %u\n"
649 "\tSample Specification: %s\n"
650 "\tChannel Map: %s\n"
651 "\tFormat: %s\n"
652 "\tCorked: %s\n"
653 "\tMute: %s\n"
654 "\tVolume: %s\n"
655 "\t %s\n"
656 "\t balance %0.2f\n"
657 "\tBuffer Latency: %0.0f usec\n"
658 "\tSink Latency: %0.0f usec\n"
659 "\tResample method: %s\n"
660 "\tProperties:\n\t\t%s\n"),
661 i->index,
662 pa_strnull(i->driver),
663 i->owner_module != PA_INVALID_INDEX ? t : _("n/a"),
664 i->client != PA_INVALID_INDEX ? k : _("n/a"),
665 i->sink,
666 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec),
667 pa_channel_map_snprint(cm, sizeof(cm), &i->channel_map),
668 pa_format_info_snprint(f, sizeof(f), i->format),
669 pa_yes_no(i->corked),
670 pa_yes_no(i->mute),
671 pa_cvolume_snprint(cv, sizeof(cv), &i->volume),
672 pa_sw_cvolume_snprint_dB(cvdb, sizeof(cvdb), &i->volume),
673 pa_cvolume_get_balance(&i->volume, &i->channel_map),
674 (double) i->buffer_usec,
675 (double) i->sink_usec,
676 i->resample_method ? i->resample_method : _("n/a"),
677 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
678
679 pa_xfree(pl);
680 }
681
682 static void get_source_output_info_callback(pa_context *c, const pa_source_output_info *i, int is_last, void *userdata) {
683 char t[32], k[32], s[PA_SAMPLE_SPEC_SNPRINT_MAX], cv[PA_CVOLUME_SNPRINT_MAX], cvdb[PA_SW_CVOLUME_SNPRINT_DB_MAX], cm[PA_CHANNEL_MAP_SNPRINT_MAX], f[PA_FORMAT_INFO_SNPRINT_MAX];
684 char *pl;
685
686 if (is_last < 0) {
687 pa_log(_("Failed to get source output information: %s"), pa_strerror(pa_context_errno(c)));
688 quit(1);
689 return;
690 }
691
692 if (is_last) {
693 complete_action();
694 return;
695 }
696
697 pa_assert(i);
698
699 if (nl && !short_list_format)
700 printf("\n");
701 nl = TRUE;
702
703
704 pa_snprintf(t, sizeof(t), "%u", i->owner_module);
705 pa_snprintf(k, sizeof(k), "%u", i->client);
706
707 if (short_list_format) {
708 printf("%u\t%u\t%s\t%s\t%s\n",
709 i->index,
710 i->source,
711 i->client != PA_INVALID_INDEX ? k : "-",
712 pa_strnull(i->driver),
713 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec));
714 return;
715 }
716
717 printf(_("Source Output #%u\n"
718 "\tDriver: %s\n"
719 "\tOwner Module: %s\n"
720 "\tClient: %s\n"
721 "\tSource: %u\n"
722 "\tSample Specification: %s\n"
723 "\tChannel Map: %s\n"
724 "\tFormat: %s\n"
725 "\tCorked: %s\n"
726 "\tMute: %s\n"
727 "\tVolume: %s\n"
728 "\t %s\n"
729 "\t balance %0.2f\n"
730 "\tBuffer Latency: %0.0f usec\n"
731 "\tSource Latency: %0.0f usec\n"
732 "\tResample method: %s\n"
733 "\tProperties:\n\t\t%s\n"),
734 i->index,
735 pa_strnull(i->driver),
736 i->owner_module != PA_INVALID_INDEX ? t : _("n/a"),
737 i->client != PA_INVALID_INDEX ? k : _("n/a"),
738 i->source,
739 pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec),
740 pa_channel_map_snprint(cm, sizeof(cm), &i->channel_map),
741 pa_format_info_snprint(f, sizeof(f), i->format),
742 pa_yes_no(i->corked),
743 pa_yes_no(i->mute),
744 pa_cvolume_snprint(cv, sizeof(cv), &i->volume),
745 pa_sw_cvolume_snprint_dB(cvdb, sizeof(cvdb), &i->volume),
746 pa_cvolume_get_balance(&i->volume, &i->channel_map),
747 (double) i->buffer_usec,
748 (double) i->source_usec,
749 i->resample_method ? i->resample_method : _("n/a"),
750 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
751
752 pa_xfree(pl);
753 }
754
755 static void get_sample_info_callback(pa_context *c, const pa_sample_info *i, int is_last, void *userdata) {
756 char t[PA_BYTES_SNPRINT_MAX], s[PA_SAMPLE_SPEC_SNPRINT_MAX], cv[PA_CVOLUME_SNPRINT_MAX], cvdb[PA_SW_CVOLUME_SNPRINT_DB_MAX], cm[PA_CHANNEL_MAP_SNPRINT_MAX];
757 char *pl;
758
759 if (is_last < 0) {
760 pa_log(_("Failed to get sample information: %s"), pa_strerror(pa_context_errno(c)));
761 quit(1);
762 return;
763 }
764
765 if (is_last) {
766 complete_action();
767 return;
768 }
769
770 pa_assert(i);
771
772 if (nl && !short_list_format)
773 printf("\n");
774 nl = TRUE;
775
776 pa_bytes_snprint(t, sizeof(t), i->bytes);
777
778 if (short_list_format) {
779 printf("%u\t%s\t%s\t%0.3f\n",
780 i->index,
781 i->name,
782 pa_sample_spec_valid(&i->sample_spec) ? pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec) : "-",
783 (double) i->duration/1000000.0);
784 return;
785 }
786
787 printf(_("Sample #%u\n"
788 "\tName: %s\n"
789 "\tSample Specification: %s\n"
790 "\tChannel Map: %s\n"
791 "\tVolume: %s\n"
792 "\t %s\n"
793 "\t balance %0.2f\n"
794 "\tDuration: %0.1fs\n"
795 "\tSize: %s\n"
796 "\tLazy: %s\n"
797 "\tFilename: %s\n"
798 "\tProperties:\n\t\t%s\n"),
799 i->index,
800 i->name,
801 pa_sample_spec_valid(&i->sample_spec) ? pa_sample_spec_snprint(s, sizeof(s), &i->sample_spec) : _("n/a"),
802 pa_sample_spec_valid(&i->sample_spec) ? pa_channel_map_snprint(cm, sizeof(cm), &i->channel_map) : _("n/a"),
803 pa_cvolume_snprint(cv, sizeof(cv), &i->volume),
804 pa_sw_cvolume_snprint_dB(cvdb, sizeof(cvdb), &i->volume),
805 pa_cvolume_get_balance(&i->volume, &i->channel_map),
806 (double) i->duration/1000000.0,
807 t,
808 pa_yes_no(i->lazy),
809 i->filename ? i->filename : _("n/a"),
810 pl = pa_proplist_to_string_sep(i->proplist, "\n\t\t"));
811
812 pa_xfree(pl);
813 }
814
815 static void simple_callback(pa_context *c, int success, void *userdata) {
816 if (!success) {
817 pa_log(_("Failure: %s"), pa_strerror(pa_context_errno(c)));
818 quit(1);
819 return;
820 }
821
822 complete_action();
823 }
824
825 static void index_callback(pa_context *c, uint32_t idx, void *userdata) {
826 if (idx == PA_INVALID_INDEX) {
827 pa_log(_("Failure: %s"), pa_strerror(pa_context_errno(c)));
828 quit(1);
829 return;
830 }
831
832 printf("%u\n", idx);
833
834 complete_action();
835 }
836
837 static void volume_relative_adjust(pa_cvolume *cv) {
838 pa_assert((volume_flags & VOL_RELATIVE) == VOL_RELATIVE);
839
840 /* Relative volume change is additive in case of UINT or PERCENT
841 * and multiplicative for LINEAR or DECIBEL */
842 if ((volume_flags & 0x0F) == VOL_UINT || (volume_flags & 0x0F) == VOL_PERCENT) {
843 pa_volume_t v = pa_cvolume_avg(cv);
844 v = v + volume < PA_VOLUME_NORM ? PA_VOLUME_MUTED : v + volume - PA_VOLUME_NORM;
845 pa_cvolume_set(cv, 1, v);
846 }
847 if ((volume_flags & 0x0F) == VOL_LINEAR || (volume_flags & 0x0F) == VOL_DECIBEL) {
848 pa_sw_cvolume_multiply_scalar(cv, cv, volume);
849 }
850 }
851
852 static void unload_module_by_name_callback(pa_context *c, const pa_module_info *i, int is_last, void *userdata) {
853 static pa_bool_t unloaded = FALSE;
854
855 if (is_last < 0) {
856 pa_log(_("Failed to get module information: %s"), pa_strerror(pa_context_errno(c)));
857 quit(1);
858 return;
859 }
860
861 if (is_last) {
862 if (unloaded == FALSE)
863 pa_log(_("Failed to unload module: Module %s not loaded"), module_name);
864 complete_action();
865 return;
866 }
867
868 pa_assert(i);
869
870 if (pa_streq(module_name, i->name)) {
871 unloaded = TRUE;
872 actions++;
873 pa_operation_unref(pa_context_unload_module(c, i->index, simple_callback, NULL));
874 }
875 }
876
877 static void get_sink_volume_callback(pa_context *c, const pa_sink_info *i, int is_last, void *userdata) {
878 pa_cvolume cv;
879
880 if (is_last < 0) {
881 pa_log(_("Failed to get sink information: %s"), pa_strerror(pa_context_errno(c)));
882 quit(1);
883 return;
884 }
885
886 if (is_last)
887 return;
888
889 pa_assert(i);
890
891 cv = i->volume;
892 volume_relative_adjust(&cv);
893 pa_operation_unref(pa_context_set_sink_volume_by_name(c, sink_name, &cv, simple_callback, NULL));
894 }
895
896 static void get_source_volume_callback(pa_context *c, const pa_source_info *i, int is_last, void *userdata) {
897 pa_cvolume cv;
898
899 if (is_last < 0) {
900 pa_log(_("Failed to get source information: %s"), pa_strerror(pa_context_errno(c)));
901 quit(1);
902 return;
903 }
904
905 if (is_last)
906 return;
907
908 pa_assert(i);
909
910 cv = i->volume;
911 volume_relative_adjust(&cv);
912 pa_operation_unref(pa_context_set_source_volume_by_name(c, source_name, &cv, simple_callback, NULL));
913 }
914
915 static void get_sink_input_volume_callback(pa_context *c, const pa_sink_input_info *i, int is_last, void *userdata) {
916 pa_cvolume cv;
917
918 if (is_last < 0) {
919 pa_log(_("Failed to get sink input information: %s"), pa_strerror(pa_context_errno(c)));
920 quit(1);
921 return;
922 }
923
924 if (is_last)
925 return;
926
927 pa_assert(i);
928
929 cv = i->volume;
930 volume_relative_adjust(&cv);
931 pa_operation_unref(pa_context_set_sink_input_volume(c, sink_input_idx, &cv, simple_callback, NULL));
932 }
933
934 static void get_source_output_volume_callback(pa_context *c, const pa_source_output_info *o, int is_last, void *userdata) {
935 pa_cvolume cv;
936
937 if (is_last < 0) {
938 pa_log(_("Failed to get source output information: %s"), pa_strerror(pa_context_errno(c)));
939 quit(1);
940 return;
941 }
942
943 if (is_last)
944 return;
945
946 pa_assert(o);
947
948 cv = o->volume;
949 volume_relative_adjust(&cv);
950 pa_operation_unref(pa_context_set_source_output_volume(c, source_output_idx, &cv, simple_callback, NULL));
951 }
952
953 /* PA_MAX_FORMATS is defined in internal.h so we just define a sane value here */
954 #define MAX_FORMATS 256
955
956 static void set_sink_formats(pa_context *c, uint32_t sink, const char *str) {
957 pa_format_info *f_arr[MAX_FORMATS];
958 char *format = NULL;
959 const char *state = NULL;
960 int i = 0;
961
962 while ((format = pa_split(str, ";", &state))) {
963 pa_format_info *f = pa_format_info_from_string(pa_strip(format));
964
965 if (!f) {
966 pa_log(_("Failed to set format: invalid format string %s"), format);
967 goto error;
968 }
969
970 f_arr[i++] = f;
971 pa_xfree(format);
972 }
973
974 pa_operation_unref(pa_ext_device_restore_save_formats(c, PA_DEVICE_TYPE_SINK, sink, i, f_arr, simple_callback, NULL));
975
976 done:
977 if (format)
978 pa_xfree(format);
979 while(i--)
980 pa_format_info_free(f_arr[i]);
981
982 return;
983
984 error:
985 while(i--)
986 pa_format_info_free(f_arr[i]);
987 quit(1);
988 goto done;
989 }
990
991 static void stream_state_callback(pa_stream *s, void *userdata) {
992 pa_assert(s);
993
994 switch (pa_stream_get_state(s)) {
995 case PA_STREAM_CREATING:
996 case PA_STREAM_READY:
997 break;
998
999 case PA_STREAM_TERMINATED:
1000 drain();
1001 break;
1002
1003 case PA_STREAM_FAILED:
1004 default:
1005 pa_log(_("Failed to upload sample: %s"), pa_strerror(pa_context_errno(pa_stream_get_context(s))));
1006 quit(1);
1007 }
1008 }
1009
1010 static void stream_write_callback(pa_stream *s, size_t length, void *userdata) {
1011 sf_count_t l;
1012 float *d;
1013 pa_assert(s && length && sndfile);
1014
1015 d = pa_xmalloc(length);
1016
1017 pa_assert(sample_length >= length);
1018 l = (sf_count_t) (length/pa_frame_size(&sample_spec));
1019
1020 if ((sf_readf_float(sndfile, d, l)) != l) {
1021 pa_xfree(d);
1022 pa_log(_("Premature end of file"));
1023 quit(1);
1024 return;
1025 }
1026
1027 pa_stream_write(s, d, length, pa_xfree, 0, PA_SEEK_RELATIVE);
1028
1029 sample_length -= length;
1030
1031 if (sample_length <= 0) {
1032 pa_stream_set_write_callback(sample_stream, NULL, NULL);
1033 pa_stream_finish_upload(sample_stream);
1034 }
1035 }
1036
1037 static const char *subscription_event_type_to_string(pa_subscription_event_type_t t) {
1038
1039 switch (t & PA_SUBSCRIPTION_EVENT_TYPE_MASK) {
1040
1041 case PA_SUBSCRIPTION_EVENT_NEW:
1042 return _("new");
1043
1044 case PA_SUBSCRIPTION_EVENT_CHANGE:
1045 return _("change");
1046
1047 case PA_SUBSCRIPTION_EVENT_REMOVE:
1048 return _("remove");
1049 }
1050
1051 return _("unknown");
1052 }
1053
1054 static const char *subscription_event_facility_to_string(pa_subscription_event_type_t t) {
1055
1056 switch (t & PA_SUBSCRIPTION_EVENT_FACILITY_MASK) {
1057
1058 case PA_SUBSCRIPTION_EVENT_SINK:
1059 return _("sink");
1060
1061 case PA_SUBSCRIPTION_EVENT_SOURCE:
1062 return _("source");
1063
1064 case PA_SUBSCRIPTION_EVENT_SINK_INPUT:
1065 return _("sink-input");
1066
1067 case PA_SUBSCRIPTION_EVENT_SOURCE_OUTPUT:
1068 return _("source-output");
1069
1070 case PA_SUBSCRIPTION_EVENT_MODULE:
1071 return _("module");
1072
1073 case PA_SUBSCRIPTION_EVENT_CLIENT:
1074 return _("client");
1075
1076 case PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE:
1077 return _("sample-cache");
1078
1079 case PA_SUBSCRIPTION_EVENT_SERVER:
1080 return _("server");
1081
1082 case PA_SUBSCRIPTION_EVENT_CARD:
1083 return _("server");
1084 }
1085
1086 return _("unknown");
1087 }
1088
1089 static void context_subscribe_callback(pa_context *c, pa_subscription_event_type_t t, uint32_t idx, void *userdata) {
1090 pa_assert(c);
1091
1092 printf(_("Event '%s' on %s #%u\n"),
1093 subscription_event_type_to_string(t),
1094 subscription_event_facility_to_string(t),
1095 idx);
1096 }
1097
1098 static void context_state_callback(pa_context *c, void *userdata) {
1099 pa_assert(c);
1100 switch (pa_context_get_state(c)) {
1101 case PA_CONTEXT_CONNECTING:
1102 case PA_CONTEXT_AUTHORIZING:
1103 case PA_CONTEXT_SETTING_NAME:
1104 break;
1105
1106 case PA_CONTEXT_READY:
1107 switch (action) {
1108 case STAT:
1109 pa_operation_unref(pa_context_stat(c, stat_callback, NULL));
1110 if (short_list_format)
1111 break;
1112 actions++;
1113
1114 case INFO:
1115 pa_operation_unref(pa_context_get_server_info(c, get_server_info_callback, NULL));
1116 break;
1117
1118 case PLAY_SAMPLE:
1119 pa_operation_unref(pa_context_play_sample(c, sample_name, sink_name, PA_VOLUME_NORM, simple_callback, NULL));
1120 break;
1121
1122 case REMOVE_SAMPLE:
1123 pa_operation_unref(pa_context_remove_sample(c, sample_name, simple_callback, NULL));
1124 break;
1125
1126 case UPLOAD_SAMPLE:
1127 sample_stream = pa_stream_new(c, sample_name, &sample_spec, NULL);
1128 pa_assert(sample_stream);
1129
1130 pa_stream_set_state_callback(sample_stream, stream_state_callback, NULL);
1131 pa_stream_set_write_callback(sample_stream, stream_write_callback, NULL);
1132 pa_stream_connect_upload(sample_stream, sample_length);
1133 break;
1134
1135 case EXIT:
1136 pa_operation_unref(pa_context_exit_daemon(c, simple_callback, NULL));
1137 break;
1138
1139 case LIST:
1140 if (list_type) {
1141 if (pa_streq(list_type, "modules"))
1142 pa_operation_unref(pa_context_get_module_info_list(c, get_module_info_callback, NULL));
1143 else if (pa_streq(list_type, "sinks"))
1144 pa_operation_unref(pa_context_get_sink_info_list(c, get_sink_info_callback, NULL));
1145 else if (pa_streq(list_type, "sources"))
1146 pa_operation_unref(pa_context_get_source_info_list(c, get_source_info_callback, NULL));
1147 else if (pa_streq(list_type, "sink-inputs"))
1148 pa_operation_unref(pa_context_get_sink_input_info_list(c, get_sink_input_info_callback, NULL));
1149 else if (pa_streq(list_type, "source-outputs"))
1150 pa_operation_unref(pa_context_get_source_output_info_list(c, get_source_output_info_callback, NULL));
1151 else if (pa_streq(list_type, "clients"))
1152 pa_operation_unref(pa_context_get_client_info_list(c, get_client_info_callback, NULL));
1153 else if (pa_streq(list_type, "samples"))
1154 pa_operation_unref(pa_context_get_sample_info_list(c, get_sample_info_callback, NULL));
1155 else if (pa_streq(list_type, "cards"))
1156 pa_operation_unref(pa_context_get_card_info_list(c, get_card_info_callback, NULL));
1157 else
1158 pa_assert_not_reached();
1159 } else {
1160 actions = 8;
1161 pa_operation_unref(pa_context_get_module_info_list(c, get_module_info_callback, NULL));
1162 pa_operation_unref(pa_context_get_sink_info_list(c, get_sink_info_callback, NULL));
1163 pa_operation_unref(pa_context_get_source_info_list(c, get_source_info_callback, NULL));
1164 pa_operation_unref(pa_context_get_sink_input_info_list(c, get_sink_input_info_callback, NULL));
1165 pa_operation_unref(pa_context_get_source_output_info_list(c, get_source_output_info_callback, NULL));
1166 pa_operation_unref(pa_context_get_client_info_list(c, get_client_info_callback, NULL));
1167 pa_operation_unref(pa_context_get_sample_info_list(c, get_sample_info_callback, NULL));
1168 pa_operation_unref(pa_context_get_card_info_list(c, get_card_info_callback, NULL));
1169 }
1170 break;
1171
1172 case MOVE_SINK_INPUT:
1173 pa_operation_unref(pa_context_move_sink_input_by_name(c, sink_input_idx, sink_name, simple_callback, NULL));
1174 break;
1175
1176 case MOVE_SOURCE_OUTPUT:
1177 pa_operation_unref(pa_context_move_source_output_by_name(c, source_output_idx, source_name, simple_callback, NULL));
1178 break;
1179
1180 case LOAD_MODULE:
1181 pa_operation_unref(pa_context_load_module(c, module_name, module_args, index_callback, NULL));
1182 break;
1183
1184 case UNLOAD_MODULE:
1185 if (module_name)
1186 pa_operation_unref(pa_context_get_module_info_list(c, unload_module_by_name_callback, NULL));
1187 else
1188 pa_operation_unref(pa_context_unload_module(c, module_index, simple_callback, NULL));
1189 break;
1190
1191 case SUSPEND_SINK:
1192 if (sink_name)
1193 pa_operation_unref(pa_context_suspend_sink_by_name(c, sink_name, suspend, simple_callback, NULL));
1194 else
1195 pa_operation_unref(pa_context_suspend_sink_by_index(c, PA_INVALID_INDEX, suspend, simple_callback, NULL));
1196 break;
1197
1198 case SUSPEND_SOURCE:
1199 if (source_name)
1200 pa_operation_unref(pa_context_suspend_source_by_name(c, source_name, suspend, simple_callback, NULL));
1201 else
1202 pa_operation_unref(pa_context_suspend_source_by_index(c, PA_INVALID_INDEX, suspend, simple_callback, NULL));
1203 break;
1204
1205 case SET_CARD_PROFILE:
1206 pa_operation_unref(pa_context_set_card_profile_by_name(c, card_name, profile_name, simple_callback, NULL));
1207 break;
1208
1209 case SET_SINK_PORT:
1210 pa_operation_unref(pa_context_set_sink_port_by_name(c, sink_name, port_name, simple_callback, NULL));
1211 break;
1212
1213 case SET_SOURCE_PORT:
1214 pa_operation_unref(pa_context_set_source_port_by_name(c, source_name, port_name, simple_callback, NULL));
1215 break;
1216
1217 case SET_SINK_MUTE:
1218 pa_operation_unref(pa_context_set_sink_mute_by_name(c, sink_name, mute, simple_callback, NULL));
1219 break;
1220
1221 case SET_SOURCE_MUTE:
1222 pa_operation_unref(pa_context_set_source_mute_by_name(c, source_name, mute, simple_callback, NULL));
1223 break;
1224
1225 case SET_SINK_INPUT_MUTE:
1226 pa_operation_unref(pa_context_set_sink_input_mute(c, sink_input_idx, mute, simple_callback, NULL));
1227 break;
1228
1229 case SET_SOURCE_OUTPUT_MUTE:
1230 pa_operation_unref(pa_context_set_source_output_mute(c, source_output_idx, mute, simple_callback, NULL));
1231 break;
1232
1233 case SET_SINK_VOLUME:
1234 if ((volume_flags & VOL_RELATIVE) == VOL_RELATIVE) {
1235 pa_operation_unref(pa_context_get_sink_info_by_name(c, sink_name, get_sink_volume_callback, NULL));
1236 } else {
1237 pa_cvolume v;
1238 pa_cvolume_set(&v, 1, volume);
1239 pa_operation_unref(pa_context_set_sink_volume_by_name(c, sink_name, &v, simple_callback, NULL));
1240 }
1241 break;
1242
1243 case SET_SOURCE_VOLUME:
1244 if ((volume_flags & VOL_RELATIVE) == VOL_RELATIVE) {
1245 pa_operation_unref(pa_context_get_source_info_by_name(c, source_name, get_source_volume_callback, NULL));
1246 } else {
1247 pa_cvolume v;
1248 pa_cvolume_set(&v, 1, volume);
1249 pa_operation_unref(pa_context_set_source_volume_by_name(c, source_name, &v, simple_callback, NULL));
1250 }
1251 break;
1252
1253 case SET_SINK_INPUT_VOLUME:
1254 if ((volume_flags & VOL_RELATIVE) == VOL_RELATIVE) {
1255 pa_operation_unref(pa_context_get_sink_input_info(c, sink_input_idx, get_sink_input_volume_callback, NULL));
1256 } else {
1257 pa_cvolume v;
1258 pa_cvolume_set(&v, 1, volume);
1259 pa_operation_unref(pa_context_set_sink_input_volume(c, sink_input_idx, &v, simple_callback, NULL));
1260 }
1261 break;
1262
1263 case SET_SOURCE_OUTPUT_VOLUME:
1264 if ((volume_flags & VOL_RELATIVE) == VOL_RELATIVE) {
1265 pa_operation_unref(pa_context_get_source_output_info(c, source_output_idx, get_source_output_volume_callback, NULL));
1266 } else {
1267 pa_cvolume v;
1268 pa_cvolume_set(&v, 1, volume);
1269 pa_operation_unref(pa_context_set_source_output_volume(c, source_output_idx, &v, simple_callback, NULL));
1270 }
1271 break;
1272
1273 case SET_SINK_FORMATS:
1274 set_sink_formats(c, sink_idx, formats);
1275 break;
1276
1277 case SUBSCRIBE:
1278 pa_context_set_subscribe_callback(c, context_subscribe_callback, NULL);
1279
1280 pa_operation_unref(pa_context_subscribe(
1281 c,
1282 PA_SUBSCRIPTION_MASK_SINK|
1283 PA_SUBSCRIPTION_MASK_SOURCE|
1284 PA_SUBSCRIPTION_MASK_SINK_INPUT|
1285 PA_SUBSCRIPTION_MASK_SOURCE_OUTPUT|
1286 PA_SUBSCRIPTION_MASK_MODULE|
1287 PA_SUBSCRIPTION_MASK_CLIENT|
1288 PA_SUBSCRIPTION_MASK_SAMPLE_CACHE|
1289 PA_SUBSCRIPTION_MASK_SERVER|
1290 PA_SUBSCRIPTION_MASK_CARD,
1291 NULL,
1292 NULL));
1293 break;
1294
1295 default:
1296 pa_assert_not_reached();
1297 }
1298 break;
1299
1300 case PA_CONTEXT_TERMINATED:
1301 quit(0);
1302 break;
1303
1304 case PA_CONTEXT_FAILED:
1305 default:
1306 pa_log(_("Connection failure: %s"), pa_strerror(pa_context_errno(c)));
1307 quit(1);
1308 }
1309 }
1310
1311 static void exit_signal_callback(pa_mainloop_api *m, pa_signal_event *e, int sig, void *userdata) {
1312 pa_log(_("Got SIGINT, exiting."));
1313 quit(0);
1314 }
1315
1316 static int parse_volume(const char *vol_spec, pa_volume_t *vol, enum volume_flags *vol_flags) {
1317 double v;
1318 char *vs;
1319
1320 pa_assert(vol_spec);
1321 pa_assert(vol);
1322 pa_assert(vol_flags);
1323
1324 vs = pa_xstrdup(vol_spec);
1325
1326 *vol_flags = (pa_startswith(vs, "+") || pa_startswith(vs, "-")) ? VOL_RELATIVE : VOL_ABSOLUTE;
1327 if (strchr(vs, '.'))
1328 *vol_flags |= VOL_LINEAR;
1329 if (pa_endswith(vs, "%")) {
1330 *vol_flags |= VOL_PERCENT;
1331 vs[strlen(vs)-1] = 0;
1332 }
1333 if (pa_endswith(vs, "db") || pa_endswith(vs, "dB")) {
1334 *vol_flags |= VOL_DECIBEL;
1335 vs[strlen(vs)-2] = 0;
1336 }
1337
1338 if (pa_atod(vs, &v) < 0) {
1339 pa_log(_("Invalid volume specification"));
1340 pa_xfree(vs);
1341 return -1;
1342 }
1343
1344 pa_xfree(vs);
1345
1346 if ((*vol_flags & VOL_RELATIVE) == VOL_RELATIVE) {
1347 if ((*vol_flags & 0x0F) == VOL_UINT)
1348 v += (double) PA_VOLUME_NORM;
1349 if ((*vol_flags & 0x0F) == VOL_PERCENT)
1350 v += 100.0;
1351 if ((*vol_flags & 0x0F) == VOL_LINEAR)
1352 v += 1.0;
1353 }
1354 if ((*vol_flags & 0x0F) == VOL_PERCENT)
1355 v = v * (double) PA_VOLUME_NORM / 100;
1356 if ((*vol_flags & 0x0F) == VOL_LINEAR)
1357 v = pa_sw_volume_from_linear(v);
1358 if ((*vol_flags & 0x0F) == VOL_DECIBEL)
1359 v = pa_sw_volume_from_dB(v);
1360
1361 if (!PA_VOLUME_IS_VALID((pa_volume_t) v)) {
1362 pa_log(_("Volume outside permissible range.\n"));
1363 return -1;
1364 }
1365
1366 *vol = (pa_volume_t) v;
1367
1368 return 0;
1369 }
1370
1371 static void help(const char *argv0) {
1372
1373 printf("%s %s %s\n", argv0, _("[options]"), "stat [short]");
1374 printf("%s %s %s\n", argv0, _("[options]"), "info");
1375 printf("%s %s %s %s\n", argv0, _("[options]"), "list [short]", _("[TYPE]"));
1376 printf("%s %s %s\n", argv0, _("[options]"), "exit");
1377 printf("%s %s %s %s\n", argv0, _("[options]"), "upload-sample", _("FILENAME [NAME]"));
1378 printf("%s %s %s %s\n", argv0, _("[options]"), "play-sample ", _("NAME [SINK]"));
1379 printf("%s %s %s %s\n", argv0, _("[options]"), "remove-sample ", _("NAME"));
1380 printf("%s %s %s %s\n", argv0, _("[options]"), "load-module ", _("NAME [ARGS ...]"));
1381 printf("%s %s %s %s\n", argv0, _("[options]"), "unload-module ", _("NAME|#N"));
1382 printf("%s %s %s %s\n", argv0, _("[options]"), "move-(sink-input|source-output)", _("#N SINK|SOURCE"));
1383 printf("%s %s %s %s\n", argv0, _("[options]"), "suspend-(sink|source)", _("NAME|#N 1|0"));
1384 printf("%s %s %s %s\n", argv0, _("[options]"), "set-card-profile ", _("CARD PROFILE"));
1385 printf("%s %s %s %s\n", argv0, _("[options]"), "set-(sink|source)-port", _("NAME|#N PORT"));
1386 printf("%s %s %s %s\n", argv0, _("[options]"), "set-(sink|source)-volume", _("NAME|#N VOLUME"));
1387 printf("%s %s %s %s\n", argv0, _("[options]"), "set-(sink-input|source-output)-volume", _("#N VOLUME"));
1388 printf("%s %s %s %s\n", argv0, _("[options]"), "set-(sink|source)-mute", _("NAME|#N 1|0"));
1389 printf("%s %s %s %s\n", argv0, _("[options]"), "set-(sink-input|source-output)-mute", _("#N 1|0"));
1390 printf("%s %s %s %s\n", argv0, _("[options]"), "set-sink-formats", _("#N FORMATS"));
1391 printf("%s %s %s\n", argv0, _("[options]"), "subscribe");
1392
1393 printf(_("\n"
1394 " -h, --help Show this help\n"
1395 " --version Show version\n\n"
1396 " -s, --server=SERVER The name of the server to connect to\n"
1397 " -n, --client-name=NAME How to call this client on the server\n"));
1398 }
1399
1400 enum {
1401 ARG_VERSION = 256
1402 };
1403
1404 int main(int argc, char *argv[]) {
1405 pa_mainloop *m = NULL;
1406 int ret = 1, c;
1407 char *server = NULL, *bn;
1408
1409 static const struct option long_options[] = {
1410 {"server", 1, NULL, 's'},
1411 {"client-name", 1, NULL, 'n'},
1412 {"version", 0, NULL, ARG_VERSION},
1413 {"help", 0, NULL, 'h'},
1414 {NULL, 0, NULL, 0}
1415 };
1416
1417 setlocale(LC_ALL, "");
1418 #ifdef ENABLE_NLS
1419 bindtextdomain(GETTEXT_PACKAGE, PULSE_LOCALEDIR);
1420 #endif
1421
1422 bn = pa_path_get_filename(argv[0]);
1423
1424 proplist = pa_proplist_new();
1425
1426 while ((c = getopt_long(argc, argv, "s:n:h", long_options, NULL)) != -1) {
1427 switch (c) {
1428 case 'h' :
1429 help(bn);
1430 ret = 0;
1431 goto quit;
1432
1433 case ARG_VERSION:
1434 printf(_("pactl %s\n"
1435 "Compiled with libpulse %s\n"
1436 "Linked with libpulse %s\n"),
1437 PACKAGE_VERSION,
1438 pa_get_headers_version(),
1439 pa_get_library_version());
1440 ret = 0;
1441 goto quit;
1442
1443 case 's':
1444 pa_xfree(server);
1445 server = pa_xstrdup(optarg);
1446 break;
1447
1448 case 'n': {
1449 char *t;
1450
1451 if (!(t = pa_locale_to_utf8(optarg)) ||
1452 pa_proplist_sets(proplist, PA_PROP_APPLICATION_NAME, t) < 0) {
1453
1454 pa_log(_("Invalid client name '%s'"), t ? t : optarg);
1455 pa_xfree(t);
1456 goto quit;
1457 }
1458
1459 pa_xfree(t);
1460 break;
1461 }
1462
1463 default:
1464 goto quit;
1465 }
1466 }
1467
1468 if (optind < argc) {
1469 if (pa_streq(argv[optind], "stat")) {
1470 action = STAT;
1471 short_list_format = FALSE;
1472 if (optind+1 < argc && pa_streq(argv[optind+1], "short"))
1473 short_list_format = TRUE;
1474
1475 } else if (pa_streq(argv[optind], "info"))
1476 action = INFO;
1477
1478 else if (pa_streq(argv[optind], "exit"))
1479 action = EXIT;
1480
1481 else if (pa_streq(argv[optind], "list")) {
1482 action = LIST;
1483
1484 for (int i = optind+1; i < argc; i++){
1485 if (pa_streq(argv[i], "modules") || pa_streq(argv[i], "clients") ||
1486 pa_streq(argv[i], "sinks") || pa_streq(argv[i], "sink-inputs") ||
1487 pa_streq(argv[i], "sources") || pa_streq(argv[i], "source-outputs") ||
1488 pa_streq(argv[i], "samples") || pa_streq(argv[i], "cards")) {
1489 list_type = pa_xstrdup(argv[i]);
1490 } else if (pa_streq(argv[i], "short")) {
1491 short_list_format = TRUE;
1492 } else {
1493 pa_log(_("Specify nothing, or one of: %s"), "modules, sinks, sources, sink-inputs, source-outputs, clients, samples, cards");
1494 goto quit;
1495 }
1496 }
1497
1498 } else if (pa_streq(argv[optind], "upload-sample")) {
1499 struct SF_INFO sfi;
1500 action = UPLOAD_SAMPLE;
1501
1502 if (optind+1 >= argc) {
1503 pa_log(_("Please specify a sample file to load"));
1504 goto quit;
1505 }
1506
1507 if (optind+2 < argc)
1508 sample_name = pa_xstrdup(argv[optind+2]);
1509 else {
1510 char *f = pa_path_get_filename(argv[optind+1]);
1511 sample_name = pa_xstrndup(f, strcspn(f, "."));
1512 }
1513
1514 pa_zero(sfi);
1515 if (!(sndfile = sf_open(argv[optind+1], SFM_READ, &sfi))) {
1516 pa_log(_("Failed to open sound file."));
1517 goto quit;
1518 }
1519
1520 if (pa_sndfile_read_sample_spec(sndfile, &sample_spec) < 0) {
1521 pa_log(_("Failed to determine sample specification from file."));
1522 goto quit;
1523 }
1524 sample_spec.format = PA_SAMPLE_FLOAT32;
1525
1526 if (pa_sndfile_read_channel_map(sndfile, &channel_map) < 0) {
1527 if (sample_spec.channels > 2)
1528 pa_log(_("Warning: Failed to determine sample specification from file."));
1529 pa_channel_map_init_extend(&channel_map, sample_spec.channels, PA_CHANNEL_MAP_DEFAULT);
1530 }
1531
1532 pa_assert(pa_channel_map_compatible(&channel_map, &sample_spec));
1533 sample_length = (size_t) sfi.frames*pa_frame_size(&sample_spec);
1534
1535 } else if (pa_streq(argv[optind], "play-sample")) {
1536 action = PLAY_SAMPLE;
1537 if (argc != optind+2 && argc != optind+3) {
1538 pa_log(_("You have to specify a sample name to play"));
1539 goto quit;
1540 }
1541
1542 sample_name = pa_xstrdup(argv[optind+1]);
1543
1544 if (optind+2 < argc)
1545 sink_name = pa_xstrdup(argv[optind+2]);
1546
1547 } else if (pa_streq(argv[optind], "remove-sample")) {
1548 action = REMOVE_SAMPLE;
1549 if (argc != optind+2) {
1550 pa_log(_("You have to specify a sample name to remove"));
1551 goto quit;
1552 }
1553
1554 sample_name = pa_xstrdup(argv[optind+1]);
1555
1556 } else if (pa_streq(argv[optind], "move-sink-input")) {
1557 action = MOVE_SINK_INPUT;
1558 if (argc != optind+3) {
1559 pa_log(_("You have to specify a sink input index and a sink"));
1560 goto quit;
1561 }
1562
1563 sink_input_idx = (uint32_t) atoi(argv[optind+1]);
1564 sink_name = pa_xstrdup(argv[optind+2]);
1565
1566 } else if (pa_streq(argv[optind], "move-source-output")) {
1567 action = MOVE_SOURCE_OUTPUT;
1568 if (argc != optind+3) {
1569 pa_log(_("You have to specify a source output index and a source"));
1570 goto quit;
1571 }
1572
1573 source_output_idx = (uint32_t) atoi(argv[optind+1]);
1574 source_name = pa_xstrdup(argv[optind+2]);
1575
1576 } else if (pa_streq(argv[optind], "load-module")) {
1577 int i;
1578 size_t n = 0;
1579 char *p;
1580
1581 action = LOAD_MODULE;
1582
1583 if (argc <= optind+1) {
1584 pa_log(_("You have to specify a module name and arguments."));
1585 goto quit;
1586 }
1587
1588 module_name = argv[optind+1];
1589
1590 for (i = optind+2; i < argc; i++)
1591 n += strlen(argv[i])+1;
1592
1593 if (n > 0) {
1594 p = module_args = pa_xmalloc(n);
1595
1596 for (i = optind+2; i < argc; i++)
1597 p += sprintf(p, "%s%s", p == module_args ? "" : " ", argv[i]);
1598 }
1599
1600 } else if (pa_streq(argv[optind], "unload-module")) {
1601 action = UNLOAD_MODULE;
1602
1603 if (argc != optind+2) {
1604 pa_log(_("You have to specify a module index or name"));
1605 goto quit;
1606 }
1607
1608 if (pa_atou(argv[optind + 1], &module_index) < 0)
1609 module_name = argv[optind + 1];
1610
1611 } else if (pa_streq(argv[optind], "suspend-sink")) {
1612 action = SUSPEND_SINK;
1613
1614 if (argc > optind+3 || optind+1 >= argc) {
1615 pa_log(_("You may not specify more than one sink. You have to specify a boolean value."));
1616 goto quit;
1617 }
1618
1619 suspend = pa_parse_boolean(argv[argc-1]);
1620
1621 if (argc > optind+2)
1622 sink_name = pa_xstrdup(argv[optind+1]);
1623
1624 } else if (pa_streq(argv[optind], "suspend-source")) {
1625 action = SUSPEND_SOURCE;
1626
1627 if (argc > optind+3 || optind+1 >= argc) {
1628 pa_log(_("You may not specify more than one source. You have to specify a boolean value."));
1629 goto quit;
1630 }
1631
1632 suspend = pa_parse_boolean(argv[argc-1]);
1633
1634 if (argc > optind+2)
1635 source_name = pa_xstrdup(argv[optind+1]);
1636 } else if (pa_streq(argv[optind], "set-card-profile")) {
1637 action = SET_CARD_PROFILE;
1638
1639 if (argc != optind+3) {
1640 pa_log(_("You have to specify a card name/index and a profile name"));
1641 goto quit;
1642 }
1643
1644 card_name = pa_xstrdup(argv[optind+1]);
1645 profile_name = pa_xstrdup(argv[optind+2]);
1646
1647 } else if (pa_streq(argv[optind], "set-sink-port")) {
1648 action = SET_SINK_PORT;
1649
1650 if (argc != optind+3) {
1651 pa_log(_("You have to specify a sink name/index and a port name"));
1652 goto quit;
1653 }
1654
1655 sink_name = pa_xstrdup(argv[optind+1]);
1656 port_name = pa_xstrdup(argv[optind+2]);
1657
1658 } else if (pa_streq(argv[optind], "set-source-port")) {
1659 action = SET_SOURCE_PORT;
1660
1661 if (argc != optind+3) {
1662 pa_log(_("You have to specify a source name/index and a port name"));
1663 goto quit;
1664 }
1665
1666 source_name = pa_xstrdup(argv[optind+1]);
1667 port_name = pa_xstrdup(argv[optind+2]);
1668
1669 } else if (pa_streq(argv[optind], "set-sink-volume")) {
1670 action = SET_SINK_VOLUME;
1671
1672 if (argc != optind+3) {
1673 pa_log(_("You have to specify a sink name/index and a volume"));
1674 goto quit;
1675 }
1676
1677 sink_name = pa_xstrdup(argv[optind+1]);
1678
1679 if (parse_volume(argv[optind+2], &volume, &volume_flags) < 0)
1680 goto quit;
1681
1682 } else if (pa_streq(argv[optind], "set-source-volume")) {
1683 action = SET_SOURCE_VOLUME;
1684
1685 if (argc != optind+3) {
1686 pa_log(_("You have to specify a source name/index and a volume"));
1687 goto quit;
1688 }
1689
1690 source_name = pa_xstrdup(argv[optind+1]);
1691
1692 if (parse_volume(argv[optind+2], &volume, &volume_flags) < 0)
1693 goto quit;
1694
1695 } else if (pa_streq(argv[optind], "set-sink-input-volume")) {
1696 action = SET_SINK_INPUT_VOLUME;
1697
1698 if (argc != optind+3) {
1699 pa_log(_("You have to specify a sink input index and a volume"));
1700 goto quit;
1701 }
1702
1703 if (pa_atou(argv[optind+1], &sink_input_idx) < 0) {
1704 pa_log(_("Invalid sink input index"));
1705 goto quit;
1706 }
1707
1708 if (parse_volume(argv[optind+2], &volume, &volume_flags) < 0)
1709 goto quit;
1710
1711 } else if (pa_streq(argv[optind], "set-source-output-volume")) {
1712 action = SET_SOURCE_OUTPUT_VOLUME;
1713
1714 if (argc != optind+3) {
1715 pa_log(_("You have to specify a source output index and a volume"));
1716 goto quit;
1717 }
1718
1719 if (pa_atou(argv[optind+1], &source_output_idx) < 0) {
1720 pa_log(_("Invalid source output index"));
1721 goto quit;
1722 }
1723
1724 if (parse_volume(argv[optind+2], &volume, &volume_flags) < 0)
1725 goto quit;
1726
1727 } else if (pa_streq(argv[optind], "set-sink-mute")) {
1728 int b;
1729 action = SET_SINK_MUTE;
1730
1731 if (argc != optind+3) {
1732 pa_log(_("You have to specify a sink name/index and a mute boolean"));
1733 goto quit;
1734 }
1735
1736 if ((b = pa_parse_boolean(argv[optind+2])) < 0) {
1737 pa_log(_("Invalid mute specification"));
1738 goto quit;
1739 }
1740
1741 sink_name = pa_xstrdup(argv[optind+1]);
1742 mute = b;
1743
1744 } else if (pa_streq(argv[optind], "set-source-mute")) {
1745 int b;
1746 action = SET_SOURCE_MUTE;
1747
1748 if (argc != optind+3) {
1749 pa_log(_("You have to specify a source name/index and a mute boolean"));
1750 goto quit;
1751 }
1752
1753 if ((b = pa_parse_boolean(argv[optind+2])) < 0) {
1754 pa_log(_("Invalid mute specification"));
1755 goto quit;
1756 }
1757
1758 source_name = pa_xstrdup(argv[optind+1]);
1759 mute = b;
1760
1761 } else if (pa_streq(argv[optind], "set-sink-input-mute")) {
1762 int b;
1763 action = SET_SINK_INPUT_MUTE;
1764
1765 if (argc != optind+3) {
1766 pa_log(_("You have to specify a sink input index and a mute boolean"));
1767 goto quit;
1768 }
1769
1770 if (pa_atou(argv[optind+1], &sink_input_idx) < 0) {
1771 pa_log(_("Invalid sink input index specification"));
1772 goto quit;
1773 }
1774
1775 if ((b = pa_parse_boolean(argv[optind+2])) < 0) {
1776 pa_log(_("Invalid mute specification"));
1777 goto quit;
1778 }
1779
1780 mute = b;
1781
1782 } else if (pa_streq(argv[optind], "set-source-output-mute")) {
1783 int b;
1784 action = SET_SOURCE_OUTPUT_MUTE;
1785
1786 if (argc != optind+3) {
1787 pa_log(_("You have to specify a source output index and a mute boolean"));
1788 goto quit;
1789 }
1790
1791 if (pa_atou(argv[optind+1], &source_output_idx) < 0) {
1792 pa_log(_("Invalid source output index specification"));
1793 goto quit;
1794 }
1795
1796 if ((b = pa_parse_boolean(argv[optind+2])) < 0) {
1797 pa_log(_("Invalid mute specification"));
1798 goto quit;
1799 }
1800
1801 mute = b;
1802
1803 } else if (pa_streq(argv[optind], "subscribe"))
1804
1805 action = SUBSCRIBE;
1806
1807 else if (pa_streq(argv[optind], "set-sink-formats")) {
1808 int32_t tmp;
1809
1810 if (argc != optind+3 || pa_atoi(argv[optind+1], &tmp) < 0) {
1811 pa_log(_("You have to specify a sink index and a semicolon-separated list of supported formats"));
1812 goto quit;
1813 }
1814
1815 sink_idx = tmp;
1816 action = SET_SINK_FORMATS;
1817 formats = pa_xstrdup(argv[optind+2]);
1818
1819 } else if (pa_streq(argv[optind], "help")) {
1820 help(bn);
1821 ret = 0;
1822 goto quit;
1823 }
1824 }
1825
1826 if (action == NONE) {
1827 pa_log(_("No valid command specified."));
1828 goto quit;
1829 }
1830
1831 if (!(m = pa_mainloop_new())) {
1832 pa_log(_("pa_mainloop_new() failed."));
1833 goto quit;
1834 }
1835
1836 mainloop_api = pa_mainloop_get_api(m);
1837
1838 pa_assert_se(pa_signal_init(mainloop_api) == 0);
1839 pa_signal_new(SIGINT, exit_signal_callback, NULL);
1840 pa_signal_new(SIGTERM, exit_signal_callback, NULL);
1841 pa_disable_sigpipe();
1842
1843 if (!(context = pa_context_new_with_proplist(mainloop_api, NULL, proplist))) {
1844 pa_log(_("pa_context_new() failed."));
1845 goto quit;
1846 }
1847
1848 pa_context_set_state_callback(context, context_state_callback, NULL);
1849 if (pa_context_connect(context, server, 0, NULL) < 0) {
1850 pa_log(_("pa_context_connect() failed: %s"), pa_strerror(pa_context_errno(context)));
1851 goto quit;
1852 }
1853
1854 if (pa_mainloop_run(m, &ret) < 0) {
1855 pa_log(_("pa_mainloop_run() failed."));
1856 goto quit;
1857 }
1858
1859 quit:
1860 if (sample_stream)
1861 pa_stream_unref(sample_stream);
1862
1863 if (context)
1864 pa_context_unref(context);
1865
1866 if (m) {
1867 pa_signal_done();
1868 pa_mainloop_free(m);
1869 }
1870
1871 pa_xfree(server);
1872 pa_xfree(list_type);
1873 pa_xfree(sample_name);
1874 pa_xfree(sink_name);
1875 pa_xfree(source_name);
1876 pa_xfree(module_args);
1877 pa_xfree(card_name);
1878 pa_xfree(profile_name);
1879 pa_xfree(port_name);
1880 pa_xfree(formats);
1881
1882 if (sndfile)
1883 sf_close(sndfile);
1884
1885 if (proplist)
1886 pa_proplist_free(proplist);
1887
1888 return ret;
1889 }