Resultados 1 al 4 de 4

Tema: IP deco (base 256)

  1. #1 IP deco (base 256) 
    Iniciado
    Fecha de ingreso
    Apr 2009
    Ubicación
    Argentina
    Mensajes
    10
    Descargas
    7
    Uploads
    0
    Bueno gente, soy nuevo en el foro... y como para arrancar se me ocurrio compartir un programita en perl que me hice para acelerar el calculo de una IP cuando esta en base 256 ... por ejemplo cuando estamos jugando ;-D con algun protocolo ... se me ocurre ahora el dcc...
    bueno.... no los aburro mas con mis palabras y los dejo con el codigo!... seguro que hay mil y una forma para mejorarlos ... si alguien tiene tiempo y lo hace... bueno... mandeme una copia por mp o al mail.


    #Este codigo fue realizado para no tener que hacer calculos cuando estamos
    #realizando una operacion con conecciones y se nos devuelve una ip
    #codificada; como es el caso del protocolo DCC ( motivo por el cual se penso en el programa ;-) ).
    #
    #Se concede permiso para copiar, distribuir o modificar este programa según las condiciones de la GNU Free Documentation License (GFDL),
    #(cualquier) versión publicada por la Free Software Foundation.
    #
    system clear;

    print " --------------------------------------------------------------\n";
    print "| |\n";
    print "| ~ Decodificador de IPs Codificadas en base 256 ~ |\n";
    print "| |\n";
    print "| |\n";
    print "| by: Viper Doom|\n";
    print "| |\n";
    print "| ~ Se concede permiso para copiar, distribuir o modificar este|\n";
    print "| programa según las condiciones de la GNU Free Documentation |\n";
    print "|License (GFDL),(cualquier) versión publicada por la Free Softw|\n";
    print "|are Foundation. ~ |\n";
    print "| |\n";
    print "| |\n";
    print " --------------------------------------------------------------\n";
    print "\n";

    #Ingresamos la ip codificada
    print "Ingrese ip a decodificar: ";
    #Sacamos la primer parte de la ip codificada
    $maxnumshow = 4294967296;
    $maxnum = ((4294967296/1000000000)-4);
    $primtodec = (int(<stdin>));


    while ((($primtodec/1000000000)-4) ge $maxnum){
    print "\nImposible decodificar ip; esta seguro de que ha ingresado correctamente?";
    print "\nNumero maximo posible = $maxnumshow; decodificado = 255.255.255.255\n";
    print "\nVuelva a ingresar la ip codificada a modificar :";
    $primtodec = <stdin>;
    }

    $ipprimpart = int($primtodec / (256*256*256));
    #Sacamos la segunda parte de la ip codificada

    $segtodec = $primtodec - ($ipprimpart *(256*256*256));
    $ipsegpart = int ($segtodec / (256*256));
    #Sacamos la tercer parte de la ip codificada

    $tertodec = $segtodec - ($ipsegpart * (256*256));
    $ipterpart = int ($tertodec / (256));
    #Sacamos la cuarta parte de la ip codificada

    $cuartodec = $tertodec - ($ipterpart * 256);
    $ipcuarpart = int($cuartodec / 1);
    #imprimimos la ip en forma decodificada

    print "\nProceso Finalizado ";
    print "Ip = $ipprimpart.$ipsegpart.$ipterpart.$ipcuarpart\n";
    print "\n";
    print "\n";
    Citar  
     

  2. #2  
    Iniciado
    Fecha de ingreso
    Mar 2009
    Ubicación
    Bannana Republic
    Mensajes
    39
    Descargas
    0
    Uploads
    0
    gracias x pasar el codigo

    no c si lo usare, pero igual lo copio x las dudas d que lo necesite algun dia jeje xD

    ps la verdad eres buena honda en ponerlo directo para copiar, la mayoria de las paginas que vi meten los codigos para descargar x RapidShare o MegaUpLoad, lo cual me cae molesto y hasta en los peores casos traen virus (como cuando necesitas un serial/crack para un programa)

    este programa c v prometedor, ad+ me caen muy bien la gente que mete cosas gratis bajo los principios de la GNU

    c agradece el aporte, salu2 y suerte
    Citar  
     

  3. #3  
    Iniciado
    Fecha de ingreso
    Apr 2009
    Ubicación
    Argentina
    Mensajes
    10
    Descargas
    7
    Uploads
    0
    Cita Iniciado por nikos3194 Ver mensaje
    me caen muy bien la gente que mete cosas gratis bajo los principios de la GNU
    Libre Informacion y Conocimiento... (Y) ; entre todos podemos!
    "De todo lo que he perdido, lo que mas extraño es mi mente" ~ Ozzy Osbourne
    Citar  
     

  4. #4  
    Iniciado
    Fecha de ingreso
    Sep 2009
    Ubicación
    Santa Fe (Argentina)
    Mensajes
    12
    Descargas
    8
    Uploads
    0
    graaacias capooo!
    me viene al pelo (Y)
    Ubuntu is an African word meaning "i do know how to install gentoo"
    Citar  
     

Temas similares

  1. placa base
    Por chico1988 en el foro HARDWARE
    Respuestas: 7
    Último mensaje: 18-08-2009, 18:17
  2. Mtv Base
    Por Vargas81 en el foro DIGITAL+
    Respuestas: 3
    Último mensaje: 29-05-2007, 22:58
  3. linux - base
    Por skool en el foro LINUX - MAC - OTROS
    Respuestas: 1
    Último mensaje: 05-07-2006, 02:22
  4. placa base
    Por sr-cannabis en el foro HARDWARE
    Respuestas: 2
    Último mensaje: 10-10-2004, 01:43
  5. base de datos en c++?
    Por merkaba en el foro PROGRAMACION DESKTOP
    Respuestas: 3
    Último mensaje: 25-01-2004, 11:14

Marcadores

Marcadores

Permisos de publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •