diff options
| author | Thomas Schwinge <thomas@codesourcery.com> | 2012-03-21 18:10:03 +0100 |
|---|---|---|
| committer | Thomas Schwinge <thomas@codesourcery.com> | 2012-03-21 18:10:03 +0100 |
| commit | 8149f976066c922eeafc10d72572c8ae59d54d31 (patch) | |
| tree | a369b34c4684b47196b52989a4d80836615006f4 /conform | |
| parent | be22ce65d7643ffcd2dcb55b73eae4d7da6f0d71 (diff) | |
Don't tamper with $HOME.
Diffstat (limited to 'conform')
| -rw-r--r-- | conform/conformtest.pl | 11 | ||||
| -rw-r--r-- | conform/run-conformtest.sh | 5 |
2 files changed, 7 insertions, 9 deletions
diff --git a/conform/conformtest.pl b/conform/conformtest.pl index 6a780203ce..83650c2454 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 d83aa799d4..c82fbcb5a4 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 |