This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Configure nits: do not use /tmp to avoid potential security
authorJarkko Hietaniemi <jhi@iki.fi>
Wed, 15 Mar 2000 23:36:53 +0000 (23:36 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 15 Mar 2000 23:36:53 +0000 (23:36 +0000)
problems (Andy Dougherty: this does not fix the rampant
use of /tmp by the various utilities like C compilers, though.
Just don't run Configure as root if you care about security.),
fix man3dir bug (both from Andy Dougherty); fix hints files
not to use /tmp; retract #4993 (the description of the *symbols
variables is okay, after all); regen Configure.

p4raw-id: //depot/metaconfig@5757

U/installdirs/man3dir.U
U/modified/d_flexfnam.U [new file with mode: 0644]

index f6660a6..ff17802 100644 (file)
@@ -93,7 +93,7 @@ echo "If you don't want the manual sources installed, answer 'none'."
 ?X: remove any trailing -3.0 or other version indification from $package
 prog=`echo $package | $sed 's/-*[0-9.]*$//'`
 case "$man3dir" in
-'')    dflt=`echo $man1dir | $sed -e 's/man1/man3/g' -e 's/man\.1/man\.3/g'`
+'')    dflt=`echo "$man1dir" | $sed -e 's/man1/man3/g' -e 's/man\.1/man\.3/g'`
        if $test -d "$privlib/man/man3"; then
                cat <<EOM >&4
 
@@ -111,16 +111,18 @@ EOM
                esac
     fi
        ;;
-' ') dflt=none;;
 *)     dflt="$man3dir" ;;
 esac
+case "$dflt" in
+' ') dflt=none ;;
+esac
 echo " "
 fn=dn+~
 rp="Where do the $package library man pages (source) go?"
 . ./getfile
 man3dir="$ans"
 man3direxp="$ansexp"
-case "$man1dir" in
+case "$man3dir" in
 '')    man3dir=' '
        installman3dir='';;
 esac
diff --git a/U/modified/d_flexfnam.U b/U/modified/d_flexfnam.U
new file mode 100644 (file)
index 0000000..a1f780e
--- /dev/null
@@ -0,0 +1,57 @@
+?RCS: $Id: d_flexfnam.U,v 3.0 1993/08/18 12:06:04 ram Exp $
+?RCS:
+?RCS: Copyright (c) 1991-1993, Raphael Manfredi
+?RCS: 
+?RCS: You may redistribute only under the terms of the Artistic Licence,
+?RCS: as specified in the README file that comes with the distribution.
+?RCS: You may reuse parts of this distribution only within the terms of
+?RCS: that same Artistic Licence; a copy of which may be found at the root
+?RCS: of the source tree for dist 3.0.
+?RCS:
+?RCS: $Log: d_flexfnam.U,v $
+?RCS: Revision 3.0  1993/08/18  12:06:04  ram
+?RCS: Baseline for dist 3.0 netwide release.
+?RCS:
+?MAKE:d_flexfnam: cat rm test Setvar
+?MAKE: -pick add $@ %<
+?S:d_flexfnam:
+?S:    This variable conditionally defines the FLEXFILENAMES symbol, which
+?S:    indicates that the system supports filenames longer than 14 characters.
+?S:.
+?C:FLEXFILENAMES:
+?C:    This symbol, if defined, indicates that the system supports filenames
+?C:    longer than 14 characters.
+?C:.
+?H:#$d_flexfnam        FLEXFILENAMES           /**/
+?H:.
+?T:first second
+?LINT:set d_flexfnam
+: see if we can have long filenames
+echo " "
+?X:
+?X: We have to test in both /tmp and . because of NFS (remote server may allow
+?X: long filenames while the local filesystem cannot support them). If at least
+?X: one of those file systems cannot support long filenames, then we assume the
+?X: whole system can't.
+?X:
+first=123456789abcdef
+$rm -f $first
+if (echo hi >$first) 2>/dev/null; then
+       if $test -f 123456789abcde; then
+               echo 'You cannot have filenames longer than 14 characters.  Sigh.' >&4
+               val="$undef"
+       else
+               echo 'You can have filenames longer than 14 characters.'>&4
+               val="$define"
+       fi
+else
+       $cat <<'EOM'
+You can't have filenames longer than 14 chars.
+You can't even think about them!
+EOM
+       val="$undef"
+fi 
+set d_flexfnam
+eval $setvar
+$rm -rf 123456789abcde*
+