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
|
# (C) 2010 magicant
# Completion script for the "head" command.
# Supports POSIX 2008, GNU coreutils 8.4, FreeBSD 8.1, OpenBSD 4.8, NetBSD 5.0,
# Mac OS X 10.6.4, SunOS 5.10, HP-UX 11i v3.
function completion/head {
case $("${WORDS[1]}" --version 2>/dev/null) in
(*'coreutils'*) typeset type=GNU ;;
(*) typeset type="$(uname 2>/dev/null)" ;;
esac
case $type in
(GNU) typeset long=true ;;
(*) typeset long= ;;
esac
typeset OPTIONS ARGOPT PREFIX
OPTIONS=( #>#
"n: ${long:+--lines:}; specify the number of lines to print"
) #<#
case $type in
(GNU|FreeBSD|NetBSD|Darwin)
OPTIONS=("$OPTIONS" #>#
"c: ${long:+--bytes:}; specify the number of bytes to print"
) #<#
case $type in (GNU|NetBSD)
OPTIONS=("$OPTIONS" #>#
"q ${long:+--quiet --silent}; never print filename headers"
"v ${long:+--verbose}; always print filename headers"
) #<#
case $type in (GNU)
OPTIONS=("$OPTIONS" #>#
"--help"
"--version"
) #<#
esac
esac
;;
(HP-UX)
OPTIONS=("$OPTIONS" #>#
"c; count text in bytes rather than lines"
) #<#
;;
esac
command -f completion//parseoptions ${long:+-es}
case $ARGOPT in
(-)
command -f completion//completeoptions
;;
([cn]|--bytes|--lines)
case $type in (GNU)
if command -vf completion//prefixdigits >/dev/null 2>&1 ||
. -AL completion/_blocksize; then
if command -f completion//prefixdigits; then
command -f completion//completesizesuffix b GNU
fi
fi
esac
;;
(*)
complete -f
;;
esac
}
# vim: set ft=sh ts=8 sts=8 sw=8 et:
|
