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/9.2/sys/opencrypto/deflate.c 211616 2010-08-22 11:18:57Z rpaulo $");
37
38 #include "opt_kdtrace.h"
39
40 #include <sys/types.h>
41 #include <sys/param.h>
42 #include <sys/malloc.h>
43 #include <sys/param.h>
44 #include <sys/kernel.h>
45 #include <sys/sdt.h>
46 #include <sys/systm.h>
47 #include <net/zlib.h>
48
49 #include <opencrypto/cryptodev.h>
50 #include <opencrypto/deflate.h>
51
52 SDT_PROVIDER_DECLARE(opencrypto);
53 SDT_PROBE_DEFINE2(opencrypto, deflate, deflate_global, entry, entry,
54 "int", "u_int32_t");
55 SDT_PROBE_DEFINE5(opencrypto, deflate, deflate_global, bad, bad,
56 "int", "int", "int", "int", "int");
57 SDT_PROBE_DEFINE5(opencrypto, deflate, deflate_global, iter, iter,
58 "int", "int", "int", "int", "int");
59 SDT_PROBE_DEFINE2(opencrypto, deflate, deflate_global, return, return,
60 "int", "u_int32_t");
61
62 int window_inflate = -1 * MAX_WBITS;
63 int window_deflate = -12;
64
65 /*
66 * This function takes a block of data and (de)compress it using the deflate
67 * algorithm
68 */
69
70 u_int32_t
71 deflate_global(data, size, decomp, out)
72 u_int8_t *data;
73 u_int32_t size;
74 int decomp;
75 u_int8_t **out;
76 {
77 /* decomp indicates whether we compress (0) or decompress (1) */
78
79 z_stream zbuf;
80 u_int8_t *output;
81 u_int32_t count, result;
82 int error, i;
83 struct deflate_buf *bufh, *bufp;
84
85 SDT_PROBE2(opencrypto, deflate, deflate_global, entry, decomp, size);
86
87 bufh = bufp = NULL;
88 if (!decomp) {
89 i = 1;
90 } else {
91 /*
92 * Choose a buffer with 4x the size of the input buffer
93 * for the size of the output buffer in the case of
94 * decompression. If it's not sufficient, it will need to be
95 * updated while the decompression is going on.
96 */
97 i = 4;
98 }
99 /*
100 * Make sure we do have enough output space. Repeated calls to
101 * deflate need at least 6 bytes of output buffer space to avoid
102 * repeated markers. We will always provide at least 16 bytes.
103 */
104 while ((size * i) < 16)
105 i++;
106
107 bufh = bufp = malloc(sizeof(*bufp) + (size_t)(size * i),
108 M_CRYPTO_DATA, M_NOWAIT);
109 if (bufp == NULL) {
110 SDT_PROBE3(opencrypto, deflate, deflate_global, bad,
111 decomp, 0, __LINE__);
112 goto bad2;
113 }
114 bufp->next = NULL;
115 bufp->size = size * i;
116
117 bzero(&zbuf, sizeof(z_stream));
118 zbuf.zalloc = z_alloc;
119 zbuf.zfree = z_free;
120 zbuf.opaque = Z_NULL;
121 zbuf.next_in = data; /* Data that is going to be processed. */
122 zbuf.avail_in = size; /* Total length of data to be processed. */
123 zbuf.next_out = bufp->data;
124 zbuf.avail_out = bufp->size;
125
126 error = decomp ? inflateInit2(&zbuf, window_inflate) :
127 deflateInit2(&zbuf, Z_DEFAULT_COMPRESSION, Z_METHOD,
128 window_deflate, Z_MEMLEVEL, Z_DEFAULT_STRATEGY);
129 if (error != Z_OK) {
130 SDT_PROBE3(opencrypto, deflate, deflate_global, bad,
131 decomp, error, __LINE__);
132 goto bad;
133 }
134
135 for (;;) {
136 error = decomp ? inflate(&zbuf, Z_SYNC_FLUSH) :
137 deflate(&zbuf, Z_FINISH);
138 if (error != Z_OK && error != Z_STREAM_END) {
139 /*
140 * Unfortunately we are limited to 5 arguments,
141 * thus use two probes.
142 */
143 SDT_PROBE5(opencrypto, deflate, deflate_global, bad,
144 decomp, error, __LINE__,
145 zbuf.avail_in, zbuf.avail_out);
146 SDT_PROBE5(opencrypto, deflate, deflate_global, bad,
147 decomp, error, __LINE__,
148 zbuf.state->dummy, zbuf.total_out);
149 goto bad;
150 }
151 SDT_PROBE5(opencrypto, deflate, deflate_global, iter,
152 decomp, error, __LINE__,
153 zbuf.avail_in, zbuf.avail_out);
154 SDT_PROBE5(opencrypto, deflate, deflate_global, iter,
155 decomp, error, __LINE__,
156 zbuf.state->dummy, zbuf.total_out);
157 if (decomp && zbuf.avail_in == 0 && error == Z_STREAM_END) {
158 /* Done. */
159 break;
160 } else if (!decomp && error == Z_STREAM_END) {
161 /* Done. */
162 break;
163 } else if (zbuf.avail_out == 0) {
164 struct deflate_buf *p;
165
166 /* We need more output space for another iteration. */
167 p = malloc(sizeof(*p) + (size_t)(size * i),
168 M_CRYPTO_DATA, M_NOWAIT);
169 if (p == NULL) {
170 SDT_PROBE3(opencrypto, deflate, deflate_global,
171 bad, decomp, 0, __LINE__);
172 goto bad;
173 }
174 p->next = NULL;
175 p->size = size * i;
176 bufp->next = p;
177 bufp = p;
178 zbuf.next_out = bufp->data;
179 zbuf.avail_out = bufp->size;
180 } else {
181 /* Unexpect result. */
182 /*
183 * Unfortunately we are limited to 5 arguments,
184 * thus, again, use two probes.
185 */
186 SDT_PROBE5(opencrypto, deflate, deflate_global, bad,
187 decomp, error, __LINE__,
188 zbuf.avail_in, zbuf.avail_out);
189 SDT_PROBE5(opencrypto, deflate, deflate_global, bad,
190 decomp, error, __LINE__,
191 zbuf.state->dummy, zbuf.total_out);
192 goto bad;
193 }
194 }
195
196 result = count = zbuf.total_out;
197
198 *out = malloc(result, M_CRYPTO_DATA, M_NOWAIT);
199 if (*out == NULL) {
200 SDT_PROBE3(opencrypto, deflate, deflate_global, bad,
201 decomp, 0, __LINE__);
202 goto bad;
203 }
204 if (decomp)
205 inflateEnd(&zbuf);
206 else
207 deflateEnd(&zbuf);
208 output = *out;
209 for (bufp = bufh; bufp != NULL; ) {
210 if (count > bufp->size) {
211 struct deflate_buf *p;
212
213 bcopy(bufp->data, *out, bufp->size);
214 *out += bufp->size;
215 count -= bufp->size;
216 p = bufp;
217 bufp = bufp->next;
218 free(p, M_CRYPTO_DATA);
219 } else {
220 /* It should be the last buffer. */
221 bcopy(bufp->data, *out, count);
222 *out += count;
223 free(bufp, M_CRYPTO_DATA);
224 bufp = NULL;
225 count = 0;
226 }
227 }
228 *out = output;
229 SDT_PROBE2(opencrypto, deflate, deflate_global, return, decomp, result);
230 return result;
231
232 bad:
233 if (decomp)
234 inflateEnd(&zbuf);
235 else
236 deflateEnd(&zbuf);
237 for (bufp = bufh; bufp != NULL; ) {
238 struct deflate_buf *p;
239
240 p = bufp;
241 bufp = bufp->next;
242 free(p, M_CRYPTO_DATA);
243 }
244 bad2:
245 *out = NULL;
246 return 0;
247 }
248
249 void *
250 z_alloc(nil, type, size)
251 void *nil;
252 u_int type, size;
253 {
254 void *ptr;
255
256 ptr = malloc(type *size, M_CRYPTO_DATA, M_NOWAIT);
257 return ptr;
258 }
259
260 void
261 z_free(nil, ptr)
262 void *nil, *ptr;
263 {
264 free(ptr, M_CRYPTO_DATA);
265 }
Cache object: f9007fe2055ac7926b401f8ec92f5fbb
|