From patchwork Mon Mar 12 18:51:45 2018 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Andreas Dilger X-Patchwork-Id: 884762 Return-Path: X-Original-To: patchwork-incoming@ozlabs.org Delivered-To: patchwork-incoming@ozlabs.org Authentication-Results: ozlabs.org; spf=none (mailfrom) smtp.mailfrom=vger.kernel.org (client-ip=209.132.180.67; helo=vger.kernel.org; envelope-from=linux-ext4-owner@vger.kernel.org; receiver=) Authentication-Results: ozlabs.org; dmarc=none (p=none dis=none) header.from=dilger.ca Received: from vger.kernel.org (vger.kernel.org [209.132.180.67]) by ozlabs.org (Postfix) with ESMTP id 400S3J4gnVz9sLw for ; Tue, 13 Mar 2018 05:59:56 +1100 (AEDT) Received: (majordomo@vger.kernel.org) by vger.kernel.org via listexpand id S1751300AbeCLS7z (ORCPT ); Mon, 12 Mar 2018 14:59:55 -0400 Received: from smtp-out-so.shaw.ca ([64.59.136.137]:55692 "EHLO smtp-out-so.shaw.ca" rhost-flags-OK-OK-OK-OK) by vger.kernel.org with ESMTP id S1751232AbeCLS7z (ORCPT ); Mon, 12 Mar 2018 14:59:55 -0400 X-Greylist: delayed 487 seconds by postgrey-1.27 at vger.kernel.org; Mon, 12 Mar 2018 14:59:55 EDT Received: from cabot.adilger.int ([70.77.216.213]) by shaw.ca with ESMTP id vSXxenzXdYxCTvSXyeYKSP; Mon, 12 Mar 2018 12:51:47 -0600 X-Authority-Analysis: v=2.3 cv=cav8UELM c=1 sm=1 tr=0 a=BQvS1EmAg2ttxjPVUuc1UQ==:117 a=BQvS1EmAg2ttxjPVUuc1UQ==:17 a=RPJ6JBhKAAAA:8 a=JbbKWGrA_TztZIA0FbwA:9 a=fa_un-3J20JGBB2Tu-mn:22 From: Andreas Dilger To: tytso@mit.edu Cc: linux-ext4@vger.kernel.org, Lukas Czerner , Andreas Dilger Subject: [PATCH] tests: replace perl usage with shell built-in Date: Mon, 12 Mar 2018 12:51:45 -0600 Message-Id: <1520880705-8205-1-git-send-email-adilger@dilger.ca> X-Mailer: git-send-email 1.8.0 In-Reply-To: <20180312140913.mjfz7y3ilgc2bj6e@rh_laptop> References: <20180312140913.mjfz7y3ilgc2bj6e@rh_laptop> X-CMAE-Envelope: MS4wfP1TMc8yboEN3f3A/lxMmVQzhycLAPInzb1GXuRYwvBrbdsVM+Fs+bQC08sf6q168cbbgyOH883sKcH53J6UFnqjnuTB7tL+EWF3OjsMwhkDjiSJ2EU0 bVbSjkTPJr4YZWUgeZwX1AJKBkCrJ5F184yTZbyKjxkY9CtJ3s6xU2uPPrZfhKXRoRFkIKQ23gnWGYARRRs8qVbAFt4MlFg2idE3ash4R56chGXw8xgc3ZrF nkSvMGqEWztfcnTYbGbJHA== Sender: linux-ext4-owner@vger.kernel.org Precedence: bulk List-ID: X-Mailing-List: linux-ext4@vger.kernel.org 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 --- tests/d_xattr_sorting/script | 3 +-- tests/f_create_symlinks/script | 8 +++++--- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/tests/d_xattr_sorting/script b/tests/d_xattr_sorting/script index 459a66a..f581c36 100644 --- a/tests/d_xattr_sorting/script +++ b/tests/d_xattr_sorting/script @@ -19,8 +19,7 @@ echo Exit status is $status >> $OUT B=$(mktemp ${TMPDIR:-/tmp}/b.XXXXXX) -perl -e 'print "x" x 256;' > $B - +B="xxxxxxxx"; B+=$B; B+=$B; B+=$B; B+=$B; B+=$B echo "ea_set -f /tmp/b / security.SMEG64" > $OUT.new $DEBUGFS -w -R "ea_set -f $B / security.SMEG64" $TMPFILE >> $OUT.new 2>&1 status=$? diff --git a/tests/f_create_symlinks/script b/tests/f_create_symlinks/script index 779d92e..1d10d32 100644 --- a/tests/f_create_symlinks/script +++ b/tests/f_create_symlinks/script @@ -23,11 +23,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 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 70 500 1023 1024 1500; do echo "debugfs -R \"stat /l_$i\" test.img" >> $OUT