kakoune/test/run

140 lines
3.6 KiB
Plaintext
Raw Normal View History

2014-06-30 12:22:50 +02:00
#!/bin/sh
# Main ├────────────────────────────────────────────────────────────────────────
main() {
local number_tests=0
local number_failures=0
local dirs=$@
local test=$(pwd)
local work=$(mktemp --directory)
2014-06-30 12:22:50 +02:00
cp --recursive . $work
trap "rm --recursive $work" EXIT
for dir in $(find $dirs -type d); do
cd $test/$dir;
local test_files=$(find * -name out -o -name selections -o -name state)
cd $work/$dir;
IFS=¬
local indent=$(repeat ' ' $(pwd | sed "s|$test||" | tr --delete --complement / | awk '{ print length }'))
local name=$(basename $PWD)
if ! exists cmd; then
echo "$indent$name"
else
((number_tests++))
touch in; cp in out
local kak_commands="
set global autoreload yes
try %{
source rc
}
try %{
exec '%s%[(](.+?)[)]<ret>i<del><del><esc>a<backspace><c-u><esc>'
} \
catch %{
exec gg
}
exec '$(<cmd)'
eval -buffer *debug* write debug
nop %sh{ IFS==
echo \"\$kak_selections\" > selections
echo \"\$kak_selections_desc\" > state
}
write out
quit!
"
kak out -n -e $kak_commands
IFS=$'\n'
for expect in $test_files; do
if cmp --quiet $test/$dir/$expect $expect; then
echo "$indent$name" | colorize green normal
else
((number_failures++))
echo "$indent$name" | colorize red normal
echo
IFS=$'\n'
for line in $(diff --unified $test/$dir/$expect $expect); do
IFS=¬
local first_character=$(echo "$line" | head --bytes 1)
local 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 (( $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
}
# Utility ├─────────────────────────────────────────────────────────────────────
match() {
expression="$1";
shift
while [[ "$@" ]]; do
local pattern="$1"
shift
local value="$1"
local next="$1"
local 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
}
repeat() {
local text=$1
local count=${2:-0}
2014-06-30 12:22:50 +02:00
echo $(yes $text | head --lines $count | join)
}
join() {
tr --delete "\n"
}
exists() {
test -e $@
}
get_ansi_code() {
local color_name=${1:-none}
local style_name=${2:-none}
local color='none 00
red 31
green 32
yellow 33
magenta 35'
local style='none 00
bold 01'
local color_nr=$(echo "$color" | awk "/$color_name/ { print \$2 }")
local style_nr=$(echo "$style" | awk "/$style_name/ { print \$2 }")
echo '\e[STYLE_NR;COLOR_NRm' | sed s/COLOR_NR/$color_nr/';'s/STYLE_NR/$style_nr/
2014-06-30 12:22:50 +02:00
}
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)"
2014-06-30 12:22:50 +02:00
}
main $@