applied installperl patch, corrected other little nits
[perl.git] / Policy_sh.SH
1 case $CONFIG 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.  The Policy.sh file gets overwritten each time
11 #  Configure is run.  Any variables you add to Policy.sh will be lost
12 #  unless you copy Policy.sh somewhere else before running Configure.
13 #
14 #  The idea here is to distill in one place the common site-wide
15 #  "policy" answers (such as installation directories) that are
16 #  to be "sticky".  If you keep the file Policy.sh around in
17 #  the same directory as you are building Perl, then Configure will
18 #  (by default) load up the Policy.sh file just before the
19 #  platform-specific hints file.
20 #
21
22 #  Allow Configure command-line overrides; usually these won't be
23 #  needed, but something like -Dprefix=/test/location can be quite
24 #  useful for testing out new versions.
25
26 #Site-specific values:
27
28 case "\$perladmin" in
29 '') perladmin='$perladmin' ;;
30 esac
31
32 # Installation prefix.  Allow a Configure -D override.  You
33 # may wish to reinstall perl under a different prefix, perhaps
34 # in order to test a different configuration.
35 case "\$prefix" in
36 '') prefix='$prefix' ;;
37 esac
38
39 # Installation directives.  Note that each one comes in three flavors.
40 # For example, we have privlib, privlibexp, and installprivlib.
41 # privlib is for private (to perl) library files.
42 # privlibexp is the same, except any '~' the user gave to Configure
43 #     is expanded to the user's home directory.  This is figured
44 #     out automatically by Configure, so you don't have to include it here.
45 # installprivlib is for systems (such as those running AFS) that
46 #     need to distinguish between the place where things
47 #     get installed and where they finally will reside.
48
49 # In each case, if your previous value was the default, leave it commented
50 # out.  That way, if you override prefix, all of these will be
51 # automatically adjusted.
52 #
53 # WARNING:  Be especially careful about architecture-dependent and
54 # version-dependent names, particularly if you reuse this file for
55 # different versions of perl.
56
57 !GROK!THIS!
58
59 for var in bin scriptdir privlib archlib \
60         man1dir man3dir sitelib sitearch \
61         installbin installscript installprivlib installarchlib \
62         installman1dir installman3dir installsitelib installsitearch \
63         man1ext man3ext; do
64         
65     case "$var" in
66     bin)        dflt=$prefix/bin ;;
67     # The scriptdir test is more complex, but this is probably usually ok.
68     scriptdir)
69         if $test -d $prefix/script; then
70             dflt=$prefix/script
71         else
72             dflt=$bin
73         fi
74         ;;
75     privlib)
76         case "$prefix" in
77         *perl*) dflt=$prefix/lib/$version ;;
78         *)      dflt=$prefix/lib/$package/$version ;;
79         esac
80         ;;
81     archlib)    
82         case "$prefix" in
83         *perl*) dflt=$prefix/lib/$version/$archname ;;
84         *)      dflt=$prefix/lib/$package/$version/$archname ;;
85         esac
86         ;;
87     sitelib)
88         case "$prefix" in
89         *perl*) dflt=$prefix/lib/site_perl/$apiversion ;;
90         *)      dflt=$prefix/lib/$package/site_perl/$apiversion ;;
91         esac
92         ;;
93     sitearch)   
94         case "$prefix" in
95         *perl*) dflt=$prefix/lib/site_perl/$apiversion/$archname ;;
96         *)      dflt=$prefix/lib/$package/site_perl/$apiversion/$archname ;;
97         esac
98         ;;
99     man1dir)    dflt="$prefix/man/man1" ;;
100     man3dir)
101         case "$prefix" in
102         *perl*) dflt=`echo $man1dir |
103                     sed -e 's/man1/man3/g' -e 's/man\.1/man\.3/g'` ;;
104         *)      dflt=$privlib/man/man3 ;;
105         esac
106         ;;
107
108     # Can we assume all sed's have greedy matching?
109     man1ext)    dflt=`echo $man1dir | sed -e 's!.*man!!' -e 's!^\.!!'` ;;
110     man3ext)    dflt=`echo $man3dir | sed -e 's!.*man!!' -e 's!^\.!!'` ;;
111
112     # It might be possible to fool these next tests.  Please let
113     # me know if they don't work right for you.
114     installbin)         dflt=`echo $binexp | sed 's#^/afs/#/afs/.#'`;;
115     installscript)      dflt=`echo $scriptdirexp | sed 's#^/afs/#/afs/.#'`;;
116     installprivlib)     dflt=`echo $privlibexp | sed 's#^/afs/#/afs/.#'`;;
117     installarchlib)     dflt=`echo $archlibexp | sed 's#^/afs/#/afs/.#'`;;
118     installsitelib)     dflt=`echo $sitelibexp | sed 's#^/afs/#/afs/.#'`;;
119     installsitearch)    dflt=`echo $sitearchexp | sed 's#^/afs/#/afs/.#'`;;
120     installman1dir)     dflt=`echo $man1direxp | sed 's#^/afs/#/afs/.#'`;;
121     installman3dir)     dflt=`echo $man3direxp | sed 's#^/afs/#/afs/.#'`;;
122     esac
123     
124     eval val="\$$var"
125     if test X"$val" = X"$dflt"; then
126         echo "# $var='$dflt'"
127     else
128         echo "# Preserving custom $var"
129         echo "$var='$val'"
130     fi
131
132 done >> Policy.sh
133
134 $spitshell <<!GROK!THIS! >>Policy.sh
135
136 #  Lastly, you may add additional items here.  For example, to set the
137 #  pager to your local favorite value, uncomment the following line in
138 #  the original Policy_sh.SH file and re-run   sh Policy_sh.SH.
139 #
140 #  pager='$pager'
141 #
142 #  A full Glossary of all the config.sh variables is in the file
143 #  Porting/Glossary.
144
145 !GROK!THIS!
146
147 #Credits:
148 #   The original design for this Policy.sh file came from Wayne Davison,
149 #   maintainer of trn.
150 #   This version for Perl5.004_61 originally written by
151 #   Andy Dougherty <doughera@lafcol.lafayette.edu>.
152 #   This file may be distributed under the same terms as Perl itself.
153