src/common/zstream.cpp

   1 //////////////////////////////////////////////////////////////////////////////
   2 // Name:        zstream.cpp
   3 // Purpose:     Compressed stream classes
   4 // Author:      Guilhem Lavaux
   5 // Modified by: Mike Wetherell
   6 // Created:     11/07/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Guilhem Lavaux
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __BORLANDC__
  16   #pragma hdrstop
  17 #endif
  18
  19 #if wxUSE_ZLIB && wxUSE_STREAMS
  20
  21 #include "wx/zstream.h"
  22 #include "wx/utils.h"
  23 #include "wx/intl.h"
  24 #include "wx/log.h"
  25
  26 // normally, the compiler options should contain -I../zlib, but it is
  27 // apparently not the case for all MSW makefiles and so, unless we use
  28 // configure (which defines __WX_SETUP_H__) or it is explicitly overridden by
  29 // the user (who can define wxUSE_ZLIB_H_IN_PATH), we hardcode the path here
  30 #if defined(__WXMSW__) && !defined(__WX_SETUP_H__) && !defined(wxUSE_ZLIB_H_IN_PATH)
  31    #include "../zlib/zlib.h"
  32 #else
  33    #include "zlib.h"
  34 #endif
  35
  36 enum {
  37     ZSTREAM_BUFFER_SIZE = 16384,
  38     ZSTREAM_GZIP        = 0x10,     // gzip header
  39     ZSTREAM_AUTO        = 0x20      // auto detect between gzip and zlib
  40 };
  41
  42 //////////////////////
  43 // wxZlibInputStream
  44 //////////////////////
  45
  46 wxZlibInputStream::wxZlibInputStream(wxInputStream& stream, int flags)
  47   : wxFilterInputStream(stream)
  48 {
  49   m_inflate = NULL;
  50   m_z_buffer = new unsigned char[ZSTREAM_BUFFER_SIZE];
  51   m_z_size = ZSTREAM_BUFFER_SIZE;
  52   m_pos = 0;
  53
  54 #if WXWIN_COMPATIBILITY_2_4
  55   // treat compatibility mode as auto
  56   m_24compatibilty = flags == wxZLIB_24COMPATIBLE;
  57   if (m_24compatibilty)
  58     flags = wxZLIB_AUTO;
  59 #endif
  60
  61   // if gzip is asked for but not supported...
  62   if ((flags == wxZLIB_GZIP || flags == wxZLIB_AUTO) && !CanHandleGZip()) {
  63     if (flags == wxZLIB_AUTO) {
  64       // an error will come later if the input turns out not to be a zlib
  65       flags = wxZLIB_ZLIB;
  66     }
  67     else {
  68       wxLogError(_("Gzip not supported by this version of zlib"));
  69       m_lasterror = wxSTREAM_READ_ERROR;
  70       return;
  71     }
  72   }
  73
  74   if (m_z_buffer) {
  75     m_inflate = new z_stream_s;
  76
  77     if (m_inflate) {
  78       memset(m_inflate, 0, sizeof(z_stream_s));
  79
  80       // see zlib.h for documentation on windowBits
  81       int windowBits = MAX_WBITS;
  82       switch (flags) {
  83         case wxZLIB_NO_HEADER:  windowBits = -MAX_WBITS; break;
  84         case wxZLIB_ZLIB:       windowBits = MAX_WBITS; break;
  85         case wxZLIB_GZIP:       windowBits = MAX_WBITS | ZSTREAM_GZIP; break;
  86         case wxZLIB_AUTO:       windowBits = MAX_WBITS | ZSTREAM_AUTO; break;
  87         default:                wxFAIL_MSG(wxT("Invalid zlib flag"));
  88       }
  89
  90       if (inflateInit2(m_inflate, windowBits) == Z_OK)
  91         return;
  92     }
  93   }
  94
  95   wxLogError(_("Can't initialize zlib inflate stream."));
  96   m_lasterror = wxSTREAM_READ_ERROR;
  97 }
  98
  99 wxZlibInputStream::~wxZlibInputStream()
 100 {
 101   inflateEnd(m_inflate);
 102   delete m_inflate;
 103
 104   delete [] m_z_buffer;
 105 }
 106
 107 size_t wxZlibInputStream::OnSysRead(void *buffer, size_t size)
 108 {
 109   wxASSERT_MSG(m_inflate && m_z_buffer, wxT("Inflate stream not open"));
 110
 111   if (!m_inflate || !m_z_buffer)
 112     m_lasterror = wxSTREAM_READ_ERROR;
 113   if (!IsOk() || !size)
 114     return 0;
 115
 116   int err = Z_OK;
 117   m_inflate->next_out = (unsigned char *)buffer;
 118   m_inflate->avail_out = size;
 119
 120   while (err == Z_OK && m_inflate->avail_out > 0) {
 121     if (m_inflate->avail_in == 0 && m_parent_i_stream->IsOk()) {
 122       m_parent_i_stream->Read(m_z_buffer, m_z_size);
 123       m_inflate->next_in = m_z_buffer;
 124       m_inflate->avail_in = m_parent_i_stream->LastRead();
 125     }
 126     err = inflate(m_inflate, Z_SYNC_FLUSH);
 127   }
 128
 129   switch (err) {
 130     case Z_OK:
 131         break;
 132
 133     case Z_STREAM_END:
 134       if (m_inflate->avail_out) {
 135         // Unread any data taken from past the end of the deflate stream, so that
 136         // any additional data can be read from the underlying stream (the crc
 137         // in a gzip for example)
 138         if (m_inflate->avail_in) {
 139           m_parent_i_stream->Reset();
 140           m_parent_i_stream->Ungetch(m_inflate->next_in, m_inflate->avail_in);
 141           m_inflate->avail_in = 0;
 142         }
 143         m_lasterror = wxSTREAM_EOF;
 144       }
 145       break;
 146
 147     case Z_BUF_ERROR:
 148       // Indicates that zlib was expecting more data, but the parent stream
 149       // has none. Other than Eof the error will have been already reported
 150       // by the parent strean,
 151       m_lasterror = wxSTREAM_READ_ERROR;
 152       if (m_parent_i_stream->Eof())
 153 #if WXWIN_COMPATIBILITY_2_4
 154         if (m_24compatibilty)
 155           m_lasterror = wxSTREAM_EOF;
 156         else
 157 #endif
 158           wxLogError(_("Can't read inflate stream: unexpected EOF in underlying stream."));
 159       break;
 160
 161     default:
 162       wxString msg(m_inflate->msg, *wxConvCurrent);
 163       if (!msg)
 164         msg = wxString::Format(_("zlib error %d"), err);
 165       wxLogError(_("Can't read from inflate stream: %s"), msg.c_str());
 166       m_lasterror = wxSTREAM_READ_ERROR;
 167   }
 168
 169   size -= m_inflate->avail_out;
 170   m_pos += size;
 171   return size;
 172 }
 173
 174 /* static */ bool wxZlibInputStream::CanHandleGZip()
 175 {
 176   const char *dot = strchr(zlibVersion(), '.');
 177   int major = atoi(zlibVersion());
 178   int minor = dot ? atoi(dot + 1) : 0;
 179   return major > 1 || (major == 1 && minor >= 2);
 180 }
 181
 182
 183 //////////////////////
 184 // wxZlibOutputStream
 185 //////////////////////
 186
 187 wxZlibOutputStream::wxZlibOutputStream(wxOutputStream& stream,
 188                                        int level,
 189                                        int flags)
 190  : wxFilterOutputStream(stream)
 191 {
 192   m_deflate = NULL;
 193   m_z_buffer = new unsigned char[ZSTREAM_BUFFER_SIZE];
 194   m_z_size = ZSTREAM_BUFFER_SIZE;
 195   m_pos = 0;
 196
 197   if ( level == -1 )
 198   {
 199     level = Z_DEFAULT_COMPRESSION;
 200   }
 201   else
 202   {
 203     wxASSERT_MSG(level >= 0 && level <= 9, wxT("wxZlibOutputStream compression level must be between 0 and 9!"));
 204   }
 205
 206   // if gzip is asked for but not supported...
 207   if (flags == wxZLIB_GZIP && !CanHandleGZip()) {
 208     wxLogError(_("Gzip not supported by this version of zlib"));
 209     m_lasterror = wxSTREAM_WRITE_ERROR;
 210     return;
 211   }
 212
 213   if (m_z_buffer) {
 214     m_deflate = new z_stream_s;
 215
 216     if (m_deflate) {
 217       memset(m_deflate, 0, sizeof(z_stream_s));
 218       m_deflate->next_out = m_z_buffer;
 219       m_deflate->avail_out = m_z_size;
 220
 221       // see zlib.h for documentation on windowBits
 222       int windowBits = MAX_WBITS;
 223       switch (flags) {
 224         case wxZLIB_NO_HEADER:  windowBits = -MAX_WBITS; break;
 225         case wxZLIB_ZLIB:       windowBits = MAX_WBITS; break;
 226         case wxZLIB_GZIP:       windowBits = MAX_WBITS | ZSTREAM_GZIP; break;
 227         default:                wxFAIL_MSG(wxT("Invalid zlib flag"));
 228       }
 229
 230       if (deflateInit2(m_deflate, level, Z_DEFLATED, windowBits,
 231                        8, Z_DEFAULT_STRATEGY) == Z_OK)
 232         return;
 233     }
 234   }
 235
 236   wxLogError(_("Can't initialize zlib deflate stream."));
 237   m_lasterror = wxSTREAM_WRITE_ERROR;
 238 }
 239
 240 bool wxZlibOutputStream::Close()
 241  {
 242   DoFlush(true);
 243    deflateEnd(m_deflate);
 244    delete m_deflate;
 245
 246   m_deflate = NULL;
 247    delete[] m_z_buffer;
 248   m_z_buffer = NULL;
 249   return IsOk();
 250  }
 251
 252 void wxZlibOutputStream::DoFlush(bool final)
 253 {
 254   if (!m_deflate || !m_z_buffer)
 255     m_lasterror = wxSTREAM_WRITE_ERROR;
 256   if (!IsOk())
 257     return;
 258
 259   int err = Z_OK;
 260   bool done = false;
 261
 262   while (err == Z_OK || err == Z_STREAM_END) {
 263     size_t len = m_z_size  - m_deflate->avail_out;
 264     if (len) {
 265       if (m_parent_o_stream->Write(m_z_buffer, len).LastWrite() != len) {
 266         m_lasterror = wxSTREAM_WRITE_ERROR;
 267         wxLogDebug(wxT("wxZlibOutputStream: Error writing to underlying stream"));
 268         break;
 269       }
 270       m_deflate->next_out = m_z_buffer;
 271       m_deflate->avail_out = m_z_size;
 272     }
 273
 274     if (done)
 275       break;
 276     err = deflate(m_deflate, final ? Z_FINISH : Z_FULL_FLUSH);
 277     done = m_deflate->avail_out != 0 || err == Z_STREAM_END;
 278   }
 279 }
 280
 281 size_t wxZlibOutputStream::OnSysWrite(const void *buffer, size_t size)
 282 {
 283   wxASSERT_MSG(m_deflate && m_z_buffer, wxT("Deflate stream not open"));
 284
 285   if (!m_deflate || !m_z_buffer)
 286   {
 287     // notice that this will make IsOk() test just below return false
 288     m_lasterror = wxSTREAM_WRITE_ERROR;
 289   }
 290
 291   if (!IsOk() || !size)
 292     return 0;
 293
 294   int err = Z_OK;
 295   m_deflate->next_in = (unsigned char *)buffer;
 296   m_deflate->avail_in = size;
 297
 298   while (err == Z_OK && m_deflate->avail_in > 0) {
 299     if (m_deflate->avail_out == 0) {
 300       m_parent_o_stream->Write(m_z_buffer, m_z_size);
 301       if (m_parent_o_stream->LastWrite() != m_z_size) {
 302         m_lasterror = wxSTREAM_WRITE_ERROR;
 303         wxLogDebug(wxT("wxZlibOutputStream: Error writing to underlying stream"));
 304         break;
 305       }
 306
 307       m_deflate->next_out = m_z_buffer;
 308       m_deflate->avail_out = m_z_size;
 309     }
 310
 311     err = deflate(m_deflate, Z_NO_FLUSH);
 312   }
 313
 314   if (err != Z_OK) {
 315     m_lasterror = wxSTREAM_WRITE_ERROR;
 316     wxString msg(m_deflate->msg, *wxConvCurrent);
 317     if (!msg)
 318       msg = wxString::Format(_("zlib error %d"), err);
 319     wxLogError(_("Can't write to deflate stream: %s"), msg.c_str());
 320   }
 321
 322   size -= m_deflate->avail_in;
 323   m_pos += size;
 324   return size;
 325 }
 326
 327 /* static */ bool wxZlibOutputStream::CanHandleGZip()
 328 {
 329   return wxZlibInputStream::CanHandleGZip();
 330 }
 331
 332 #endif
 333   // wxUSE_ZLIB && wxUSE_STREAMS
 334