for my $entry (keys %entries) {
next if (exists($current_entries{$entry}));
- last if (++$num_lines == 1000);
+ last if (++$num_lines >= $itkaclsyncconfig::max_updates_per_transaction);
print NSUPDATE "update add $entry 10 A 127.0.0.1\n";
}
for my $entry (keys %current_entries) {
next if (exists($entries{$entry}));
- last if (++$num_lines == 1000);
+ last if (++$num_lines >= $itkaclsyncconfig::max_updates_per_transaction);
print NSUPDATE "update delete $entry\n";
}
print NSUPDATE "send\n";
close NSUPDATE;
print "Made $num_lines updates.\n";
- if ($num_lines >= 1000) {
- print "Note: Hit limit of 1000 updates, will continue in a separate transaction.\n";
+ if ($num_lines >= $itkaclsyncconfig::max_updates_per_transaction) {
+ print "Note: Hit limit of $itkaclsyncconfig::max_updates_per_transaction updates, will continue in a separate transaction.\n";
return 0;
}
return 1;