aboutsummaryrefslogtreecommitdiffstats
path: root/debian_edu-summary
diff options
context:
space:
mode:
authorPetter Reinholdtsen <pere@hungry.com>2006-10-04 08:32:35 +0000
committerPetter Reinholdtsen <pere@hungry.com>2006-10-04 08:32:35 +0000
commitc0263cb7af9810de7e0cf26b4326a70311861bff (patch)
tree91067b704a384f88d53e19aeb67f4565afb7e98c /debian_edu-summary
parentaf5ecd8d9cb7231756fba13418766e45816a0b9c (diff)
downloadsitesummary-c0263cb7af9810de7e0cf26b4326a70311861bff.tar.gz
sitesummary-c0263cb7af9810de7e0cf26b4326a70311861bff.tar.bz2
sitesummary-c0263cb7af9810de7e0cf26b4326a70311861bff.tar.xz
* Add collector for debian-edu configuration. Correct server
summary part to use the collected file.
Diffstat (limited to 'debian_edu-summary')
-rwxr-xr-xdebian_edu-summary28
1 files changed, 20 insertions, 8 deletions
diff --git a/debian_edu-summary b/debian_edu-summary
index ad29a72..a873f76 100755
--- a/debian_edu-summary
+++ b/debian_edu-summary
@@ -3,18 +3,30 @@
use strict;
use SiteSummary;
+my %profiles;
+my %versions;
-#for_all_hosts(\&handle_host);
+for_all_hosts(\&handle_host);
+
+print_summary();
+
+exit 0;
-handle_host();
sub handle_host {
my $hostid = shift;
- printf(" %-20s %5s\n", "debian-edu-profile", "count");
- foreach ( get_debian_edu_profile ) {
- printf(" %20s\n", $_ || "", "\n");
+ my $profile = get_debian_edu_profile($hostid);
+ my $version = get_debian_edu_ver($hostid);
+ $profiles{$profile}++ if (defined $profile);
+ $profiles{$version}++ if (defined $version);
+}
+
+sub print_summary {
+ printf(" %-30s %5s\n", "debian-edu-profile", "count");
+ foreach ( keys %profiles ) {
+ printf(" %30s %5s\n", $_ || "", $profiles{$_});
}
- printf(" %-20s %5s\n", "debian-edu-version", "count");
- foreach ( get_debian_edu_ver ) {
- printf(" %20s\n", $_ || "", "\n");
+ printf(" %-30s %5s\n", "debian-edu-version", "count");
+ foreach ( keys %versions ) {
+ printf(" %30s %5s\n", $_ || "", $versions{$_});
}
}