diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/data/test613 | 10 | ||||
| -rw-r--r-- | tests/data/test614 | 10 | ||||
| -rwxr-xr-x | tests/libtest/test613.pl | 29 |
3 files changed, 28 insertions, 21 deletions
diff --git a/tests/data/test613 b/tests/data/test613 index 40b5ddb2c..db0534a5f 100644 --- a/tests/data/test613 +++ b/tests/data/test613 @@ -10,11 +10,11 @@ directory # Server-side <reply> <datacheck> -d????????? N U U N ??? N NN:NN . -d????????? N U U N ??? N NN:NN .. -d????????? N U U N ??? N NN:NN asubdir --rw?rw?rw? 1 U U 37 Jan 1 2000 plainfile.txt --r-?r-?r-? 1 U U 47 Dec 31 2000 rofile.txt +d????????? N U U N ??? N NN:NN . +d????????? N U U N ??? N NN:NN .. +d????????? N U U N ??? N NN:NN asubdir +-rw?rw?rw? 1 U U 37 Jan 1 2000 plainfile.txt +-r-?r-?r-? 1 U U 47 Dec 31 2000 rofile.txt </datacheck> </reply> diff --git a/tests/data/test614 b/tests/data/test614 index 407e3e4a6..1767743cf 100644 --- a/tests/data/test614 +++ b/tests/data/test614 @@ -11,11 +11,11 @@ directory # Server-side <reply> <datacheck> -d????????? N U U N ??? N NN:NN . -d????????? N U U N ??? N NN:NN .. -d????????? N U U N ??? N NN:NN asubdir --r-?r-?r-? 1 U U 37 Jan 1 2000 plainfile.txt --r-?r-?r-? 1 U U 47 Dec 31 2000 rofile.txt +d????????? N U U N ??? N NN:NN . +d????????? N U U N ??? N NN:NN .. +d????????? N U U N ??? N NN:NN asubdir +-r-?r-?r-? 1 U U 37 Jan 1 2000 plainfile.txt +-r-?r-?r-? 1 U U 47 Dec 31 2000 rofile.txt </datacheck> </reply> diff --git a/tests/libtest/test613.pl b/tests/libtest/test613.pl index 778c4a911..19ef7d687 100755 --- a/tests/libtest/test613.pl +++ b/tests/libtest/test613.pl @@ -58,27 +58,34 @@ elsif ($ARGV[0] eq "postprocess") # Process the directory file to remove all information that # could be inconsistent from one test run to the next (e.g. # file date) or may be unsupported on some platforms (e.g. - # Windows). Also, since >7.16.4, the sftp directory listing + # Windows). Also, since 7.17.0, the sftp directory listing # format can be dependent on the server (with a recent # enough version of libssh2) so this script must also - # canonicalize the format. These are the two formats - # currently supported: - # -r--r--r-- 1 ausername grp 47 Dec 31 2000 rofile.txt + # canonicalize the format. Here are examples of the general + # format supported: + # -r--r--r-- 12 ausername grp 47 Dec 31 2000 rofile.txt # -r--r--r-- 1 1234 4321 47 Dec 31 2000 rofile.txt - # The "canonical" format is similar to the second (which is - # the one generated with an older libssh2): - # -r-?r-?r-? 1 U U 47 Dec 31 2000 rofile.txt + # The "canonical" format is similar to the first (which is + # the one generated on a typical Linux installation): + # -r-?r-?r-? 12 U U 47 Dec 31 2000 rofile.txt my $newfile = $logfile . ".new"; open(IN, "<$logfile") || die "$!"; open(OUT, ">$newfile") || die "$!"; while (<IN>) { - s/^(.)(..).(..).(..).\s*(\d+)\s+\S+ \S?.{5}?(\s+\d)+(.{12}?)/\1\2?\3?\4? \5 U U\6\7/; + /^(.)(..).(..).(..).\s*(\S+)\s+\S+\s+\S+\s+(\S+)\s+(\S+\s+\S+\s+\S+)(.*)$/; if ($1 eq "d") { - # Erase inodes, size, mode, time fields for directories - s/^.{14}?(.{12}?).{11}? ... .\d .\d:\d\d/d????????? N\1 N ??? N NN:NN/; + # Erase all directory metadata except for the name, as it is not + # consistent for across all test systems and filesystems + print OUT "d????????? N U U N ??? N NN:NN$8\n"; + } elsif ($1 eq "-") { + # Erase user and group names, as they are not consistent across + # all test systems + printf OUT "%s%s?%s?%s?%5d U U %15d %s%s\n", $1,$2,$3,$4,$5,$6,$7,$8; + } else { + # Unexpected format; just pass it through and let the test fail + print OUT $_; } - print OUT $_; } close(OUT); |