Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

98_update.pm: mark excluded files in check (Forum #96561)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@18431 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2019-01-27 12:37:02 +00:00
parent 1828bad8b8
commit b36e93c936
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
FHEM/98_update.pm
View File

@ -324,6 +324,11 @@ doUpdate($$$$)
next if($r[0] ne "UPD");
my $fName = $r[3];
my $wouldExcl;
foreach my $ex (@excl) {
$wouldExcl = 1 if($fName =~ m/$ex/ || "$src:$fName" =~ m/$ex/);
}
if($fName =~ m+\.\.+) {
uLog 1, "Suspicious line $r, aborting";
return 1;
@ -334,12 +339,7 @@ doUpdate($$$$)
} else {
my $isExcl;
if(!$isCheck) { # Forum #95944
foreach my $ex (@excl) {
$isExcl = 1 if($fName =~ m/$ex/ || "$src:$fName" =~ m/$ex/);
}
}
my $isExcl = (!$isCheck && $wouldExcl);
my $fPath = "$root/$fName";
$fPath = $0 if($fPath =~ m/$mainPgm/);
my $fileOk = ($lh{$fName} &&
@ -370,7 +370,8 @@ doUpdate($$$$)
$nChanged++;
my $sfx = ($arg eq "checktime" ? " $r[1]" : "");
$sfx =~ s/_.*//;
uLog 1, "$r[0] $fName$sfx";
uLog 1, "$r[0] $fName$sfx".
($isCheck && $wouldExcl ? " (excluded from update)" : "");
next if($isCheck);
my $remFile = upd_getUrl("$basePath/$fName");