From f5967c88c0d60c118e09526b1dae5fc2831927b4 Mon Sep 17 00:00:00 2001
From: qorg11 <qorg@vxempire.xyz>
Date: Wed, 1 Jul 2020 17:50:58 +0200
Subject: [PATCH] Fix indendation in http/upload.cgi
---
http/upload.cgi | 41 +++++++++++++++++++++--------------------
1 file changed, 21 insertions(+), 20 deletions(-)
diff --git a/http/upload.cgi b/http/upload.cgi
index 0cadf0a..bfb435f 100755
--- a/http/upload.cgi
+++ b/http/upload.cgi
@@ -57,31 +57,32 @@ $filename = $string . "." . $extension;
my $allowed_extension = 1;
foreach(@not_allowed_extensions)
- {
+{
if($filename =~ /\.$_$/i)
- {
- $allowed_extension = 0;
- last;
- }
+ {
+ $allowed_extension = 0;
+ last;
+ }
- }
+}
if($allowed_extension)
- {
-
-open(FILE,">$upload_dir/$filename");
-binmode(FILE);
-
-while(<$upload_filehandle>)
{
- print FILE;
+
+ open(FILE,">$upload_dir/$filename");
+ binmode(FILE);
+
+ while(<$upload_filehandle>)
+ {
+ print FILE;
+ }
+
+ close FILE;
+
+ print $ENV{HTTP_REFERER} . "$upload_dir$filename";
}
-close FILE;
-
-print $ENV{HTTP_REFERER} . "$upload_dir$filename";
-}
-
-else {
- print "The file extension .$extension is not allowed in this instance.";
+else
+{
+ print "The file extension .$extension is not allowed in this instance.";
}