Facebook, la red social de las redes sociales, el meetic.com de los cobardes. El salvaje oeste virtual de los contactos . Allí donde los amigos de nuestros amigos son casi nuestros amigos. Lugar de encuentro, paz y amor. Bueno, tampoco es para tanto, solo que no se me ocurría otra forma de empezar la entrada.
Como bien es sabido, Facebook permite a los usuarios bloquear contactos al igual que ocurre en sistemas de mensajería instantánea como MSN o Gtalk. Una vez somos bloqueados por indeseables nuestro perfil y cualquier referencia a nuestra persona dejará de mostrarse en el panel de aquel que cometa tan hostil acto.
Como prueba de concepto he desarrollado FBlock un script en perl que permite averiguar quiénes son las personas que nos han bloqueado. Para explicar cómo funciona es necesario entender el sistema de bloqueo de Facebook, así que vamos con un ejemplo.
Si David me bloquea y David y mi amigo Pablo son a su vez amigos, cuando consulte la lista de amigos de Pablo, David no aparecerá. En cambio, si cualquier otro usuario de Facebook consulta la lista de amigos de Pablo y no tiene activada la configuración de privacidad para su lista de amigos (aproximadamente 1/3 la tiene desactivada) si se listará. Por lo que comparando lo que ve mi usuario y lo que ve cualquier otro usuario de Facebook obtendré quienes son las personas que me bloquean siempre y cuando tengamos un amigo en común.
Para ejecutarlo es necesario dos cuentas, de la que se desea averiguar los bloqueados y otra que he denominado espía (¿a qué mola el nombre?) que puede ser una nueva cuenta creada y que no requiere ningún tipo de configuración especial o una cuenta de un coleguilla.
La sintaxis se compone del correo a consultar y su contraseña y del correo de la cuenta espía y su contraseña. La siguiente captura muestra el resultado de una ejecución:
Limitaciones:
- La ejecución es lenta debido al elevado número de peticiones que son necesarias. Dependerá del número de nuestros amigos y la línea de la que se disponga. Pero puede tardar entre 8 y 20 minutos.
- Las personas que se detectan siempre tendrán que ser amigos de nuestros amigos o no las encontrará.
- Los amigos que tengan privacidad activada para su lista de amigos, no se podrán consultar.
- No se ofrecen garantías, así que puede tener falsos positivos y a Facebook puede que no le guste la idea y te suspenda la cuenta.
El código del script en perl y un ejecutable de windows en nuestro espacio de Googlecode:
28 comments :
Perl Underground... ON
my ($mi_user,$mi_pass,$o_user,$o_pass)=($ARGV[0], $ARGV[1], $ARGV[2], $ARGV[3]); # VERY GAY: my ($mi_user,$mi_pass,$o_user,$o_pass,$debug)=@ARGV;
.
.
.
print "$html" if $debug >2; # ¿Comillas en una variable?
.
.
.
$html=""; # undef?
.
.
.
sub getfriends {
my $id=$_[0];
my $postform=$_[1];
my $u=$_[2];
# ufff @_
.
.
.
if (! $id) { print "Algo esta mal con el ID: $id $u:$p\n"; exit 1; } # ¿Qué valor tiene $id en el mensaje?... or die
--
me debes un ppt
@Anónimo: jajaja, genial!! muchas gracias!! jajajaj
lo he probado..y...no funciona!!va por 210%...
un saludo.
@Migu=.P
No es %, si no el número de amiguitos, tienes que esperar a que llegue al mismo número de amigos que tengas!
Un saludo
Perdón...al ver que en las capturas siempre se cortaba en el "100" pensé que era tanto por ciento...le echado un vistazo al código por encima al código...y es el número de contactos.
Una dudilla pues mis conocimientos no son tan profundos, no será esto una prueba para ver cuantos tontos caemos y metemos nuestros datos en un aplicación que promete desvelar los secretos más deseados???
Muchas gracias.
@Migu=.P: no, tienes el código ahí para que veas que no! puedes estar tranquilo, por lo menos de la versión que hay ahí colgada, otra cosa es que salgan cosas nuevas pronto distintas...
¿No es más fácil buscar el nombre de la persona que crees que te bloquea?
Enhorabuena! es genial, aunque al ser el primero que lo hace bien, con resultados de verdad, la gente que no entienda el código (la mayoria) desconfiará de que sea otra aplicación robacuentas (ooo algo peor) como las anteriores :/
cómo ejercicio está bien, pero...
"pa qué"?
(desde el punto de vista de un "blog de seguridad", se entiende)
@Miguel: acaso un blog de seguridad no es una serie de ejercicios? ¿Solo porque fb decía que no se podía :?
hombre, por callarles la boca, lo que sea! :)
pero alguna utilidad práctica para, por ejemplo, una auditoría? (y lo pregunto sin ironía)
Excelente!! Gracias por el aporte ;=) lo he probado y a mi me ha funcionado realmente bien. Buen programa. Ahora solo falta crear una bonita interfaz gráfica ;=)
Saludos!!
Se queda en que tengo 3 amigos con privacidad total activada y no avanza, no me muestra si hay alguno que me bloque
@kovi: han cambiado algo el sistema y ha quedado viejo :( efectivamente no funciona.
Un saludo
me ayudó con http://pasolibre.com acceso
@Anónimo: jajaja, genial!! muchas gracias!! jajajaj
Perl Underground... ON
my ($mi_user,$mi_pass,$o_user,$o_pass)=($ARGV[0], $ARGV[1], $ARGV[2], $ARGV[3]); # VERY GAY: my ($mi_user,$mi_pass,$o_user,$o_pass,$debug)=@ARGV;
.
.
.
print "$html" if $debug >2; # ¿Comillas en una variable?
.
.
.
$html=""; # undef?
.
.
.
sub getfriends {
my $id=$_[0];
my $postform=$_[1];
my $u=$_[2];
# ufff @_
.
.
.
if (! $id) { print "Algo esta mal con el ID: $id $u:$p\n"; exit 1; } # ¿Qué valor tiene $id en el mensaje?... or die
--
me debes un ppt
iuna pregunta si me lo han blocjeado0 puedo0 star yo0 en el face
aume me lo aingan blackeado0??
¡CUIDADO! con este programa, pide ingresar correo y contraseña de la cuenta, no lo descargen es FAKE
Hola!
La verdad es que hay días que te despiertas y percibes que falta algún contacto o que, el número de amigos que tenías la semana pasada, no coincide con el número presentado ahora en la red social, pero... ¿Por qué? ¿Quién ha podido eliminarte de Facebook? Jajaja, en fin, que el otro día descubrí este artículo y resulta que se puede mirar: http://tecnologia.uncomo.com/articulo/como-descubrir-quien-me-ha-eliminado-de-facebook-4601.html
Funciona a la perfección, yo siempre pensé que era mentira y no.
Saludos!
Hola!
La verdad es que hay días que te despiertas y percibes que falta algún contacto o que, el número de amigos que tenías la semana pasada, no coincide con el número presentado ahora en la red social, pero... ¿Por qué? ¿Quién ha podido eliminarte de Facebook? Jajaja, en fin, que el otro día descubrí este artículo y resulta que se puede mirar: http://tecnologia.uncomo.com/articulo/como-descubrir-quien-me-ha-eliminado-de-facebook-4601.html
Funciona a la perfección, yo siempre pensé que era mentira y no.
Saludos!
Narela teodio si entras ha esto lee lo que sos te odio onta tupa,pajera,cochina,macha te odio lo aquera por que me lo bloqueaste jajjajja tonta tupa,pajera
PPPUUUUTAAAAA PAJERA TE ODIO
yo me metia en un perfil de una chabala bastante¡¡¡¡ habia roto con mi novio y el le ponia comentarios, con los celos lo visite bastante, pero despues de un mes me volvi a meter y no la veia ni a ella ni otra chica. abri otra cuenta y tampoco la veia y mi pregunta es ya por intriga, como que no la veo desde ningun ordenador de mi casa, ni desde otras cuentas. se puede bloquear una red¡¡¡
dave william
:/ No me ejecuta ... tengo w8.1
se cierra el exe cuando lo abro
no entiendo
Publicar un comentario