| #!/bin/bash | |
| # SPDX-License-Identifier: GPL-2.0 | |
| # Copyright (c) 2021 Oracle. All Rights Reserved. | |
| # Move group tags from the groups file into the test files themselves. | |
| if [ -z "$1" ] || [ "$1" = "--help" ]; then | |
| echo "Usage: $0 test_dir [test_dirs...]" | |
| exit 1 | |
| fi | |
| obliterate_group_file() { | |
| sed -e 's/^#.*$//g' < group | while read test groups; do | |
| if [ -z "$test" ]; then | |
| continue; | |
| elif [ ! -e "$test" ]; then | |
| echo "Ignoring unknown test file \"$test\"." | |
| continue | |
| elif grep -q '^_begin_fstest' "$test"; then | |
| continue | |
| fi | |
| # Replace all the open-coded test preparation code with a | |
| # single call to _begin_fstest. | |
| sed -e '/^seqres=\$RESULT_DIR\/\$seq$/d' \ | |
| -e '/^seqres=\"\$RESULT_DIR\/\$seq\"$/d' \ | |
| -e '/^echo "QA output created by \$seq"$/d' \ | |
| -e '/^here=`pwd`$/d' \ | |
| -e '/^here=\$(pwd)$/d' \ | |
| -e '/^here=\$PWD$/d' \ | |
| -e '/^here=\"`pwd`\"$/d' \ | |
| -e '/^tmp=\/tmp\/\$\$$/d' \ | |
| -e '/^status=1.*failure.*is.*the.*default/d' \ | |
| -e '/^status=1.*FAILure.*is.*the.*default/d' \ | |
| -e '/^status=1.*success.*is.*the.*default/d' \ | |
| -e '/^status=1.*default.*failure/d' \ | |
| -e '/^echo.*QA output created by.*seq/d' \ | |
| -e '/^# remove previous \$seqres.full before test/d' \ | |
| -e '/^rm -f \$seqres.full/d' \ | |
| -e 's|^# get standard environment, filters and checks|# Import common functions.|g' \ | |
| -e '/^\. \.\/common\/rc/d' \ | |
| -e '/^\. common\/rc/d' \ | |
| -e 's|^seq=.*$|. ./common/preamble\n_begin_fstest '"$groups"'|g' \ | |
| -i "$test" | |
| # Replace the open-coded trap calls that register cleanup code | |
| # with a call to _register_cleanup. | |
| # | |
| # For tests that registered empty-string cleanups or open-coded | |
| # calls to remove $tmp files, remove the _register_cleanup | |
| # calls entirely because the default _cleanup does that for us. | |
| # | |
| # For tests that now have a _register_cleanup call for the | |
| # _cleanup function, remove the explicit call because | |
| # _begin_fstest already registers that for us. | |
| # | |
| # For tests that override _cleanup, insert a comment noting | |
| # that it is overriding the default, to match the ./new | |
| # template. | |
| sed -e 's|^trap "exit \\\$status" 0 1 2 3 15|_register_cleanup ""|g' \ | |
| -e 's|^trap "\(.*\)[[:space:]]*; exit \\\$status" 0 1 2 3 15|_register_cleanup "\1"|g' \ | |
| -e 's|^trap "\(.*\)[[:space:]]*; exit \\\$status" 1 2 3 15|_register_cleanup "\1"|g' \ | |
| -e 's|^trap '"'"'\(.*\)[[:space:]]*; exit \$status'"'"' 0 1 2 3 15|_register_cleanup "\1"|g' \ | |
| -e 's|^trap "\(.*\)[[:space:]]*; exit \\\$status" 0 1 2 3 7 15|_register_cleanup "\1" BUS|g' \ | |
| -e 's|^_register_cleanup "[[:space:]]*\([^[:space:]]*\)[[:space:]]*"|_register_cleanup "\1"|g' \ | |
| -e '/^_register_cleanup ""$/d' \ | |
| -e '/^_register_cleanup "rm -f \$tmp.*"$/d' \ | |
| -e '/^_register_cleanup "_cleanup"$/d' \ | |
| -e 's|^_cleanup()|# Override the default cleanup function.\n_cleanup()|g' \ | |
| -i "$test" | |
| # If the test doesn't import any common functionality, | |
| # get rid of the pointless comment. | |
| if ! grep -q '^\. .*common' "$test"; then | |
| sed -e '/^# Import common functions.$/d' -i "$test" | |
| fi | |
| # Replace the "status=1" lines that don't have the usual | |
| # "failure is the default" message if there's no other code | |
| # between _begin_fstest and status=1. | |
| if grep -q '^status=1$' "$test"; then | |
| awk ' | |
| BEGIN { | |
| saw_groupinfo = 0; | |
| } | |
| { | |
| if ($0 ~ /^_begin_fstest/) { | |
| saw_groupinfo = 1; | |
| printf("%s\n", $0); | |
| } else if ($0 ~ /^status=1$/) { | |
| if (saw_groupinfo == 0) { | |
| printf("%s\n", $0); | |
| } | |
| } else if ($0 == "") { | |
| printf("\n"); | |
| } else { | |
| saw_groupinfo = 0; | |
| printf("%s\n", $0); | |
| } | |
| } | |
| ' < "$test" > "$test.new" | |
| cat "$test.new" > "$test" | |
| rm -f "$test.new" | |
| fi | |
| # Get rid of _cleanup functions that match the standard one. | |
| # Thanks to Eric Biggers for providing this. | |
| sed -z -E \ | |
| -e 's/(#[^#\n]*\n)*_cleanup\(\)\n\{\n(\s+cd \/\n)?\s+rm -r?f "?\$tmp"?\.\*\n\}\n\n?//' \ | |
| -e 's/(#[^#\n]*\n)*_cleanup\(\)\n\{\n(\s+cd \/\n)?\s+rm -fr "?\$tmp"?\.\*\n\}\n\n?//' \ | |
| -i "$test" | |
| # Collapse sequences of blank lines to a single blank line. | |
| awk ' | |
| BEGIN { | |
| saw_blank = 0; | |
| } | |
| { | |
| if ($0 ~ /^$/) { | |
| if (saw_blank == 0) { | |
| printf("\n"); | |
| saw_blank = 1; | |
| } | |
| } else { | |
| printf("%s\n", $0); | |
| saw_blank = 0; | |
| } | |
| } | |
| ' < "$test" > "$test.new" | |
| cat "$test.new" > "$test" | |
| rm -f "$test.new" | |
| done | |
| } | |
| curr_dir="$PWD" | |
| for tdir in "$@"; do | |
| cd "tests/$tdir" | |
| obliterate_group_file | |
| cd "$curr_dir" | |
| done |