Policy_sh.SH

   1 case $CONFIGDOTSH in
   2 '') . ./config.sh ;;
   3 esac
   4 echo "Extracting Policy.sh (with variable substitutions)"
   5 $spitshell <<!GROK!THIS! >Policy.sh
   6 $startsh
   7 #
   8 #  This file was produced by running the Policy_sh.SH script, which
   9 #  gets its values from config.sh, which is generally produced by
  10 #  running Configure.
  11 #
  12 #  The idea here is to distill in one place the common site-wide
  13 #  "policy" answers (such as installation directories) that are
  14 #  to be "sticky".  If you keep the file Policy.sh around in
  15 #  the same directory as you are building Perl, then Configure will
  16 #  (by default) load up the Policy.sh file just before the
  17 #  platform-specific hints file and rewrite it at the end.
  18 #
  19 #   The sequence of events is as follows:
  20 #   A:  If you are NOT re-using an old config.sh:
  21 #   1.  At start-up, Configure loads up the defaults from the
  22 #       os-specific  hints/osname_osvers.sh file and any previous
  23 #       Policy.sh file.
  24 #   2.  At the end, Configure runs Policy_sh.SH, which creates
  25 #       Policy.sh, overwriting a previous Policy.sh if necessary.
  26 #
  27 #   B: If you are re-using an old config.sh:
  28 #   1.  At start-up, Configure loads up the defaults from config.sh,
  29 #       ignoring any previous Policy.sh file.
  30 #   2.  At the end, Configure runs Policy_sh.SH, which creates
  31 #       Policy.sh, overwriting a previous Policy.sh if necessary.
  32 #
  33 #  Thus the Policy.sh file gets overwritten each time
  34 #  Configure is run.  Any variables you add to Policy.sh will be lost
  35 #  unless you copy Policy.sh somewhere else before running Configure.
  36 #
  37 #  Allow Configure command-line overrides; usually these won't be
  38 #  needed, but something like -Dprefix=/test/location can be quite
  39 #  useful for testing out new versions.
  40
  41 #Site-specific values:
  42
  43 case "\$perladmin" in
  44 '') perladmin='$perladmin' ;;
  45 esac
  46
  47 # Installation prefixes.  Allow a Configure -D override.  You
  48 # may wish to reinstall perl under a different prefix, perhaps
  49 # in order to test a different configuration.
  50 # For an explanation of the installation directories, see the
  51 # INSTALL file section on "Installation Directories".
  52 case "\$prefix" in
  53 '') prefix='$prefix' ;;
  54 esac
  55
  56 # By default, the next three are the same as \$prefix.
  57 # If the user changes \$prefix, and previously \$siteprefix was the
  58 # same as \$prefix, then change \$siteprefix as well.
  59 # Use similar logic for \$vendorprefix and \$installprefix.
  60
  61 case "\$siteprefix" in
  62 '') if test "$siteprefix" = "$prefix"; then
  63         siteprefix="\$prefix"
  64     else
  65         siteprefix='$siteprefix'
  66     fi
  67     ;;
  68 esac
  69 case "\$vendorprefix" in
  70 '') if test "$vendorprefix" = "$prefix"; then
  71         vendorprefix="\$prefix"
  72     else
  73         vendorprefix='$vendorprefix'
  74     fi
  75     ;;
  76 esac
  77
  78 # Where installperl puts things.
  79 case "\$installprefix" in
  80 '') if test "$installprefix" = "$prefix"; then
  81         installprefix="\$prefix"
  82     else
  83         installprefix='$installprefix'
  84     fi
  85     ;;
  86 esac
  87
  88 # Installation directives.  Note that each one comes in three flavors.
  89 # For example, we have privlib, privlibexp, and installprivlib.
  90 # privlib is for private (to perl) library files.
  91 # privlibexp is the same, except any '~' the user gave to Configure
  92 #     is expanded to the user's home directory.  This is figured
  93 #     out automatically by Configure, so you don't have to include it here.
  94 # installprivlib is for systems (such as those running AFS) that
  95 #     need to distinguish between the place where things
  96 #     get installed and where they finally will reside.  As of 5.005_6x,
  97 #     this too is handled automatically by Configure based on
  98 #     $installprefix, so it isn't included here either.
  99 #
 100 # Note also that there are three broad hierarchies of installation
 101 # directories, as discussed in the INSTALL file under
 102 # "Installation Directories":
 103 #
 104 #  =item Directories for the perl distribution
 105 #
 106 #  =item Directories for site-specific add-on files
 107 #
 108 #  =item Directories for vendor-supplied add-on files
 109 #
 110 #  See Porting/Glossary for the definitions of these names, and see the
 111 #  INSTALL file for further explanation and some examples.
 112 #
 113 # In each case, if your previous value was the default, leave it commented
 114 # out.  That way, if you override prefix, all of these will be
 115 # automatically adjusted.
 116 #
 117 # WARNING:  Be especially careful about architecture-dependent and
 118 # version-dependent names, particularly if you reuse this file for
 119 # different versions of perl.
 120
 121 !GROK!THIS!
 122
 123 for var in \
 124         bin scriptdir privlib archlib man1dir man3dir html1dir html3dir \
 125         sitebin sitescript sitelib sitearch \
 126                 siteman1 siteman3 sitehtml1 sitehtml3 \
 127         vendorbin vendorscript vendorlib vendorarch \
 128                 vendorman1 vendorman3 vendorhtml1 vendorhtml3
 129 do
 130
 131     case "$var" in
 132
 133     # Directories for the core perl components
 134     bin)        dflt=$prefix/bin ;;
 135     # The scriptdir test is more complex, but this is probably usually ok.
 136     scriptdir)
 137         if $test -d $prefix/script; then
 138             dflt=$prefix/script
 139         else
 140             dflt=$bin
 141         fi
 142         ;;
 143     privlib)
 144         case "$prefix" in
 145         *perl*) dflt=$prefix/lib/$version ;;
 146         *)      dflt=$prefix/lib/$package/$version ;;
 147         esac
 148         ;;
 149     archlib)    dflt="$privlib/$archname" ;;
 150
 151     man1dir)    dflt="$prefix/man/man1" ;;
 152     man3dir)    dflt="$prefix/man/man3" ;;
 153     # Can we assume all sed's have greedy matching?
 154     man1ext)    dflt=`echo $man1dir | sed -e 's!.*man!!' -e 's!^\.!!'` ;;
 155     man3ext)    dflt=`echo $man3dir | sed -e 's!.*man!!' -e 's!^\.!!'` ;;
 156
 157     # We don't know what to do with these yet.
 158     html1dir)   dflt='' ;;
 159     htm31dir)   dflt='' ;;
 160
 161     # Directories for site-specific add-on files
 162     sitebin)    dflt=$siteprefix/bin ;;
 163     sitescript)
 164         if $test -d $siteprefix/script; then
 165             dflt=$siteprefix/script
 166         else
 167             dflt=$sitebin
 168         fi
 169         ;;
 170     sitelib)
 171         case "$siteprefix" in
 172         *perl*) dflt=$prefix/lib/site_perl/$version ;;
 173         *)      dflt=$prefix/lib/$package/site_perl/$version ;;
 174         esac
 175         ;;
 176     sitearch)   dflt="$sitelib/$archname" ;;
 177
 178     siteman1)   dflt="$siteprefix/man/man1" ;;
 179     siteman3)   dflt="$siteprefix/man/man3" ;;
 180     # We don't know what to do with these yet.
 181     sitehtml1)  dflt='' ;;
 182     sitehtm31dir)       dflt='' ;;
 183
 184     # Directories for vendor-supplied add-on files
 185     # These are all usually empty.
 186     vendor*)
 187         if test X"$vendorprefix" = X""; then
 188             dflt=''
 189         else
 190             case "$var" in
 191             vendorbin)  dflt=$vendorprefix/bin ;;
 192             vendorscript)
 193                 if $test -d $vendorprefix/script; then
 194                     dflt=$vendorprefix/script
 195                 else
 196                     dflt=$vendorbin
 197                 fi
 198                 ;;
 199             vendorlib)
 200                 case "$vendorprefix" in
 201                 *perl*) dflt=$prefix/lib/vendor_perl/$version ;;
 202                 *)      dflt=$prefix/lib/$package/vendor_perl/$version ;;
 203                 esac
 204                 ;;
 205             vendorarch) dflt="$vendorlib/$archname" ;;
 206
 207             vendorman1) dflt="$vendorprefix/man/man1" ;;
 208             vendorman3) dflt="$vendorprefix/man/man3" ;;
 209             # We don't know what to do with these yet.
 210             vendorhtml1)        dflt='' ;;
 211             vendorhtm3) dflt='' ;;
 212
 213             esac  # End of vendorprefix != ''
 214         fi
 215         ;;
 216     esac
 217
 218     eval val="\$$var"
 219     if test X"$val" = X"$dflt"; then
 220         echo "# $var='$dflt'"
 221     else
 222         echo "# Preserving custom $var"
 223         echo "$var='$val'"
 224     fi
 225
 226 done >> Policy.sh
 227
 228 $spitshell <<!GROK!THIS! >>Policy.sh
 229
 230 #  Lastly, you may add additional items here.  For example, to set the
 231 #  pager to your local favorite value, uncomment the following line in
 232 #  the original Policy_sh.SH file and re-run   sh Policy_sh.SH.
 233 #
 234 #  pager='$pager'
 235 #
 236 #  A full Glossary of all the config.sh variables is in the file
 237 #  Porting/Glossary.
 238
 239 !GROK!THIS!
 240
 241 #Credits:
 242 #   The original design for this Policy.sh file came from Wayne Davison,
 243 #   maintainer of trn.
 244 #   This version for Perl5.004_61 originally written by
 245 #   Andy Dougherty <doughera@lafayette.edu>.
 246 #   This file may be distributed under the same terms as Perl itself.