]> granicus.if.org Git - strace/commitdiff
Implement two basic "strace -f" tests
authorDmitry V. Levin <ldv@altlinux.org>
Sun, 27 Feb 2011 00:28:50 +0000 (00:28 +0000)
committerDmitry V. Levin <ldv@altlinux.org>
Sun, 27 Feb 2011 00:28:50 +0000 (00:28 +0000)
* Makefile.am (SUBDIRS): Add tests.
* configure.ac (AC_CONFIG_FILES): Add tests/Makefile.
* tests/.gitignore: New file.
* tests/Makefile.am: Likewise.
* tests/init.sh: Likewise.
* tests/ptrace_setoptions: Likewise.
* tests/strace-f: Likewise.

Makefile.am
configure.ac
tests/.gitignore [new file with mode: 0644]
tests/Makefile.am [new file with mode: 0644]
tests/init.sh [new file with mode: 0644]
tests/ptrace_setoptions [new file with mode: 0755]
tests/strace-f [new file with mode: 0755]

index 4082cb348900a0ec3f8818ba7e9b9a40bdac3ff0..f623b9d9fe4918a41165d5f31d24170c45d3760f 100644 (file)
@@ -1,5 +1,7 @@
 # Automake input for strace.
 
+SUBDIRS = tests
+
 bin_PROGRAMS = strace
 man_MANS = strace.1
 bin_SCRIPTS = strace-graph
index 5d56dabcd3978f61cc05a558ef9fcebe521cf117..ca1694bdc01a57b93bb3fd2cbd09ecb57663da05 100644 (file)
@@ -309,5 +309,5 @@ AC_CHECK_DECLS([sys_siglist, _sys_siglist],,, [#include <signal.h>])
 
 AC_PATH_PROG([PERL], [perl])
 
-AC_CONFIG_FILES([Makefile])
+AC_CONFIG_FILES([Makefile tests/Makefile])
 AC_OUTPUT
diff --git a/tests/.gitignore b/tests/.gitignore
new file mode 100644 (file)
index 0000000..cf5bbd7
--- /dev/null
@@ -0,0 +1 @@
+check.log
diff --git a/tests/Makefile.am b/tests/Makefile.am
new file mode 100644 (file)
index 0000000..93636ca
--- /dev/null
@@ -0,0 +1,7 @@
+# Automake input for strace tests.
+
+TESTS = ptrace_setoptions strace-f
+
+EXTRA_DIST = init.sh $(TESTS)
+
+CLEANFILES = check.log
diff --git a/tests/init.sh b/tests/init.sh
new file mode 100644 (file)
index 0000000..a016b1c
--- /dev/null
@@ -0,0 +1,21 @@
+#!/bin/sh
+
+ME_="${0##*/}"
+
+warn_() { printf >&2 '%s\n' "$*"; }
+fail_() { warn_ "$ME_: failed test: $*"; exit 1; }
+skip_() { warn_ "$ME_: skipped test: $*"; exit 77; }
+framework_failure_() { warn_ "$ME_: framework failure: $*"; exit 99; }
+
+check_prog()
+{
+       "$@" --version > /dev/null 2>&1 ||
+               framework_failure_ "$* is not available"
+}
+
+check_strace()
+{
+       STRACE=${*-../strace}
+       $STRACE -V > /dev/null ||
+               framework_failure_ "$STRACE is not available"
+}
diff --git a/tests/ptrace_setoptions b/tests/ptrace_setoptions
new file mode 100755 (executable)
index 0000000..b0a1c87
--- /dev/null
@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Ensure that strace tests kernel PTRACE_O_TRACECLONE support properly.
+
+. "${srcdir=.}/init.sh"
+
+case "$(uname -rs)" in
+       Linux\ 2.6.*) ;;
+       *) skip_ 'The kernel is not Linux 2.6.*' ;;
+esac
+
+check_strace
+check_prog timeout
+
+timeout -s 9 9 \
+$STRACE -df -enone /bin/true 2>&1 |
+       fgrep -qx 'ptrace_setoptions = 0xe' ||
+               fail_ 'strace failed to recognize proper kernel PTRACE_O_TRACECLONE support'
diff --git a/tests/strace-f b/tests/strace-f
new file mode 100755 (executable)
index 0000000..869f331
--- /dev/null
@@ -0,0 +1,14 @@
+#!/bin/sh
+
+# Ensure that strace -f works.
+
+. "${srcdir=.}/init.sh"
+
+check_strace
+check_prog timeout
+time=/usr/bin/time
+check_prog $time
+
+timeout -s 9 9 \
+$STRACE -f $time /bin/ls > check.log 2>&1 ||
+       { cat check.log; fail_ 'strace -f does not work'; }