!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/usermin/   drwxr-xr-x
Free 4.89 GB of 27.03 GB (18.1%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     edit_bind.cgi (2.08 KB)      -rwxr-xr-x
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
#!/usr/bin/perl
# edit_bind.cgi
# Display port / address form

require './usermin-lib.pl';
$access{'bind'} || &error($text{'acl_ecannot'});
&ui_print_header(undef, $text{'bind_title'}, "");
&get_usermin_miniserv_config(\%miniserv);

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

print &ui_form_start("change_bind.cgi", "post");
print &ui_table_start($text{'bind_header'}, undef, 2, [ "width=30%" ]);

# Build list of sockets
my @sockets = &webmin::get_miniserv_sockets(\%miniserv);

# Show table of all bound IPs and ports
my $stable = &ui_columns_start([ $text{'bind_sip'}, $text{'bind_sport'} ]);
my $i = 0;
my @ports;
foreach $s (@sockets, [ undef, "*" ]) {
    # IP address
    my @cols;
    push(@cols, &ui_select("ip_def_$i",
                           $s->[0] eq "" ? 0 :
                           $s->[0] eq "*" ? 1 : 2,
                           [ [ 0, "&nbsp;" ],
                           [ 1, $text{'bind_sip1'} ],
                           [ 2, $text{'bind_sip2'} ] ])." ".
                           &ui_textbox("ip_$i",
                  $s->[0] eq "*" ? undef : $s->[0], 20));

    # Port
    push(@cols, &ui_select("port_def_$i", $s->[1] eq "*" ? 0 : 1,
              [ $i ? ( [ 0, $text{'bind_sport0'} ] ) : ( ),
         [ 1, $text{'bind_sport1'} ] ])." ".
          &ui_textbox("port_$i", $s->[1] eq "*" ? undef : $s->[1],5));
    $stable .= &ui_columns_row(\@cols, [ "nowrap", "nowrap" ]);
    push(@ports, $s->[1]) if ($s->[1] && $s->[1] ne "*");
    $i++;
    }
$stable .= &ui_columns_end();
if (&foreign_check("firewall")) {
        print &ui_hidden("oldports", join(" ", @ports));
        $stable .= &ui_checkbox("firewall", 1, $text{'bind_firewall'}, 1);
        }
print &ui_table_row($text{'bind_sockets'}, $stable);

# IPv6 enabled?
print &ui_table_row($text{'bind_ipv6'},
    &ui_yesno_radio("ipv6", $miniserv{'ipv6'}));

# Show web server hostname
print &ui_table_row($text{'bind_hostname'},
      &ui_radio("hostname_def", $miniserv{"host"} ? 0 : 1,
      [ [ 1, $text{'bind_auto'} ],
      [ 0, &ui_textbox("hostname", $miniserv{"host"}, 25) ] ]));

print &ui_table_end();
print &ui_form_end([ [ "save", $text{'save'} ] ]);

&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.0034 ]--