🚀 go-pugleaf

OK ,so there is an idServerCompressionIntercept
component, this should do what I seek.
Thanks Remy for your time and effort.


Colin B Maharaj wrote:
> 
> Thanks for your help Remy, I will try this.
> On another note has anyone really created a
> web server (not ISS or Apache module) but
> standalone web server with both SSL and
> deflate support?
> 
> If not, maybe I can do an article after
> I figure this out?
> 
> C++ Builder v6 SP4
> Indy 9.0.15
> 
> Colin B Maharaj
> Trinidad, WI
> 
> Remy Lebeau (TeamB) wrote:
>> "Colin B Maharaj" <noreply@myhost.com> wrote in message 
>> news:47b5dcaa$1@newsgroups.borland.com...
>>
>>> This is my translation of the code....
>>
>> Try this translation (there are some slight differences from yours):
>>
>>     const int BufferSize = 1024;
>>
>>     procedure zLibCompressStream(TStream *Source, TStream *Destination)
>>     {
>>         z_stream z_s;
>>         int rc
>>
>>         // 1. Buffers for input and output
>>         BYTE SourceBuffer [BufferSize];
>>         BYTE DestinationBuffer[BufferSize];
>>
>>         // 2. Prepare the zLib data record
>>         z_init_zstream(&z_s);
>>         z_s.next_in = SourceBuffer;
>>         z_s.next_out = DestinationBuffer;
>>         z_s.avail_out = BufferSize;
>>
>>         // 2. Initialize the compression engine
>>         deflateInit2(&z_s, Z_BEST_COMPRESSION, Z_DEFLATED, -15, 9, 
>> Z_DEFAULT_STRATEGY);
>>
>>         // Now compress the stream
>>         try
>>         {
>>             do
>>             {
>>                 // 3. See if we got to feed more data to the 
>> compression engine
>>                 if( (z_s.avail_in == 0) && (Source.Position < 
>> Source.Size) )
>>                 {
>>                     z_s.next_in = SourceBuffer;
>>                     z_s.avail_in = Source->Read(SourceBuffer, 
>> BufferSize);
>>                 }
>>                 // if input data completely depleted
>>
>>                 // 4. Compress the data
>>                 rc = deflate(&z_s, (z_s.avail_in == 0) ? Z_FINISH : 
>> Z_STREAM_END);
>>
>>                 // 5. Check if we got compressed data to write to the 
>> destination
>>                 if( (z_s.avail_out == 0) || (rc == Z_STREAM_END) )
>>                 {
>>                     Destination->WriteBuffer(DestinationBuffer, 
>> BufferSize - z_s.avail_out);
>>                     z_s.avail_out = BufferSize;
>>                     z_s.next_out = DestinationBuffer;
>>                 }
>>                 // if got data available for writing
>>             }
>>             // 6. Repeat until buffers exhausted
>>             while( (rc == Z_OK) && !((rc == Z_STREAM_END) && 
>> (z_s.avail_out == BufferSize) && (z_s.avail_in == 0)) );
>>         }
>>         __finally
>>         {
>>             // 7. Clean up the engine data
>>             deflateEnd(&z_s);
>>         }
>>         // try finally - clean up after engine
>>     }
>>
>>
>> Gambit
>>
>>