tyler.durden
/
pandorafms
mirror of https://github.com/pandorafms/pandorafms.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Not stop pandora_server service on windows when send XML PARSER error in data consumer. Gitlab: #518

This commit is contained in:
m-lopez-f 2017-03-14 16:47:09 +01:00
parent 252b43122e
commit ce576441fa
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pandora_server/bin/pandora_server
View File

@ -173,8 +173,6 @@ sub pandora_crash () {
# worried about that. If perl has a more "clean" way to avoid this messages # worried about that. If perl has a more "clean" way to avoid this messages
# will be nice to replace this code, but at this time it's the only way I know # will be nice to replace this code, but at this time it's the only way I know
callback_stop() if ($^O eq 'MSWin32' && defined($Config{'win32_service'}));
foreach my $error_line (@_) { foreach my $error_line (@_) {
# Trap the XML error and exit without nasty messages # Trap the XML error and exit without nasty messages
if ($error_line =~ m/XML\/Parser/) { if ($error_line =~ m/XML\/Parser/) {
@ -208,6 +206,8 @@ sub pandora_crash () {
print_message (\%Config, ' [E] Unhandled error in "' . $Config{'servername'} . "\". See more information in logfiles at '/var/log/pandora' \n", 0); print_message (\%Config, ' [E] Unhandled error in "' . $Config{'servername'} . "\". See more information in logfiles at '/var/log/pandora' \n", 0);
print_message (\%Config, " Error description:\n", 0); print_message (\%Config, " Error description:\n", 0);
print_message (\%Config, $full_error, 0); print_message (\%Config, $full_error, 0);
callback_stop() if ($^O eq 'MSWin32' && defined($Config{'win32_service'}));
} }
######################################################################################## ########################################################################################