apheleia/scripts/check-line-length.bash

#!/usr/bin/env bash

set -e
set -o pipefail

find=(
    find .
    -name .git -prune -o
    -name .log -prune -o
    -path ./test/formatters -prune -o
    -name "*.elc" -o
    -type f -print
)

readarray -t files < <("${find[@]}" | sed 's#./##' | sort)

code="$(cat <<"EOF"

(length($0) >= 80 && $0 !~ /https?:\/\//) \
{ printf "%s:%d: %s\n", FILENAME, NR, $0 }

EOF
)"

for file in "${files[@]}"; do
    echo "[longlines] $file" >&2
    awk "$code" "$file"
done | (! grep .)