| Server IP : 89.117.53.150 / Your IP : 216.73.216.11 Web Server : Apache System : Linux server2.hostofiraq.site 5.15.0-186-generic #196-Ubuntu SMP Sat Jun 20 16:09:34 UTC 2026 x86_64 User : iscmbt-kufa-atu ( 1014) PHP Version : 8.2.32 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/filemin/ |
Upload File : |
#!/usr/bin/perl
require './filemin-lib.pl';
&ReadParse();
get_paths();
if (!$in{'name'}) {
&redirect("index.cgi?path=".&urlize($path));
return;
}
my $name = $in{'name'};
my $full = &validate_filename_path($name);
if (-e $full) {
print_errors(&html_escape($name).
" ".$text{'error_exists'});
}
else {
my @st = stat($cwd);
if (&make_dir($full, oct(755))) {
&set_ownership_permissions(
$st[4], $st[5], undef, $full);
&redirect("index.cgi?path=".
&urlize($path));
}
else {
print_errors($text{'error_create'}." ".
&html_escape($name).
" : ".$!);
}
}