123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275 |
- #!/bin/sh
- # ftracetest - Ftrace test shell scripts
- #
- # Copyright (C) Hitachi Ltd., 2014
- # Written by Masami Hiramatsu <masami.hiramatsu.pt@hitachi.com>
- #
- # Released under the terms of the GPL v2.
- usage() { # errno [message]
- [ "$2" ] && echo $2
- echo "Usage: ftracetest [options] [testcase(s)] [testcase-directory(s)]"
- echo " Options:"
- echo " -h|--help Show help message"
- echo " -k|--keep Keep passed test logs"
- echo " -v|--verbose Show all stdout messages in testcases"
- echo " -d|--debug Debug mode (trace all shell commands)"
- exit $1
- }
- errexit() { # message
- echo "Error: $1" 1>&2
- exit 1
- }
- # Ensuring user privilege
- if [ `id -u` -ne 0 ]; then
- errexit "this must be run by root user"
- fi
- # Utilities
- absdir() { # file_path
- (cd `dirname $1`; pwd)
- }
- abspath() {
- echo `absdir $1`/`basename $1`
- }
- find_testcases() { #directory
- echo `find $1 -name \*.tc | sort`
- }
- parse_opts() { # opts
- local OPT_TEST_CASES=
- local OPT_TEST_DIR=
- while [ "$1" ]; do
- case "$1" in
- --help|-h)
- usage 0
- ;;
- --keep|-k)
- KEEP_LOG=1
- shift 1
- ;;
- --verbose|-v)
- VERBOSE=1
- shift 1
- ;;
- --debug|-d)
- DEBUG=1
- shift 1
- ;;
- *.tc)
- if [ -f "$1" ]; then
- OPT_TEST_CASES="$OPT_TEST_CASES `abspath $1`"
- shift 1
- else
- usage 1 "$1 is not a testcase"
- fi
- ;;
- *)
- if [ -d "$1" ]; then
- OPT_TEST_DIR=`abspath $1`
- OPT_TEST_CASES="$OPT_TEST_CASES `find_testcases $OPT_TEST_DIR`"
- shift 1
- else
- usage 1 "Invalid option ($1)"
- fi
- ;;
- esac
- done
- if [ "$OPT_TEST_CASES" ]; then
- TEST_CASES=$OPT_TEST_CASES
- fi
- }
- # Parameters
- DEBUGFS_DIR=`grep debugfs /proc/mounts | cut -f2 -d' ' | head -1`
- if [ -z "$DEBUGFS_DIR" ]; then
- TRACING_DIR=`grep tracefs /proc/mounts | cut -f2 -d' ' | head -1`
- else
- TRACING_DIR=$DEBUGFS_DIR/tracing
- fi
- TOP_DIR=`absdir $0`
- TEST_DIR=$TOP_DIR/test.d
- TEST_CASES=`find_testcases $TEST_DIR`
- LOG_DIR=$TOP_DIR/logs/`date +%Y%m%d-%H%M%S`/
- KEEP_LOG=0
- DEBUG=0
- VERBOSE=0
- # Parse command-line options
- parse_opts $*
- [ $DEBUG -ne 0 ] && set -x
- # Verify parameters
- if [ -z "$TRACING_DIR" -o ! -d "$TRACING_DIR" ]; then
- errexit "No ftrace directory found"
- fi
- # Preparing logs
- LOG_FILE=$LOG_DIR/ftracetest.log
- mkdir -p $LOG_DIR || errexit "Failed to make a log directory: $LOG_DIR"
- date > $LOG_FILE
- prlog() { # messages
- echo "$@" | tee -a $LOG_FILE
- }
- catlog() { #file
- cat $1 | tee -a $LOG_FILE
- }
- prlog "=== Ftrace unit tests ==="
- # Testcase management
- # Test result codes - Dejagnu extended code
- PASS=0 # The test succeeded.
- FAIL=1 # The test failed, but was expected to succeed.
- UNRESOLVED=2 # The test produced indeterminate results. (e.g. interrupted)
- UNTESTED=3 # The test was not run, currently just a placeholder.
- UNSUPPORTED=4 # The test failed because of lack of feature.
- XFAIL=5 # The test failed, and was expected to fail.
- # Accumulations
- PASSED_CASES=
- FAILED_CASES=
- UNRESOLVED_CASES=
- UNTESTED_CASES=
- UNSUPPORTED_CASES=
- XFAILED_CASES=
- UNDEFINED_CASES=
- TOTAL_RESULT=0
- CASENO=0
- testcase() { # testfile
- CASENO=$((CASENO+1))
- desc=`grep "^#[ \t]*description:" $1 | cut -f2 -d:`
- prlog -n "[$CASENO]$desc"
- }
- eval_result() { # sigval
- case $1 in
- $PASS)
- prlog " [PASS]"
- PASSED_CASES="$PASSED_CASES $CASENO"
- return 0
- ;;
- $FAIL)
- prlog " [FAIL]"
- FAILED_CASES="$FAILED_CASES $CASENO"
- return 1 # this is a bug.
- ;;
- $UNRESOLVED)
- prlog " [UNRESOLVED]"
- UNRESOLVED_CASES="$UNRESOLVED_CASES $CASENO"
- return 1 # this is a kind of bug.. something happened.
- ;;
- $UNTESTED)
- prlog " [UNTESTED]"
- UNTESTED_CASES="$UNTESTED_CASES $CASENO"
- return 0
- ;;
- $UNSUPPORTED)
- prlog " [UNSUPPORTED]"
- UNSUPPORTED_CASES="$UNSUPPORTED_CASES $CASENO"
- return 1 # this is not a bug, but the result should be reported.
- ;;
- $XFAIL)
- prlog " [XFAIL]"
- XFAILED_CASES="$XFAILED_CASES $CASENO"
- return 0
- ;;
- *)
- prlog " [UNDEFINED]"
- UNDEFINED_CASES="$UNDEFINED_CASES $CASENO"
- return 1 # this must be a test bug
- ;;
- esac
- }
- # Signal handling for result codes
- SIG_RESULT=
- SIG_BASE=36 # Use realtime signals
- SIG_PID=$$
- SIG_FAIL=$((SIG_BASE + FAIL))
- trap 'SIG_RESULT=$FAIL' $SIG_FAIL
- SIG_UNRESOLVED=$((SIG_BASE + UNRESOLVED))
- exit_unresolved () {
- kill -s $SIG_UNRESOLVED $SIG_PID
- exit 0
- }
- trap 'SIG_RESULT=$UNRESOLVED' $SIG_UNRESOLVED
- SIG_UNTESTED=$((SIG_BASE + UNTESTED))
- exit_untested () {
- kill -s $SIG_UNTESTED $SIG_PID
- exit 0
- }
- trap 'SIG_RESULT=$UNTESTED' $SIG_UNTESTED
- SIG_UNSUPPORTED=$((SIG_BASE + UNSUPPORTED))
- exit_unsupported () {
- kill -s $SIG_UNSUPPORTED $SIG_PID
- exit 0
- }
- trap 'SIG_RESULT=$UNSUPPORTED' $SIG_UNSUPPORTED
- SIG_XFAIL=$((SIG_BASE + XFAIL))
- exit_xfail () {
- kill -s $SIG_XFAIL $SIG_PID
- exit 0
- }
- trap 'SIG_RESULT=$XFAIL' $SIG_XFAIL
- __run_test() { # testfile
- # setup PID and PPID, $$ is not updated.
- (cd $TRACING_DIR; read PID _ < /proc/self/stat ; set -e; set -x; . $1)
- [ $? -ne 0 ] && kill -s $SIG_FAIL $SIG_PID
- }
- # Run one test case
- run_test() { # testfile
- local testname=`basename $1`
- local testlog=`mktemp $LOG_DIR/${testname}-log.XXXXXX`
- testcase $1
- echo "execute: "$1 > $testlog
- SIG_RESULT=0
- if [ $VERBOSE -ne 0 ]; then
- __run_test $1 2>> $testlog | tee -a $testlog
- else
- __run_test $1 >> $testlog 2>&1
- fi
- eval_result $SIG_RESULT
- if [ $? -eq 0 ]; then
- # Remove test log if the test was done as it was expected.
- [ $KEEP_LOG -eq 0 ] && rm $testlog
- else
- catlog $testlog
- TOTAL_RESULT=1
- fi
- }
- # load in the helper functions
- . $TEST_DIR/functions
- # Main loop
- for t in $TEST_CASES; do
- run_test $t
- done
- prlog ""
- prlog "# of passed: " `echo $PASSED_CASES | wc -w`
- prlog "# of failed: " `echo $FAILED_CASES | wc -w`
- prlog "# of unresolved: " `echo $UNRESOLVED_CASES | wc -w`
- prlog "# of untested: " `echo $UNTESTED_CASES | wc -w`
- prlog "# of unsupported: " `echo $UNSUPPORTED_CASES | wc -w`
- prlog "# of xfailed: " `echo $XFAILED_CASES | wc -w`
- prlog "# of undefined(test bug): " `echo $UNDEFINED_CASES | wc -w`
- # if no error, return 0
- exit $TOTAL_RESULT
|