From 9de60ed1ea4f213670c171cbb37f857d48325eda Mon Sep 17 00:00:00 2001
From: pharook <ph@rook.cz>
Date: Fri, 17 Aug 2012 16:01:38 +0200
Subject: [PATCH] Upraveno hlaseni chyby deserializace (#532)
---
src/warden-client/lib/WardenClientReceive.pm | 5 ++++-
src/warden-client/lib/WardenClientSend.pm | 5 ++++-
2 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/src/warden-client/lib/WardenClientReceive.pm b/src/warden-client/lib/WardenClientReceive.pm
index 1544c3b..525f365 100755
--- a/src/warden-client/lib/WardenClientReceive.pm
+++ b/src/warden-client/lib/WardenClientReceive.pm
@@ -69,7 +69,10 @@ sub c2s
errMsg("Error: server returned empty response." . "\n" . "Problem with used SSL ceritificates or Warden server at $server:$port is down.");
} else {
# deserialized response from server -> create SOAP envelope and data object
- my $response = $soap->deserializer->deserialize($result);
+ my $response;
+ eval {
+ $response = $soap->deserializer->deserialize($result);
+ } or errMsg($@ . "Received data: " . $result);
# check SOAP fault status
$response->fault ? errMsg("Server sent error message:: " . $response->faultstring) : return $response;
}
diff --git a/src/warden-client/lib/WardenClientSend.pm b/src/warden-client/lib/WardenClientSend.pm
index b1b3cc0..429aeb0 100755
--- a/src/warden-client/lib/WardenClientSend.pm
+++ b/src/warden-client/lib/WardenClientSend.pm
@@ -67,7 +67,10 @@ sub c2s
errMsg("Error: server returned empty response." . "\n" . "Problem with used SSL ceritificates or Warden server at $server:$port is down.");
} else {
# deserialized response from server -> create SOAP envelope and data object
- my $response = $soap->deserializer->deserialize($result);
+ my $response;
+ eval {
+ $response = $soap->deserializer->deserialize($result);
+ } or errMsg($@ . "Received data: " . $result);
# check SOAP fault status
$response->fault ? errMsg("Server sent error message:: " . $response->faultstring) : return 1;
}
--
GitLab