blob: 9ab6fb47286fb3a90b823a55b24f92a31d23cb84 (
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 '
length > 80 {
printf "%s:%s:%s\n", FILENAME, FNR, $0
}
' "$1"
}
if [ $# = 0 ]; then
vcs ls | while read -r f; do
len "$f"
done
else
for f in "$@"; do
len "$f"
done
fi
|
