diff --git a/src/warden-server/lib/Warden.pm b/src/warden-server/lib/Warden.pm index e0a1c7c07a07978f7ec11dcbdb567a0644aac56b..ce154d8b7e8142c61ef0d46908b522b54faa68a1 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); } }