From 06ac9863a72e53741c8872a9312733ac25d7c050 Mon Sep 17 00:00:00 2001 From: Tomas Plesnik <plesnik@ics.muni.cz> Date: Tue, 25 Sep 2012 16:14:40 +0200 Subject: [PATCH] pridan modul SOAP::Fault, uprava log zprav, nastavena defaultni hodnota serveroveho limitu --- src/warden-server/lib/Warden.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/warden-server/lib/Warden.pm b/src/warden-server/lib/Warden.pm index e0a1c7c..ce154d8 100755 --- a/src/warden-server/lib/Warden.pm +++ b/src/warden-server/lib/Warden.pm @@ -19,6 +19,7 @@ use Net::CIDR::Lite; use DateTime; use MIME::Base64; use Crypt::X509; +use SOAP::Lite; our $VERSION = "2.1"; @@ -33,7 +34,7 @@ our $DB_NAME = undef; our $DB_USER = undef; our $DB_PASS = undef; our $DB_HOST = undef; -our $MAX_EVENTS_LIMIT = undef; # server events limit +our $MAX_EVENTS_LIMIT = 1000000; # default value our %VALID_STRINGS = undef; # load set variables by user @@ -362,11 +363,11 @@ sub getNewEvents if (scalar @events != 0) { if (scalar @ids == 1) { sendMsg("info", - "Sent 1 event [#$ids[0]] to '$ip' (CN(AN): $alt_names) with client limit '$max_rcv_events_limit' events", + "Sent 1 event [#$ids[0]] to '$ip' [CN(AN): $alt_names], client_limit: '$max_rcv_events_limit', requested_type: '$requested_type'", undef); } else { sendMsg("info", - "Sent " . scalar @ids . " events [#$ids[0] - #$ids[-1]] to '$ip' (CN(AN): $alt_names) with client limit '$max_rcv_events_limit' events", + "Sent " . scalar @ids . " events [#$ids[0] - #$ids[-1]] to '$ip' [CN(AN): $alt_names], client_limit: '$max_rcv_events_limit', requested_type: '$requested_type'", undef); } } -- GitLab