1#!/bin/sh 2# 3# Copyright (C) 2013 Internet Systems Consortium, Inc. ("ISC") 4# 5# Permission to use, copy, modify, and/or distribute this software for any 6# purpose with or without fee is hereby granted, provided that the above 7# copyright notice and this permission notice appear in all copies. 8# 9# THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH 10# REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 11# AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT, 12# INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM 13# LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 14# OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR 15# PERFORMANCE OF THIS SOFTWARE. 16 17SYSTEMTESTTOP=.. 18. $SYSTEMTESTTOP/conf.sh 19 20status=0 21 22echo "I:test name to long" 23$PERL formerr.pl -a 10.53.0.1 -p 5300 nametoolong > nametoolong.out 24ans=`grep got: nametoolong.out` 25if [ "${ans}" != "got: 000080010000000000000000" ]; 26then 27 echo "I:failed"; status=`expr $status + 1`; 28fi 29 30echo "I:two questions" 31$PERL formerr.pl -a 10.53.0.1 -p 5300 twoquestions > twoquestions.out 32ans=`grep got: twoquestions.out` 33if [ "${ans}" != "got: 000080010000000000000000" ]; 34then 35 echo "I:failed"; status=`expr $status + 1`; 36fi 37 38# this one arguable could be NOERORR. 39echo "I:no questions" 40$PERL formerr.pl -a 10.53.0.1 -p 5300 noquestions > noquestions.out 41ans=`grep got: noquestions.out` 42if [ "${ans}" != "got: 000080010000000000000000" ]; 43then 44 echo "I:failed"; status=`expr $status + 1`; 45fi 46 47echo "I:exit status: $status" 48 49exit $status 50