#!/bin/sh -
d=../..
docs=../../../db.docs
[ -f $d/LICENSE ] || {
echo 'FAIL: cannot find source distribution directory.'
exit 1
}
p=$d/dist/pubdef.in
exitv=0
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that pubdef.in has everything listed in m4.links.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$docs/m4/m4.links
sed -n \
-e 's/^\$1, \(DB_[^,]*\).*/\1/p' \
-e d < $f |
while read name; do
if `egrep -w "$name" $p > /dev/null`; then
:
else
echo "$f: $name is missing from $p"
exitv=1
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that m4.links has everything listed in pubdef.in.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$docs/m4/m4.links
sed '/^while read name isdoc isinc isjava; do
if `egrep -w "^.1, $name" $f > /dev/null`; then
[ "X$isdoc" != "XD" ] && {
echo "$name should not appear in $f"
exitv=1
}
else
[ "X$isdoc" = "XD" ] && {
echo "$name does not appear in $f"
exitv=1;
}
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that pubdef.in has everything listed in db.in.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$d/dbinc/db.in
sed -n \
-e 's/^ -e 's/^[ ]*\(DB_[A-Z_]*\)=[0-9].*/\1/p' \
-e d < $f |
while read name; do
if `egrep -w "$name" $p > /dev/null`; then
:
else
echo "$f: $name is missing from $p"
exitv=1
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that db.in has everything listed in pubdef.in.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$d/dbinc/db.in
sed '/^while read name isdoc isinc isjava; do
if `egrep -w "#define[ ]$name|[ ][ ]*$name=[0-9][0-9]*" \
$f > /dev/null`; then
[ "X$isinc" != "XI" ] && {
echo "$name should not appear in $f"
exitv=1
}
else
[ "X$isinc" = "XI" ] && {
echo "$name does not appear in $f"
exitv=1
}
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that pubdef.in has everything listed in DbConstants.java.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$d/java/src/com/sleepycat/db/release/DbConstants.java
sed -n -e 's/.*static final int[ ]*\([^ ]*\).*/\1/p' < $f |
while read name; do
if `egrep -w "$name" $p > /dev/null`; then
:
else
echo "$f: $name is missing from $p"
exitv=1
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that DbConstants.java has everything listed in pubdef.in.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$d/java/src/com/sleepycat/db/release/DbConstants.java
sed '/^while read name isdoc isinc isjava; do
if `egrep -w "static final int[ ]$name =" $f > /dev/null`; then
[ "X$isjava" != "XJ" ] && {
echo "$name should not appear in $f"
exitv=1
}
else
[ "X$isjava" = "XJ" ] && {
echo "$name does not appear in $f"
exitv=1
}
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that pubdef.in has everything listed in Db.java.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$d/java/src/com/sleepycat/db/Db.java
sed -n -e 's/.*static final int[ ]*\([^ ;]*\).*/\1/p' < $f |
while read name; do
if `egrep -w "$name" $p > /dev/null`; then
:
else
echo "$f: $name is missing from $p"
exitv=1;
fi
done
sed -n -e 's/^[ ]*\([^ ]*\) = DbConstants\..*/\1/p' < $f |
while read name; do
if `egrep -w "$name" $p > /dev/null`; then
:
else
echo "$f: $name is missing from $p"
exitv=1
fi
done
cat <<END_OF_TEXT
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Check that Db.java has all of the Java case values listed in pubdef.in.
Any C entries should appear assigned to an initialization value.
Any J entries should appear assigned to the DbConstants value.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
END_OF_TEXT
f=$d/java/src/com/sleepycat/db/Db.java
sed '/^while read name isdoc isinc isjava; do
case "$isjava" in
C)
if `egrep \
"public final static int[ ]$name = [0-9-]*;" \
$f > /dev/null`; then
:
else
echo "SFI (C type): $name does not appear in $f"
exitv=1
fi;;
J)
if `egrep \
"public final static int[ ]$name;" $f > /dev/null`; then
:
else
echo "SFI (J type): $name does not appear in $f"
exitv=1
fi
if `egrep \
"$name = DbConstants.$name;" $f > /dev/null`; then
:
else
echo "DbConstants: $name does not appear in $f"
exitv=1
fi;;
\*)
;;
*)
echo "Unknown isjava field: $isjava"
exit 1;;
esac
done
exit $exitv