La web de Seoane

El siguiente código es un ejemplo, sencillo, de como comprimir y descomprimir un archivo usando la función RtlCompressBuffer.

Esta herramienta surgió de la necesidad de comprobar el funcionamiento de impresoras de tickets, es decir, que corta bien, que imprime el logo correcto, etc. Su funcionamiento es realmente simple, se selecciona la impresora, se escribe la secuencia de escape y se pulsa el botón "Enviar". No importa si la impresora es serie, paralelo, usb o es una impresora compartida desde otro equipo, el único requisito es que este instalada, aunque sea como una impresora "Genérica / Solo texto".

Seguro que alguna vez has tenido curiosidad por saber como funciona otro proceso, que envía y que recibe a través de internet, para esta tarea ya existen programas muy buenos, por ejemplo wireshark, pero lo que aquí propongo es hacerlo nosotros mismos desde un programa en delphi. Puede que el resultado no sea muy profesional, pero sirve perfectamente como ejemplo de como inyectar código en otro proceso e interceptar las llamadas que hace este a funciones de la API de windows. Solo es una "prueba de concepto", un pequeño juguete, para usarlo de una forma un poco más seria habría que limar un poco el código, pero ese no es ahora mismo mi objetivo.

Hoy me puse a recordar viejos tiempos (no tan viejos, no soy tan mayor), y me acorde de un pequeño programa que hice, cuando estaba encargado de las aulas de informática de una universidad, para controlar a los alumnos. Si, lo se, era un poco cabroncete, debia de haber dejado a los chavales que se divirtieran, vieran porno, hablaran por el messenger y que instalaran juegos. Si volviera a dedicarme a lo mismo (no es mal trabajo, te pagan por no hacer casi nada) les dejaria hacer lo que quisieran, pero en aquella epoca me tomaba mi trabajo muy en serio y me salio el policia que llevo dentro.

Hace tiempo creé una pequeña aplicación para actualizar un programa, o cualquier otro documento, descargando las actualizaciones directamente de internet, y publique su codigo en los foros de Clubdelphi. Ahora he vuelto a revisar el código, eliminado algunas cosas innecesarias y añadiendo algunas otras. El resultado es el siguiente, espero que le sea de utilidad a alguien.

Esta es una pequeña herramienta que permite copiar un archivo en otro. Ya se que, a simple vista, no parece tener mucha utilidad, pero la verdad es que sabiéndola usar nos permitirá hacer algunas cosas muy interesantes.

Siguiendo con el tema del cifrado AES-256, del que ya hable aquí y aquí, vamos a ver un par de funciones que nos permitirán cifrar y descifrar texto de una manera rápida y sencilla, mientras mantenemos toda la potencia de este algoritmo de cifrado. Para esto vamos a combinar el código que podemos encontrar aquí, con este otro que publique aquí y que nos permitirá representar el texto cifrado con caracteres legibles utilizando la codificación base64.

La siguiente unit permite codificar y descodificar un conjunto de bytes utilizando la codificacion Base64. Utiliza las librerias criptograficas de la api de windows, lo que nos permite obtener un codigo muy simple y facil de entender.

Hace algún tiempo hablé de como recuperar imágenes jpg de un disco o archivo (aquí y aquí), ahora, además de depurar un poco el código de ambos programas, voy a aprovechar para unirlos en uno solo. El código resultante se puede compilar tanto en delphi como en freepascal, por lo que puede ser usado perfectamente en windows o en linux.

Esta utilidad sirve para generar contraseñas utilizando un algoritmo extremadamente simple, pero con un nivel de seguridad bastante bueno. Se basa en generar un hash a partir de dos parámetros, uno puede ser el nombre o la dirección del sitio donde se va a usar la contraseña, y el otro una clave "maestra" que es igual para todas las contraseñas. El hash generado siempre es el mismo si los parámetros de entrada no cambian.