|
|
|
|
@@ -15,7 +15,7 @@
|
|
|
|
|
# NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
|
|
|
|
|
# WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
|
|
|
|
|
|
|
|
# $Id: tests.sh,v 1.41 2002/07/19 06:20:24 marka Exp $
|
|
|
|
|
# $Id: tests.sh,v 1.42 2004/01/14 02:06:49 marka Exp $
|
|
|
|
|
|
|
|
|
|
SYSTEMTESTTOP=..
|
|
|
|
|
. $SYSTEMTESTTOP/conf.sh
|
|
|
|
|
@@ -48,6 +48,16 @@ n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
echo "I:checking positive wildcard validation ($n)"
|
|
|
|
|
ret=0
|
|
|
|
|
$DIG $DIGOPTS a.wild.example. @10.53.0.2 a > dig.out.ns2.test$n || ret=1
|
|
|
|
|
$DIG $DIGOPTS a.wild.example. @10.53.0.4 a > dig.out.ns4.test$n || ret=1
|
|
|
|
|
$PERL ../digcomp.pl dig.out.ns2.test$n dig.out.ns4.test$n || ret=1
|
|
|
|
|
grep "flags:.*ad.*QUERY" dig.out.ns4.test$n > /dev/null || ret=1
|
|
|
|
|
n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
echo "I:checking negative validation ($n)"
|
|
|
|
|
ret=0
|
|
|
|
|
$DIG $DIGOPTS +noauth q.example. @10.53.0.2 a > dig.out.ns2.test$n || ret=1
|
|
|
|
|
@@ -58,6 +68,16 @@ n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
echo "I:checking negative wildcard validation ($n)"
|
|
|
|
|
ret=0
|
|
|
|
|
$DIG $DIGOPTS b.wild.example. @10.53.0.2 txt > dig.out.ns2.test$n || ret=1
|
|
|
|
|
$DIG $DIGOPTS b.wild.example. @10.53.0.4 txt > dig.out.ns4.test$n || ret=1
|
|
|
|
|
$PERL ../digcomp.pl dig.out.ns2.test$n dig.out.ns4.test$n || ret=1
|
|
|
|
|
grep "flags:.*ad.*QUERY" dig.out.ns4.test$n > /dev/null || ret=1
|
|
|
|
|
n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
# Check the insecure.example domain
|
|
|
|
|
|
|
|
|
|
echo "I:checking 1-server insecurity proof ($n)"
|
|
|
|
|
@@ -382,6 +402,45 @@ n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
echo "I:checking that lookups succeed after disabling a algorithm works ($n)"
|
|
|
|
|
ret=0
|
|
|
|
|
$DIG $DIGOPTS +noauth example. SOA @10.53.0.2 \
|
|
|
|
|
> dig.out.ns2.test$n || ret=1
|
|
|
|
|
$DIG $DIGOPTS +noauth example. SOA @10.53.0.6 \
|
|
|
|
|
> dig.out.ns6.test$n || ret=1
|
|
|
|
|
$PERL ../digcomp.pl dig.out.ns2.test$n dig.out.ns6.test$n || ret=1
|
|
|
|
|
# Note - this is looking for failure, hence the &&
|
|
|
|
|
grep "flags:.*ad.*QUERY" dig.out.ns6.test$n > /dev/null && ret=1
|
|
|
|
|
n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
echo "I:checking privately secure to nxdomain works ($n)"
|
|
|
|
|
ret=0
|
|
|
|
|
$DIG $DIGOPTS +noauth private2secure-nxdomain.private.secure.example. SOA @10.53.0.2 \
|
|
|
|
|
> dig.out.ns2.test$n || ret=1
|
|
|
|
|
$DIG $DIGOPTS +noauth private2secure-nxdomain.private.secure.example. SOA @10.53.0.4 \
|
|
|
|
|
> dig.out.ns4.test$n || ret=1
|
|
|
|
|
$PERL ../digcomp.pl dig.out.ns2.test$n dig.out.ns4.test$n || ret=1
|
|
|
|
|
# Note - this is looking for failure, hence the &&
|
|
|
|
|
grep "flags:.*ad.*QUERY" dig.out.ns4.test$n > /dev/null && ret=1
|
|
|
|
|
n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
echo "I:checking privately secure wilcard to nxdomain works ($n)"
|
|
|
|
|
ret=0
|
|
|
|
|
$DIG $DIGOPTS +noauth a.wild.private.secure.example. SOA @10.53.0.2 \
|
|
|
|
|
> dig.out.ns2.test$n || ret=1
|
|
|
|
|
$DIG $DIGOPTS +noauth a.wild.private.secure.example. SOA @10.53.0.4 \
|
|
|
|
|
> dig.out.ns4.test$n || ret=1
|
|
|
|
|
$PERL ../digcomp.pl dig.out.ns2.test$n dig.out.ns4.test$n || ret=1
|
|
|
|
|
# Note - this is looking for failure, hence the &&
|
|
|
|
|
grep "flags:.*ad.*QUERY" dig.out.ns4.test$n > /dev/null && ret=1
|
|
|
|
|
n=`expr $n + 1`
|
|
|
|
|
if [ $ret != 0 ]; then echo "I:failed"; fi
|
|
|
|
|
status=`expr $status + $ret`
|
|
|
|
|
|
|
|
|
|
# Run a minimal update test if possible. This is really just
|
|
|
|
|
# a regression test for RT #2399; more tests should be added.
|
|
|
|
|
|
|
|
|
|
|