blob: e8abcb7d1d9d4fc356ca155d0d38e6d72ed8c708 (
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
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
#compdef jot
local curcontext="$curcontext" state state_descr line ret=1
local -A opt_args
_arguments -s -C : \
'(-b)-r[generate random data instead of the default sequential data]' \
'(-c -p -r -w)-b+[just print the specified word repeatedly]:word:' \
'(-b -c -p)-w+[specify output format as in printf]:output format:->format' \
'(-b -p -w)-c[same as -w %c]' \
'-s+[separate the data by the specified string instead of newline]:string:' \
'-n[do not print the final newline]' \
'(-b -c -w)-p+[specify number of digits after decimal point]:precision:' \
'(-)1: :_guard "^-*" "number of data"' \
'2::lower bound:' \
'3::upper bound:' \
'4:: :->lastarg' && ret=0
case $state in
(format)
local -a flags digits conversions
flags=(
'#:alternative form'
' :leave a blank before a positive number'
'+:always place a sign before a number'
'-:left adjust'
)
digits=(0 1 2 3 4 5 6 7 8 9 .)
conversions=(
{d,i}':signed decimal'
'o:unsigned octal'
'u:unsigned decimal'
{x,X}':unsigned hexadecimal'
'l'{d,i}':long signed decimal'
'lo:long unsigned octal'
'lu:long unsigned decimal'
'l'{x,X}':long unsigned hexadecimal'
'f:double number'
{e,E}':double number in scientific notation'
{g,G}':use %f or %e, whichever is more appropriate'
'c:character'
)
compset -P '([^%]#%%)#'
if compset -P '[^%]#%'; then
# flags: (|\#)(| )(|+|-)
compset -P '(\#|\\\#)' && flags=( ${(@)flags:#\#*} )
compset -P '( |\\ )' && flags=( ${(@)flags:#(\#| )*} )
compset -P '(+|-)' || compset -P '[0-9]##' && flags=()
# width.precision: [0-9]#(|.[0-9]#)
if compset -P '.'; then
flags=()
digits=( ${(@)digits:#.} )
fi
compset -P '[0-9]#'
# conversion specifier: ((|l)[diouxX]|[feEgGc])
if compset -P '((|l)[diouxX]|[feEgGc])'; then
_message -e format-rest 'rest of the format' && ret=0
else
local opts=( -S '' )
_alternative -O opts 'flags:flag:(( $flags ))' \
"width-precision:width.precision:($digits)" \
'conversion-specifiers:conversion specifier:(( $conversions ))' \
&& ret=0
fi
else
local expl
compset -P '*'
_wanted start-specification expl 'start specification' \
compadd -S '' % && ret=0
fi
;;
(lastarg)
if (( $+opt_args[-r] )); then
_message -e seeds 'random number seed' && ret=0
else
_message -e steps 'step size' && ret=0
fi
;;
esac
return ret
|
