oysteikt/heimdal
0
0
Fork 0
Code Issues 5 Pull Requests Releases Activity

count v5 cross realms too

Browse Source 
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
1 changed files with 14 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
tools/kdc-log-analyze.pl
View File

@@ -99,6 +99,8 @@ my %v4_req_addr;
my %v4_req_addr_nonlocal;
my $v4_cross = 0;
my %v4_cross_realm;
my $v5_cross = 0;
my %v5_cross_realm;
my $referrals = 0;
my %referral_princ;
my %referral_realm;
@@ -152,6 +154,13 @@ if ($v4_cross > 0) {
}
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";
if ($no_such_princ > 0) {
print "\tTop ten IP addresses failing to find principal:\n";
@@ -433,7 +442,11 @@ sub process_line {
$v4_cross_realm{$1."->".$2}++;
} elsif (/cross-realm (.*) -> (.*): no transit through realm (.*)/) {
} 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]+)/) {
$bw_addr{$2} += $1;
} elsif (/Using ([-a-z0-9]+)\/([-a-z0-9]+)/) {