_devices() {
local -a _device_list
- local cmd _device _device_description
+ local cmd _device _device_description _remote_cmd
if [[ $service == pactl || $service == pacmd ]]; then
case $words[$((CURRENT - 1))] in
esac
elif [[ $service == (pacat|paplay|parecord) ]]; then
- if [[ $words == *-r[[:space:]]* ]]; then
- cmd=('sources')
- elif [[ $words == *-p[[:space:]]* ]]; then
- cmd=('sinks')
- else
- cmd=('sinks' 'sources')
- fi
+ case $words[$((CURRENT))] in
+ --device=*)
+ if [[ $words == *(--playback|-p)[[:space:]]* ||
+ $service == paplay ]]; then
+ cmd=('sinks')
+ elif [[ $words == *(--record|-r)[[:space:]]* ||
+ $service == parecord ]]; then
+ cmd=('sources')
+ else
+ cmd=('sinks' 'sources')
+ fi
+ ;;
+ --monitor-stream=*) cmd=('sink-inputs');;
+ esac
+
+ case $words[$((CURRENT - 1))] in
+ -d)
+ if [[ $words == *(--playback|-p)[[:space:]]* ||
+ $service == paplay ]]; then
+ cmd=('sinks')
+ elif [[ $words == *(--record|-r)[[:space:]]* ||
+ $service == parecord ]]; then
+ cmd=('sources')
+ else
+ cmd=('sinks' 'sources')
+ fi
+ ;;
+ esac
- elif [[ $service == paplay ]]; then
- cmd=('sinks')
- elif [[ $service == parecord ]]; then
- cmd=('sources')
fi
+ for (( i = 0; i < ${#words[@]}; i++ )) do
+ if [[ ${words[$i]} == -s ]]; then
+ _remote_cmd="-s ${words[$i+1]}"
+ break;
+ fi
+ done
+
for target in $cmd; do
- for device_info in ${(ps:\n\n:)"$(_call_program card_tag "pactl list $target")"}; do
+ for device_info in ${(ps:\n\n:)"$(_call_program device_tag "pactl $_remote_cmd list $target 2> /dev/null")"}; do
for line in ${(f)device_info}; do
if [[ $target == (sink-inputs|source-outputs) ]]; then
if [[ $line == (Sink*Input|Source*Output)* ]]; then
_profiles() {
local -a _profile_list
- local _current_card _raw_profiles _profile_name _profile_description
+ local _current_card _raw_profiles _profile_name _profile_description _remote_cmd
_current_card=$words[$((CURRENT - 1))]
- for card in ${(ps:\n\n:)"$(_call_program card_tag "pactl list cards")"}; do
+ for (( i = 0; i < ${#words[@]}; i++ )) do
+ if [[ ${words[$i]} == -s ]]; then
+ _remote_cmd="-s ${words[$i+1]}"
+ break;
+ fi
+ done
+
+ for card in ${(ps:\n\n:)"$(_call_program profiles_tag "pactl $_remote_cmd list cards 2> /dev/null")"}; do
if [[ $card == *$_current_card* ]]; then
_raw_profiles=${card##*Profiles:}
_raw_profiles=${_raw_profiles%%Active Profile:*}
_ports() {
local -a _port_list
- local _raw_ports _port_name _port_description _current_device
+ local _raw_ports _port_name _port_description _current_device _remote_cmd
case $words[$((CURRENT - 2))] in
set-sink-port) cmd="sinks";;
_current_device=$words[$((CURRENT - 1))]
- for device in ${(ps:\n\n:)"$(_call_program card_tag "pactl list $cmd")"}; do
+ for (( i = 0; i < ${#words[@]}; i++ )) do
+ if [[ ${words[$i]} == -s ]]; then
+ _remote_cmd="-s ${words[$i+1]}"
+ break;
+ fi
+ done
+
+ for device in ${(ps:\n\n:)"$(_call_program port_tag "pactl $_remote_cmd list $cmd 2> /dev/null")"}; do
if [[ $device == *Ports:* && $device == *$_current_device* ]]; then
_raw_ports=${device##*Ports:}
_raw_ports=${_raw_ports%%Active Port:*}
_cards(){
local -a _card_list
- local _card _cad_name
- for card_info in ${(ps:\n\n:)"$(_call_program card_tag "pactl list cards")"}; do
+ local _card _cad_name _remote_cmd
+
+ for (( i = 0; i < ${#words[@]}; i++ )) do
+ if [[ ${words[$i]} == -s ]]; then
+ _remote_cmd="-s ${words[$i+1]}"
+ break;
+ fi
+ done
+
+ for card_info in ${(ps:\n\n:)"$(_call_program card_tag "pactl $_remote_cmd list cards 2> /dev/null")"}; do
for line in ${(f)card_info}; do
if [[ $line == *Name:* ]]; then
_card=${line#*: }
_all_modules(){
local -a _all_modules_list
- for module in ${(f)"$(_call_program modules_tag "pulseaudio --dump-modules")"}; do
+ for module in ${(f)"$(_call_program modules_tag "pulseaudio --dump-modules 2> /dev/null")"}; do
_all_modules_list+=${module%% *}
done
_describe 'module list' _all_modules_list
}
_loaded_modules(){
- local -a _loaded_modules_list
- for module in ${(f)"$(_call_program modules_tag "pactl list modules short")"}; do
+ local -a _loaded_modules_list _remote_cmd
+
+ for (( i = 0; i < ${#words[@]}; i++ )) do
+ if [[ ${words[$i]} == -s ]]; then
+ _remote_cmd="-s ${words[$i+1]}"
+ break;
+ fi
+ done
+
+ for module in ${(f)"$(_call_program modules_tag "pactl $_remote_cmd list modules short 2> /dev/null")"}; do
_loaded_modules_list+=(${${(ps:\t:)module}[1]}:${${(ps:\t:)module}[2]})
done
_describe 'module list' _loaded_modules_list
_resample_methods() {
local -a _resample_method_list
- for method in ${(f)"$(_call_program modules_tag "pulseaudio --dump-resample-methods")"}; do
+ for method in ${(f)"$(_call_program modules_tag "pulseaudio --dump-resample-methods 2> /dev/null")"}; do
_resample_method_list+=$method
done
_describe 'resample method list' _resample_method_list
_clients() {
local -a _client_list
- local _client _client_description
- for client_info in ${(ps:\n\n:)"$(_call_program card_tag "pactl list clients")"}; do
+ local _client _client_description _remote_cmd
+
+ for (( i = 0; i < ${#words[@]}; i++ )) do
+ if [[ ${words[$i]} == -s ]]; then
+ _remote_cmd="-s ${words[$i+1]}"
+ break;
+ fi
+ done
+
+ for client_info in ${(ps:\n\n:)"$(_call_program clients_tag "pactl $_remote_cmd list clients 2> /dev/null")"}; do
for line in ${(f)client_info}; do
if [[ $line == Client[[:space:]]#* ]]; then
_client=${line#*\#}
_pacat_file_formats() {
local -a _file_format_list
- for format in ${(f)"$(_call_program modules_tag "pacat --list-file-formats")"}; do
+ for format in ${(f)"$(_call_program fformats_tag "pacat --list-file-formats")"}; do
_file_format_list+=(${${(ps:\t:)format}[1]}:${${(ps:\t:)format}[2]})
done
_describe 'file format list' _file_format_list
'suspend-sink: suspend or resume a sink'
'suspend-source: suspend or resume a source'
'set-card-profile: set a card profile:cards:_cards'
+ 'set-sink-default: set the default sink'
+ 'set-source-default: set the default source'
'set-sink-port: set the sink port of a sink'
'set-source-port: set the source port of a source'
'set-port-latency-offset: set a latency offset on a port'
set-card-profile) _profiles;;
set-(sink|source)-port) _ports;;
set-port-latency-offset) _ports;;
- set-*-mute) compadd true false;;
+ set-*-mute) compadd true false toggle;;
suspend-*) compadd true false;;
list) compadd short;;
move-*) _devices;;
_pacmd_commands=(
'help: show help and exit'
'list-modules: list modules'
+ 'list-cards: list cards'
'list-sinks: list sinks'
'list-sources: list sources'
'list-clients: list clients'
{-p,--playback}'[create a connection for playback]' \
{-s,--server=}'[name of server to connect to]:host:_hosts' \
{-d,--device=}'[name of sink/source to connect to]:device:_devices' \
+ '--monitor-stream=[index of the sink input to record from]:device:_devices' \
{-n,--client-name=}'[client name to use]:name' \
'--stream-name=[how to call this stream]:name' \
'--volume=[initial volume to use]:volume' \
'--property=[set the specified property]:property' \
'--raw[record/play raw PCM data]' \
'--passthrough[passtrough data]' \
- '--file-format[record/play formatted PCM data]:format:_pacat_file_formats' \
+ '--file-format=[record/play formatted PCM data]:format:_pacat_file_formats' \
'--list-file-formats[list available formats]' \
+ '::files:_files' \
}
# TODO log-target file completion