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
67
68
69
70
71
72
73
74
75
76
77
78
|
#compdef fish
local MATCH MBEGIN MEND ret=1
local -a args context line state state_descr
local -A opt_args
args=(
# unlike most shells, fish's -c is a normal option-with-optarg which can be
# interleaved with other options and can even be given multiple times.
# obviously we can't complete command strings reliably here but we'll try
'(1)*'{-c+,--command=}'[execute specified command string]: :_cmdstring'
'*'{-C+,--init-command=}'[execute specified command before other input]: :_cmdstring'
'(-d --debug)'{-d+,--debug=}'[enable debug output for specified categories]: :->debug'
'(-o --debug-output)'{-o+,--debug-output=}'[specify debug output file]:debug output file:_files'
'(-f --features)'{-f+,--features=}'[enable specified feature flags]: :->feature'
'(-i --interactive)'{-i,--interactive}'[act as interactive shell]'
'(-l --login)'{-l,--login}'[act as login shell]'
'(-N --no-config)'{-N,--no-config}'[do not read configuration files]'
'(-n --no-execute)'{-n,--no-execute}'[check syntax only (do not execute commands)]'
'(-p --profile)'{-p+,--profile=}'[specify profile output file]:profile output file:_files'
'--profile-startup=[specify start-up profile output file]:profile output file:_files'
'(-P --private)'{-P,--private}'[enable private mode (no history)]'
'--print-rusage-self[output getrusage() stats on exit]'
'(- : *)--print-debug-categories[display debug categories]'
'(- : *)'{-v,--version}'[display version information]'
'(- : *)'{-h,--help}'[display usage information]'
'(-)1:script file:_files'
'(-)*:argument:_files'
)
_arguments -s -S -A '-*' : $args && ret=0
case $state in
debug)
local -a tmp=( ${(f)"$(
_call_program debug-categories $words[1] --print-debug-categories
)"} )
tmp=( ${${tmp/[[:space:]]##/\[}/%/\]} )
tmp=( ${tmp/(#m)\[[A-Z][^A-Z]/${(L)MATCH}} )
tmp=( ${tmp/.\]/\]} )
_values -s, 'debug category' $tmp && ret=0
;;
feature)
local name def ver desc
local -a flags_on flags_off versions flags tmp
while IFS=$'\t ' read -r name def ver desc; do
desc=${${desc/#(#m)[A-Z][^A-Z]/${(L)MATCH}}//(#m)[]\\]/\\$MATCH}
if [[ $def == on ]]; then
flags_on+=( $name"[$desc ($ver, defaults on)]" )
else
flags_off+=( $name"[$desc ($ver, defaults off)]" )
fi
versions+=( $ver"[all features introduced in fish $ver]" )
done < <(
_call_program feature-flags $words[1] -NPc '"status features"'
)
# if an individual flag is already on, show the no- variant, and vice versa
flags+=( no-$^flags_on $flags_off )
# always show both for these 'groups'
flags+=( {no-,}all'[all features]' {no-,}${(u)versions} )
# only show redundant variants of individual flags when necessary
tmp=( no-$^flags_off )
[[ ${PREFIX##*,} == n* ]] || tmp=( '!'$^tmp )
flags+=( $tmp )
tmp=( ${(M)flags_on:#${${PREFIX##*,}[1]:----}*} )
(( $#tmp )) || tmp=( '!'$^flags_on )
flags+=( $tmp )
_values -s, 'feature flag' $flags && ret=0
;;
esac
return ret
|
