Refactor the unit test run script to be more idiomatic shell

This commit is contained in:
Maxime Coste 2014-10-12 12:27:22 +01:00
parent 1bf5a1eee5
commit ff27b385d2

View File

@ -2,22 +2,28 @@
# Main ├──────────────────────────────────────────────────────────────────────── # Main ├────────────────────────────────────────────────────────────────────────
main() { number_tests=0 number_failures=0 main() {
dirs=$@ local number_tests=0
test=$(pwd) local number_failures=0
work=$(mktemp --directory) local dirs=$@
local test=$(pwd)
local work=$(mktemp --directory)
cp --recursive . $work cp --recursive . $work
trap "rm --recursive $work" EXIT trap "rm --recursive $work" EXIT
for dir in $(find $dirs -type d); do for dir in $(find $dirs -type d); do
cd $test/$dir; test_files=$(find * -name out -o -name selections -o -name state) cd $test/$dir;
cd $work/$dir; { IFS=¬ local test_files=$(find * -name out -o -name selections -o -name state)
indent=$(repeat ' ' $(pwd | sed "s|$test||" | tr --delete --complement / | awk '{ print length }')) cd $work/$dir;
name=$(basename $PWD) IFS=¬
! exists cmd && { local indent=$(repeat ' ' $(pwd | sed "s|$test||" | tr --delete --complement / | awk '{ print length }'))
local name=$(basename $PWD)
if ! exists cmd; then
echo "$indent$name" echo "$indent$name"
} || { nop=$((number_tests++)) else
((number_tests++))
touch in; cp in out touch in; cp in out
kak_commands="set global autoreload yes local kak_commands="
set global autoreload yes
try %{ try %{
source rc source rc
} }
@ -39,28 +45,32 @@ main() { number_tests=0 number_failures=0
kak out -n -e $kak_commands kak out -n -e $kak_commands
IFS=$'\n' IFS=$'\n'
for expect in $test_files; do for expect in $test_files; do
cmp --quiet $test/$dir/$expect $expect && { if cmp --quiet $test/$dir/$expect $expect; then
echo "$indent$name" | colorize green normal echo "$indent$name" | colorize green normal
} || { nop=$((number_failures++)) else
((number_failures++))
echo "$indent$name" | colorize red normal echo "$indent$name" | colorize red normal
echo echo
IFS=$'\n' IFS=$'\n'
for line in $(diff --unified $test/$dir/$expect $expect); do IFS=¬ for line in $(diff --unified $test/$dir/$expect $expect); do
first_character=$(head --bytes 1 <<< $line) IFS=¬
color=$(match $first_character + green - red @ magenta none) local first_character=$(echo "$line" | head --bytes 1)
colorize $color normal <<< $line local color=$(match $first_character + green - red @ magenta none)
echo "$line" | colorize $color normal
done done
echo echo
colorize yellow normal <<< "debug buffer:" echo "debug buffer:" | colorize yellow normal
cat debug cat debug
echo echo
} fi
done done
} fi
}
done done
(( $number_failures > 0 )) && color=red || if (( $number_failures > 0 )); then
color=red
else
color=green color=green
fi
echo echo
echo Resume: echo Resume:
echo $number_tests tests, $number_failures failures | colorize $color normal echo $number_tests tests, $number_failures failures | colorize $color normal
@ -69,22 +79,29 @@ main() { number_tests=0 number_failures=0
# Utility ├───────────────────────────────────────────────────────────────────── # Utility ├─────────────────────────────────────────────────────────────────────
match() { match() {
expression=$1; shift expression="$1";
while [[ $@ ]]; do shift
pattern=$1; shift; value=$1 next=$1 default_value=$pattern while [[ "$@" ]]; do
[[ $next ]] || { local pattern="$1"
shift
local value="$1"
local next="$1"
local default_value="$pattern"
if [[ -z "$next" ]]; then
echo $default_value echo $default_value
return 1 return 1
} fi
[[ $expression = $pattern ]] && { if [[ "$expression" = "$pattern" ]]; then
echo $value echo "$value"
return 0 return 0
} fi
shift shift
done done
} }
repeat() { text=$1 count=${2:-0} repeat() {
local text=$1
local count=${2:-0}
echo $(yes $text | head --lines $count | join) echo $(yes $text | head --lines $count | join)
} }
@ -96,20 +113,25 @@ exists() {
test -e $@ test -e $@
} }
get_ansi_code() { color_name=${1:-none} style_name=${2:-none} get_ansi_code() {
color='none 00 local color_name=${1:-none}
local style_name=${2:-none}
local color='none 00
red 31 red 31
green 32 green 32
yellow 33 yellow 33
magenta 35' magenta 35'
style='none 00 local style='none 00
bold 01' bold 01'
color_nr=$(awk "/$color_name/ { print \$2 }" <<< "$color") local color_nr=$(echo "$color" | awk "/$color_name/ { print \$2 }")
style_nr=$(awk "/$style_name/ { print \$2 }" <<< "$style") local style_nr=$(echo "$style" | awk "/$style_name/ { print \$2 }")
sed s/COLOR_NR/$color_nr/';'s/STYLE_NR/$style_nr/ <<< '\e[STYLE_NR;COLOR_NRm' echo '\e[STYLE_NR;COLOR_NRm' | sed s/COLOR_NR/$color_nr/';'s/STYLE_NR/$style_nr/
} }
colorize() { text=$(cat) color_name=${1:-none} style_name=${2:-none} colorize() {
local text=$(cat)
local color_name=${1:-none}
local style_name=${2:-none}
echo -e "$(get_ansi_code $color_name $style_name)$text$(get_ansi_code none none)" echo -e "$(get_ansi_code $color_name $style_name)$text$(get_ansi_code none none)"
} }