blob: e4b2ec2d834ce99777cfe0249c68ab020f3e19d4 (
plain)
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
79
80
81
82
83
84
85
86
87
|
Description: New _debsnap completion
Origin: upstream
Bug-Debian: https://bugs.debian.org/960298
Forwarded: not-needed
Applied-Upstream: workers/45731
Last-Update: 2020-06-23
--- /dev/null
+++ b/Completion/Debian/Command/_debsnap
@@ -0,0 +1,77 @@
+#compdef debsnap
+
+# Based on debsnap from devscripts-2.20.3
+
+local context state state_descr line ret=1
+local -a expl
+typeset -A opt_args
+
+_arguments \
+ '(-d --destdir)'{-d+,--destdir=}'[set download directory]:download directory:_files -/' \
+ '(-f --force)'{-f,--force}'[allow non-empty destination directory]' \
+ '(-v --verbose)'{-v,--verbose}'[print configuration and report progress]' \
+ --list"[list versions; don't download]" \
+ --binary'[operate on binary packages (default: source packages)]' \
+ '*'{-a+,--architecture=}'[specify architectures to download]:architecture to download:_deb_architectures' \
+ --first='[download all versions newer than this]:version number (lower bound):->versions' \
+ --last='[download all versions older than this]:version number (upper bound):->versions' \
+ '(-)'{-h,--help}'[show usage information]' \
+ '(-)'--version'[show version number and license]' \
+ '1: :->package' \
+ '2:version number to download:->versions' \
+ && ret=0
+
+# -a implies --binary
+if (( ${+opt_args[-a]} || ${+opt_args[--architecture]} )); then
+ opt_args[--binary]=''
+fi
+
+case $state in
+ (package)
+ if (( ${+opt_args[--binary]} )); then
+ _description binary-packages expl 'binary package to download'
+ _deb_packages "${expl[@]}" avail && ret=0
+ else
+ _description source-packages expl 'source package to download'
+ _deb_packages "${expl[@]}" source && ret=0
+ fi
+ ;;
+ (versions)
+ local package=${(Q)line[1]}
+ if [[ -n $package ]]; then
+ # Compute the arguments to --list
+ local -a args
+ () {
+ local i j
+
+ # repeatable flags with arguments, where the values can't contain colons
+ for i in ${(k)opt_args[(I)(-a|--architecture)]}; do
+ for j in ${(@s.:.)opt_args[$i]}; do
+ [[ -n $j ]] || continue
+ args+=( $i $j )
+ done
+ done
+
+ # non-repeatable flags with arguments, where the values may contain colons
+ for i in ${(k)opt_args[(I)(--first|--last)]}; do
+ # Avoid spurious "No matches" results in 'debsnap --first 42.1 --last 42.<TAB>'.
+ [[ $context != option${i}-* ]] || continue
+
+ # Un-escape colons (epoch separators in the version number)
+ args+=( $i ${(Q)opt_args[$i]} )
+ done
+
+ # flags without arguments
+ args+=( ${(k)opt_args[(I)(--binary)]} )
+ }
+
+ local -a versions=( ${(Oaf)"$(_call_program versions debsnap --list ${args} -- ${line[1]})"} )
+ _description -V versions expl ${state_descr}
+ compadd "$@" "${expl[@]}" -a versions && ret=0
+ else
+ _message -- $state_descr && ret=0
+ fi
+ ;;
+esac
+
+return ret
|
