[thirdparty/git.git] / check-builtins.sh

#!/bin/sh

{
	cat <<\EOF
sayIt:
	$(foreach b,$(BUILT_INS),echo XXX $(b:$X=) YYY;)
EOF
	cat Makefile
} |
make -f - sayIt 2>/dev/null |
sed -n -e 's/.*XXX \(.*\) YYY.*/\1/p' |
sort |
{
    bad=0
    while read builtin
    do
	base=$(expr "$builtin" : 'git-\(.*\)')
	x=$(sed -ne 's/.*{ "'$base'", \(cmd_[^, ]*\).*/'$base'	\1/p' git.c)
	if test -z "$x"
	then
		echo "$base is builtin but not listed in git.c command list"
		bad=1
	fi
	for sfx in sh perl py
	do
		if test -f "$builtin.$sfx"
		then
			echo "$base is builtin but $builtin.$sfx still exists"
			bad=1
		fi
	done
    done
    exit $bad
}
Commit	Line	Data
c74390e4 JH	1	#!/bin/sh
	2
	3	{
	4	cat <<\EOF
	5	sayIt:
8c1e9f40	6	$(foreach b,$(BUILT_INS),echo XXX $(b:$X=) YYY;)
c74390e4 JH	7	EOF
	8	cat Makefile
	9	} \|
	10	make -f - sayIt 2>/dev/null \|
	11	sed -n -e 's/.XXX \(.\) YYY.*/\1/p' \|
	12	sort \|
	13	{
	14	bad=0
	15	while read builtin
	16	do
b09d8552 EP	17	base=$(expr "$builtin" : 'git-\(.*\)')
b09d8552 EP	18	x=$(sed -ne 's/.{ "'$base'", \(cmd_[^, ]\).*/'$base' \1/p' git.c)
c74390e4 JH	19	if test -z "$x"
	20	then
	21	echo "$base is builtin but not listed in git.c command list"
	22	bad=1
	23	fi
	24	for sfx in sh perl py
	25	do
	26	if test -f "$builtin.$sfx"
	27	then
	28	echo "$base is builtin but $builtin.$sfx still exists"
	29	bad=1
	30	fi
	31	done
	32	done
	33	exit $bad
	34	}