I am a hacker in the dark of a very cold night

path :/var/www/html/vorne.webheaydemo.com

upload file:

List of files:

name file size edit permission action
.editorconfig276 KBMarch 05 2024 07:12:340666
.env1385 KBMay 24 2024 16:43:550666
.env.example1088 KBMarch 05 2024 07:12:340666
.gitattributes190 KBMarch 05 2024 07:12:340666
.gitignore245 KBMarch 05 2024 07:12:340666
.htaccess947 KBJuly 04 2023 21:25:080664
.rnd1024 KBMarch 13 2024 04:51:140666
README.md472 KBMarch 22 2024 10:35:000666
app-March 05 2024 07:12:340777
artisan1739 KBMarch 05 2024 07:12:340666
bootstrap-March 05 2024 07:12:340777
composer.json2829 KBMay 13 2024 12:10:040666
composer.lock417205 KBMarch 19 2024 12:13:140666
config-July 03 2025 02:53:360777
database-March 05 2024 07:12:340777
index.php1816 KBMay 13 2024 10:32:360666
lang-May 13 2024 14:53:260777
manifest.json913 KBMay 14 2024 03:57:260664
package.json398 KBMarch 05 2024 07:12:340666
phpunit.xml1206 KBMarch 05 2024 07:12:340666
public-July 03 2025 02:37:200777
resources-May 13 2024 12:09:360777
routes-March 05 2024 07:12:340777
service-worker.js924 KBMarch 05 2024 07:12:340666
storage-March 05 2024 10:03:520777
symlink.php218 KBMarch 05 2024 07:12:340666
tests-March 05 2024 07:12:340777
vendor-March 19 2024 12:13:140777
vite.config.js326 KBMarch 05 2024 07:12:340666
#!/usr/bin/perl # This file was preprocessed, do not edit! sub usage { print STDERR <get($label); if (! $template) { $template=Debconf::Template->new($label, $owner, $type); $template->description("Dummy template"); $template->extended_description("This is a fake template used to pre-seed the debconf database. If you are seeing this, something is probably wrong."); } $template->type($type); my $question=Debconf::Question->get($label); if (! $question) { error("Cannot find a question for $label"); return; } $question->addowner($owner, $type); $question->value($content); if (! $unseen) { $question->flag("seen", "true"); } } sub set_flag { my ($owner, $label, $flag, $content) = @_; info "Setting $flag flag"; my $question=Debconf::Question->get($label); if (! $question) { error("Cannot find a question for $label"); return; } $question->flag($flag, $content); } my @knowntypes = qw(select boolean string multiselect note password text title); my @knownflags = qw(seen); sub ok_format { my ($owner, $label, $type, $content) = @_; if (! defined $owner || ! defined $label || ! defined $content) { error "parse error on line $.: '$_'"; return; } elsif (! grep { $_ eq $type } @knowntypes, @knownflags) { warning "Unknown type $type, skipping line $."; return; } else { return 1; } } sub mungeline ($) { my $line=shift; chomp $line; $line=~s/\r$//; return $line; } GetOptions( "verbose|v" => \$debug, "checkonly|c" => \$checkonly, "unseen|u" => \$unseen, ) || usage(); Debconf::Db->load; $error = 0; while (<>) { $_=mungeline($_); while (/\\$/ && ! eof) { s/\\$//; $_.=mungeline(<>); } next if /^\s*$/ || /^\s*\#/; my ($owner, $label, $type, $content) = /^\s*(\S+)\s+(\S+)\s+(\S+)(?:\s(.*))?/; if (! defined $content) { $content=''; } if (ok_format($owner, $label, $type, $content)) { if (grep { $_ eq $type } @knownflags) { info "Trying to set '$type' flag to '$content'"; set_flag($owner, $label, $type, $content); } else { info "Trying to set '$label' [$type] to '$content'"; load_answer($owner, $label, $type, $content); } } } if (! $checkonly) { Debconf::Db->save; } if ($error) { exit 1; }