OpenGrok
Home
Sort by:
relevance
|
last modified time
|
path
Full Search
in project(s):
src
xsrc
Definition
Symbol
File Path
History
|
|
Help
Searched
refs:DNS
(Results
1 - 25
of
63
) sorted by relevancy
1
2
3
/src/external/mpl/bind/dist/bin/tests/system/digdelv/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/dnssec/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
dnssec_update_test.pl
26
# This program uses the Net::
DNS
::Resolver module.
29
# perl -MCPAN -e "install Net::
DNS
"
33
use Net::
DNS
;
34
use Net::
DNS
::Update;
35
use Net::
DNS
::Resolver;
42
$res = new Net::
DNS
::Resolver;
65
my $update = new Net::
DNS
::Update("$zone");
/src/external/mpl/bind/dist/bin/tests/system/fetchlimit/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/forward/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/ixfr/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/nsupdate/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/resolver/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/rpzrecurse/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/statistics/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/stress/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/upforwd/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/zero/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/chain/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
21
if ! ${PERL} -MNet::
DNS
::Nameserver -e ''; then
22
echo_i "perl Net::
DNS
::Nameserver module is required"
/src/external/mpl/bind/dist/bin/tests/system/reclimit/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
21
if ! ${PERL} -MNet::
DNS
::Nameserver -e ''; then
22
echo_i "perl Net::
DNS
::Nameserver module is required"
/src/external/mpl/bind/dist/bin/tests/system/xfer/
prereq.sh
16
# macOS ships with Net::
DNS
0.74 which does not work with
19
if ${PERL} -MNet::
DNS
-e 'exit ($Net::
DNS
::VERSION >= 1.0)'; then
20
version=$(${PERL} -MNet::
DNS
-e 'print $Net::
DNS
::VERSION')
21
echo_i "perl Net::
DNS
$version is too old - skipping xfer test"
/src/external/mpl/bind/dist/bin/tests/system/resolver/ans2/
ans.pl
20
use Net::
DNS
;
21
use Net::
DNS
::Packet;
44
if ($Net::
DNS
::VERSION > 0.68) {
45
$packet = new Net::
DNS
::Packet(\$buf, 0);
49
($packet, $err) = new Net::
DNS
::Packet(\$buf, 0);
64
$packet->push("answer", new Net::
DNS
::RR("com 300 NS a.root-servers.nil."));
67
$packet->push("answer", new Net::
DNS
::RR("example.com 300 NS a.root-servers.nil."));
70
$packet->push("answer", new Net::
DNS
::RR("cname1.example.com 300 CNAME cname1.example.com"));
71
$packet->push("answer", new Net::
DNS
::RR("cname1.example.com 300 A 1.2.3.4"));
74
$packet->push("answer", new Net::
DNS
::RR("cname2.example.com 300 A 1.2.3.4"))
[
all
...]
/src/external/mpl/bind/dist/bin/tests/system/resolver/ans3/
ans.pl
20
use Net::
DNS
;
21
use Net::
DNS
::Packet;
51
if ($Net::
DNS
::VERSION > 0.68) {
52
$packet = new Net::
DNS
::Packet(\$buf, 0);
56
($packet, $err) = new Net::
DNS
::Packet(\$buf, 0);
71
$packet->push("answer", new Net::
DNS
::RR($qname . " 300 NS ns.example.net"));
72
$packet->push("additional", new Net::
DNS
::RR("ns.example.net 300 A 10.53.0.3"));
74
$packet->push("answer", new Net::
DNS
::RR($qname . " 300 A 10.53.0.3"));
87
$packet->push("answer", new Net::
DNS
::RR($qname . " 300 A 192.0.2.1"));
89
$packet->push("answer", new Net::
DNS
::RR($qname . " 300 AAAA 2001:db8:beef::1"))
[
all
...]
/src/external/mpl/bind/dist/bin/tests/system/serve-stale/ans2/
ans.pl
20
use Net::
DNS
;
90
my $rr = new Net::
DNS
::RR("$qname 0 $qclass TXT \"$send_response\"");
98
my $rr = new Net::
DNS
::RR("$qname 0 $qclass TXT \"$send_response\"");
107
my $rr = new Net::
DNS
::RR("$qname 0 $qclass TXT \"$send_response\"");
126
my $rr = new Net::
DNS
::RR($A);
129
my $rr = new Net::
DNS
::RR($SOA);
135
my $rr = new Net::
DNS
::RR($NS);
137
$rr = new Net::
DNS
::RR($A);
140
my $rr = new Net::
DNS
::RR($SOA);
143
my $rr = new Net::
DNS
::RR($SOA)
[
all
...]
/src/external/mpl/bind/dist/bin/tests/system/
ans.pl
92
use Net::
DNS
;
93
use Net::
DNS
::Packet;
127
print "Using Net::
DNS
$Net::
DNS
::VERSION\n";
146
if ($Net::
DNS
::VERSION > 0.68) {
147
$request = new Net::
DNS
::Packet(\$buf, 0);
151
($request, $err) = new Net::
DNS
::Packet(\$buf, 0);
161
my $packet = new Net::
DNS
::Packet($qname, $qtype, $qclass);
188
if ($Net::
DNS
::VERSION < 0.69) {
189
$tsig = Net::
DNS
::RR->new
[
all
...]
ditch.pl
20
# or more
DNS
names and types to send as queries, e.g.:
31
use Net::
DNS
;
32
use Net::
DNS
::Packet;
67
if ($Net::
DNS
::VERSION > 0.68) {
68
$packet = new Net::
DNS
::Packet();
72
($packet, $err) = new Net::
DNS
::Packet();
76
my $q = new Net::
DNS
::Question($tokens[0], $tokens[1], "IN");
/src/external/mpl/bind/dist/bin/tests/system/statschannel/
prereq.sh
16
if ! ${PERL} -MNet::
DNS
-e ''; then
17
echo_i "perl Net::
DNS
module is required"
/src/external/mpl/bind/dist/bin/tests/system/digdelv/ans7/
ans.pl
16
use Net::
DNS
;
17
use Net::
DNS
::Packet;
35
print "Net::
DNS
::VERSION => $Net::
DNS
::VERSION\n";
44
if ($Net::
DNS
::VERSION > 0.68) {
45
$packet = new Net::
DNS
::Packet(\$buf, 0);
49
($packet, $err) = new Net::
DNS
::Packet(\$buf, 0);
/src/external/mpl/bind/dist/bin/tests/system/reclimit/ans7/
ans.pl
19
use Net::
DNS
::Nameserver;
28
if ($Net::
DNS
::VERSION >= 1.42) {
53
my $rr = new Net::
DNS
::RR("$qname $ttl $qclass $qtype $rdata");
74
my $ns = Net::
DNS
::Nameserver->new(
81
if ($Net::
DNS
::VERSION >= 1.42) {
/src/external/mpl/bind/dist/bin/tests/system/digdelv/ans6/
ans.pl
16
use Net::
DNS
;
17
use Net::
DNS
::Packet;
40
if ($Net::
DNS
::VERSION > 0.68) {
41
$packet = new Net::
DNS
::Packet(\$buf, 0);
45
($packet, $err) = new Net::
DNS
::Packet(\$buf, 0);
63
new Net::
DNS
::RR($qname . " 300 A 10.53.0.5"));
Completed in 32 milliseconds
1
2
3
Indexes created Sat Feb 28 05:31:39 UTC 2026