count v5 cross realms too

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@17173 ec53bebd-3082-4978-b11e-865c3cabbd6b
This commit is contained in:
Love Hörnquist Åstrand
2006-04-23 13:19:21 +00:00
parent c3adaabbdb
commit 8035344fa7

View File

@@ -99,6 +99,8 @@ my %v4_req_addr;
my %v4_req_addr_nonlocal; my %v4_req_addr_nonlocal;
my $v4_cross = 0; my $v4_cross = 0;
my %v4_cross_realm; my %v4_cross_realm;
my $v5_cross = 0;
my %v5_cross_realm;
my $referrals = 0; my $referrals = 0;
my %referral_princ; my %referral_princ;
my %referral_realm; my %referral_realm;
@@ -152,6 +154,13 @@ if ($v4_cross > 0) {
} }
print "\n"; print "\n";
print "\tNumber of V45 cross realms requests: $v5_cross\n";
if ($v5_cross > 0) {
print "\tTop ten realms performing V4 cross requests:\n";
topten(\%v5_cross_realm);
}
print "\n";
print "\tNumber of failed lookups: $no_such_princ\n"; print "\tNumber of failed lookups: $no_such_princ\n";
if ($no_such_princ > 0) { if ($no_such_princ > 0) {
print "\tTop ten IP addresses failing to find principal:\n"; print "\tTop ten IP addresses failing to find principal:\n";
@@ -433,7 +442,11 @@ sub process_line {
$v4_cross_realm{$1."->".$2}++; $v4_cross_realm{$1."->".$2}++;
} elsif (/cross-realm (.*) -> (.*): no transit through realm (.*)/) { } elsif (/cross-realm (.*) -> (.*): no transit through realm (.*)/) {
} elsif (/cross-realm (.*) -> (.*) via \[([^\]]+)\]/) { } elsif (/cross-realm (.*) -> (.*) via \[([^\]]+)\]/) {
} elsif (/cross-realm (.*) -> (.*)) { $v5_cross++;
$v5_cross_realm{$1."->".$2}++;
} elsif (/cross-realm (.*) -> (.*)/) {
$v5_cross++;
$v5_cross_realm{$1."->".$2}++;
} elsif (/sending ([0-9]+) bytes to IPv[46]:([0-9\.:a-fA-F]+)/) { } elsif (/sending ([0-9]+) bytes to IPv[46]:([0-9\.:a-fA-F]+)/) {
$bw_addr{$2} += $1; $bw_addr{$2} += $1;
} elsif (/Using ([-a-z0-9]+)\/([-a-z0-9]+)/) { } elsif (/Using ([-a-z0-9]+)\/([-a-z0-9]+)/) {