[perl5.git] / makedepend.SH

#! /bin/sh
case $PERL_CONFIG_SH in
'')
	if test -f config.sh; then TOP=.;
	elif test -f ../config.sh; then TOP=..;
	elif test -f ../../config.sh; then TOP=../..;
	elif test -f ../../../config.sh; then TOP=../../..;
	elif test -f ../../../../config.sh; then TOP=../../../..;
	else
		echo "Can't find config.sh."; exit 1
	fi
	. $TOP/config.sh
	;;
esac
: This forces SH files to create target in same directory as SH file.
: This is so that make depend always knows where to find SH derivatives.
case "$0" in
*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
esac

case "$osname" in
amigaos) cat=/bin/cat ;; # must be absolute
esac

echo "Extracting makedepend (with variable substitutions)"
rm -f makedepend
$spitshell >makedepend <<!GROK!THIS!
$startsh
# makedepend.SH
#
MAKE=$make
trnl='$trnl'
!GROK!THIS!
$spitshell >>makedepend <<'!NO!SUBS!'

# This script should be called with 
#     sh ./makedepend MAKE=$(MAKE)
case "$1" in 
	MAKE=*) eval $1 ;;
esac

export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)

case $PERL_CONFIG_SH in
'')
	if test -f config.sh; then TOP=.;
	elif test -f ../config.sh; then TOP=..;
	elif test -f ../../config.sh; then TOP=../..;
	elif test -f ../../../config.sh; then TOP=../../..;
	elif test -f ../../../../config.sh; then TOP=../../../..;
	else
		echo "Can't find config.sh."; exit 1
	fi
	. $TOP/config.sh
	;;
esac

# We need .. when we are in the x2p directory if we are using the
# cppstdin wrapper script.
# Put .. and . first so that we pick up the present cppstdin, not
# an older one lying about in /usr/local/bin.
PATH=".$path_sep..$path_sep$PATH"
export PATH

$cat /dev/null >.deptmp
$rm -f *.c.c c/*.c.c
if test -f Makefile; then
    rm -f $firstmakefile
    cp Makefile $firstmakefile
    # On QNX, 'cp' preserves timestamp, so $firstmakefile appears
    # to be out of date.  I don't know if OS/2 has touch, so do this:
    case "$osname" in
    os2) ;;
    netbsd) ;;
    *) $touch $firstmakefile ;;
    esac
fi
mf=$firstmakefile
if test -f $mf; then
    defrule=`<$mf sed -n		\
	-e '/^\.c\$(OBJ_EXT):.*;/{'	\
	-e    's/\$\*\.c//'		\
	-e    's/^[^;]*;[	 ]*//p'	\
	-e    q				\
	-e '}'				\
	-e '/^\.c\$(OBJ_EXT): *$/{'	\
	-e    N				\
	-e    's/\$\*\.c//'		\
	-e    's/^.*\n[	 ]*//p'		\
	-e    q				\
	-e '}'`
fi
case "$defrule" in
'') defrule='$(CC) -c $(CFLAGS)' ;;
esac

: Create files in UU directory to avoid problems with long filenames
: on systems with 14 character filename limits so file.c.c and file.c
: might be identical
$test -d UU || mkdir UU

$MAKE clist || ($echo "Searching for .c files..."; \
	$echo *.c | $tr ' ' $trnl | $egrep -v '\*' >.clist)
for file in `$cat .clist`; do
# for file in `cat /dev/null`; do
	if [ "$osname" = uwin ]; then
		uwinfix="-e s,\\\\\\\\,/,g -e s,\\([a-zA-Z]\\):/,/\\1/,g"
	else
		if [ "$osname" = os2 ]; then
			uwinfix="-e s,\\\\\\\\,/,g"
		else
			if [ "$archname" = cygwin ]; then
				uwinfix="-e s,\\\\\\\\,/,g"
			else
				if [ "$osname" = posix-bc ]; then
					uwinfix="-e s/\\*POSIX(\\(.*\\))/\\1/"
				else
					uwinfix=
				fi
			fi
		fi
	fi
    case "$file" in
    *.c) filebase=`basename $file .c` ;;
    *.y) filebase=`basename $file .y` ;;
    esac
    case "$file" in
    */*) finc="-I`echo $file | sed 's#/[^/]*$##`" ;;
    *)   finc= ;;
    esac
    $echo "Finding dependencies for $filebase$_o."
    ( $echo "#line 1 \"$file\""; \
      $sed -n <$file \
	-e "/^${filebase}_init(/q" \
	-e '/^#line/d' \
	-e '/^#/{' \
	-e 's|/\*.*$||' \
	-e 's|\\$||' \
	-e p \
	-e '}' ) >UU/$file.c
    if [ "$osname" = os390 ]; then
        if [ "$file" = perly.c ]; then
            $echo '#endif' >>UU/$file.c
        fi
        $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c |
        $sed \
    	    -e '/^#.*<stdin>/d' \
	    -e '/^#.*"-"/d' \
	    -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \
	    -e 's/^[	 ]*#[	 ]*line/#/' \
	    -e '/^# *[0-9][0-9]* *[".\/]/!d' \
	    -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \
	    -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \
	    -e 's|: \./|: |' \
	    -e 's|\.c\.c|.c|' $uwinfix | \
        $uniq | $sort | $uniq >> .deptmp
    else
        $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c 2>&1 |
        $sed \
	    -e '1d' \
	    -e '/^#.*<stdin>/d' \
	    -e '/^#.*"-"/d' \
	    -e '/: file path prefix .* never used$/d' \
	    -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \
	    -e 's/^[	 ]*#[	 ]*line/#/' \
	    -e '/^# *[0-9][0-9]* *[".\/]/!d' \
	    -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \
	    -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \
	    -e 's|: \./|: |' \
	    -e 's|\.c\.c|.c|' $uwinfix | \
        $uniq | $sort | $uniq >> .deptmp
    fi
done

$sed <$mf >$mf.new -e '1,/^# AUTOMATICALLY/!d'

$MAKE shlist || ($echo "Searching for .SH files..."; \
	$echo *.SH | $tr ' ' $trnl | $egrep -v '\*' >.shlist)

# Now extract the dependencies on makedepend.SH and Makefile.SH
# (they should reside in the main Makefile):
rm -f .shlist.old
mv .shlist .shlist.old
$egrep -v '^makedepend\.SH' <.shlist.old >.shlist
rm -f .shlist.old
mv .shlist .shlist.old
$egrep -v '^Makefile\.SH' <.shlist.old >.shlist
rm -f .shlist.old
mv .shlist .shlist.old
$egrep -v '^perl_exp\.SH' <.shlist.old >.shlist
rm -f .shlist.old
mv .shlist .shlist.old
$egrep -v '^config_h\.SH' <.shlist.old >.shlist
rm .shlist.old

if $test -s .deptmp; then
    for file in `cat .shlist`; do
	$echo `$expr X$file : 'X\(.*\).SH'`: $file $TOP/config.sh \; \
	    $sh $file >> .deptmp
    done
    $echo "Updating $mf..."
    $echo "# If this runs make out of memory, delete /usr/include lines." \
	>> $mf.new
    $sed 's|^\(.*\$(OBJ_EXT):\) *\(.*/.*\.c\) *$|\1 \2; '"$defrule \2|" .deptmp \
       >>$mf.new
else
    $MAKE hlist || ($echo "Searching for .h files..."; \
	$echo *.h | $tr ' ' $trnl | $egrep -v '\*' >.hlist)
    $echo "You don't seem to have a proper C preprocessor.  Using grep instead."
    $egrep '^#include ' `cat .clist` `cat .hlist`  >.deptmp
    $echo "Updating $mf..."
    <.clist $sed -n							\
	-e '/\//{'							\
	-e   's|^\(.*\)/\(.*\)\.c|\2\$(OBJ_EXT): \1/\2.c; '"$defrule \1/\2.c|p"	\
	-e   d								\
	-e '}'								\
	-e 's|^\(.*\)\.c|\1\$(OBJ_EXT): \1.c|p' >> $mf.new
    <.hlist $sed -n 's|\(.*/\)\(.*\)|s= \2= \1\2=|p' >.hsed
    <.deptmp $sed -n 's|c:#include "\(.*\)".*$|o: \1|p' | \
       $sed 's|^[^;]*/||' | \
       $sed -f .hsed >> $mf.new
    <.deptmp $sed -n 's|h:#include "\(.*\)".*$|h: \1|p' | \
       $sed -f .hsed >> $mf.new
    for file in `$cat .shlist`; do
	$echo `$expr X$file : 'X\(.*\).SH'`: $file $TOP/config.sh \; \
	    $sh $file >> $mf.new
    done
fi
$rm -f $mf.old
$cp $mf $mf.old
$rm -f $mf
$cp $mf.new $mf
$rm $mf.new
$echo "# WARNING: Put nothing here or make depend will gobble it up!" >> $mf
$rm -rf .deptmp UU .shlist .clist .hlist .hsed

!NO!SUBS!
$eunicefix makedepend
chmod +x makedepend
case `pwd` in
*SH)
    $rm -f ../makedepend
    ln makedepend ../makedepend
    ;;
esac
Commit	Line	Data
1e2cbf11	1	#! /bin/sh
a02608de	2	case $PERL_CONFIG_SH 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	14	esac
a0d0e21e LW	15	: This forces SH files to create target in same directory as SH file.
a0d0e21e LW	16	: This is so that make depend always knows where to find SH derivatives.
8d063cd8 LW	17	case "$0" in
	18	/) cd `expr X$0 : 'X\(.*\)/'` ;;
	19	esac
1e2cbf11	20
dbf49cb0 JH	21	case "$osname" in
	22	amigaos) cat=/bin/cat ;; # must be absolute
	23	esac
	24
8d063cd8	25	echo "Extracting makedepend (with variable substitutions)"
7b0cd887	26	rm -f makedepend
75f92628 AD	27	$spitshell >makedepend <<!GROK!THIS!
75f92628 AD	28	$startsh
a0d0e21e	29	# makedepend.SH
8d063cd8	30	#
6b9d15cb	31	MAKE=$make
28e8609d	32	trnl='$trnl'
1aef975c AD	33	!GROK!THIS!
1aef975c AD	34	$spitshell >>makedepend <<'!NO!SUBS!'
8d063cd8	35
fb73857a	36	# This script should be called with
3b5ca523	37	# sh ./makedepend MAKE=$(MAKE)
fb73857a	38	case "$1" in
3b5ca523	39	MAKE=*) eval $1 ;;
fb73857a	40	esac
fb73857a	41
8d063cd8 LW	42	export PATH \|\| (echo "OOPS, this isn't sh. Desperation time. I will feed myself to sh."; sh \$0; kill \$\$)
8d063cd8 LW	43
a02608de	44	case $PERL_CONFIG_SH 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	;;
	56	esac
8d063cd8	57
16d20bd9 AD	58	# We need .. when we are in the x2p directory if we are using the
16d20bd9 AD	59	# cppstdin wrapper script.
8e07c86e AD	60	# Put .. and . first so that we pick up the present cppstdin, not
8e07c86e AD	61	# an older one lying about in /usr/local/bin.
39e571d4	62	PATH=".$path_sep..$path_sep$PATH"
7b0cd887 LW	63	export PATH
7b0cd887 LW	64
8d063cd8 LW	65	$cat /dev/null >.deptmp
	66	$rm -f .c.c c/.c.c
	67	if test -f Makefile; then
1e2cbf11	68	rm -f $firstmakefile
337e9004	69	cp Makefile $firstmakefile
ae26f3f3	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	75	*) $touch $firstmakefile ;;
ae26f3f3	76	esac
8d063cd8	77	fi
337e9004	78	mf=$firstmakefile
8d063cd8 LW	79	if test -f $mf; then
8d063cd8 LW	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 '}'`
	92	fi
	93	case "$defrule" in
	94	'') defrule='$(CC) -c $(CFLAGS)' ;;
	95	esac
	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)
	104	for 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"
8736538c AS	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#/[^/]*$##`" ;;
7b0cd887 LW	129	*) finc= ;;
8d063cd8	130	esac
3b5ca523	131	$echo "Finding dependencies for $filebase$_o."
7b0cd887 LW	132	( $echo "#line 1 \"$file\""; \
7b0cd887 LW	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
8ad4a856	158	$cppstdin $finc -I. $cppflags $cppminus <UU/$file.c 2>&1 \|
ceda4f9b GS	159	$sed \
	160	-e '1d' \
	161	-e '/^#.*<stdin>/d' \
	162	-e '/^#.*"-"/d' \
8ad4a856	163	-e '/: file path prefix .* never used$/d' \
ceda4f9b GS	164	-e 's#\.[0-9][0-9]*\.c#'"$file.c#" \
	165	-e 's/^[ ]#[ ]line/#/' \
	166	-e '/^# [0-9][0-9] *[".\/]/!d' \
	167	-e 's/^."\(.\)".*$/'$filebase'\$(OBJ_EXT): \1/' \
	168	-e 's/^# [0-9][0-9] \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \
	169	-e 's\|: \./\|: \|' \
	170	-e 's\|\.c\.c\|.c\|' $uwinfix \| \
	171	$uniq \| $sort \| $uniq >> .deptmp
5920a0ba	172	fi
8d063cd8 LW	173	done
8d063cd8 LW	174
352d5a3a	175	$sed <$mf >$mf.new -e '1,/^# AUTOMATICALLY/!d'
8d063cd8	176
3b5ca523 GS	177	$MAKE shlist \|\| ($echo "Searching for .SH files..."; \
3b5ca523 GS	178	$echo .SH \| $tr ' ' $trnl \| $egrep -v '\' >.shlist)
337e9004	179
760ac839 LW	180	# Now extract the dependencies on makedepend.SH and Makefile.SH
760ac839 LW	181	# (they should reside in the main Makefile):
28e8609d	182	rm -f .shlist.old
337e9004	183	mv .shlist .shlist.old
337e9004	184	$egrep -v '^makedepend\.SH' <.shlist.old >.shlist
28e8609d	185	rm -f .shlist.old
760ac839 LW	186	mv .shlist .shlist.old
760ac839 LW	187	$egrep -v '^Makefile\.SH' <.shlist.old >.shlist
28e8609d	188	rm -f .shlist.old
1c77a109 IZ	189	mv .shlist .shlist.old
1c77a109 IZ	190	$egrep -v '^perl_exp\.SH' <.shlist.old >.shlist
28e8609d	191	rm -f .shlist.old
1c77a109 IZ	192	mv .shlist .shlist.old
1c77a109 IZ	193	$egrep -v '^config_h\.SH' <.shlist.old >.shlist
337e9004	194	rm .shlist.old
337e9004	195
8d063cd8 LW	196	if $test -s .deptmp; then
8d063cd8 LW	197	for file in `cat .shlist`; do
a0d0e21e	198	$echo `$expr X$file : 'X\(.*\).SH'`: $file $TOP/config.sh \; \
6b9d15cb	199	$sh $file >> .deptmp
8d063cd8	200	done
352d5a3a	201	$echo "Updating $mf..."
8d063cd8	202	$echo "# If this runs make out of memory, delete /usr/include lines." \
352d5a3a	203	>> $mf.new
2d9864fe	204	$sed 's\|^\(.\$(OBJ_EXT):\) \(./.\.c\) *$\|\1 \2; '"$defrule \2\|" .deptmp \
352d5a3a	205	>>$mf.new
8d063cd8	206	else
3b5ca523 GS	207	$MAKE hlist \|\| ($echo "Searching for .h files..."; \
3b5ca523 GS	208	$echo .h \| $tr ' ' $trnl \| $egrep -v '\' >.hlist)
8d063cd8 LW	209	$echo "You don't seem to have a proper C preprocessor. Using grep instead."
8d063cd8 LW	210	$egrep '^#include ' `cat .clist` `cat .hlist` >.deptmp
352d5a3a	211	$echo "Updating $mf..."
8d063cd8 LW	212	<.clist $sed -n \
8d063cd8 LW	213	-e '/\//{' \
337e9004	214	-e 's\|^\(.\)/\(.\)\.c\|\2\$(OBJ_EXT): \1/\2.c; '"$defrule \1/\2.c\|p" \
8d063cd8 LW	215	-e d \
8d063cd8 LW	216	-e '}' \
337e9004	217	-e 's\|^\(.*\)\.c\|\1\$(OBJ_EXT): \1.c\|p' >> $mf.new
8d063cd8 LW	218	<.hlist $sed -n 's\|\(./\)\(.\)\|s= \2= \1\2=\|p' >.hsed
	219	<.deptmp $sed -n 's\|c:#include "\(.\)".$\|o: \1\|p' \| \
	220	$sed 's\|^[^;]*/\|\|' \| \
352d5a3a	221	$sed -f .hsed >> $mf.new
8d063cd8	222	<.deptmp $sed -n 's\|h:#include "\(.\)".$\|h: \1\|p' \| \
352d5a3a	223	$sed -f .hsed >> $mf.new
8d063cd8	224	for file in `$cat .shlist`; do
a0d0e21e	225	$echo `$expr X$file : 'X\(.*\).SH'`: $file $TOP/config.sh \; \
6b9d15cb	226	$sh $file >> $mf.new
8d063cd8 LW	227	done
8d063cd8 LW	228	fi
352d5a3a LW	229	$rm -f $mf.old
352d5a3a LW	230	$cp $mf $mf.old
1e2cbf11	231	$rm -f $mf
352d5a3a LW	232	$cp $mf.new $mf
	233	$rm $mf.new
	234	$echo "# WARNING: Put nothing here or make depend will gobble it up!" >> $mf
85e6fe83	235	$rm -rf .deptmp UU .shlist .clist .hlist .hsed
8d063cd8 LW	236
	237	!NO!SUBS!
	238	$eunicefix makedepend
378cc40b	239	chmod +x makedepend
8d063cd8 LW	240	case `pwd` in
	241	*SH)
	242	$rm -f ../makedepend
	243	ln makedepend ../makedepend
	244	;;
	245	esac