miércoles, 14 de diciembre de 2011

Stuxnet: Anatomy of a computer virus


An infographic dissecting the nature and ramifications of Stuxnet, the first weapon made entirely out of code. This was produced for Australian TV program HungryBeast on Australia's ABC1

Direction and Motion Graphics: Patrick Clair www.patrickclair.com
Written by: Scott Mitchell
Production Company: Zapruder's Other Films.

viernes, 18 de noviembre de 2011

domingo, 13 de noviembre de 2011

sábado, 12 de noviembre de 2011

[XSS] Diario 5 Días

Nombre: Diario 5 Días
Vuln: XSS
PoC: 
Screen:
Autor: d4rk_dn4
E-mail: d4rkdn4[at]gmail[dot]com


Si quieren sacar el "); del final, depués de la consulta le agregan esto: 
<script%20language="Javascript">alert("

martes, 18 de octubre de 2011

Reflexiones (I)


Voy en el colectivo, volviendo de la escuela. Me siento en uno de los últimos asientos (algo común en mi) y me pongo a pensar. La mayor parte de las cosas son boludeces sin sentido que van al ritmo de lo que voy escuchando. De repente, la realidad me golpea. El disparador fue algo bizarro, patético y denigrante para la raza humana. Un pibe, más o menos de mi misma edad, vestido "a la moda", con sus "amigos", escuchando la "música" a la moda (sí, usé muchas veces comillas, pero lo merecen). Eso me trae a la mente esas frases carentes de sentido y escritas en una deformación procedente del castellano que sólo ellos entienden que me veía obligado a leer en facebook. La imagen me deprime. Me hace acordar a lo bien que estaba en las vacaciones cuando no tenía contacto alguno con estos engendros. Vivía pegado a la computadora, pero es lo que soy. Mucha gente me tilda de asocial, pero es el modo de vida que yo elegí. Vivir en un lugar donde las personas se unen para avanzar, para crear cosas que solos no podrían, pero que muchas otras personas las necesitan, para brindarles a esas personas las soluciones, con un único pago: que lo disfruten. Este lugar llamado internet, lleno de gente de todas las razas, altos, bajos, gordos, flacos, pero en el cual todos se ayudan entre sí sin importar como se ve el otro. En el cual la superioridad no está dada por la belleza, o la cantidad de plata, sino por los conocimientos que posea, y que esté dispuesto a compartir. Una superioridad que uno se gana con esfuerzo, y que es reconocida y recompensada justamente.  

lunes, 17 de octubre de 2011

[XSS] Universidad Nacional de San Juan

Nombre: Universidad Nacional de San Juan
Vuln: XSS
PoC: 
Autor: d4rk_dn4
E-mail: d4rkdn4[at]gmail[dot]com

viernes, 14 de octubre de 2011

[XSS] Diario de cuyo

Nombre: Diario de Cuyo
Vuln: XSS
Web: http://www.diariodecuyo.com.ar/home/new_buscar.php?palabras=
PoC:
Autor: d4rk_dn4
Mi web: http://d4rk2script.blogspot.com/
E-mail: d4rkdn4[at]gmail[dot]com

lunes, 18 de julio de 2011

[Perl] Volumen de una esfera

Un pequeño code para calcular el volumen de una esfera. No es mucho, pero tenía ganas de codear algo...

#!/usr/bin/local/perl

my $pi=3.14;
my $r;
my $volumen;

print "Radio: ";
$r=<STDIN>;
chomp($r);

$volumen=(4*$pi*$r**3) / 3;
print "El volumen es: $volumen\n";

[Perl] Sacar promedios

Estaba leyendo un paper de perl (más precisamente la segunda parte del tuto de perl de la ezine RTM Essential, que está en el segundo número) y en el final vendett@ deja como consigna que hagamos un sriptcin que calcule el promedio. Como sé que varios (al igual que yo) recién se están iniciando en perl decidí postear el código que escribí yo para el que no entienda, o no sepa como se hace. De paso espero que sirva para los que no saben perl se interesen y empiezen a aprender :)

#!/usr/bin/local/perl

print "Cuantas notas vas a promediar: ";
my $cantidad=<stdin>;
chomp($cantidad);

my $final = 1;
my $suma = 0; 
do {
    print "Ingresa la nota numero $final: ";
    $notas=<stdin>;
    chomp($notas);
    $suma = $suma + $notas;
    $final++;
} until ($final == $cantidad+1);

$promedio = $suma / $cantidad;
print "El promedio es de: $promedio\n";