!C99Shell v. 1.0 pre-release build #16!

Software: Apache/2.0.54 (Fedora). PHP/5.0.4 

uname -a: Linux mina-info.me 2.6.17-1.2142_FC4smp #1 SMP Tue Jul 11 22:57:02 EDT 2006 i686 

uid=48(apache) gid=48(apache) groups=48(apache)
context=system_u:system_r:httpd_sys_script_t
 

Safe-mode: OFF (not secure)

/usr/libexec/webmin/adsl-client/   drwxr-xr-x
Free 3.83 GB of 27.03 GB (14.16%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     save.cgi (1.95 KB)      -rwxr-xr-x
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
#!/usr/bin/perl
# save.cgi
# Save the ADSL client configuration

require './adsl-client-lib.pl';
&error_setup($text{'save_err'});
&lock_file($config{'pppoe_conf'});
$conf = &get_config();
&ReadParse();

# Validate and store inputs
$eth = $in{'eth'} || $in{'other'};
$eth =~ /^\S+$/ || &error($text{'save_eeth'});
&save_directive($conf, "ETH", $eth);

if ($in{'demand'} eq 'yes') {
    $in{'timeout'} =~ /^\d+$/ || &error($text{'save_etimeout'});
    &save_directive($conf, "DEMAND", $in{'timeout'});
    }
else {
    &save_directive($conf, "DEMAND", 'no');
    }

$olduser = &find("USER", $conf);
$in{'user'} =~ /^\S+$/ || &error($text{'save_euser'});
&save_directive($conf, "USER", $in{'user'});

$dnsdir = &find("USEPEERDNS", $conf) ? "USEPEERDNS" : "PEERDNS";
&save_directive($conf, $dnsdir, $in{'dns'});

if ($in{'connect_def'}) {
    &save_directive($conf, "CONNECT_TIMEOUT", 0);
    }
else {
    $in{'connect'} =~ /^\d+$/ || &error($text{'save_econnect'});
    &save_directive($conf, "CONNECT_TIMEOUT", $in{'connect'});
    }

if ($in{'mss'} eq 'yes') {
    $in{'psize'} =~ /^\d+$/ || &error($text{'save_emss'});
    &save_directive($conf, "CLAMPMSS", $in{'psize'});
    }
else {
    &save_directive($conf, "CLAMPMSS", 'no');
    }

if ($in{'fw'}) {
    &save_directive($conf, "FIREWALL", $in{'fw'});
    }

# Actually save the directives, and update the pap-secrets file
&flush_file_lines();
&unlock_file($config{'pppoe_conf'});
&lock_file($config{'pap_file'});
@secs = &list_secrets();
($sec) = grep { $_->{'client'} eq $olduser } @secs;
if (!$sec) {
    ($sec) = grep { $_->{'client'} eq $in{'user'} } @secs;
    }
if ($sec) {
    $sec->{'secret'} = $in{'sec'};
    $sec->{'client'} = $in{'user'};
    &change_secret($sec);
    }
else {
    $sec = { 'secret' => $in{'sec'},
         'client' => $in{'user'},
         'server' => '*' };
    &create_secret($sec);
    }
&unlock_file($config{'pap_file'});
&webmin_log("save");

# Tell the user
&ui_print_header(undef, $text{'save_title'}, "");

print "<p>$text{'save_desc'}<p>\n";

&ui_print_footer("", $text{'index_return'});


:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ Read-Only ]

:: Make Dir ::
 
[ Read-Only ]
:: Make File ::
 
[ Read-Only ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 1.0 pre-release build #16 powered by Captain Crunch Security Team | http://ccteam.ru | Generation time: 0.0032 ]--