当前时区为 UTC + 8 小时



发表新帖 回复这个主题  [ 6 篇帖子 ] 
作者 内容
1 楼 
 文章标题 : fuckchroot
帖子发表于 : 2009-05-16 10:56 

注册: 2009-05-15 14:16
帖子: 10
送出感谢: 0 次
接收感谢: 0 次
一段非常猥琐的代码,干什么用的我就是不说, :em04

#!/usr/bin/perl
#chrootfucker v1.0 -- 囗囗囗囗 'chroot' Command Kits !
#Command interpreter:
# chrootfucker.pl -chmod <permit> file1 fil2 ... ---change the permission of a given target list
# chrootfucker.pl -checkfilz ---see what the admin leaves us @_@
# chrootfucker.pl -listdir ---list the content of a certain dir
# chrootfucker.pl -guessBySSH <Opensshbanner> ---Guess Distributions using ssh banner
# chrootfucker.pl -guessByApache <Apache banner> ---Guess Distributions by Apache banner
# chrootfucker.pl -showJmpCodz ---Display C code to evadz chroot control

use warnings;
use strict;
#use File::stat;

my @toolkits = ("/bin/sh","/bin/bash","/bin/ls","/bin/tar","/bin/ps",
"/bin/ln","/bin/chmod","/bin/id","/bin/uname","/bin/netstat",
"/bin/pwd","/bin/which","/bin/cat","/bin/touch",
"/usr/bin/find","/usr/bin/wget","/usr/bin/wget","/usr/bin/top",
"/etc/passwd","/etc/shadow","/etc/group","/etc/fstab","/etc/issue");

my %sshBanner = ("OpenSSH_4.6" => 'Red Hat Enterprise Linux AS release 4:Kernle 2.6.9-5.'
,"OpenSSH_4.7" => 'Fedora Core 8: Kernel Version 2.6.23.1'
);
my %apacheBanner =("Apache/2.2.6" => 'Fedora Core 8: Kernel Version 2.6.23.1'
);


print <<EOF;
chrootfucker v1.0 -- 囗囗囗囗 'chroot' Command Kits !
Usage:
$0 -chmod <permit> file1 fil2 ...
$0 -checkfilz
$0 -listdir <dirname>
$0 -guessBySSH <Opensshbanner>
$0 -guessByApache <Apache banner>
$0 -showJmpCodz

EOF


if($#ARGV>=0){

if($ARGV[0] eq "-chmod"){
print "Changing filez permissions\n";
chmod oct($ARGV[1]),@ARGV[2..$#ARGV];

}elsif($ARGV[0] eq "-checkfilz" ){
print "Let's see what we have...\n";
foreach my $file(@toolkits) {
if(-f $file){
print $file."\n";
}

}

}elsif($ARGV[0] eq "-listdir") {

print "Here comes the dir list...\n";
opendir DH,$ARGV[1] || die "Can't open dir!\n";
my @direntry = readdir(DH);
print "FileName Mode UID GID SIZE\n";
foreach my $file(@direntry){
my $mode;
my $uid;
my $gid;
my $size;
my @stat_ret = stat $ARGV[1]."/".$file;
($mode,$uid,$gid,$size) = @stat_ret[2,4,5,7];
printf "%s\t%04o\t%d\t%d\t%d\n",$file,$mode&07777,$uid,$gid,$size;

}

closedir DH;

}elsif($ARGV[0] eq "-guessBySSH") {

if($ARGV[1] =~/(OpenSSH_.*)/){

if(defined($sshBanner{$1})){
print "Find Target! : \n".$sshBanner{$1}."\n";
}else {
print "Target Not Found!\n";

}

}
}
}


页首
 用户资料  
 
2 楼 
 文章标题 : Re: fuckchroot
帖子发表于 : 2009-05-16 10:59 
头像

注册: 2008-11-21 20:26
帖子: 36913
送出感谢: 1
接收感谢: 36
太邪恶了,虽然我没看懂


_________________
讨厌我的人可以试着点一下
浏览全部ubuntu技巧


页首
 用户资料  
 
3 楼 
 文章标题 : Re: fuckchroot
帖子发表于 : 2009-05-16 11:02 
头像

注册: 2006-05-20 14:03
帖子: 898
送出感谢: 0 次
接收感谢: 0 次
我怎么没看出来能怎么邪恶


页首
 用户资料  
 
4 楼 
 文章标题 : Re: fuckchroot
帖子发表于 : 2009-05-21 19:02 

注册: 2006-02-25 19:21
帖子: 7
地址: 河南郑州
送出感谢: 0 次
接收感谢: 0 次
代码没贴全吧,-showJmpCodz的处理代码没有


页首
 用户资料  
 
5 楼 
 文章标题 : Re: fuckchroot
帖子发表于 : 2009-05-21 19:04 
头像

注册: 2009-03-10 13:04
帖子: 7803
送出感谢: 1
接收感谢: 0 次
tenzu 写道:
太邪恶了,虽然我没看懂


_________________
广告位招租


页首
 用户资料  
 
6 楼 
 文章标题 : Re: fuckchroot
帖子发表于 : 2009-05-21 19:48 
头像

注册: 2009-02-25 18:18
帖子: 2229
送出感谢: 0 次
接收感谢: 0 次
nuanhuai 写道:
tenzu 写道:
太邪恶了,虽然我没看懂


_________________
在中国搞IT的谁不知道Ctrl+C,Ctrl+V啊~


页首
 用户资料  
 
显示帖子 :  排序  
发表新帖 回复这个主题  [ 6 篇帖子 ] 

当前时区为 UTC + 8 小时


在线用户

正在浏览此版面的用户:没有注册用户 和 2 位游客


不能 在这个版面发表主题
不能 在这个版面回复主题
不能 在这个版面编辑帖子
不能 在这个版面删除帖子
不能 在这个版面提交附件

前往 :  
本站点为公益性站点,用于推广开源自由软件,由 DiaHosting VPSBudgetVM VPS 提供服务。
我们认为:软件应可免费取得,软件工具在各种语言环境下皆可使用,且不会有任何功能上的差异;
人们应有定制和修改软件的自由,且方式不受限制,只要他们自认为合适。

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
简体中文语系由 王笑宇 翻译