This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Various Configure nits by Philip Newton,
[metaconfig.git] / U / modified / libpth.U
CommitLineData
959f3c4c
JH
1?RCS: $Id: libpth.U,v 3.0.1.6 1997/02/28 16:08:49 ram Exp $
2?RCS:
3?RCS: Copyright (c) 1991-1993, Raphael Manfredi
4?RCS:
5?RCS: You may redistribute only under the terms of the Artistic Licence,
6?RCS: as specified in the README file that comes with the distribution.
7?RCS: You may reuse parts of this distribution only within the terms of
8?RCS: that same Artistic Licence; a copy of which may be found at the root
9?RCS: of the source tree for dist 3.0.
10?RCS:
11?RCS: $Log: libpth.U,v $
12?RCS: Revision 3.0.1.6 1997/02/28 16:08:49 ram
13?RCS: patch61: new loclibpth variable
14?RCS:
15?RCS: Revision 3.0.1.5 1995/01/11 15:31:30 ram
16?RCS: patch45: call ./mips instead of just mips (WED)
17?RCS:
18?RCS: Revision 3.0.1.4 1994/08/29 16:29:15 ram
19?RCS: patch32: added /lib/pa1.1 for HP-UX specially tuned PA-RISC libs (ADO)
20?RCS: patch32: fixed information message, making it clearer (ADO)
21?RCS:
22?RCS: Revision 3.0.1.3 1994/06/20 07:03:54 ram
23?RCS: patch30: added /usr/shlib to glibpth for shared-only libraries
24?RCS:
25?RCS: Revision 3.0.1.2 1994/05/13 15:26:57 ram
26?RCS: patch27: fixed a typo (libpth -> glibpth)
27?RCS:
28?RCS: Revision 3.0.1.1 1994/05/06 15:07:53 ram
29?RCS: patch23: now asks for library directories to be searched (ADO)
30?RCS:
31?RCS: Revision 3.0 1993/08/18 12:09:02 ram
32?RCS: Baseline for dist 3.0 netwide release.
33?RCS:
34?X:
35?X: This unit initializes the path for C library lookup.
36?X:
37?MAKE:libpth glibpth xlibpth plibpth loclibpth: \
bdf957e2 38 usrinc incpath test cat Myread Oldconfig
959f3c4c
JH
39?MAKE: -pick add $@ %<
40?S:libpth:
41?S: This variable holds the general path (space-separated) used to find
42?S: libraries. It is intended to be used by other units.
43?S:.
44?S:glibpth:
45?S: This variable holds the general path (space-separated) used to
46?S: find libraries. It may contain directories that do not exist on
47?S: this platform, libpth is the cleaned-up version.
48?S:.
49?S:xlibpth:
50?S: This variable holds extra path (space-separated) used to find
51?S: libraries on this platform, for example CPU-specific libraries
52?S: (on multi-CPU platforms) may be listed here.
53?S:.
54?S:loclibpth:
55?S: This variable holds the paths (space-separated) used to find local
56?S: libraries. It is prepended to libpth, and is intended to be easily
57?S: set from the command line.
58?S:.
59?S:plibpth:
60?S: Holds the private path used by Configure to find out the libraries.
61?S: Its value is prepend to libpth. This variable takes care of special
62?S: machines, like the mips. Usually, it should be empty.
63?S:.
64?T: xxx dlist
65?INIT:: change the next line if compiling for Xenix/286 on Xenix/386
66?INIT:xlibpth='/usr/lib/386 /lib/386'
959f3c4c
JH
67?INIT:: Possible local library directories to search.
68?INIT:loclibpth="/usr/local/lib /opt/local/lib /usr/gnu/lib"
69?INIT:loclibpth="$loclibpth /opt/gnu/lib /usr/GNU/lib /opt/GNU/lib"
70?INIT:
71?INIT:: general looking path for locating libraries
959f3c4c 72?X: I don't know why the large & small libraries are in this order.
d12857d9 73?INIT:glibpth="/usr/lib/large /lib /usr/lib $xlibpth"
959f3c4c
JH
74?INIT:glibpth="$glibpth /lib/large /usr/lib/small /lib/small"
75?INIT:glibpth="$glibpth /usr/ccs/lib /usr/ucblib /usr/local/lib"
d12857d9
JH
76?X: /shlib is for Digital Unix 4.0
77?X: /usr/shlib is for OSF/1 systems.
4ee071c7
JH
78?INIT:test -f /usr/shlib/libc.so && glibpth="/usr/shlib $glibpth"
79?INIT:test -f /shlib/libc.so && glibpth="/shlib $glibpth"
959f3c4c
JH
80?INIT:
81?INIT:: Private path used by Configure to find libraries. Its value
82?INIT:: is prepended to libpth. This variable takes care of special
83?INIT:: machines, like the mips. Usually, it should be empty.
84?INIT:plibpth=''
85?INIT:
86?LINT:describe xlibpth glibpth
33b2427b 87?LINT:use use64bitint
959f3c4c
JH
88: Set private lib path
89case "$plibpth" in
90'') if ./mips; then
91?X: on mips, we DO NOT want /lib, and we want $incpath/usr/lib
92 plibpth="$incpath/usr/lib /usr/local/lib /usr/ccs/lib"
93 fi;;
94esac
95case "$libpth" in
96' ') dlist='';;
97'') dlist="$loclibpth $plibpth $glibpth";;
98*) dlist="$libpth";;
99esac
100
101: Now check and see which directories actually exist, avoiding duplicates
102libpth=''
103for xxx in $dlist
104do
105 if $test -d $xxx; then
106 case " $libpth " in
107 *" $xxx "*) ;;
108 *) libpth="$libpth $xxx";;
109 esac
110 fi
111done
112$cat <<'EOM'
113
114Some systems have incompatible or broken versions of libraries. Among
115the directories listed in the question below, please remove any you
116know not to be holding relevant libraries, and add any that are needed.
117Say "none" for none.
118
119EOM
120case "$libpth" in
121'') dflt='none';;
122*)
123?X: strip leading space
124 set X $libpth
125 shift
126 dflt=${1+"$@"}
127 ;;
128esac
129rp="Directories to use for library searches?"
130. ./myread
131case "$ans" in
132none) libpth=' ';;
133*) libpth="$ans";;
134esac
135