xref: /plan9/sys/src/libflate/deflatezlibblock.c (revision 80ee5cbfe36716af62da8896207e9763b8e3d760)
1*80ee5cbfSDavid du Colombier #include <u.h>
2*80ee5cbfSDavid du Colombier #include <libc.h>
3*80ee5cbfSDavid du Colombier #include <flate.h>
4*80ee5cbfSDavid du Colombier #include "zlib.h"
5*80ee5cbfSDavid du Colombier 
6*80ee5cbfSDavid du Colombier int
deflatezlibblock(uchar * dst,int dsize,uchar * src,int ssize,int level,int debug)7*80ee5cbfSDavid du Colombier deflatezlibblock(uchar *dst, int dsize, uchar *src, int ssize, int level, int debug)
8*80ee5cbfSDavid du Colombier {
9*80ee5cbfSDavid du Colombier 	ulong adler;
10*80ee5cbfSDavid du Colombier 	int n;
11*80ee5cbfSDavid du Colombier 
12*80ee5cbfSDavid du Colombier 	if(dsize < 6)
13*80ee5cbfSDavid du Colombier 		return FlateOutputFail;
14*80ee5cbfSDavid du Colombier 
15*80ee5cbfSDavid du Colombier 	n = deflateblock(dst + 2, dsize - 6, src, ssize, level, debug);
16*80ee5cbfSDavid du Colombier 	if(n < 0)
17*80ee5cbfSDavid du Colombier 		return n;
18*80ee5cbfSDavid du Colombier 
19*80ee5cbfSDavid du Colombier 	dst[0] = ZlibDeflate | ZlibWin32k;
20*80ee5cbfSDavid du Colombier 
21*80ee5cbfSDavid du Colombier 	/* bogus zlib encoding of compression level */
22*80ee5cbfSDavid du Colombier 	dst[1] = ((level > 2) + (level > 5) + (level > 8)) << 6;
23*80ee5cbfSDavid du Colombier 
24*80ee5cbfSDavid du Colombier 	/* header check field */
25*80ee5cbfSDavid du Colombier 	dst[1] |= 31 - ((dst[0] << 8) | dst[1]) % 31;
26*80ee5cbfSDavid du Colombier 
27*80ee5cbfSDavid du Colombier 	adler = adler32(1, src, ssize);
28*80ee5cbfSDavid du Colombier 	dst[n + 2] = adler >> 24;
29*80ee5cbfSDavid du Colombier 	dst[n + 3] = adler >> 16;
30*80ee5cbfSDavid du Colombier 	dst[n + 4] = adler >> 8;
31*80ee5cbfSDavid du Colombier 	dst[n + 5] = adler;
32*80ee5cbfSDavid du Colombier 
33*80ee5cbfSDavid du Colombier 	return n + 6;
34*80ee5cbfSDavid du Colombier }
35