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


Viewing file:     delete_users.cgi (805 B)      -rwxr-xr-x
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
#!/usr/bin/perl
# Delete multiple users

use strict;
use warnings;
require './iscsi-server-lib.pl';
our (%text, %in, %config);
&error_setup($text{'dusers_err'});
&lock_file($config{'auths_file'});
&ReadParse();

# Get the users
my @users = &list_iscsi_users();
my @delusers;
foreach my $d (split(/\0/, $in{'d'})) {
    my ($user) = grep { $_->{'user'} eq $d } @users;
    if ($user) {
        push(@delusers, $user);
        }
    }
@delusers || &error($text{'dusers_enone'});

# Delete them, in reverse line order
foreach my $user (sort { $b->{'line'} cmp $a->{'line'} } @delusers) {
    &delete_iscsi_user($user);
    }

&unlock_file($config{'auths_file'});
if (@delusers == 1) {
    &webmin_log("delete", "user", $delusers[0]->{'user'});
    }
else {
    &webmin_log("delete", "users", scalar(@delusers));
    }
&redirect("list_users.cgi");

:: 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 ]--