1 #!/bin/sh 2 3 # Copyright (C) Internet Systems Consortium, Inc. ("ISC") 4 # 5 # SPDX-License-Identifier: MPL-2.0 6 # 7 # This Source Code Form is subject to the terms of the Mozilla Public 8 # License, v. 2.0. If a copy of the MPL was not distributed with this 9 # file, you can obtain one at https://mozilla.org/MPL/2.0/. 10 # 11 # See the COPYRIGHT file distributed with this work for additional 12 # information regarding copyright ownership. 13 14 set -e 15 16 . ../conf.sh 17 18 DIGCMD="$DIG +tcp -p ${PORT}" 19 RNDCCMD="$RNDC -p ${CONTROLPORT} -c ../_common/rndc.conf" 20 21 status=0 22 23 ret=0 24 n=1 25 stats=0 26 nsock0nstat=0 27 nsock1nstat=0 28 rndc_stats() { 29 _ns=$1 30 _ip=$2 31 32 $RNDCCMD -s $_ip stats >/dev/null 2>&1 || return 1 33 [ -f "${_ns}/named.stats" ] || return 1 34 35 last_stats=named.stats.$_ns-$stats-$n 36 mv ${_ns}/named.stats $last_stats 37 stats=$((stats + 1)) 38 } 39 40 echo_i "fetching a.example from ns2's initial configuration ($n)" 41 $DIGCMD +noauth a.example. @10.53.0.2 any >dig.out.ns2.1 || ret=1 42 if [ $ret != 0 ]; then echo_i "failed"; fi 43 status=$((status + ret)) 44 n=$((n + 1)) 45 46 ret=0 47 echo_i "dumping initial stats for ns2 ($n)" 48 rndc_stats ns2 10.53.0.2 || ret=1 49 if [ $ret != 0 ]; then echo_i "failed"; fi 50 status=$((status + ret)) 51 n=$((n + 1)) 52 53 ret=0 54 echo_i "verifying adb records in named.stats ($n)" 55 grep "ADB stats" $last_stats >/dev/null || ret=1 56 if [ $ret != 0 ]; then echo_i "failed"; fi 57 status=$((status + ret)) 58 n=$((n + 1)) 59 60 echo_i "checking for 1 entry in adb hash table in named.stats ($n)" 61 grep "1 Addresses in hash table" $last_stats >/dev/null || ret=1 62 if [ $ret != 0 ]; then echo_i "failed"; fi 63 status=$((status + ret)) 64 n=$((n + 1)) 65 66 ret=0 67 echo_i "verifying cache statistics in named.stats ($n)" 68 grep "Cache Statistics" $last_stats >/dev/null || ret=1 69 if [ $ret != 0 ]; then echo_i "failed"; fi 70 status=$((status + ret)) 71 n=$((n + 1)) 72 73 ret=0 74 echo_i "checking for 2 entries in adb hash table in named.stats ($n)" 75 $DIGCMD a.example.info. @10.53.0.2 any >/dev/null 2>&1 76 rndc_stats ns2 10.53.0.2 || ret=1 77 grep "2 Addresses in hash table" $last_stats >/dev/null || ret=1 78 if [ $ret != 0 ]; then echo_i "failed"; fi 79 status=$((status + ret)) 80 n=$((n + 1)) 81 82 ret=0 83 echo_i "dumping initial stats for ns3 ($n)" 84 rndc_stats ns3 10.53.0.3 || ret=1 85 nsock0nstat=$(grep "UDP/IPv4 sockets active" $last_stats | awk '{print $1}') 86 [ 0 -ne ${nsock0nstat} ] || ret=1 87 if [ $ret != 0 ]; then echo_i "failed"; fi 88 status=$((status + ret)) 89 n=$((n + 1)) 90 91 echo_i "sending queries to ns3" 92 $DIGCMD +tries=2 +time=1 +recurse @10.53.0.3 foo.info. any >/dev/null 2>&1 || true 93 94 ret=0 95 echo_i "dumping updated stats for ns3 ($n)" 96 getstats() { 97 rndc_stats ns3 10.53.0.3 || return 1 98 grep "2 recursing clients" $last_stats >/dev/null || return 1 99 } 100 retry_quiet 5 getstats || ret=1 101 if [ $ret != 0 ]; then echo_i "failed"; fi 102 status=$((status + ret)) 103 n=$((n + 1)) 104 105 ret=0 106 echo_i "verifying recursing clients output in named.stats ($n)" 107 grep "2 recursing clients" $last_stats >/dev/null || ret=1 108 if [ $ret != 0 ]; then echo_i "failed"; fi 109 status=$((status + ret)) 110 n=$((n + 1)) 111 112 ret=0 113 echo_i "verifying active fetches output in named.stats ($n)" 114 grep "1 active fetches" $last_stats >/dev/null || ret=1 115 if [ $ret != 0 ]; then echo_i "failed"; fi 116 status=$((status + ret)) 117 n=$((n + 1)) 118 119 ret=0 120 echo_i "verifying active sockets output in named.stats ($n)" 121 nsock1nstat=$(grep "UDP/IPv4 sockets active" $last_stats | awk '{print $1}') 122 [ $((nsock1nstat - nsock0nstat)) -eq 1 ] || ret=1 123 if [ $ret != 0 ]; then echo_i "failed"; fi 124 status=$((status + ret)) 125 n=$((n + 1)) 126 127 # there should be 1 UDP and no TCP queries. As the TCP counter is zero 128 # no status line is emitted. 129 ret=0 130 echo_i "verifying queries in progress in named.stats ($n)" 131 grep "1 UDP queries in progress" $last_stats >/dev/null || ret=1 132 grep "TCP queries in progress" $last_stats >/dev/null && ret=1 133 if [ $ret != 0 ]; then echo_i "failed"; fi 134 status=$((status + ret)) 135 n=$((n + 1)) 136 137 ret=0 138 echo_i "verifying bucket size output ($n)" 139 grep "bucket size" $last_stats >/dev/null || ret=1 140 if [ $ret != 0 ]; then echo_i "failed"; fi 141 status=$((status + ret)) 142 n=$((n + 1)) 143 144 ret=0 145 echo_i "checking priming queries are counted ($n)" 146 grep "priming queries" $last_stats >/dev/null || ret=1 147 if [ $ret != 0 ]; then echo_i "failed"; fi 148 status=$((status + ret)) 149 n=$((n + 1)) 150 151 ret=0 152 echo_i "checking that zones with slash are properly shown in XML output ($n)" 153 if $FEATURETEST --have-libxml2 && [ -x "${CURL}" ] && [ -x "${XMLLINT}" ]; then 154 ${CURL} http://10.53.0.1:${EXTRAPORT1}/xml/v3/zones >curl.out.${n} 2>/dev/null || ret=1 155 test -n "$("$XMLLINT" --xpath '/statistics/views/view[@name="_default"]/zones/zone[@name="32/1.0.0.127-in-addr.example"]' curl.out.${n})" || ret=1 156 else 157 echo_i "skipping test as libxml2 and/or curl and/or xmllint was not found" 158 fi 159 if [ $ret != 0 ]; then echo_i "failed"; fi 160 status=$((status + ret)) 161 n=$((n + 1)) 162 163 ret=0 164 echo_i "checking that zones return their type ($n)" 165 if $FEATURETEST --have-libxml2 && [ -x "${CURL}" ] && [ -x "${XMLLINT}" ]; then 166 ${CURL} http://10.53.0.1:${EXTRAPORT1}/xml/v3/zones >curl.out.${n} 2>/dev/null || ret=1 167 test -n "$("$XMLLINT" --xpath '/statistics/views/view[@name="_default"]/zones/zone[@name="32/1.0.0.127-in-addr.example"]/type[text()="primary"]' curl.out.${n})" || ret=1 168 else 169 echo_i "skipping test as libxml2 and/or curl and/or xmllint was not found" 170 fi 171 if [ $ret != 0 ]; then echo_i "failed"; fi 172 status=$((status + ret)) 173 n=$((n + 1)) 174 175 ret=0 176 echo_i "checking bind9.xsl vs xml ($n)" 177 if $FEATURETEST --have-libxml2 && "${CURL}" --http1.1 http://10.53.0.3:${EXTRAPORT1} >/dev/null 2>&1 && [ -x "${XSLTPROC}" ]; then 178 $DIGCMD +notcp +recurse @10.53.0.3 soa . >dig.out.test$n.1 2>&1 179 $DIGCMD +notcp +recurse @10.53.0.3 soa example >dig.out.test$n.2 2>&1 180 # check multiple requests over the same socket 181 time1=$($PERL -e 'print time(), "\n";') 182 ${CURL} --http1.1 -o curl.out.${n}.xml http://10.53.0.3:${EXTRAPORT1}/xml/v3 \ 183 -o curl.out.${n}.xsl http://10.53.0.3:${EXTRAPORT1}/bind9.xsl 2>/dev/null || ret=1 184 time2=$($PERL -e 'print time(), "\n";') 185 test $((time2 - time1)) -lt 5 || ret=1 186 diff ${TOP_SRCDIR}/bin/named/bind9.xsl curl.out.${n}.xsl || ret=1 187 ${XSLTPROC} curl.out.${n}.xsl - <curl.out.${n}.xml >xsltproc.out.${n} 2>/dev/null || ret=1 188 cp curl.out.${n}.xml stats.xml.out || ret=1 189 190 # 191 # grep for expected sections. 192 # 193 grep "<h1>ISC Bind 9 Configuration and Statistics</h1>" xsltproc.out.${n} >/dev/null || ret=1 194 grep "<h2>Server Status</h2>" xsltproc.out.${n} >/dev/null || ret=1 195 grep "<h2>Incoming Requests by DNS Opcode</h2>" xsltproc.out.${n} >/dev/null || ret=1 196 grep "<h3>Incoming Queries by Query Type</h3>" xsltproc.out.${n} >/dev/null || ret=1 197 grep "<h2>Outgoing Queries per view</h2>" xsltproc.out.${n} >/dev/null || ret=1 198 grep "<h3>View " xsltproc.out.${n} >/dev/null || ret=1 199 grep "<h2>Server Statistics</h2>" xsltproc.out.${n} >/dev/null || ret=1 200 grep "<h2>Zone Maintenance Statistics</h2>" xsltproc.out.${n} >/dev/null || ret=1 201 # grep "<h2>Resolver Statistics (Common)</h2>" xsltproc.out.${n} >/dev/null || ret=1 202 grep "<h3>Resolver Statistics for View " xsltproc.out.${n} >/dev/null || ret=1 203 grep "<h3>ADB Statistics for View " xsltproc.out.${n} >/dev/null || ret=1 204 grep "<h3>Cache Statistics for View " xsltproc.out.${n} >/dev/null || ret=1 205 # grep "<h3>Cache DB RRsets for View " xsltproc.out.${n} >/dev/null || ret=1 206 grep "<h2>Traffic Size Statistics</h2>" xsltproc.out.${n} >/dev/null || ret=1 207 grep "<h4>UDP Requests Received</h4>" xsltproc.out.${n} >/dev/null || ret=1 208 grep "<h4>UDP Responses Sent</h4>" xsltproc.out.${n} >/dev/null || ret=1 209 grep "<h4>TCP Requests Received</h4>" xsltproc.out.${n} >/dev/null || ret=1 210 grep "<h4>TCP Responses Sent</h4>" xsltproc.out.${n} >/dev/null || ret=1 211 grep "<h2>Socket I/O Statistics</h2>" xsltproc.out.${n} >/dev/null || ret=1 212 grep "<h3>Zones for View " xsltproc.out.${n} >/dev/null || ret=1 213 grep "<h2>Received QTYPES per view/zone</h2>" xsltproc.out.${n} >/dev/null || ret=1 214 grep "<h3>View _default" xsltproc.out.${n} >/dev/null || ret=1 215 grep "<h4>Zone example" xsltproc.out.${n} >/dev/null || ret=1 216 grep "<h2>Response Codes per view/zone</h2>" xsltproc.out.${n} >/dev/null || ret=1 217 grep "<h3>View _default" xsltproc.out.${n} >/dev/null || ret=1 218 grep "<h4>Zone example" xsltproc.out.${n} >/dev/null || ret=1 219 # grep "<h2>Glue cache statistics</h2>" xsltproc.out.${n} >/dev/null || ret=1 220 grep "<h3>View _default" xsltproc.out.${n} >/dev/null || ret=1 221 grep "<h4>Zone example" xsltproc.out.${n} >/dev/null || ret=1 222 grep "<h2>Memory Usage Summary</h2>" xsltproc.out.${n} >/dev/null || ret=1 223 grep "<h2>Memory Contexts</h2>" xsltproc.out.${n} >/dev/null || ret=1 224 else 225 echo_i "skipping test as libxml2 and/or curl with HTTP/1.1 support and/or xsltproc was not found" 226 fi 227 if [ $ret != 0 ]; then echo_i "failed"; fi 228 status=$((status + ret)) 229 n=$((n + 1)) 230 231 ret=0 232 echo_i "checking bind9.xml socket statistics ($n)" 233 if $FEATURETEST --have-libxml2 && [ -e stats.xml.out ] && [ -x "${XSLTPROC}" ] && [ -x "${XMLLINT}" ]; then 234 # Socket statistics (expect no errors) 235 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP4AcceptFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 236 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP4BindFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 237 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP4ConnFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 238 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP4OpenFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 239 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP4RecvErr" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 240 # [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP4SendErr" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 241 242 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP6AcceptFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 243 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP6BindFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 244 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP6ConnFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 245 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP6OpenFail" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 246 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP6RecvErr" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 247 [ "$("$XMLLINT" --xpath 'count(/statistics/server/counters[@type="sockstat"]/counter[@name="TCP6SendErr" and text()="0"])' stats.xml.out)" -eq 1 ] || ret=1 248 else 249 echo_i "skipping test as libxml2 and/or stats.xml.out file and/or xsltproc and/or xmllint was not found" 250 fi 251 if [ $ret != 0 ]; then echo_i "failed"; fi 252 status=$((status + ret)) 253 n=$((n + 1)) 254 255 echo_i "Check that 'zone-statistics full;' is processed by 'rndc reconfig' ($n)" 256 ret=0 257 # off by default 258 rndc_stats ns2 10.53.0.2 || ret=1 259 sed -n '/Per Zone Query Statistics/,/^++/p' $last_stats | grep -F '[example]' >/dev/null && ret=0 260 # turn on 261 cp ns2/named2.conf ns2/named.conf 262 rndc_reconfig ns2 10.53.0.2 263 rndc_stats ns2 10.53.0.2 || ret=1 264 sed -n '/Per Zone Query Statistics/,/^++/p' $last_stats | grep -F '[example]' >/dev/null || ret=1 265 # turn off 266 cp ns2/named1.conf ns2/named.conf 267 rndc_reconfig ns2 10.53.0.2 268 rndc_stats ns2 10.53.0.2 || ret=1 269 sed -n '/Per Zone Query Statistics/,/^++/p' $last_stats | grep -F '[example]' >/dev/null && ret=0 270 # turn on 271 cp ns2/named2.conf ns2/named.conf 272 rndc_reconfig ns2 10.53.0.2 273 rndc_stats ns2 10.53.0.2 || ret=1 274 sed -n '/Per Zone Query Statistics/,/^++/p' $last_stats | grep -F '[example]' >/dev/null || ret=1 275 if [ $ret != 0 ]; then echo_i "failed"; fi 276 status=$((status + ret)) 277 n=$((n + 1)) 278 279 echo_i "exit status: $status" 280 [ $status -eq 0 ] || exit 1 281
Indexes created Sun Mar 01 05:31:48 UTC 2026