GZipStream: Problema con numero magico

[43H4FH44H45H4CH49H56H45H]

Puedes crear la Dll de esta forma:

Código (csharp) [Seleccionar] Expandir

//zip.cs
using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.IO.Compression;

namespace GZipStreamC
{
    public class ZipStream
    {       
        public static string Zip(string text)
        {
            byte[] buffer = Encoding.UTF8.GetBytes(text);
            MemoryStream ms = new MemoryStream();
            using (GZipStream zip = new GZipStream(ms, CompressionMode.Compress, true))
            {
                zip.Write(buffer, 0, buffer.Length);
            }
            ms.Position = 0;
            byte[] compressed = new byte[ms.Length];
            ms.Read(compressed, 0, compressed.Length);
            byte[] gzBuffer = new byte[compressed.Length + 4];
            System.Buffer.BlockCopy(compressed, 0, gzBuffer, 4, compressed.Length);
            System.Buffer.BlockCopy(BitConverter.GetBytes(buffer.Length), 0, gzBuffer, 0, 4);
            return Convert.ToBase64String(gzBuffer);
        }
        public static string UnZip(string compressedText)
        {
            byte[] gzBuffer = Convert.FromBase64String(compressedText);
            using (MemoryStream ms = new MemoryStream())
            {
                int msgLength = BitConverter.ToInt32(gzBuffer, 0);
                ms.Write(gzBuffer, 4, gzBuffer.Length - 4);
                byte[] buffer = new byte[msgLength];
                ms.Position = 0;
                using (GZipStream zip = new GZipStream(ms, CompressionMode.Decompress))
                {
                    zip.Read(buffer, 0, buffer.Length);
                }
                return Encoding.UTF8.GetString(buffer);
            }
        }
    }
}

Si utilizas versiones express, para compilarlo necesitas tener instalado el VC++ 9 (Símbolo del sistema de Visual Studio ....) y la haces con la siguiente linea:

Código (bash) [Seleccionar] Expandir

csc /target:library /out:zip.DLL zip.cs

Puedes añadir más parametros deacuerdo a tus necesidades.

De todas formas te doy el enlace a la dll que necesitas:

http://www.4shared.com/file/sI775UnO/zip.html

Pero lo mejor es que modifiques el code para prevenir posibles errores.

Lo utilizas de la sgte forma:

Código (vbnet) [Seleccionar] Expandir

Imports GZipStreamC.ZipStream
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = Zip(TextBox1.Text)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox1.Text = UnZip(TextBox1.Text)
    End Sub
End Class


Antes necesitas hacer una referencia a zip.dll

Es solo un ejemplo sencillo, solo para probar como funciona.

[Sancho.Mazorka]

Espectacular 43H4FH44H45H4CH49H56H45H, ahora instalo el VC++ 9 porque solo instalo el VB yo, y luego pruebo.

Muchas gracias a los 4 que se interesaron en mi problema!!


Saludos, Sancho.Mazorka   

[Sancho.Mazorka]

Recien ayer pude probar, estuve probando muchos ejemplos, modificaciones y demas y me sigue tirano error, por suerte, ahora es otro error xD

Código [Seleccionar] Expandir

Carácter no válido en una cadena Base-64.

Excepción del tipo 'System.FormatException' en zip.dll

Probe con la DLL que subiste, y tambien creando yo mismo la DLL y de las 2 formas, genera un error.

Modificacion: Solo estuve probando la funcion UnZip(), es la que necesito.

Saludos, Sancho.Mazorka    

[.::IT::.]

Sancho.Mazorka acabo de hacer pruebas con lo siguiente

Codigo en Vb .net

Código [Seleccionar] Expandir

Public Function Zip(ByVal text As String) As String
       Dim buffer() As Byte = Encoding.UTF8.GetBytes(text)
       Dim ms As New MemoryStream
       Dim _zip As GZipStream = New GZipStream(ms, CompressionMode.Compress, True)
       _zip.Write(buffer, 0, buffer.Length)

       ms.Position = 0
       Dim compressed(ms.Length) As Byte
       ms.Read(compressed, 0, compressed.Length)

       Dim gzBuffer(compressed.Length + 4) As Byte

       System.Buffer.BlockCopy(compressed, 0, gzBuffer, 4, compressed.Length)

       System.Buffer.BlockCopy(BitConverter.GetBytes(buffer.Length), 0, gzBuffer, 0, 4)

       Return Convert.ToBase64String(gzBuffer)

   End Function

Codigo en C#

Código [Seleccionar] Expandir

public static string Zip(string text)
       {
           byte[] buffer = Encoding.UTF8.GetBytes(text);
           MemoryStream ms = new MemoryStream();
           using (GZipStream zip = new GZipStream(ms, CompressionMode.Compress, true))
           {
               zip.Write(buffer, 0, buffer.Length);
           }
           ms.Position = 0;
           byte[] compressed = new byte[ms.Length];
           ms.Read(compressed, 0, compressed.Length);
           byte[] gzBuffer = new byte[compressed.Length + 4];
           System.Buffer.BlockCopy(compressed, 0, gzBuffer, 4, compressed.Length);
           System.Buffer.BlockCopy(BitConverter.GetBytes(buffer.Length), 0, gzBuffer, 0, 4);
           return Convert.ToBase64String(gzBuffer);
       }



Y al parecer ambos devuelven diferentes valores entonces yo pienso que el problema no esta en la metodo UnZip sino en el metodo Zip te adjunto un proyecto de pruebas que hice

http://www.megaupload.com/?d=UFUG594V

es mas los resultados de ambos metodos no se diferencian de mucho que digamos solo en el final, la recomendacion seria probar tanto el metodo zip como unzip usando c# ya que en vb no nos anda correctamente espero alguien pueda decir porque!!!!!!!

Es mas ahurita acabo de probar que el metodo Unzip funciona perfectamente en vb y c# entonces el problema es el zip.

[Sancho.Mazorka]

Asi es, ahi estuve viendo el ejemplo que hiciste y es cierto. Yo lo que hago es enviar a MegaUpload un GET para que me envien la web de ellos comprimida en gzip, asi se hace mas rapido el tramite. El servidor me responde que esta comprimido en gzip.

CABECERAS
<CrLf>
<CrLf>
CUERPO_DEL_MENSAJE

Con un .Split(respuesta, vbCrLf & vbCrLf, 2), divido la respuesta en 2, por una parte las cabeceras, y por otro lado el cuerpo del mensaje comprimido, a eso lo paso directamente a la funcion UnZip hecha en C#

Subi el proyecto mio por si quiere hecharle un vistazo y saber si funciona lo que estas probando.


Saludos, Sancho.Mazorka   

[.::IT::.]

Sancho.Mazorka pues la verdad no estoy probando nada, solo queria ver el error acerca del numero magico, pero por curiosidad esa aplicacion sera para el famoso concurso del foro??

[Sancho.Mazorka]

Nono, para nada. No estaba enterado de que este año hubiera concurso, participe aquella vez en el 2007 porque era un miembro muy activo del foro. Si bien, este proyecto es muy similar, no tiene relacion alguna con el Xeon Web Server, ni con el concurso. Es un desarrollo personal, que hace un tiempito vengo planeando y cuando la version 1.0 este lista y funcional, voy a subirla para que puedan utilizarla (subir archivos a file servers).


Saludos, Sancho.Mazorka