scripts/update-stats.pl | 46 +++++++++++++++++-----------------------------
1 file changed, 17 insertions(+), 29 deletions(-)
New commits:
commit acf040244d5a8fc488e1e8fb9dee1ce5ca8dc1b1
Author: Jan Holesovsky <ke...@collabora.com>
Date: Mon Sep 1 19:27:05 2014 +0200
More versions (up to 4.2.6-secfix1 and 4.3.1).
diff --git a/scripts/update-stats.pl b/scripts/update-stats.pl
index 29c8118..45c8ede 100755
--- a/scripts/update-stats.pl
+++ b/scripts/update-stats.pl
@@ -86,6 +86,16 @@ my %versions = (
'882f8a0a489bc99a9e60c7905a60226254cb6ff0' => '4.2.3_RC3', # hotfix1
'63150712c6d317d27ce2db16eb94c2f3d7b699f8' => '4.2.4_RC2',
+
+ '61cb170a04bb1f12e77c884eab9192be736ec5f5' => '4.2.5_RC2',
+ '6ff819b65674ae6c83f3cbab9e4a4c2b292a7a94' => '4.2.5_RC2', # hotfix1
+
+ '185f2ce4dcc34af9bd97dec29e6d42c39557298f' => '4.2.6_RC2',
+ '3fd416d4c6db7d3204c17ce57a1d70f6e531ee21' => '4.2.6_RC2', # secfix1
+
+ '62ad5818884a2fc2e5780dd45466868d41009ec0' => '4.3.0_RC4',
+
+ '958349dc3b25111dbca392fbc281a05559ef6848' => '4.3.1_RC2',
);
my %month_to_num = (
commit 7166dc5c1a0815aa761369d8ca961703f920218f
Author: Jan Holesovsky <ke...@collabora.com>
Date: Mon Sep 1 16:00:44 2014 +0200
Add new versions, kill by-hour breakdown.
diff --git a/scripts/update-stats.pl b/scripts/update-stats.pl
index 6124a13..29c8118 100755
--- a/scripts/update-stats.pl
+++ b/scripts/update-stats.pl
@@ -74,11 +74,18 @@ my %versions = (
'1c1366bba2ba2b554cd2ca4d87c06da81c05d24' => '4.1.5_RC3',
+ '40ff705089295be5be0aae9b15123f687c05b0a' => '4.1.6_RC2',
+
'05dceb5d363845f2cf968344d7adab8dcfb2ba71' => '4.2.0_RC4',
'd7dbbd7842e6a58b0f521599204e827654e1fb8b' => '4.2.1_RC1',
'3be8cda0bddd8e430d8cda1ebfd581265cca5a0f' => '4.2.2_RC1',
+
+ '6c3586f855673fa6a1576797f575b31ac6fa0ba3' => '4.2.3_RC3',
+ '882f8a0a489bc99a9e60c7905a60226254cb6ff0' => '4.2.3_RC3', # hotfix1
+
+ '63150712c6d317d27ce2db16eb94c2f3d7b699f8' => '4.2.4_RC2',
);
my %month_to_num = (
@@ -101,7 +108,6 @@ my $try_geoip = 0;
my %result_ips;
my %result_versions;
my %result_os;
-my %result_hourly;
my %result_daily;
my %result_geoip;
my %result_countries;
@@ -140,11 +146,6 @@ while (<LOG>) {
}
++$result_daily{$date}{'unique'};
- if ( !defined( $result_hourly{$time}{'unique'} ) ) {
- $result_hourly{$time}{'unique'} = 0;
- }
- ++$result_hourly{$time}{'unique'};
-
# geoip counts
if ( $try_geoip ) {
my $country = `geoiplookup '$ip'`;
@@ -173,12 +174,6 @@ while (<LOG>) {
$result_daily{$date}{$version} = 0;
}
++$result_daily{$date}{$version};
-
- # hourly reports per version
- if ( !defined( $result_hourly{$time}{$version} ) ) {
- $result_hourly{$time}{$version} = 0;
- }
- ++$result_hourly{$time}{$version};
}
# just to keep the list of all osses we have
@@ -219,24 +214,7 @@ foreach my $version ( sort( keys( %result_versions ) ) ) {
print ",$all$percentage\n";
}
-print "\nNew IP's asking for update per hour:\n\nTime,new unique IP's (never
seen before)";
-foreach my $version ( sort( keys( %result_versions ) ) ) {
- print ",$version";
-}
-print "\n";
my @print_versions = ( 'unique', sort( keys( %result_versions ) ) );
-foreach my $time ( sort( keys( %result_hourly ) ) ) {
- print "$time";
- foreach my $version ( @print_versions ) {
- my $count = $result_hourly{$time}{$version};
- if ( !defined( $count ) ) {
- print ",";
- } else {
- print ",$count";
- }
- }
- print "\n";
-}
print "\nNew IP's asking for update per day:\n\nTime,new unique IP's (never
seen before)";
foreach my $version ( sort( keys( %result_versions ) ) ) {
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits
