Kannel: Open Source WAP and SMS gateway  svn-r5335
test_hash.c
Go to the documentation of this file.
1 /* ====================================================================
2  * The Kannel Software License, Version 1.0
3  *
4  * Copyright (c) 2001-2018 Kannel Group
5  * Copyright (c) 1998-2001 WapIT Ltd.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  * notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  * notice, this list of conditions and the following disclaimer in
17  * the documentation and/or other materials provided with the
18  * distribution.
19  *
20  * 3. The end-user documentation included with the redistribution,
21  * if any, must include the following acknowledgment:
22  * "This product includes software developed by the
23  * Kannel Group (http://www.kannel.org/)."
24  * Alternately, this acknowledgment may appear in the software itself,
25  * if and wherever such third-party acknowledgments normally appear.
26  *
27  * 4. The names "Kannel" and "Kannel Group" must not be used to
28  * endorse or promote products derived from this software without
29  * prior written permission. For written permission, please
30  * contact org@kannel.org.
31  *
32  * 5. Products derived from this software may not be called "Kannel",
33  * nor may "Kannel" appear in their name, without prior written
34  * permission of the Kannel Group.
35  *
36  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
37  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
38  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
39  * DISCLAIMED. IN NO EVENT SHALL THE KANNEL GROUP OR ITS CONTRIBUTORS
40  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
41  * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
42  * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
43  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
44  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
45  * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
46  * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
47  * ====================================================================
48  *
49  * This software consists of voluntary contributions made by many
50  * individuals on behalf of the Kannel Group. For more information on
51  * the Kannel Group, please see <http://www.kannel.org/>.
52  *
53  * Portions of this software are based upon software originally written at
54  * WapIT Ltd., Helsinki, Finland for the Kannel project.
55  */
56 
57 /*
58  * test_hash.c - test MD5 and SHA1 routines.
59  *
60  * Stipe Tolj <stolj at kannel dot org>
61  */
62 
63 #include <string.h>
64 #include <unistd.h>
65 #include <signal.h>
66 
67 #include "gwlib/gwlib.h"
68 
69 #ifdef HAVE_LIBSSL
70 #if OPENSSL_VERSION_NUMBER < 0x10100000L
71 static Octstr *our_hash_func(Octstr *os)
72 {
73  /* use openssl's SHA1 */
74  EVP_MD_CTX mdctx;
75  const EVP_MD *md;
76  unsigned char md_value[EVP_MAX_MD_SIZE];
77  unsigned int md_len;
78 
79  md = EVP_get_digestbyname("sha1");
80 
81  EVP_MD_CTX_init(&mdctx);
82  EVP_DigestInit_ex(&mdctx, md, NULL);
83  EVP_DigestUpdate(&mdctx, octstr_get_cstr(os), octstr_len(os));
84  EVP_DigestFinal_ex(&mdctx, md_value, &md_len);
85  EVP_MD_CTX_cleanup(&mdctx);
86 
87  return octstr_create_from_data((char*) md_value, md_len);
88 }
89 #else
90 static Octstr *our_hash_func(Octstr *os)
91 {
92  unsigned char hash[20];
93 
94  memset(hash, 0, sizeof(hash));
95 
96  SHA1((const unsigned char *)octstr_get_cstr(os), octstr_len(os), hash);
97 
98  return octstr_create_from_data((const char*)hash, sizeof(hash));
99 }
100 #endif
101 #endif
102 
103 
104 int main(int argc, char **argv)
105 {
106  Octstr *data, *enc;
107 
108  gwlib_init();
109 
110  get_and_set_debugs(argc, argv, NULL);
111 
112  if (argc < 2)
113  panic(0, "Syntax: %s <txt>\n", argv[0]);
114 
115  data = octstr_create(argv[1]);
116  enc = md5(data);
117 
118  debug("",0,"MD5:");
119  octstr_dump(enc, 0);
120 
121  octstr_destroy(enc);
122  enc = md5digest(data);
123 
124  debug("",0,"MD5 (digest):");
125  octstr_dump(enc, 0);
126 
127 #ifdef HAVE_LIBSSL
128  OpenSSL_add_all_digests();
129 
130  octstr_destroy(enc);
131  enc = our_hash_func(data);
132 
133  debug("",0,"SHA1:");
134  octstr_dump(enc, 0);
135 
136  octstr_binary_to_hex(enc, 0);
137  debug("",0,"SHA1 (digest):");
138  octstr_dump(enc, 0);
139 #endif
140 
141  octstr_destroy(data);
142  octstr_destroy(enc);
143  gwlib_shutdown();
144  return 0;
145 }
Octstr * md5(Octstr *data)
Definition: md5.c:387
static Octstr * our_hash_func(Octstr *os)
Definition: dlr_spool.c:123
int main(int argc, char **argv)
Definition: test_hash.c:104
#define octstr_get_cstr(ostr)
Definition: octstr.h:233
void octstr_binary_to_hex(Octstr *ostr, int uppercase)
Definition: octstr.c:465
#define octstr_dump(ostr, level,...)
Definition: octstr.h:564
void octstr_destroy(Octstr *ostr)
Definition: octstr.c:324
#define octstr_create(cstr)
Definition: octstr.h:125
long octstr_len(const Octstr *ostr)
Definition: octstr.c:342
Definition: octstr.c:118
void debug(const char *place, int err, const char *fmt,...)
Definition: log.c:726
#define panic
Definition: log.h:87
void gwlib_shutdown(void)
Definition: gwlib.c:94
#define EVP_MAX_MD_SIZE
Definition: test_hmac.c:82
void gwlib_init(void)
Definition: gwlib.c:78
int get_and_set_debugs(int argc, char **argv, int(*find_own)(int index, int argc, char **argv))
Definition: utils.c:626
#define octstr_create_from_data(data, len)
Definition: octstr.h:134
Octstr * md5digest(Octstr *data)
Definition: md5.c:406
See file LICENSE for details about the license agreement for using, modifying, copying or deriving work from this software.