File: check-source

package info (click to toggle)
zzuf 0.15-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,500 kB
  • sloc: ansic: 7,284; sh: 581; cpp: 352; makefile: 80
file content (45 lines) | stat: -rwxr-xr-x 1,239 bytes parent folder | download | duplicates (3)
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
#!/bin/sh
#
#  check-source - find tabs or trailing spaces in the source code
#
#  Copyright © 2002—2015 Sam Hocevar <sam@hocevar.net>
#
#  This program is free software. It comes without any warranty, to
#  the extent permitted by applicable law. You can redistribute it
#  and/or modify it under the terms of the Do What the Fuck You Want
#  to Public License, Version 2, as published by the WTFPL Task Force.
#  See http://www.wtfpl.net/ for more details.
#

nfails=0
nfiles=0
nlines=0
for dir in $(make -s echo-dirs -C ..); do
  if [ ! -d "../$dir" ]; then continue; fi
  for x in $(make -s echo-sources -C ../$dir); do
    case "$x" in
      *.c|*.cpp|*.h|*.m|*.php|*.cs|*.java|.py|.pl)
        nfiles=$(($nfiles + 1));
        nlines=$(($nlines + `grep -c . "../$dir/$x"`)) ;;
      *)
        continue ;;
    esac
    if grep '[[:space:]]$' "../$dir/$x" >/dev/null 2>&1; then
      echo "error: $dir/$x contains trailing spaces"
      nfails=$(($nfails + 1))
    fi
    if grep '	' "../$dir/$x" >/dev/null 2>&1; then
      echo "error: $dir/$x contains tabs"
      nfails=$(($nfails + 1))
    fi
  done
done

echo "$nfiles files, $nlines lines, $nfails errors in source code"

if test "$nfails" != "0"; then
  exit 1
fi

exit 0