aboutsummaryrefslogtreecommitdiff
path: root/conform
diff options
context:
space:
mode:
authorThomas Schwinge <thomas@codesourcery.com>2012-03-21 18:10:03 +0100
committerThomas Schwinge <thomas@codesourcery.com>2012-03-21 18:10:03 +0100
commit8149f976066c922eeafc10d72572c8ae59d54d31 (patch)
treea369b34c4684b47196b52989a4d80836615006f4 /conform
parentbe22ce65d7643ffcd2dcb55b73eae4d7da6f0d71 (diff)
downloadglibc-8149f976066c922eeafc10d72572c8ae59d54d31.zip
glibc-8149f976066c922eeafc10d72572c8ae59d54d31.tar.gz
glibc-8149f976066c922eeafc10d72572c8ae59d54d31.tar.bz2
Don't tamper with $HOME.
Diffstat (limited to 'conform')
-rw-r--r--conform/conformtest.pl11
-rw-r--r--conform/run-conformtest.sh5
2 files changed, 7 insertions, 9 deletions
diff --git a/conform/conformtest.pl b/conform/conformtest.pl
index 6a78020..83650c2 100644
--- a/conform/conformtest.pl
+++ b/conform/conformtest.pl
@@ -3,11 +3,11 @@
use Getopt::Long;
use POSIX;
+$standard = "XOPEN2K8";
$CC = "gcc";
-
-$standard="XOPEN2K8";
+$tmpdir = "/tmp";
GetOptions ('headers=s' => \@headers, 'standard=s' => \$standard,
- 'flags=s' => \$flags, 'cc=s' => \$CC);
+ 'flags=s' => \$flags, 'cc=s' => \$CC, 'tmpdir=s' => \$tmpdir);
@headers = split(/,/,join(',',@headers));
# List of the headers we are testing.
@@ -84,11 +84,6 @@ while ($#knownproblems >= 0) {
$isknown{pop (@knownproblems)} = 1;
}
-$uid = getuid();
-($pwname,$pwpasswd,$pwuid,$pwgid,
- $pwquota,$pwcomment,$pwgcos,$pwdir,$pwshell,$pwexpire) = getpwuid($uid);
-$tmpdir = "$pwdir";
-
$verbose = 1;
$total = 0;
diff --git a/conform/run-conformtest.sh b/conform/run-conformtest.sh
index d83aa79..c82fbcb 100644
--- a/conform/run-conformtest.sh
+++ b/conform/run-conformtest.sh
@@ -5,6 +5,9 @@ perl="$2"
cc="$3"
includes="$4"
+scratch=${objpfx}scratch
+mkdir -p "$scratch"
+
standards=("ISO" "ISO99" "ISO11" "POSIX" "XPG3" "XPG4" "UNIX98"
"XOPEN2K" "XOPEN2K8" "POSIX2008")
@@ -13,7 +16,7 @@ exitval=0
for s in ${standards[*]}; do
echo -n $s...
e=0
- if ! $perl conformtest.pl --cc="$cc" --flags="$includes" --standard=$s > ${objpfx}conform-$s.out; then
+ if ! $perl conformtest.pl --tmpdir="$scratch" --cc="$cc" --flags="$includes" --standard=$s > ${objpfx}conform-$s.out; then
e=1
fi
printf "\n%s\n" $s >> ${objpfx}run-conformtest.out