Compress log files
authorMans Rullgard <mans@mansr.com>
Thu, 29 Jul 2010 17:11:11 +0000 (18:11 +0100)
committerMans Rullgard <mans@mansr.com>
Thu, 29 Jul 2010 17:11:11 +0000 (18:11 +0100)
fate-recv.sh
log.cgi

index 24d253d..d2c475e 100755 (executable)
@@ -34,6 +34,7 @@ fi
 
 repdir=$slotdir/$date
 mkdir $repdir
-cp -p report *.log $repdir
+gzip -9 *.log
+cp -p report *.log.gz $repdir
 rm -f $slotdir/latest
 ln -s $date $slotdir/latest
diff --git a/log.cgi b/log.cgi
index 81bba35..31a405f 100755 (executable)
--- a/log.cgi
+++ b/log.cgi
@@ -11,7 +11,7 @@ my $req_time = param 'time';
 my $req_log  = param 'log';
 
 my $repdir = "$fatedir/$req_slot/$req_time";
-my $log = "$repdir/$req_log.log";
+my $log = "$repdir/$req_log.log.gz";
 
 print "Content-type: text/plain\r\n";
 
@@ -21,5 +21,12 @@ if (! -r $log) {
     exit;
 }
 
+my $cat = 'zcat';
+
+if ($ENV{HTTP_ACCEPT_ENCODING} =~ /gzip/) {
+    print "Content-Encoding: gzip\r\n";
+    $cat = 'cat';
+}
+
 print "\r\n";
-exec 'cat', $log;
+exec $cat, $log;