svragv/sakisafe
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added MIME types and stuff so the browser is able to show the file [experimental]

Browse source
This commit is contained in:
(≧◡≦) 2022-12-30 08:52:51 +01:00
parent 2d9e3fc94c
commit e8f03c430c
No known key found for this signature in database
GPG key ID: B39C0BCEE94A4A89
1 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
http/sakisafe.pl
View file

@ -3,10 +3,12 @@
use Mojolicious::Lite -signatures;
use Mojolicious::Routes::Pattern;
use List::MoreUtils qw(any uniq);
use MIME::Types;
use v5.36;
plugin 'RenderFile';
my $MAX_SIZE = 1024 * 1024 * 100;
my @BANNED = qw(); # Add banned IP addresses here
@ -30,7 +32,7 @@ sub handle_file {
status => 400
);
}
if ( $c->tx->remote_address ~~ @BANNED ) {
if ( any { /$c->tx->remote_address/ } uniq @BANNED ) {
$c->render(
text =>
"Hi! Seems like the server admin added your IP address to the banned IP array." .
@ -70,7 +72,12 @@ get '/f/:dir/:name' => sub ($c) {
my $captures = $c->req->url;
$captures =~ s/^.//;
my $filerender = Mojolicious::Plugin::RenderFile->new;
$c->render_file( filepath => $captures );
my ($ext) = $captures =~ /(\.[^.]+)$/;
print $ext;
$c->render_file( filepath => $captures,
format => $ext,
content_disposition => 'inline'
);
};
app->max_request_size( 1024 * 1024 * 100 );