mirror of
https://gitlab.isc.org/isc-projects/bind9
synced 2025-09-01 06:55:30 +00:00
Fix a Net::DNS version quirk in the "resolver" system test
Net::DNS versions older than 0.68 insert a ./ANY RR into the QUESTION section if the latter is empty. Since the latest Net::DNS version available with stock RHEL/CentOS 6 packages is 0.65 and we officially support that operating system, bin/tests/system/resolver/ans8/ans.pl should behave consistently for various Net::DNS versions. Ensure that by making handleUDP() return the query ID and flags generated by Net::DNS with 8 zero bytes appended.
This commit is contained in:
@@ -73,7 +73,11 @@ sub handleUDP {
|
|||||||
$packet->header->tc(0);
|
$packet->header->tc(0);
|
||||||
}
|
}
|
||||||
|
|
||||||
return $packet->data;
|
# Net::DNS versions < 0.68 insert an ./ANY RR into the QUESTION section
|
||||||
|
# if the latter is empty. Make sure Net::DNS version does not
|
||||||
|
# influence the return value of this function by returning the query ID
|
||||||
|
# and flags generated by Net::DNS with 8 zero bytes appended.
|
||||||
|
return substr($packet->data, 0, 4) . "\x00" x 8;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub handleTCP {
|
sub handleTCP {
|
||||||
|
Reference in New Issue
Block a user