[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

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!'

if test -d .depending; then
	echo "$0: Already running, exiting."
	exit 0
fi

mkdir .depending

# 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

# Avoid localized gcc messages
case "$ccname" in
    gcc) LC_ALL=C ; export LC_ALL ;;
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

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

$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
    case "$osname" in
    uwin)     uwinfix="-e s,\\\\\\\\,/,g -e s,\\([a-zA-Z]\\):/,/\\1/,g" ;;
    os2)      uwinfix="-e s,\\\\\\\\,/,g" ;;
    cygwin)   uwinfix="-e s,\\\\\\\\,/,g" ;;
    posix-bc) uwinfix="-e s/\\*POSIX(\\(.*\\))/\\1/" ;;
    vos)      uwinfix="-e s/\#/\\\#/" ;;
    *)        uwinfix="" ;;
    esac
    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 -a "$file" = perly.c ]; then
        $echo '#endif' >>UU/$file.c
    fi

    if [ "$osname" = os390 ]; then
        $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 >.cout 2>.cerr
        $sed \
	    -e '1d' \
	    -e '/^#.*<stdin>/d' \
            -e '/^#.*<builtin>/d' \
            -e '/^#.*<built-in>/d' \
            -e '/^#.*<command line>/d' \
            -e '/^#.*<command-line>/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 .cout .cerr| \
        $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 .cout .cerr
rmdir .depending

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