Allow NULL for some _free routines.
[openssl.git] / crypto / comp / comp_lib.c
1 /*
2  * Copyright 1998-2016 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9
10 #include <stdio.h>
11 #include <stdlib.h>
12 #include <string.h>
13 #include <openssl/objects.h>
14 #include <openssl/comp.h>
15 #include "comp_lcl.h"
16
17 COMP_CTX *COMP_CTX_new(COMP_METHOD *meth)
18 {
19     COMP_CTX *ret;
20
21     if ((ret = OPENSSL_zalloc(sizeof(*ret))) == NULL)
22         return NULL;
23     ret->meth = meth;
24     if ((ret->meth->init != NULL) && !ret->meth->init(ret)) {
25         OPENSSL_free(ret);
26         ret = NULL;
27     }
28     return ret;
29 }
30
31 const COMP_METHOD *COMP_CTX_get_method(const COMP_CTX *ctx)
32 {
33     return ctx->meth;
34 }
35
36 int COMP_get_type(const COMP_METHOD *meth)
37 {
38     return meth->type;
39 }
40
41 const char *COMP_get_name(const COMP_METHOD *meth)
42 {
43     return meth->name;
44 }
45
46 void COMP_CTX_free(COMP_CTX *ctx)
47 {
48     if (ctx == NULL)
49         return;
50     if (ctx->meth->finish != NULL)
51         ctx->meth->finish(ctx);
52
53     OPENSSL_free(ctx);
54 }
55
56 int COMP_compress_block(COMP_CTX *ctx, unsigned char *out, int olen,
57                         unsigned char *in, int ilen)
58 {
59     int ret;
60     if (ctx->meth->compress == NULL) {
61         return -1;
62     }
63     ret = ctx->meth->compress(ctx, out, olen, in, ilen);
64     if (ret > 0) {
65         ctx->compress_in += ilen;
66         ctx->compress_out += ret;
67     }
68     return ret;
69 }
70
71 int COMP_expand_block(COMP_CTX *ctx, unsigned char *out, int olen,
72                       unsigned char *in, int ilen)
73 {
74     int ret;
75
76     if (ctx->meth->expand == NULL) {
77         return -1;
78     }
79     ret = ctx->meth->expand(ctx, out, olen, in, ilen);
80     if (ret > 0) {
81         ctx->expand_in += ilen;
82         ctx->expand_out += ret;
83     }
84     return ret;
85 }
86
87 int COMP_CTX_get_type(const COMP_CTX* comp)
88 {
89     return comp->meth ? comp->meth->type : NID_undef;
90 }