mir/bind
2
0
Fork 0
mirror of https://gitlab.isc.org/isc-projects/bind9 synced 2025-08-30 05:57:52 +00:00
Code Issues Releases Wiki Activity

style; improved error handling; set SOA timers to

Browse Source 
lower values so that retries and refreshes can be observed
This commit is contained in:
Andreas Gustafsson 2000-05-22 16:35:36 +00:00
parent 9b50fc6648
commit c512030111
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
bin/tests/system/xferquota/setup.pl
View File

@ -15,7 +15,9 @@
# ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
# SOFTWARE.
#
# Set up test data for zone transfer quota tests.
#
use FileHandle;
my $masterconf = new FileHandle("ns1/zones.conf", "w") or die;
@ -25,9 +27,10 @@ for ($z = 0; $z < 1000; $z++) {
my $zn = sprintf("zone%06d.example", $z);
print $masterconf "zone \"$zn\" { type master; file \"$zn.db\"; };\n";
print $slaveconf "zone \"$zn\" { type slave; file \"$zn.bk\"; masters { 10.53.0.1; }; };\n";
my $f = new FileHandle("ns1/$zn.db", "w") or die;
my $fn = "ns1/$zn.db";
my $f = new FileHandle($fn, "w") or die "open: $fn: $!";
print $f "\$TTL 300
\@ IN SOA . . 1 9999 9999 99999 999
\@ IN SOA . . 1 300 120 3600 86400
NS ns1
NS ns2
MX 10 mail1.isp.example.