This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
makedepend.SH patch for AmigaOS from Jan-Erik Karlsson;
[perl5.git] / makedepend.SH
CommitLineData
1e2cbf11 1#! /bin/sh
2000072c 2case $CONFIGDOTSH in
8d063cd8 3'')
a0d0e21e
LW
4 if test -f config.sh; then TOP=.;
5 elif test -f ../config.sh; then TOP=..;
6 elif test -f ../../config.sh; then TOP=../..;
7 elif test -f ../../../config.sh; then TOP=../../..;
8 elif test -f ../../../../config.sh; then TOP=../../../..;
9 else
10 echo "Can't find config.sh."; exit 1
11 fi
12 . $TOP/config.sh
13 ;;
8d063cd8 14esac
a0d0e21e
LW
15: This forces SH files to create target in same directory as SH file.
16: This is so that make depend always knows where to find SH derivatives.
8d063cd8
LW
17case "$0" in
18*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
19esac
1e2cbf11 20
dbf49cb0
JH
21case "$osname" in
22amigaos) cat=/bin/cat ;; # must be absolute
23esac
24
8d063cd8 25echo "Extracting makedepend (with variable substitutions)"
7b0cd887 26rm -f makedepend
75f92628
AD
27$spitshell >makedepend <<!GROK!THIS!
28$startsh
a0d0e21e 29# makedepend.SH
8d063cd8 30#
6b9d15cb 31MAKE=$make
28e8609d 32trnl='$trnl'
1aef975c
AD
33!GROK!THIS!
34$spitshell >>makedepend <<'!NO!SUBS!'
8d063cd8 35
fb73857a 36# This script should be called with
3b5ca523 37# sh ./makedepend MAKE=$(MAKE)
fb73857a 38case "$1" in
3b5ca523 39 MAKE=*) eval $1 ;;
fb73857a
PP
40esac
41
8d063cd8
LW
42export PATH || (echo "OOPS, this isn't sh. Desperation time. I will feed myself to sh."; sh \$0; kill \$\$)
43
2000072c 44case $CONFIGDOTSH in
a0d0e21e
LW
45'')
46 if test -f config.sh; then TOP=.;
47 elif test -f ../config.sh; then TOP=..;
48 elif test -f ../../config.sh; then TOP=../..;
49 elif test -f ../../../config.sh; then TOP=../../..;
50 elif test -f ../../../../config.sh; then TOP=../../../..;
51 else
52 echo "Can't find config.sh."; exit 1
53 fi
54 . $TOP/config.sh
55 ;;
56esac
8d063cd8 57
16d20bd9
AD
58# We need .. when we are in the x2p directory if we are using the
59# cppstdin wrapper script.
8e07c86e
AD
60# Put .. and . first so that we pick up the present cppstdin, not
61# an older one lying about in /usr/local/bin.
39e571d4 62PATH=".$path_sep..$path_sep$PATH"
7b0cd887
LW
63export PATH
64
8d063cd8
LW
65$cat /dev/null >.deptmp
66$rm -f *.c.c c/*.c.c
67if test -f Makefile; then
1e2cbf11 68 rm -f $firstmakefile
337e9004 69 cp Makefile $firstmakefile
ae26f3f3
PP
70 # On QNX, 'cp' preserves timestamp, so $firstmakefile appears
71 # to be out of date. I don't know if OS/2 has touch, so do this:
72 case "$osname" in
73 os2) ;;
099685bc 74 netbsd) ;;
ae26f3f3
PP
75 *) $touch $firstmakefile ;;
76 esac
8d063cd8 77fi
337e9004 78mf=$firstmakefile
8d063cd8
LW
79if test -f $mf; then
80 defrule=`<$mf sed -n \
2d9864fe 81 -e '/^\.c\$(OBJ_EXT):.*;/{' \
8d063cd8
LW
82 -e 's/\$\*\.c//' \
83 -e 's/^[^;]*;[ ]*//p' \
84 -e q \
85 -e '}' \
2d9864fe 86 -e '/^\.c\$(OBJ_EXT): *$/{' \
8d063cd8
LW
87 -e N \
88 -e 's/\$\*\.c//' \
89 -e 's/^.*\n[ ]*//p' \
90 -e q \
91 -e '}'`
92fi
93case "$defrule" in
94'') defrule='$(CC) -c $(CFLAGS)' ;;
95esac
96
85e6fe83
LW
97: Create files in UU directory to avoid problems with long filenames
98: on systems with 14 character filename limits so file.c.c and file.c
99: might be identical
100$test -d UU || mkdir UU
101
3b5ca523
GS
102$MAKE clist || ($echo "Searching for .c files..."; \
103 $echo *.c | $tr ' ' $trnl | $egrep -v '\*' >.clist)
104for file in `$cat .clist`; do
8d063cd8 105# for file in `cat /dev/null`; do
2ebcf328
JB
106 if [ "$osname" = uwin ]; then
107 uwinfix="-e s,\\\\\\\\,/,g -e s,\\([a-zA-Z]\\):/,/\\1/,g"
108 else
9e48464b
IZ
109 if [ "$osname" = os2 ]; then
110 uwinfix="-e s,\\\\\\\\,/,g"
111 else
873b149f 112 if [ "$archname" = cygwin ]; then
8736538c
AS
113 uwinfix="-e s,\\\\\\\\,/,g"
114 else
25b8a0ba
TD
115 if [ "$osname" = posix-bc ]; then
116 uwinfix="-e s/\\*POSIX(\\(.*\\))/\\1/"
117 else
118 uwinfix=
119 fi
8736538c 120 fi
9e48464b 121 fi
2ebcf328 122 fi
8d063cd8 123 case "$file" in
3b5ca523
GS
124 *.c) filebase=`basename $file .c` ;;
125 *.y) filebase=`basename $file .y` ;;
126 esac
127 case "$file" in
7b0cd887
LW
128 */*) finc="-I`echo $file | sed 's#/[^/]*$##`" ;;
129 *) finc= ;;
8d063cd8 130 esac
3b5ca523 131 $echo "Finding dependencies for $filebase$_o."
7b0cd887
LW
132 ( $echo "#line 1 \"$file\""; \
133 $sed -n <$file \
8d063cd8 134 -e "/^${filebase}_init(/q" \
2304df62 135 -e '/^#line/d' \
8d063cd8
LW
136 -e '/^#/{' \
137 -e 's|/\*.*$||' \
138 -e 's|\\$||' \
139 -e p \
3b5ca523 140 -e '}' ) >UU/$file.c
ceda4f9b
GS
141 if [ "$osname" = os390 ]; then
142 if [ "$file" = perly.c ]; then
143 $echo '#endif' >>UU/$file.c
144 fi
145 $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c |
146 $sed \
147 -e '/^#.*<stdin>/d' \
148 -e '/^#.*"-"/d' \
149 -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \
150 -e 's/^[ ]*#[ ]*line/#/' \
151 -e '/^# *[0-9][0-9]* *[".\/]/!d' \
152 -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \
153 -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \
154 -e 's|: \./|: |' \
155 -e 's|\.c\.c|.c|' $uwinfix | \
156 $uniq | $sort | $uniq >> .deptmp
157 else
158 $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c |
159 $sed \
160 -e '1d' \
161 -e '/^#.*<stdin>/d' \
162 -e '/^#.*"-"/d' \
163 -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \
164 -e 's/^[ ]*#[ ]*line/#/' \
165 -e '/^# *[0-9][0-9]* *[".\/]/!d' \
166 -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \
167 -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \
168 -e 's|: \./|: |' \
169 -e 's|\.c\.c|.c|' $uwinfix | \
170 $uniq | $sort | $uniq >> .deptmp
5920a0ba 171 fi
8d063cd8
LW
172done
173
352d5a3a 174$sed <$mf >$mf.new -e '1,/^# AUTOMATICALLY/!d'
8d063cd8 175
3b5ca523
GS
176$MAKE shlist || ($echo "Searching for .SH files..."; \
177 $echo *.SH | $tr ' ' $trnl | $egrep -v '\*' >.shlist)
337e9004 178
760ac839
LW
179# Now extract the dependencies on makedepend.SH and Makefile.SH
180# (they should reside in the main Makefile):
28e8609d 181rm -f .shlist.old
337e9004
PP
182mv .shlist .shlist.old
183$egrep -v '^makedepend\.SH' <.shlist.old >.shlist
28e8609d 184rm -f .shlist.old
760ac839
LW
185mv .shlist .shlist.old
186$egrep -v '^Makefile\.SH' <.shlist.old >.shlist
28e8609d 187rm -f .shlist.old
1c77a109
IZ
188mv .shlist .shlist.old
189$egrep -v '^perl_exp\.SH' <.shlist.old >.shlist
28e8609d 190rm -f .shlist.old
1c77a109
IZ
191mv .shlist .shlist.old
192$egrep -v '^config_h\.SH' <.shlist.old >.shlist
337e9004
PP
193rm .shlist.old
194
8d063cd8
LW
195if $test -s .deptmp; then
196 for file in `cat .shlist`; do
a0d0e21e 197 $echo `$expr X$file : 'X\(.*\).SH'`: $file $TOP/config.sh \; \
6b9d15cb 198 $sh $file >> .deptmp
8d063cd8 199 done
352d5a3a 200 $echo "Updating $mf..."
8d063cd8 201 $echo "# If this runs make out of memory, delete /usr/include lines." \
352d5a3a 202 >> $mf.new
2d9864fe 203 $sed 's|^\(.*\$(OBJ_EXT):\) *\(.*/.*\.c\) *$|\1 \2; '"$defrule \2|" .deptmp \
352d5a3a 204 >>$mf.new
8d063cd8 205else
3b5ca523
GS
206 $MAKE hlist || ($echo "Searching for .h files..."; \
207 $echo *.h | $tr ' ' $trnl | $egrep -v '\*' >.hlist)
8d063cd8
LW
208 $echo "You don't seem to have a proper C preprocessor. Using grep instead."
209 $egrep '^#include ' `cat .clist` `cat .hlist` >.deptmp
352d5a3a 210 $echo "Updating $mf..."
8d063cd8
LW
211 <.clist $sed -n \
212 -e '/\//{' \
337e9004 213 -e 's|^\(.*\)/\(.*\)\.c|\2\$(OBJ_EXT): \1/\2.c; '"$defrule \1/\2.c|p" \
8d063cd8
LW
214 -e d \
215 -e '}' \
337e9004 216 -e 's|^\(.*\)\.c|\1\$(OBJ_EXT): \1.c|p' >> $mf.new
8d063cd8
LW
217 <.hlist $sed -n 's|\(.*/\)\(.*\)|s= \2= \1\2=|p' >.hsed
218 <.deptmp $sed -n 's|c:#include "\(.*\)".*$|o: \1|p' | \
219 $sed 's|^[^;]*/||' | \
352d5a3a 220 $sed -f .hsed >> $mf.new
8d063cd8 221 <.deptmp $sed -n 's|h:#include "\(.*\)".*$|h: \1|p' | \
352d5a3a 222 $sed -f .hsed >> $mf.new
8d063cd8 223 for file in `$cat .shlist`; do
a0d0e21e 224 $echo `$expr X$file : 'X\(.*\).SH'`: $file $TOP/config.sh \; \
6b9d15cb 225 $sh $file >> $mf.new
8d063cd8
LW
226 done
227fi
352d5a3a
LW
228$rm -f $mf.old
229$cp $mf $mf.old
1e2cbf11 230$rm -f $mf
352d5a3a
LW
231$cp $mf.new $mf
232$rm $mf.new
233$echo "# WARNING: Put nothing here or make depend will gobble it up!" >> $mf
85e6fe83 234$rm -rf .deptmp UU .shlist .clist .hlist .hsed
8d063cd8
LW
235
236!NO!SUBS!
237$eunicefix makedepend
378cc40b 238chmod +x makedepend
8d063cd8
LW
239case `pwd` in
240*SH)
241 $rm -f ../makedepend
242 ln makedepend ../makedepend
243 ;;
244esac