kakoune/test/run

127 lines
3.2 KiB
Plaintext
Raw Normal View History

2014-06-30 12:22:50 +02:00
#!/bin/sh
# Main ├────────────────────────────────────────────────────────────────────────
main() {
number_tests=0
number_failures=0
2014-12-11 14:43:10 +01:00
dirs="${@:-.}"
test=$(pwd)
2014-12-10 20:26:51 +01:00
work=$(mktemp -d /tmp/kak-tests.XXXXXXXX)
cp -R . $work
trap "rm -R $work" EXIT
2014-06-30 12:22:50 +02:00
for dir in $(find $dirs -type d); do
cd $test/$dir;
2014-12-11 14:43:10 +01:00
test_files=$(ls out selections state 2>/dev/null)
cd $work/$dir;
2014-10-29 00:28:10 +01:00
indent="$(echo "${dir}/" | sed "s|[^/]*/\+| |g")"
name=$(basename $PWD)
2014-10-29 00:28:10 +01:00
if ! test -e cmd; then
echo "$indent$name"
else
number_tests=$(($number_tests + 1))
touch in; cp in out
kak_commands="
set global autoreload yes
try %{
source rc
}
try %{
exec '%s%\(\K[^)]+<ret><c-s>ld<a-t>(hHdi<c-u><esc><c-o>'
} \
catch %{
exec gg
}
2014-10-29 00:28:10 +01:00
exec '$(cat cmd)'
eval -buffer *debug* write debug
nop %sh{ IFS==
echo \"\$kak_selections\" > selections
echo \"\$kak_selections_desc\" > state
}
write out
quit!
"
${test}/../src/kak out -n -e "$kak_commands"
for expect in $test_files; do
if cmp -s $test/$dir/$expect $expect; then
echo "$indent$name" | colorize green normal
else
number_failures=$(($number_failures + 1))
echo "$indent$name" | colorize red normal
echo
2014-10-29 00:28:10 +01:00
diff -u $test/$dir/$expect $expect | while read -r line; do
first_character=$(echo "$line" | cut -b 1)
color=$(match $first_character + green - red @ magenta none)
echo "$line" | colorize $color normal
done
echo
echo "debug buffer:" | colorize yellow normal
cat debug
echo
fi
done
fi
2014-06-30 12:22:50 +02:00
done
if expr $number_failures > 0; then
color=red
else
color=green
fi
2014-06-30 12:22:50 +02:00
echo
echo Resume:
echo $number_tests tests, $number_failures failures | colorize $color normal
exit $number_failures
2014-06-30 12:22:50 +02:00
}
# Utility ├─────────────────────────────────────────────────────────────────────
match() {
expression="$1";
shift
while [ $# > 0 ]; do
pattern="$1"
shift
value="$1"
next="$1"
default_value="$pattern"
if [ -z "$next" ]; then
2014-06-30 12:22:50 +02:00
echo $default_value
return 1
fi
if [ "$expression" = "$pattern" ]; then
echo "$value"
2014-06-30 12:22:50 +02:00
return 0
fi
2014-06-30 12:22:50 +02:00
shift
done
}
get_ansi_code() {
color_name=${1:-none}
style_name=${2:-none}
2014-10-29 00:28:10 +01:00
case "$color_name" in
none) color_nr=00 ;;
red) color_nr=31 ;;
green) color_nr=32 ;;
yellow) color_nr=33 ;;
magenta) color_nr=35 ;;
*) color_nr=00 ;;
esac
case "$style_name" in
none) style_nr=00 ;;
bold) style_nr=01 ;;
*) style_nr=00 ;;
esac
printf '\033[%s;%sm' $style_nr $color_nr
2014-06-30 12:22:50 +02:00
}
colorize() {
text=$(cat)
color_name=${1:-none}
style_name=${2:-none}
2014-10-29 00:28:10 +01:00
echo "$(get_ansi_code $color_name $style_name)$text$(get_ansi_code none none)"
2014-06-30 12:22:50 +02:00
}
main $@