summaryrefslogtreecommitdiff
path: root/shell/hush_test
diff options
context:
space:
mode:
authorDenis Vlasenko2009-04-08 11:48:57 +0000
committerDenis Vlasenko2009-04-08 11:48:57 +0000
commitc73b70c7013aa98a86653ad7e7d15bcca16622f2 (patch)
tree2f2534d588201af85d09335848cef63e93cc83c1 /shell/hush_test
parent3dfb035d8df33e59492e78a97bf42e961ba178e4 (diff)
downloadbusybox-c73b70c7013aa98a86653ad7e7d15bcca16622f2.zip
busybox-c73b70c7013aa98a86653ad7e7d15bcca16622f2.tar.gz
hush: add leak detector helper; fix/add tests for it
function old new delta builtin_memleak - 92 +92 bltins 288 300 +12
Diffstat (limited to 'shell/hush_test')
-rw-r--r--shell/hush_test/hush-z_slow/leak_all1.right3
-rwxr-xr-xshell/hush_test/hush-z_slow/leak_all1.tests61
-rw-r--r--shell/hush_test/hush-z_slow/leak_var.right2
-rwxr-xr-xshell/hush_test/hush-z_slow/leak_var.tests103
-rw-r--r--shell/hush_test/hush-z_slow/leak_var2.right3
-rwxr-xr-xshell/hush_test/hush-z_slow/leak_var2.tests37
6 files changed, 80 insertions, 129 deletions
diff --git a/shell/hush_test/hush-z_slow/leak_all1.right b/shell/hush_test/hush-z_slow/leak_all1.right
new file mode 100644
index 0000000..c6f0334
--- /dev/null
+++ b/shell/hush_test/hush-z_slow/leak_all1.right
@@ -0,0 +1,3 @@
+Warm up
+Measuring memory leak...
+Ok
diff --git a/shell/hush_test/hush-z_slow/leak_all1.tests b/shell/hush_test/hush-z_slow/leak_all1.tests
new file mode 100755
index 0000000..6834d9a
--- /dev/null
+++ b/shell/hush_test/hush-z_slow/leak_all1.tests
@@ -0,0 +1,61 @@
+# "Check many leaks" test #1
+# Cramming all kinds of weird commands in here.
+# As you find leaks, please create separate, small test
+# for each leak.
+# Narrowing down the leak using this large test may be difficult.
+# It is intended to be a blanket "is everything ok?" test
+
+echo "Warm up"
+i=1
+l=1
+t=1
+export t
+while test $i != 99; do
+ t=value1_$i; t=value2_$i true; t=value3_$i /bin/true; t=value4_$i exec 1>&1
+ { t=value3_$i /bin/true; } </dev/null
+ if true; t=valueA_$i false >>/dev/null; true; then
+ : << HERE >/dev/null; true <<HERE
+Hello builtin :
+HERE
+Hello true
+HERE
+ elif false; then
+ true; echo Doesnt run
+ else
+ { true; }; echo Doesnt run too >>/foo/bar
+ fi
+ : $((i++))
+done
+
+memleak
+
+echo "Measuring memory leak..."
+# Please copy the entire block from above verbatim
+i=1
+l=1
+t=1
+export t
+while test $i != 99; do
+ t=value1_$i; t=value2_$i true; t=value3_$i /bin/true; t=value4_$i exec 1>&1
+ { t=value3_$i /bin/true; } </dev/null
+ if true; t=valueA_$i false >>/dev/null; true; then
+ : << HERE >/dev/null; true <<HERE
+Hello builtin :
+HERE
+Hello true
+HERE
+ elif false; then
+ true; echo Doesnt run
+ else
+ { true; }; echo Doesnt run too >>/foo/bar
+ fi
+ : $((i++))
+done
+
+memleak
+kb=$?
+if test $kb -le 4; then
+ echo Ok #$kb
+else
+ echo "Bad: $kb kb (or more) leaked"
+fi
diff --git a/shell/hush_test/hush-z_slow/leak_var.right b/shell/hush_test/hush-z_slow/leak_var.right
index 7bccc1e..1d4d6ff 100644
--- a/shell/hush_test/hush-z_slow/leak_var.right
+++ b/shell/hush_test/hush-z_slow/leak_var.right
@@ -1,2 +1,2 @@
Measuring memory leak...
-vsz does not grow
+Ok
diff --git a/shell/hush_test/hush-z_slow/leak_var.tests b/shell/hush_test/hush-z_slow/leak_var.tests
index b3e13e3..41c09e4 100755
--- a/shell/hush_test/hush-z_slow/leak_var.tests
+++ b/shell/hush_test/hush-z_slow/leak_var.tests
@@ -1,96 +1,4 @@
-pid=$$
-
-# Warm up
-beg=`ps -o pid,vsz | grep "^ *$pid "`
-i=1
-while test $i != X; do
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- i=1$i
- if test $i = 1111111111111111111111111111111111111111111111; then i=2; fi
- if test $i = 1111111111111111111111111111111111111111111112; then i=3; fi
- if test $i = 1111111111111111111111111111111111111111111113; then i=4; fi
- if test $i = 1111111111111111111111111111111111111111111114; then i=5; fi
- if test $i = 1111111111111111111111111111111111111111111115; then i=6; fi
- if test $i = 1111111111111111111111111111111111111111111116; then i=7; fi
- if test $i = 1111111111111111111111111111111111111111111117; then i=8; fi
- if test $i = 1111111111111111111111111111111111111111111118; then i=9; fi
- if test $i = 1111111111111111111111111111111111111111111119; then i=a; fi
- if test $i = 111111111111111111111111111111111111111111111a; then i=b; fi
- if test $i = 111111111111111111111111111111111111111111111b; then i=c; fi
- if test $i = 111111111111111111111111111111111111111111111c; then i=d; fi
- if test $i = 111111111111111111111111111111111111111111111d; then i=e; fi
- if test $i = 111111111111111111111111111111111111111111111e; then i=f; fi
- if test $i = 111111111111111111111111111111111111111111111f; then i=g; fi
- if test $i = 111111111111111111111111111111111111111111111g; then i=h; fi
- if test $i = 111111111111111111111111111111111111111111111h; then i=i; fi
- if test $i = 111111111111111111111111111111111111111111111i; then i=j; fi
- if test $i = 111111111111111111111111111111111111111111111j; then i=X; fi
-done
-end=`ps -o pid,vsz | grep "^ *$pid "`
-
-# Warm up again (I do need it on my machine)
-beg=`ps -o pid,vsz | grep "^ *$pid "`
-i=1
-while test $i != X; do
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- unset t
- t=111111111111111111111111111111111111111111111111111111111111111111111111
- export t
- i=1$i
- if test $i = 1111111111111111111111111111111111111111111111; then i=2; fi
- if test $i = 1111111111111111111111111111111111111111111112; then i=3; fi
- if test $i = 1111111111111111111111111111111111111111111113; then i=4; fi
- if test $i = 1111111111111111111111111111111111111111111114; then i=5; fi
- if test $i = 1111111111111111111111111111111111111111111115; then i=6; fi
- if test $i = 1111111111111111111111111111111111111111111116; then i=7; fi
- if test $i = 1111111111111111111111111111111111111111111117; then i=8; fi
- if test $i = 1111111111111111111111111111111111111111111118; then i=9; fi
- if test $i = 1111111111111111111111111111111111111111111119; then i=a; fi
- if test $i = 111111111111111111111111111111111111111111111a; then i=b; fi
- if test $i = 111111111111111111111111111111111111111111111b; then i=c; fi
- if test $i = 111111111111111111111111111111111111111111111c; then i=d; fi
- if test $i = 111111111111111111111111111111111111111111111d; then i=e; fi
- if test $i = 111111111111111111111111111111111111111111111e; then i=f; fi
- if test $i = 111111111111111111111111111111111111111111111f; then i=g; fi
- if test $i = 111111111111111111111111111111111111111111111g; then i=h; fi
- if test $i = 111111111111111111111111111111111111111111111h; then i=i; fi
- if test $i = 111111111111111111111111111111111111111111111i; then i=j; fi
- if test $i = 111111111111111111111111111111111111111111111j; then i=X; fi
-done
-end=`ps -o pid,vsz | grep "^ *$pid "`
-if test "$beg" != "$end"; then
- true echo "vsz grows: $beg -> $end"
-else
- true echo "vsz does not grow"
-fi
-
echo "Measuring memory leak..."
-beg=`ps -o pid,vsz | grep "^ *$pid "`
i=1
while test $i != X; do
unset t
@@ -128,11 +36,12 @@ while test $i != X; do
if test $i = 111111111111111111111111111111111111111111111h; then i=i; fi
if test $i = 111111111111111111111111111111111111111111111i; then i=j; fi
if test $i = 111111111111111111111111111111111111111111111j; then i=X; fi
+ memleak
done
-end=`ps -o pid,vsz | grep "^ *$pid "`
-
-if test "$beg" != "$end"; then
- echo "vsz grows: $beg -> $end"
+memleak
+kb=$?
+if test $kb -le 4; then
+ echo Ok
else
- echo "vsz does not grow"
+ echo "Bad: $kb kb (or more) leaked"
fi
diff --git a/shell/hush_test/hush-z_slow/leak_var2.right b/shell/hush_test/hush-z_slow/leak_var2.right
index 7bccc1e..c6f0334 100644
--- a/shell/hush_test/hush-z_slow/leak_var2.right
+++ b/shell/hush_test/hush-z_slow/leak_var2.right
@@ -1,2 +1,3 @@
+Warm up
Measuring memory leak...
-vsz does not grow
+Ok
diff --git a/shell/hush_test/hush-z_slow/leak_var2.tests b/shell/hush_test/hush-z_slow/leak_var2.tests
index 09f2475..0ab1315 100755
--- a/shell/hush_test/hush-z_slow/leak_var2.tests
+++ b/shell/hush_test/hush-z_slow/leak_var2.tests
@@ -1,10 +1,7 @@
-pid=$$
-
t=1
export t
-# Warm up
-beg=`ps -o pid,vsz | grep "^ *$pid "`
+echo "Warm up"
i=1
while test $i != X; do
t=111111111111111111111111111111111111111111111111111111111111111111111110$i
@@ -17,31 +14,10 @@ while test $i != X; do
if test $i = 1111111111111111111111111111111111111111111113; then i=4; fi
if test $i = 1111111111111111111111111111111111111111111114; then i=X; fi
done
-end=`ps -o pid,vsz | grep "^ *$pid "`
-# Warm up again (I do need it on my machine)
-beg=`ps -o pid,vsz | grep "^ *$pid "`
-i=1
-while test $i != X; do
- t=111111111111111111111111111111111111111111111111111111111111111111111110$i
- t=111111111111111111111111111111111111111111111111111111111111111111111111$i true
- t=111111111111111111111111111111111111111111111111111111111111111111111112$i /bin/true
- t=111111111111111111111111111111111111111111111111111111111111111111111113$i exec 1>&1
- i=1$i
- if test $i = 1111111111111111111111111111111111111111111111; then i=2; fi
- if test $i = 1111111111111111111111111111111111111111111112; then i=3; fi
- if test $i = 1111111111111111111111111111111111111111111113; then i=4; fi
- if test $i = 1111111111111111111111111111111111111111111114; then i=X; fi
-done
-end=`ps -o pid,vsz | grep "^ *$pid "`
-if test "$beg" != "$end"; then
- true echo "vsz grows: $beg -> $end"
-else
- true echo "vsz does not grow"
-fi
+memleak
echo "Measuring memory leak..."
-beg=`ps -o pid,vsz | grep "^ *$pid "`
i=1
while test $i != X; do
t=111111111111111111111111111111111111111111111111111111111111111111111110$i
@@ -54,10 +30,11 @@ while test $i != X; do
if test $i = 1111111111111111111111111111111111111111111113; then i=4; fi
if test $i = 1111111111111111111111111111111111111111111114; then i=X; fi
done
-end=`ps -o pid,vsz | grep "^ *$pid "`
-if test "$beg" != "$end"; then
- echo "vsz grows: $beg -> $end"
+memleak
+kb=$?
+if test $kb -le 4; then
+ echo Ok
else
- echo "vsz does not grow"
+ echo "Bad: $kb kb (or more) leaked"
fi