blob: 9cc8e55ab00f50789478962b8b8946a6c72bb484 (
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
83
84
85
86
|
#!/bin/sh
set -eu
usage() {
cat <<-'EOF'
Usage:
80 [FILENAME...]
80 -h
EOF
}
help() {
cat <<-'EOF'
Options:
-h, --help show this message
FILENAME the name of the file to work on (default:
the list of file in the VCS repository)
List the lines in the files that contain more than 80 columns.
Examples:
Check for all the files in the current repository:
$ 80
Detect on the given two files:
$ 80 f1 f2
EOF
}
for flag in "$@"; do
case "$flag" in
(--)
break
;;
(--help)
usage
help
exit
;;
(*)
;;
esac
done
while getopts 'h' flag; do
case "$flag" in
(h)
usage
help
exit
;;
(*)
usage >&2
exit 2
;;
esac
done
shift $((OPTIND - 1))
len() {
awk -vNAME="$1" '
length > 80 {
printf "%s:%s:%s\n", NAME, FNR, $0
}
'
}
if [ $# = 0 ]; then
vcs ls | while read -r f; do
expand "$f" | len "$f"
done
else
for f in "$@"; do
expand "$f" | len "$f"
done
fi
|
