From 94a415e4205ff6cfe7e7292897a3301da84109a4 Mon Sep 17 00:00:00 2001 From: Axel Burri Date: Sun, 15 Aug 2021 18:24:41 +0200 Subject: [PATCH] btrbk: check/sanitize leading/trailing whitespace on files --- btrbk | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/btrbk b/btrbk index 30e94a7..45da402 100755 --- a/btrbk +++ b/btrbk @@ -3915,10 +3915,17 @@ sub check_file($$;@) return undef; } if($sanitize) { + $file =~ s/^\s+//; + $file =~ s/\s+$//; $file =~ s/\/(\.?\/)+/\//g; # sanitize "//", "/./" -> "/" $file =~ s/\/\.$/\//; # sanitize trailing "/." -> "/" $file =~ s/\/$// unless($file eq '/'); # remove trailing slash } + elsif(($file =~ /^\s/) || ($file =~ /\s$/)) { + ERROR "Illegal leading/trailing whitespace ${error_statement}: \"$file\"" if(defined($error_statement)); + return undef; + } + return $file; }