[1570] in Moira
nightly report
daemon@ATHENA.MIT.EDU (Jonathon Weiss)
Sun Jun 4 19:09:29 2000
Date: Sun, 4 Jun 2000 19:09:26 -0400 (EDT)
Message-Id: <200006042309.TAA23012@Bearing-An-Hourglass.mit.edu>
To: moiradev@mit.edu
From: Jonathon Weiss <jweiss@MIT.EDU>
The script that generates in nightly report that goes with the backups
also needs to be adjusted for the recent schema change. Note also how
we specify a maximum number of fields to split into, not an
uninitialized variable. I'm going to check this in early and deploy it.
Jonathon
Index: report.sh
===================================================================
RCS file: /mit/moiradev/repository/moira/backup/report.sh,v
retrieving revision 1.7
diff -c -r1.7 report.sh
*** report.sh 1999/01/29 18:38:35 1.7
--- report.sh 2000/06/04 22:14:16
***************
*** 65,75 ****
while (<USERS>) {
s/\|/\e/g; s/\\\e/\|/g;
! split(/\e/, $_, $27);
! $total++; $STATUS{$_[7]}++;
! if ($_[7] != 3) { $classtotal++; $CLASS{$_[9]}++; }
! if ($_[7] == 1) { $CLASSA{$_[9]}++; }
! if ($_[7] == 1 || $_[7] == 6) { $pototal++; $POTYPE{$_[25]}++; }
}
close(USERS);
--- 65,75 ----
while (<USERS>) {
s/\|/\e/g; s/\\\e/\|/g;
! split(/\e/, $_, 28);
! $total++; $STATUS{$_[8]}++;
! if ($_[8] != 3) { $classtotal++; $CLASS{$_[10]}++; }
! if ($_[8] == 1) { $CLASSA{$_[10]}++; }
! if ($_[8] == 1 || $_[8] == 6) { $pototal++; $POTYPE{$_[26]}++; }
}
close(USERS);
