Software: Apache/2.2.3 (CentOS). PHP/5.1.6 uname -a: Linux mx-ll-110-164-51-230.static.3bb.co.th 2.6.18-194.el5PAE #1 SMP Fri Apr 2 15:37:44 uid=48(apache) gid=48(apache) groups=48(apache) Safe-mode: OFF (not secure) /usr/bin/ drwxr-xr-x |
Viewing file: Select action/file-type: #!/usr/bin/perl # # bonobo-slay # # Kills bonobo processes # # Return code of -1 (255) returned if usage error. # Return code of 1 indicates bonobo processes were running # when script was run. # Return code of 0 indicates no bonobo processes were # running when script was run. # use Getopt::Long; Getopt::Long::Configure( "no_auto_abbrev" ); Getopt::Long::Configure( "bundling" ); $usage_error = 0; $opt_h = 0, $opt_i = 0, $opt_l = 0, $opt_s = 0; $rc = GetOptions("help" => \$usage_error, "h" => \$opt_h, "i" => \$opt_i, "l" => \$opt_l, "s" => \$opt_s); # Usage errors # if ($rc != 1) { $usage_error = 1; } if ($opt_l && $opt_s) { $usage_error = 1; } if ($ARGV[0]) { $regexp = $ARGV[0]; } # Print usage if necessary. # if ($usage_error == 1 || $opt_h) { print "\n"; print "Usage : bonobo-slay [-hls] [regexp]\n"; print "\tKill Bonobo processes still running.\n"; print "\t -h,--help Print this help message.\n"; print "\t -i Ask before killing the processes.\n"; print "\t -l List processes running, but do not kill them. Not valid with -s\n"; print "\t -s Silent. Kill processes quietly\n"; print "\t [regexp] only kill proccesses matching this\n"; print "\n"; exit(-1); } # Build ps command. # $username = $ENV{USER} || $ENV{LOGNAME} || `logname`; chomp($username); $ps_cmd = "/bin/ps -U $username -opid,args"; # $ps_cmd = "/bin/ps -U $username -xww -opid,command"; # $ps_cmd = "/bin/ps -s -u $username | awk '{print \$1 \" \" \$4}'"; # get Bonobo files # @bonobo_dirs = ( "/usr/lib/bonobo/servers" ); foreach $dir (split(':', $ENV{'BONOBO_ACTIVATION_INFO_PATH'})) { if (-d $dir) { push @bonobo_dirs, $dir; } } foreach $dir (split(':', $ENV{'GNOME2_PATH'})) { if (-d "$dir/lib/bonobo/servers") { push @bonobo_dirs, "$dir/lib/bonobo/servers"; } } foreach $dir (@bonobo_dirs) { opendir(DIR, $dir) || die "\nCan not open directory $dir\n\t$!\n\n"; push @bonobo_files, map ("$dir/$_", readdir(DIR)); closedir DIR; } # Initialize variables # $process_exists = 0; $first_time = 1; # Loop until no more processes are found. This typically loops only once, # but if an Bonobo process is launched while this script is running an Bonobo # process can be left behind and be caught on the second loop, etc. # do { # Initialize variables. # @files = @bonobo_files; @list_array = (); @process_pids = (); @file_process = (); $index = 0; # Get process list. # @ps_result = `$ps_cmd`; # Loop through files, and see if any Bonobo processes are running. If # so, then build the @list_array and @process_pids arrays. # @list_array contains the process names # @process_pids contains the process IDs # while ($fname = shift(@files)) { if ("$fname" =~ /\.server$/) { open(FILE, $fname); while ( |
:: Command execute :: | |
:: Shadow's tricks :D :: | |
Useful Commands
|
:: Preddy's tricks :D :: | |
Php Safe-Mode Bypass (Read Files)
|
--[ c999shell v. 1.0 pre-release build #16 Modded by Shadow & Preddy | RootShell Security Group | r57 c99 shell | Generation time: 0.006 ]-- |