tyler.durden/pandorafms
1
0
Fork 0
mirror of https://github.com/pandorafms/pandorafms.git synced 2025-07-29 00:34:46 +02:00
Code Issues Packages Projects Releases Wiki Activity

added accent compatibility Dataserver

Browse Source 
Former-commit-id: 039f7a5b776715c8c6a69bc6ab025dd9ff33fad9
This commit is contained in:
fbsanchez 2019-01-04 10:42:24 +01:00
parent cfdde23d96
commit eb1ce680d8
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
pandora_server/lib/PandoraFMS/DataServer.pm
View File

@ -30,6 +30,10 @@ use XML::Simple;
use POSIX qw(setsid strftime); use POSIX qw(setsid strftime);
use IO::Uncompress::Unzip; use IO::Uncompress::Unzip;
# Required for file names with accents
use Encode qw(decode);
use Encode::Locale ();
# For Reverse Geocoding # For Reverse Geocoding
use LWP::Simple; use LWP::Simple;
@ -111,6 +115,7 @@ sub data_producer ($) {
# Do not read more than max_queue_files files # Do not read more than max_queue_files files
my $file_count = 0; my $file_count = 0;
while (my $file = readdir (DIR)) { while (my $file = readdir (DIR)) {
$file = Encode::decode( locale_fs => $file );
# Data files must have the extension .data # Data files must have the extension .data
next if ($file !~ /^.*[\._]\d+\.data$/); next if ($file !~ /^.*[\._]\d+\.data$/);