%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
Server IP : 49.231.201.246 / Your IP : 216.73.216.149 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,shell_exec,system,proc_open,popen,pcntl_exec MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /proc/11584/root/usr/share/webmin/filemin/ |
Upload File : |
#!/usr/bin/perl require './filemin-lib.pl'; &ReadParse(); get_paths(); my @errors; # Validate inputs my $file = &simplify_path($cwd.'/'.$in{'file'}); &check_allowed_path($file); &error($text{'error_saving_file'}." : ".ucfirst($text{'error_write'})) if (!can_write($file)); $data = $in{'data'}; $data =~ s/\r\n/\n/g; if ( $in{'encoding'} && lc( $in{'encoding'} ) ne "utf-8" ) { eval { $data = Encode::encode( $in{'encoding'}, Encode::decode( 'utf-8', $data ) ) }; } &open_tempfile(SAVE, ">$file") || &error($text{'error_saving_file'}." : ".&html_escape("$!")); &print_tempfile(SAVE, $data); &close_tempfile(SAVE); if ($in{'save_close'}) { &redirect("index.cgi?path=".&urlize($path)); } else { &redirect("edit_file.cgi?path=".&urlize($path). "&file=".&urlize($in{'file'})); }