123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994 |
- #!/bin/bash
- # Copyright (C) 2017 Luis R. Rodriguez <[email protected]>
- #
- # This program is free software; you can redistribute it and/or modify it
- # under the terms of the GNU General Public License as published by the Free
- # Software Foundation; either version 2 of the License, or at your option any
- # later version; or, when distributed separately from the Linux kernel or
- # when incorporated into other software packages, subject to the following
- # license:
- #
- # This program is free software; you can redistribute it and/or modify it
- # under the terms of copyleft-next (version 0.3.1 or later) as published
- # at http://copyleft-next.org/.
- # This performs a series tests against the proc sysctl interface.
- # Kselftest framework requirement - SKIP code is 4.
- ksft_skip=4
- TEST_NAME="sysctl"
- TEST_DRIVER="test_${TEST_NAME}"
- TEST_DIR=$(dirname $0)
- TEST_FILE=$(mktemp)
- # This represents
- #
- # TEST_ID:TEST_COUNT:ENABLED:TARGET
- #
- # TEST_ID: is the test id number
- # TEST_COUNT: number of times we should run the test
- # ENABLED: 1 if enabled, 0 otherwise
- # TARGET: test target file required on the test_sysctl module
- #
- # Once these are enabled please leave them as-is. Write your own test,
- # we have tons of space.
- ALL_TESTS="0001:1:1:int_0001"
- ALL_TESTS="$ALL_TESTS 0002:1:1:string_0001"
- ALL_TESTS="$ALL_TESTS 0003:1:1:int_0002"
- ALL_TESTS="$ALL_TESTS 0004:1:1:uint_0001"
- ALL_TESTS="$ALL_TESTS 0005:3:1:int_0003"
- ALL_TESTS="$ALL_TESTS 0006:50:1:bitmap_0001"
- ALL_TESTS="$ALL_TESTS 0007:1:1:boot_int"
- ALL_TESTS="$ALL_TESTS 0008:1:1:match_int"
- function allow_user_defaults()
- {
- if [ -z $DIR ]; then
- DIR="/sys/module/test_sysctl/"
- fi
- if [ -z $DEFAULT_NUM_TESTS ]; then
- DEFAULT_NUM_TESTS=50
- fi
- if [ -z $SYSCTL ]; then
- SYSCTL="/proc/sys/debug/test_sysctl"
- fi
- if [ -z $PROD_SYSCTL ]; then
- PROD_SYSCTL="/proc/sys"
- fi
- if [ -z $WRITES_STRICT ]; then
- WRITES_STRICT="${PROD_SYSCTL}/kernel/sysctl_writes_strict"
- fi
- }
- function check_production_sysctl_writes_strict()
- {
- echo -n "Checking production write strict setting ... "
- if [ ! -e ${WRITES_STRICT} ]; then
- echo "FAIL, but skip in case of old kernel" >&2
- else
- old_strict=$(cat ${WRITES_STRICT})
- if [ "$old_strict" = "1" ]; then
- echo "ok"
- else
- echo "FAIL, strict value is 0 but force to 1 to continue" >&2
- echo "1" > ${WRITES_STRICT}
- fi
- fi
- if [ -z $PAGE_SIZE ]; then
- PAGE_SIZE=$(getconf PAGESIZE)
- fi
- if [ -z $MAX_DIGITS ]; then
- MAX_DIGITS=$(($PAGE_SIZE/8))
- fi
- if [ -z $INT_MAX ]; then
- INT_MAX=$(getconf INT_MAX)
- fi
- if [ -z $UINT_MAX ]; then
- UINT_MAX=$(getconf UINT_MAX)
- fi
- }
- test_reqs()
- {
- uid=$(id -u)
- if [ $uid -ne 0 ]; then
- echo $msg must be run as root >&2
- exit $ksft_skip
- fi
- if ! which perl 2> /dev/null > /dev/null; then
- echo "$0: You need perl installed"
- exit $ksft_skip
- fi
- if ! which getconf 2> /dev/null > /dev/null; then
- echo "$0: You need getconf installed"
- exit $ksft_skip
- fi
- if ! which diff 2> /dev/null > /dev/null; then
- echo "$0: You need diff installed"
- exit $ksft_skip
- fi
- }
- function load_req_mod()
- {
- if [ ! -d $SYSCTL ]; then
- if ! modprobe -q -n $TEST_DRIVER; then
- echo "$0: module $TEST_DRIVER not found [SKIP]"
- echo "You must set CONFIG_TEST_SYSCTL=m in your kernel" >&2
- exit $ksft_skip
- fi
- modprobe $TEST_DRIVER
- if [ $? -ne 0 ]; then
- echo "$0: modprobe $TEST_DRIVER failed."
- exit
- fi
- fi
- }
- reset_vals()
- {
- VAL=""
- TRIGGER=$(basename ${TARGET})
- case "$TRIGGER" in
- int_0001)
- VAL="60"
- ;;
- int_0002)
- VAL="1"
- ;;
- uint_0001)
- VAL="314"
- ;;
- string_0001)
- VAL="(none)"
- ;;
- bitmap_0001)
- VAL=""
- ;;
- *)
- ;;
- esac
- echo -n $VAL > $TARGET
- }
- set_orig()
- {
- if [ ! -z $TARGET ] && [ ! -z $ORIG ]; then
- if [ -f ${TARGET} ]; then
- echo "${ORIG}" > "${TARGET}"
- fi
- fi
- }
- set_test()
- {
- echo "${TEST_STR}" > "${TARGET}"
- }
- verify()
- {
- local seen
- seen=$(cat "$1")
- if [ "${seen}" != "${TEST_STR}" ]; then
- return 1
- fi
- return 0
- }
- # proc files get read a page at a time, which can confuse diff,
- # and get you incorrect results on proc files with long data. To use
- # diff against them you must first extract the output to a file, and
- # then compare against that file.
- verify_diff_proc_file()
- {
- TMP_DUMP_FILE=$(mktemp)
- cat $1 > $TMP_DUMP_FILE
- if ! diff -w -q $TMP_DUMP_FILE $2; then
- return 1
- else
- return 0
- fi
- }
- verify_diff_w()
- {
- echo "$TEST_STR" | diff -q -w -u - $1 > /dev/null
- return $?
- }
- test_rc()
- {
- if [[ $rc != 0 ]]; then
- echo "Failed test, return value: $rc" >&2
- exit $rc
- fi
- }
- test_finish()
- {
- set_orig
- rm -f "${TEST_FILE}"
- if [ ! -z ${old_strict} ]; then
- echo ${old_strict} > ${WRITES_STRICT}
- fi
- exit $rc
- }
- run_numerictests()
- {
- echo "== Testing sysctl behavior against ${TARGET} =="
- rc=0
- echo -n "Writing test file ... "
- echo "${TEST_STR}" > "${TEST_FILE}"
- if ! verify "${TEST_FILE}"; then
- echo "FAIL" >&2
- exit 1
- else
- echo "ok"
- fi
- echo -n "Checking sysctl is not set to test value ... "
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- exit 1
- else
- echo "ok"
- fi
- echo -n "Writing sysctl from shell ... "
- set_test
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- exit 1
- else
- echo "ok"
- fi
- echo -n "Resetting sysctl to original value ... "
- set_orig
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- exit 1
- else
- echo "ok"
- fi
- # Now that we've validated the sanity of "set_test" and "set_orig",
- # we can use those functions to set starting states before running
- # specific behavioral tests.
- echo -n "Writing entire sysctl in single write ... "
- set_orig
- dd if="${TEST_FILE}" of="${TARGET}" bs=4096 2>/dev/null
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Writing middle of sysctl after synchronized seek ... "
- set_test
- dd if="${TEST_FILE}" of="${TARGET}" bs=1 seek=1 skip=1 2>/dev/null
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Writing beyond end of sysctl ... "
- set_orig
- dd if="${TEST_FILE}" of="${TARGET}" bs=20 seek=2 2>/dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Writing sysctl with multiple long writes ... "
- set_orig
- (perl -e 'print "A" x 50;'; echo "${TEST_STR}") | \
- dd of="${TARGET}" bs=50 2>/dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- check_failure()
- {
- echo -n "Testing that $1 fails as expected..."
- reset_vals
- TEST_STR="$1"
- orig="$(cat $TARGET)"
- echo -n "$TEST_STR" > $TARGET 2> /dev/null
- # write should fail and $TARGET should retain its original value
- if [ $? = 0 ] || [ "$(cat $TARGET)" != "$orig" ]; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- run_wideint_tests()
- {
- # sysctl conversion functions receive a boolean sign and ulong
- # magnitude; here we list the magnitudes we want to test (each of
- # which will be tested in both positive and negative forms). Since
- # none of these values fit in 32 bits, writing them to an int- or
- # uint-typed sysctl should fail.
- local magnitudes=(
- # common boundary-condition values (zero, +1, -1, INT_MIN,
- # and INT_MAX respectively) if truncated to lower 32 bits
- # (potential for being falsely deemed in range)
- 0x0000000100000000
- 0x0000000100000001
- 0x00000001ffffffff
- 0x0000000180000000
- 0x000000017fffffff
- # these look like negatives, but without a leading '-' are
- # actually large positives (should be rejected as above
- # despite being zero/+1/-1/INT_MIN/INT_MAX in the lower 32)
- 0xffffffff00000000
- 0xffffffff00000001
- 0xffffffffffffffff
- 0xffffffff80000000
- 0xffffffff7fffffff
- )
- for sign in '' '-'; do
- for mag in "${magnitudes[@]}"; do
- check_failure "${sign}${mag}"
- done
- done
- }
- # Your test must accept digits 3 and 4 to use this
- run_limit_digit()
- {
- echo -n "Checking ignoring spaces up to PAGE_SIZE works on write ..."
- reset_vals
- LIMIT=$((MAX_DIGITS -1))
- TEST_STR="3"
- (perl -e 'print " " x '$LIMIT';'; echo "${TEST_STR}") | \
- dd of="${TARGET}" 2>/dev/null
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Checking passing PAGE_SIZE of spaces fails on write ..."
- reset_vals
- LIMIT=$((MAX_DIGITS))
- TEST_STR="4"
- (perl -e 'print " " x '$LIMIT';'; echo "${TEST_STR}") | \
- dd of="${TARGET}" 2>/dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- # You are using an int
- run_limit_digit_int()
- {
- echo -n "Testing INT_MAX works ..."
- reset_vals
- TEST_STR="$INT_MAX"
- echo -n $TEST_STR > $TARGET
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing INT_MAX + 1 will fail as expected..."
- reset_vals
- let TEST_STR=$INT_MAX+1
- echo -n $TEST_STR > $TARGET 2> /dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing negative values will work as expected..."
- reset_vals
- TEST_STR="-3"
- echo -n $TEST_STR > $TARGET 2> /dev/null
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- # You used an int array
- run_limit_digit_int_array()
- {
- echo -n "Testing array works as expected ... "
- TEST_STR="4 3 2 1"
- echo -n $TEST_STR > $TARGET
- if ! verify_diff_w "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing skipping trailing array elements works ... "
- # Do not reset_vals, carry on the values from the last test.
- # If we only echo in two digits the last two are left intact
- TEST_STR="100 101"
- echo -n $TEST_STR > $TARGET
- # After we echo in, to help diff we need to set on TEST_STR what
- # we expect the result to be.
- TEST_STR="100 101 2 1"
- if ! verify_diff_w "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing PAGE_SIZE limit on array works ... "
- # Do not reset_vals, carry on the values from the last test.
- # Even if you use an int array, you are still restricted to
- # MAX_DIGITS, this is a known limitation. Test limit works.
- LIMIT=$((MAX_DIGITS -1))
- TEST_STR="9"
- (perl -e 'print " " x '$LIMIT';'; echo "${TEST_STR}") | \
- dd of="${TARGET}" 2>/dev/null
- TEST_STR="9 101 2 1"
- if ! verify_diff_w "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing exceeding PAGE_SIZE limit fails as expected ... "
- # Do not reset_vals, carry on the values from the last test.
- # Now go over limit.
- LIMIT=$((MAX_DIGITS))
- TEST_STR="7"
- (perl -e 'print " " x '$LIMIT';'; echo "${TEST_STR}") | \
- dd of="${TARGET}" 2>/dev/null
- TEST_STR="7 101 2 1"
- if verify_diff_w "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- # You are using an unsigned int
- run_limit_digit_uint()
- {
- echo -n "Testing UINT_MAX works ..."
- reset_vals
- TEST_STR="$UINT_MAX"
- echo -n $TEST_STR > $TARGET
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing UINT_MAX + 1 will fail as expected..."
- reset_vals
- TEST_STR=$(($UINT_MAX+1))
- echo -n $TEST_STR > $TARGET 2> /dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- echo -n "Testing negative values will not work as expected ..."
- reset_vals
- TEST_STR="-3"
- echo -n $TEST_STR > $TARGET 2> /dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- run_stringtests()
- {
- echo -n "Writing entire sysctl in short writes ... "
- set_orig
- dd if="${TEST_FILE}" of="${TARGET}" bs=1 2>/dev/null
- if ! verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Writing middle of sysctl after unsynchronized seek ... "
- set_test
- dd if="${TEST_FILE}" of="${TARGET}" bs=1 seek=1 2>/dev/null
- if verify "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Checking sysctl maxlen is at least $MAXLEN ... "
- set_orig
- perl -e 'print "A" x ('"${MAXLEN}"'-2), "B";' | \
- dd of="${TARGET}" bs="${MAXLEN}" 2>/dev/null
- if ! grep -q B "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Checking sysctl keeps original string on overflow append ... "
- set_orig
- perl -e 'print "A" x ('"${MAXLEN}"'-1), "B";' | \
- dd of="${TARGET}" bs=$(( MAXLEN - 1 )) 2>/dev/null
- if grep -q B "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Checking sysctl stays NULL terminated on write ... "
- set_orig
- perl -e 'print "A" x ('"${MAXLEN}"'-1), "B";' | \
- dd of="${TARGET}" bs="${MAXLEN}" 2>/dev/null
- if grep -q B "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- echo -n "Checking sysctl stays NULL terminated on overwrite ... "
- set_orig
- perl -e 'print "A" x ('"${MAXLEN}"'-1), "BB";' | \
- dd of="${TARGET}" bs=$(( $MAXLEN + 1 )) 2>/dev/null
- if grep -q B "${TARGET}"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- fi
- test_rc
- }
- target_exists()
- {
- TARGET="${SYSCTL}/$1"
- TEST_ID="$2"
- if [ ! -f ${TARGET} ] ; then
- echo "Target for test $TEST_ID: $TARGET not exist, skipping test ..."
- return 0
- fi
- return 1
- }
- run_bitmaptest() {
- # Total length of bitmaps string to use, a bit under
- # the maximum input size of the test node
- LENGTH=$((RANDOM % 65000))
- # First bit to set
- BIT=$((RANDOM % 1024))
- # String containing our list of bits to set
- TEST_STR=$BIT
- # build up the string
- while [ "${#TEST_STR}" -le "$LENGTH" ]; do
- # Make sure next entry is discontiguous,
- # skip ahead at least 2
- BIT=$((BIT + $((2 + RANDOM % 10))))
- # Add new bit to the list
- TEST_STR="${TEST_STR},${BIT}"
- # Randomly make it a range
- if [ "$((RANDOM % 2))" -eq "1" ]; then
- RANGE_END=$((BIT + $((1 + RANDOM % 10))))
- TEST_STR="${TEST_STR}-${RANGE_END}"
- BIT=$RANGE_END
- fi
- done
- echo -n "Checking bitmap handler... "
- TEST_FILE=$(mktemp)
- echo -n "$TEST_STR" > $TEST_FILE
- cat $TEST_FILE > $TARGET 2> /dev/null
- if [ $? -ne 0 ]; then
- echo "FAIL" >&2
- rc=1
- test_rc
- fi
- if ! verify_diff_proc_file "$TARGET" "$TEST_FILE"; then
- echo "FAIL" >&2
- rc=1
- else
- echo "ok"
- rc=0
- fi
- test_rc
- }
- sysctl_test_0001()
- {
- TARGET="${SYSCTL}/$(get_test_target 0001)"
- reset_vals
- ORIG=$(cat "${TARGET}")
- TEST_STR=$(( $ORIG + 1 ))
- run_numerictests
- run_wideint_tests
- run_limit_digit
- }
- sysctl_test_0002()
- {
- TARGET="${SYSCTL}/$(get_test_target 0002)"
- reset_vals
- ORIG=$(cat "${TARGET}")
- TEST_STR="Testing sysctl"
- # Only string sysctls support seeking/appending.
- MAXLEN=65
- run_numerictests
- run_stringtests
- }
- sysctl_test_0003()
- {
- TARGET="${SYSCTL}/$(get_test_target 0003)"
- reset_vals
- ORIG=$(cat "${TARGET}")
- TEST_STR=$(( $ORIG + 1 ))
- run_numerictests
- run_wideint_tests
- run_limit_digit
- run_limit_digit_int
- }
- sysctl_test_0004()
- {
- TARGET="${SYSCTL}/$(get_test_target 0004)"
- reset_vals
- ORIG=$(cat "${TARGET}")
- TEST_STR=$(( $ORIG + 1 ))
- run_numerictests
- run_wideint_tests
- run_limit_digit
- run_limit_digit_uint
- }
- sysctl_test_0005()
- {
- TARGET="${SYSCTL}/$(get_test_target 0005)"
- reset_vals
- ORIG=$(cat "${TARGET}")
- run_limit_digit_int_array
- }
- sysctl_test_0006()
- {
- TARGET="${SYSCTL}/bitmap_0001"
- reset_vals
- ORIG=""
- run_bitmaptest
- }
- sysctl_test_0007()
- {
- TARGET="${SYSCTL}/boot_int"
- if [ ! -f $TARGET ]; then
- echo "Skipping test for $TARGET as it is not present ..."
- return $ksft_skip
- fi
- if [ -d $DIR ]; then
- echo "Boot param test only possible sysctl_test is built-in, not module:"
- cat $TEST_DIR/config >&2
- return $ksft_skip
- fi
- echo -n "Testing if $TARGET is set to 1 ..."
- ORIG=$(cat "${TARGET}")
- if [ x$ORIG = "x1" ]; then
- echo "ok"
- return 0
- fi
- echo "FAIL"
- echo "Checking if /proc/cmdline contains setting of the expected parameter ..."
- if [ ! -f /proc/cmdline ]; then
- echo "/proc/cmdline does not exist, test inconclusive"
- return 0
- fi
- FOUND=$(grep -c "sysctl[./]debug[./]test_sysctl[./]boot_int=1" /proc/cmdline)
- if [ $FOUND = "1" ]; then
- echo "Kernel param found but $TARGET is not 1, TEST FAILED"
- rc=1
- test_rc
- fi
- echo "Skipping test, expected kernel parameter missing."
- echo "To perform this test, make sure kernel is booted with parameter: sysctl.debug.test_sysctl.boot_int=1"
- return $ksft_skip
- }
- sysctl_test_0008()
- {
- TARGET="${SYSCTL}/match_int"
- if [ ! -f $TARGET ]; then
- echo "Skipping test for $TARGET as it is not present ..."
- return $ksft_skip
- fi
- echo -n "Testing if $TARGET is matched in kernel"
- ORIG_VALUE=$(cat "${TARGET}")
- if [ $ORIG_VALUE -ne 1 ]; then
- echo "TEST FAILED"
- rc=1
- test_rc
- fi
- echo "ok"
- return 0
- }
- list_tests()
- {
- echo "Test ID list:"
- echo
- echo "TEST_ID x NUM_TEST"
- echo "TEST_ID: Test ID"
- echo "NUM_TESTS: Number of recommended times to run the test"
- echo
- echo "0001 x $(get_test_count 0001) - tests proc_dointvec_minmax()"
- echo "0002 x $(get_test_count 0002) - tests proc_dostring()"
- echo "0003 x $(get_test_count 0003) - tests proc_dointvec()"
- echo "0004 x $(get_test_count 0004) - tests proc_douintvec()"
- echo "0005 x $(get_test_count 0005) - tests proc_douintvec() array"
- echo "0006 x $(get_test_count 0006) - tests proc_do_large_bitmap()"
- echo "0007 x $(get_test_count 0007) - tests setting sysctl from kernel boot param"
- echo "0008 x $(get_test_count 0008) - tests sysctl macro values match"
- }
- usage()
- {
- NUM_TESTS=$(grep -o ' ' <<<"$ALL_TESTS" | grep -c .)
- let NUM_TESTS=$NUM_TESTS+1
- MAX_TEST=$(printf "%04d\n" $NUM_TESTS)
- echo "Usage: $0 [ -t <4-number-digit> ] | [ -w <4-number-digit> ] |"
- echo " [ -s <4-number-digit> ] | [ -c <4-number-digit> <test- count>"
- echo " [ all ] [ -h | --help ] [ -l ]"
- echo ""
- echo "Valid tests: 0001-$MAX_TEST"
- echo ""
- echo " all Runs all tests (default)"
- echo " -t Run test ID the number amount of times is recommended"
- echo " -w Watch test ID run until it runs into an error"
- echo " -c Run test ID once"
- echo " -s Run test ID x test-count number of times"
- echo " -l List all test ID list"
- echo " -h|--help Help"
- echo
- echo "If an error every occurs execution will immediately terminate."
- echo "If you are adding a new test try using -w <test-ID> first to"
- echo "make sure the test passes a series of tests."
- echo
- echo Example uses:
- echo
- echo "$TEST_NAME.sh -- executes all tests"
- echo "$TEST_NAME.sh -t 0002 -- Executes test ID 0002 number of times is recomended"
- echo "$TEST_NAME.sh -w 0002 -- Watch test ID 0002 run until an error occurs"
- echo "$TEST_NAME.sh -s 0002 -- Run test ID 0002 once"
- echo "$TEST_NAME.sh -c 0002 3 -- Run test ID 0002 three times"
- echo
- list_tests
- exit 1
- }
- function test_num()
- {
- re='^[0-9]+$'
- if ! [[ $1 =~ $re ]]; then
- usage
- fi
- }
- function get_test_count()
- {
- test_num $1
- TEST_DATA=$(echo $ALL_TESTS | awk '{print $'$1'}')
- echo ${TEST_DATA} | awk -F":" '{print $2}'
- }
- function get_test_enabled()
- {
- test_num $1
- TEST_DATA=$(echo $ALL_TESTS | awk '{print $'$1'}')
- echo ${TEST_DATA} | awk -F":" '{print $3}'
- }
- function get_test_target()
- {
- test_num $1
- TEST_DATA=$(echo $ALL_TESTS | awk '{print $'$1'}')
- echo ${TEST_DATA} | awk -F":" '{print $4}'
- }
- function run_all_tests()
- {
- for i in $ALL_TESTS ; do
- TEST_ID=${i%:*:*:*}
- ENABLED=$(get_test_enabled $TEST_ID)
- TEST_COUNT=$(get_test_count $TEST_ID)
- TEST_TARGET=$(get_test_target $TEST_ID)
- if target_exists $TEST_TARGET $TEST_ID; then
- continue
- fi
- if [[ $ENABLED -eq "1" ]]; then
- test_case $TEST_ID $TEST_COUNT $TEST_TARGET
- fi
- done
- }
- function watch_log()
- {
- if [ $# -ne 3 ]; then
- clear
- fi
- date
- echo "Running test: $2 - run #$1"
- }
- function watch_case()
- {
- i=0
- while [ 1 ]; do
- if [ $# -eq 1 ]; then
- test_num $1
- watch_log $i ${TEST_NAME}_test_$1
- ${TEST_NAME}_test_$1
- else
- watch_log $i all
- run_all_tests
- fi
- let i=$i+1
- done
- }
- function test_case()
- {
- NUM_TESTS=$2
- i=0
- if target_exists $3 $1; then
- continue
- fi
- while [ $i -lt $NUM_TESTS ]; do
- test_num $1
- watch_log $i ${TEST_NAME}_test_$1 noclear
- RUN_TEST=${TEST_NAME}_test_$1
- $RUN_TEST
- let i=$i+1
- done
- }
- function parse_args()
- {
- if [ $# -eq 0 ]; then
- run_all_tests
- else
- if [[ "$1" = "all" ]]; then
- run_all_tests
- elif [[ "$1" = "-w" ]]; then
- shift
- watch_case $@
- elif [[ "$1" = "-t" ]]; then
- shift
- test_num $1
- test_case $1 $(get_test_count $1) $(get_test_target $1)
- elif [[ "$1" = "-c" ]]; then
- shift
- test_num $1
- test_num $2
- test_case $1 $2 $(get_test_target $1)
- elif [[ "$1" = "-s" ]]; then
- shift
- test_case $1 1 $(get_test_target $1)
- elif [[ "$1" = "-l" ]]; then
- list_tests
- elif [[ "$1" = "-h" || "$1" = "--help" ]]; then
- usage
- else
- usage
- fi
- fi
- }
- test_reqs
- allow_user_defaults
- check_production_sysctl_writes_strict
- load_req_mod
- trap "test_finish" EXIT
- parse_args $@
- exit 0
|