blob: ad9232af964038b783a44022b8e1659c4be76020 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
#compdef socket
# Parameter used:
#
# socket_hosts_ports
# The array that contains paris `host:port'.
local context state line expl
typeset -A opt_args
if _tags any options &&
[[ $CURRENT -eq 2 && (
-z "$compconfig[option_prefix]" ||
"$compconfig[option_prefix]" = *\!${words[1]}* ||
"$PREFIX" = -* ) ]]; then
_description expl option
compadd -M 'r:|[_-]=* r:|=*' "$expl[@]" - -version
fi
_arguments -s \
'-b[background]' \
'-c[crlf]' \
'-f[fork]' \
'-q[quit]' \
'-r[read only]' \
'-v[verbose]' \
'-w[write only]' \
'-s[server]' \
'-l[loop]' \
'-p[program]:command:->command' \
':arg1:->arg1' \
':arg2:->arg2'
case "$state" in
command)
compset -q
if [[ $CURRENT -eq 1 ]]; then
_command_names -e "$@"
else
_normal
fi
;;
arg1)
if (( $+opt_args[-s] )); then
_tags "$context" ports || return 1
_description expl 'port to listen'
_ports "$expl[@]"
else
_tags "$context" hosts || return 1
_description expl 'host'
_combination socket_hosts_ports hosts "$expl[@]"
fi
;;
arg2)
if (( ! $+opt_args[-s] )); then
_tags "$context" ports || return 1
_description expl 'port to connect'
_combination socket_hosts_ports hosts="${line[2]:q}" ports "$expl[@]"
fi
;;
esac
|
