A couple of tests use perl only for generating a string of N characters
long. Instead, expand an environment variable to the required length.
Signed-off-by: Andreas Dilger <adilger@xxxxxxxxx>
---
tests/d_xattr_sorting/script | 3 ++-
tests/f_create_symlinks/script | 8 +++++---
2 files changed, 7 insertions(+), 4 deletions(-)
diff --git a/tests/d_xattr_sorting/script b/tests/d_xattr_sorting/script
index a599f3c..dc92751 100644
--- a/tests/d_xattr_sorting/script
+++ b/tests/d_xattr_sorting/script
@@ -22,7 +22,8 @@ echo Exit status is $status >> $OUT
B=$(mktemp ${TMPDIR:-/tmp}/b.XXXXXX)
-perl -e 'print "x" x 256;' > $B
+F="xxxxxxxx"; F+=$F; F+=$F; F+=$F; F+=$F; F+=$F
+echo "$F" | dd of=$B bs=256 count=1 2> /dev/null
echo "ea_set -f /tmp/b / security.SMEG64" > $OUT.new
$DEBUGFS -w -R "ea_set -f $B / security.SMEG64" $TMPFILE >> $OUT.new 2>&1
diff --git a/tests/f_create_symlinks/script b/tests/f_create_symlinks/script
index 7d712f5..b7c22d3 100644
--- a/tests/f_create_symlinks/script
+++ b/tests/f_create_symlinks/script
@@ -26,11 +26,13 @@ echo Exit status is $status >> $OUT.new
sed -f $cmd_dir/filter.sed -e "s;$TMPFILE;test.img;" $OUT.new >> $OUT
rm -f $OUT.new
+B="xxxxxxx"; B+=$B; B+=$B; B+=$B; B+=$B; B+=$B; B+=$B; B+=$B; B+=$B
for i in 30 60 70 500 1023 1024 1500; do
- echo "debugfs -R \"symlink /l_$i $(perl -e "print 'x' x $i;")\" test.img" >> $OUT
- $DEBUGFS -w -R "symlink /l_$i $(perl -e "print 'x' x $i;")" $TMPFILE \
- 2>&1 | sed -f $cmd_dir/filter.sed >> $OUT
+ echo "debugfs -R \"symlink /l_$i ${B:1:i}\" test.img" >> $OUT
+ $DEBUGFS -w -R "symlink /l_$i ${B:1:i}" $TMPFILE 2>&1 |
+ sed -f $cmd_dir/filter.sed >> $OUT
done
+unset B
for i in 30 60 70 500 1023 1024 1500; do
echo "debugfs -R \"stat /l_$i\" test.img" >> $OUT
--
1.8.0
