1 /* $OpenBSD: deflate.c,v 1.3 2001/08/20 02:45:22 hugh Exp $ */
2
3 /*
4 * Copyright (c) 2001 Jean-Jacques Bernard-Gundol (jj@wabbitt.org)
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 *
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. The name of the author may not be used to endorse or promote products
16 * derived from this software without specific prior written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 */
29
30 /*
31 * This file contains a wrapper around the deflate algo compression
32 * functions using the zlib library (see net/zlib.{c,h})
33 */
34
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD: releng/5.2/sys/opencrypto/deflate.c 116191 2003-06-11 05:57:50Z obrien $");
37
38 #include <sys/types.h>
39 #include <sys/malloc.h>
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <net/zlib.h>
43
44 #include <opencrypto/cryptodev.h>
45 #include <opencrypto/deflate.h>
46
47 int window_inflate = -1 * MAX_WBITS;
48 int window_deflate = -12;
49
50 /*
51 * This function takes a block of data and (de)compress it using the deflate
52 * algorithm
53 */
54
55 u_int32_t
56 deflate_global(data, size, decomp, out)
57 u_int8_t *data;
58 u_int32_t size;
59 int decomp;
60 u_int8_t **out;
61 {
62 /* decomp indicates whether we compress (0) or decompress (1) */
63
64 z_stream zbuf;
65 u_int8_t *output;
66 u_int32_t count, result;
67 int error, i = 0, j;
68 struct deflate_buf buf[ZBUF];
69
70 bzero(&zbuf, sizeof(z_stream));
71 for (j = 0; j < ZBUF; j++)
72 buf[j].flag = 0;
73
74 zbuf.next_in = data; /* data that is going to be processed */
75 zbuf.zalloc = z_alloc;
76 zbuf.zfree = z_free;
77 zbuf.opaque = Z_NULL;
78 zbuf.avail_in = size; /* Total length of data to be processed */
79
80 if (!decomp) {
81 MALLOC(buf[i].out, u_int8_t *, (u_long) size, M_CRYPTO_DATA,
82 M_NOWAIT);
83 if (buf[i].out == NULL)
84 goto bad;
85 buf[i].size = size;
86 buf[i].flag = 1;
87 i++;
88 } else {
89 /*
90 * Choose a buffer with 4x the size of the input buffer
91 * for the size of the output buffer in the case of
92 * decompression. If it's not sufficient, it will need to be
93 * updated while the decompression is going on
94 */
95
96 MALLOC(buf[i].out, u_int8_t *, (u_long) (size * 4),
97 M_CRYPTO_DATA, M_NOWAIT);
98 if (buf[i].out == NULL)
99 goto bad;
100 buf[i].size = size * 4;
101 buf[i].flag = 1;
102 i++;
103 }
104
105 zbuf.next_out = buf[0].out;
106 zbuf.avail_out = buf[0].size;
107
108 error = decomp ? inflateInit2(&zbuf, window_inflate) :
109 deflateInit2(&zbuf, Z_DEFAULT_COMPRESSION, Z_METHOD,
110 window_deflate, Z_MEMLEVEL, Z_DEFAULT_STRATEGY);
111
112 if (error != Z_OK)
113 goto bad;
114 for (;;) {
115 error = decomp ? inflate(&zbuf, Z_PARTIAL_FLUSH) :
116 deflate(&zbuf, Z_PARTIAL_FLUSH);
117 if (error != Z_OK && error != Z_STREAM_END)
118 goto bad;
119 else if (zbuf.avail_in == 0 && zbuf.avail_out != 0)
120 goto end;
121 else if (zbuf.avail_out == 0 && i < (ZBUF - 1)) {
122 /* we need more output space, allocate size */
123 MALLOC(buf[i].out, u_int8_t *, (u_long) size,
124 M_CRYPTO_DATA, M_NOWAIT);
125 if (buf[i].out == NULL)
126 goto bad;
127 zbuf.next_out = buf[i].out;
128 buf[i].size = size;
129 buf[i].flag = 1;
130 zbuf.avail_out = buf[i].size;
131 i++;
132 } else
133 goto bad;
134 }
135
136 end:
137 result = count = zbuf.total_out;
138
139 MALLOC(*out, u_int8_t *, (u_long) result, M_CRYPTO_DATA, M_NOWAIT);
140 if (*out == NULL)
141 goto bad;
142 if (decomp)
143 inflateEnd(&zbuf);
144 else
145 deflateEnd(&zbuf);
146 output = *out;
147 for (j = 0; buf[j].flag != 0; j++) {
148 if (count > buf[j].size) {
149 bcopy(buf[j].out, *out, buf[j].size);
150 *out += buf[j].size;
151 FREE(buf[j].out, M_CRYPTO_DATA);
152 count -= buf[j].size;
153 } else {
154 /* it should be the last buffer */
155 bcopy(buf[j].out, *out, count);
156 *out += count;
157 FREE(buf[j].out, M_CRYPTO_DATA);
158 count = 0;
159 }
160 }
161 *out = output;
162 return result;
163
164 bad:
165 *out = NULL;
166 for (j = 0; buf[j].flag != 0; j++)
167 FREE(buf[j].out, M_CRYPTO_DATA);
168 if (decomp)
169 inflateEnd(&zbuf);
170 else
171 deflateEnd(&zbuf);
172 return 0;
173 }
174
175 void *
176 z_alloc(nil, type, size)
177 void *nil;
178 u_int type, size;
179 {
180 void *ptr;
181
182 ptr = malloc(type *size, M_CRYPTO_DATA, M_NOWAIT);
183 return ptr;
184 }
185
186 void
187 z_free(nil, ptr)
188 void *nil, *ptr;
189 {
190 free(ptr, M_CRYPTO_DATA);
191 }
Cache object: f8c185b39b4a9cd0a4d7e9b5359cae58
|