MailScanner/v5
1
1
Fork 0
mirror of https://github.com/MailScanner/v5.git synced 2025-02-25 16:05:17 +08:00
Code Issues Projects Releases Packages Wiki Activity Actions

Escape space before passing to unrar extract

Browse source
This commit is contained in:
Shawn Iverson 2017-11-18 20:04:00 -05:00
parent e559dd8474
commit 96e02d65c7
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
common/usr/share/MailScanner/perl/MailScanner/Message.pm
View file

@ -3027,6 +3027,9 @@ sub UnpackRar {
# Check version # Check version
return 1 unless $UnrarVersion =~ /^\d+\.\d*$/ && ( $UnrarVersion >= 4.0 && $UnrarVersion < 6.0 ); return 1 unless $UnrarVersion =~ /^\d+\.\d*$/ && ( $UnrarVersion >= 4.0 && $UnrarVersion < 6.0 );
# Escape spaces in filename
$zipname =~ s/\ /\\\ /g;
# Unrar Version 4x file parse # Unrar Version 4x file parse
if ($UnrarVersion >= 4.0 && $UnrarVersion < 5.0) { if ($UnrarVersion >= 4.0 && $UnrarVersion < 5.0) {
#MailScanner::Log::WarnLog("UnPackRar Testing : %s", $zipname); #MailScanner::Log::WarnLog("UnPackRar Testing : %s", $zipname);