From a90c182b85a12a9114505fe9dbccbe0747ee2622 Mon Sep 17 00:00:00 2001
From: Eric Bollengier <eric@eb.homelinux.org>
Date: Wed, 28 Feb 2007 19:49:08 +0000
Subject: [PATCH] ebl  limit to 1000 lines of log in display_log      you can
 add limit= and offset= params

git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@4284 91ce42f0-d328-0410-95d8-f526ca767f89
---
 gui/bweb/lib/Bweb.pm | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm
index 1e69b486e5..d2679c825d 100644
--- a/gui/bweb/lib/Bweb.pm
+++ b/gui/bweb/lib/Bweb.pm
@@ -2956,11 +2956,15 @@ sub get_job_log
 {
     my ($self) = @_;
 
-    my $arg = $self->get_form('jobid');
+    my $arg = $self->get_form('jobid', 'limit', 'offset');
     unless ($arg->{jobid}) {
 	return $self->error("Can't get jobid");
     }
 
+    if ($arg->{limit} == 100) {
+        $arg->{limit} = 1000;
+    }
+
     my $t = CGI::param('time') || '';
 
     my $query = "
@@ -2982,7 +2986,9 @@ SELECT Time AS time, LogText AS log
     OR (Log.JobId = 0 AND Time >= (SELECT StartTime FROM Job WHERE JobId=$arg->{jobid}) 
                       AND Time <= (SELECT COALESCE(EndTime,NOW()) FROM Job WHERE JobId=$arg->{jobid})
        )
- ORDER BY LogId;
+ ORDER BY LogId
+ LIMIT $arg->{limit}
+ OFFSET $arg->{offset}
 ";
 
     my $log = $self->dbh_selectall_arrayref($query);
@@ -3002,6 +3008,8 @@ SELECT Time AS time, LogText AS log
 		     jobid => $arg->{jobid},
 		     name  => $row->{name},
 		     client => $row->{clientname},
+		     offset => $arg->{offset},
+		     limit  => $arg->{limit},
 		 }, 'display_log.tpl');
 }
 
-- 
2.39.5