%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
| Server IP : 14.207.165.8 / Your IP : 216.73.216.171 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/thread-self/root/usr/share/webmin/sendmail/ |
Upload File : |
#!/usr/bin/perl
# edit_file.cgi
# Display the contents of a file for editing
require './sendmail-lib.pl';
&error_setup($text{'file_err'});
$access{'manual'} || &error($text{'file_ecannot'});
&ReadParse();
$conf = &get_sendmailcf();
if ($in{'mode'} eq 'aliases') {
require './aliases-lib.pl';
$file = &aliases_file($conf)->[$in{'idx'}];
$return = "list_aliases.cgi";
$rmsg = $text{'aliases_return'};
$access{'amode'} == 1 && $access{'aedit_1'} && $access{'aedit_2'} &&
$access{'aedit_3'} && $access{'aedit_4'} && $access{'aedit_5'} &&
$access{'amax'} == 0 && $access{'apath'} eq '/' ||
&error($text{'file_ealiases'});
}
elsif ($in{'mode'} eq 'virtusers') {
require './virtusers-lib.pl';
$file = &virtusers_file($conf);
$return = "list_virtusers.cgi";
$rmsg = $text{'virtusers_return'};
$access{'vmode'} == 1 && $access{'vedit_0'} && $access{'vedit_1'} &&
$access{'vedit_2'} && $access{'vmax'} == 0 ||
&error($text{'file_evirtusers'});
}
elsif ($in{'mode'} eq 'mailers') {
require './mailers-lib.pl';
$file = &mailers_file($conf);
$return = "list_mailers.cgi";
$rmsg = $text{'mailers_return'};
$access{'mailers'} || &error($text{'file_emailers'});
}
elsif ($in{'mode'} eq 'generics') {
require './generics-lib.pl';
$file = &generics_file($conf);
$return = "list_generics.cgi";
$rmsg = $text{'generics_return'};
$access{'omode'} == 1 || &error($text{'file_egenerics'});
}
elsif ($in{'mode'} eq 'domains') {
require './domain-lib.pl';
$file = &domains_file($conf);
$return = "list_domains.cgi";
$rmsg = $text{'domains_return'};
$access{'domains'} || &error($text{'file_edomains'});
}
elsif ($in{'mode'} eq 'access') {
require './access-lib.pl';
$file = &access_file($conf);
$return = "list_access.cgi";
$rmsg = $text{'access_return'};
$access{'access'} || &error($text{'file_eaccess'});
}
else { &error($text{'file_emode'}); }
&ui_print_header(undef, $text{'file_title'}, "");
open(FILE, "<$file");
@lines = <FILE>;
close(FILE);
print &text('file_desc', "<tt>$file</tt>"),"<p>\n";
print &ui_form_start("save_file.cgi", "form-data");
print &ui_hidden("mode", $in{'mode'});
print &ui_hidden("idx", $in{'idx'});
print &ui_textarea("text", join("", @lines), 20, 80);
print &ui_form_end([ [ undef, $text{'save'} ] ]);
&ui_print_footer($return, $rmsg);