blob: bfa7c00bf001f68ecb52d9b29526cc787806da82 (
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
|
#!/usr/bin/env sh
set -euC
help_text=
help_text="$help_text run_tests\t[arg]\tpasses arg to the 'prove' tool\n"
run_tests () {
eval "prove -l ${1-} t/"
}
help_text="$help_text start_dev\t[]\tstarts a hot reloading dev server\n"
start_dev () {
morbo script/jwebmail
}
help_text="$help_text logrotate\t[mode]\tarives the current log file\n"
logrotate () {
mode=${1:-development}
mv -i "log/$mode.log" "log/${mode}_$(date --iso-8601=minutes).log"
}
help_text="$help_text linelength\t[files]\tchecks documentation files for overly long lines\n"
linelength () {
files=${1:-'README.md CHANGES.md LICENSE'}
for file in $files
do
fold -s -w 85 "$file" | diff "$file" -
done
}
help_text="$help_text follow\t[mode]\tfollows the current log file\n"
follow () {
mode=${1:-development}
tail -f "log/$mode.log"
}
help_text="$help_text check_manifest\t[]\tchecks if files in the MANIFEST actually exist\n"
check_manifest () {
perl -nE 'chomp; say unless -e' MANIFEST
}
help () {
echo "The following actions are available:"
echo
help_text="$(printf "$help_text")" # expand escapes in string
IFS='
' # newline char
for var in $help_text
do
IFS="$(printf '\t')"
printf "%-17s %-8s %s\n" $var # expand var
done
echo
}
if [ $# -gt 0 ]
then cmd=$1; shift
else cmd=help
fi
if [ "$(command -v "$cmd")" = "$cmd" ]
then eval "$cmd" "$@"
else echo "unkown commad '$cmd'"; exit 1
fi
|
