From: Darold Gilles <gilles@darold.net>
Date: Wed, 23 Jul 2014 15:38:41 +0000 (+0200)
Subject: Fix move to offset in incremental mode with multiprocess and incomplete condition... 
X-Git-Tag: v6.0~21
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=72d3270bcc67ccae49a533268d6cba33e6683206;p=pgbadger

Fix move to offset in incremental mode with multiprocess and incomplete condition when file is smaller than the last offset.
---

diff --git a/pgbadger b/pgbadger
index b83ae0c..182efdd 100755
--- a/pgbadger
+++ b/pgbadger
@@ -2151,10 +2151,7 @@ sub check_file_changed
 	if ($iscompressed) {
 		close($lfile);
 		return 1;
-	# do not seek if filesize is smaller than the seek position
-	} elsif ($saved_last_line{current_pos} > $totalsize) {
-		close($lfile);
-		return 1;
+		
 	}
 
 	my ($gsec, $gmin, $ghour, $gmday, $gmon, $gyear, $gwday, $gyday, $gisdst) = localtime(time);
@@ -2162,7 +2159,10 @@ sub check_file_changed
 	my $CURRENT_DATE = $gyear . sprintf("%02d", $gmon + 1) . sprintf("%02d", $gmday);
 
 	%prefix_vars = ();
-	$lfile->seek($saved_last_line{current_pos} || 0, 0);
+	# do not seek if filesize is smaller than the seek position
+	if ($saved_last_line{current_pos} < $totalsize) {
+		$lfile->seek($saved_last_line{current_pos} || 0, 0);
+	}
 	my $more_lines = 0;
 	while (my $line = <$lfile>) {