67f5356a8d44fd96c1119f5919c10b226bcb12ab
[libgcrypt.git] / cipher / md.c
1 /* md.c  -  message digest dispatcher
2  *      Copyright (c) 1997 by Werner Koch (dd9jn)
3  *
4  * This file is part of G10.
5  *
6  * G10 is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * G10 is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <errno.h>
25 #include "util.h"
26 #include "cipher.h"
27 #include "errors.h"
28
29
30 int
31 md_okay( int algo )
32 {
33     return check_digest_algo( algo );
34 }
35
36
37 MD_HANDLE *
38 md_open( int algo, int secure )
39 {
40     MD_HANDLE *hd;
41
42     hd = m_alloc( sizeof *hd + 19 );
43     hd->algo = algo;
44     hd->datalen = 0;
45     if( algo == DIGEST_ALGO_MD5 )
46         hd->u.md5 = md5_open( secure );
47     else if( algo == DIGEST_ALGO_RMD160 )
48         hd->u.rmd= rmd160_open( secure );
49     else if( algo == DIGEST_ALGO_SHA1 )
50         hd->u.sha1 = sha1_open( secure );
51     else
52         return NULL;
53
54     return hd;
55 }
56
57
58 MD_HANDLE *
59 md_copy( MD_HANDLE *a )
60 {
61     MD_HANDLE *hd;
62
63     hd = m_alloc( sizeof *hd + 19 );
64     hd->algo = a->algo;
65     hd->datalen = 0;
66     if( a->algo == DIGEST_ALGO_MD5 )
67         hd->u.md5 = md5_copy( a->u.md5 );
68     else if( a->algo == DIGEST_ALGO_RMD160 )
69         hd->u.rmd= rmd160_copy( a->u.rmd );
70     else if( a->algo == DIGEST_ALGO_SHA1 )
71         hd->u.sha1= sha1_copy( a->u.sha1 );
72     else
73         log_bug(NULL);
74     return hd;
75 }
76
77
78 /* used for a BAD Kludge in rmd160.c, md5.c  */
79 MD_HANDLE *
80 md_makecontainer( int algo )
81 {
82     MD_HANDLE *hd;
83
84     hd = m_alloc( sizeof *hd + 19 );
85     hd->algo = algo;
86     hd->datalen = 0;
87     if( algo == DIGEST_ALGO_MD5 )
88         ;
89     else if( algo == DIGEST_ALGO_RMD160 )
90         ;
91     else if( algo == DIGEST_ALGO_SHA1 )
92         ;
93     else
94         log_bug(NULL);
95     return hd;
96 }
97
98 void
99 md_close(MD_HANDLE *a)
100 {
101     if( !a )
102         return;
103     if( a->algo == DIGEST_ALGO_MD5 )
104         md5_close( a->u.md5 );
105     else if( a->algo == DIGEST_ALGO_RMD160 )
106         rmd160_close( a->u.rmd );
107     else if( a->algo == DIGEST_ALGO_SHA1 )
108         sha1_close( a->u.sha1 );
109     else
110         log_bug(NULL);
111     m_free(a);
112 }
113
114
115 void
116 md_write( MD_HANDLE *a, byte *inbuf, size_t inlen)
117 {
118     if( a->algo == DIGEST_ALGO_MD5 )
119         md5_write( a->u.md5, inbuf, inlen );
120     else if( a->algo == DIGEST_ALGO_RMD160 )
121         rmd160_write( a->u.rmd, inbuf, inlen  );
122     else if( a->algo == DIGEST_ALGO_SHA1 )
123         sha1_write( a->u.sha1, inbuf, inlen  );
124     else
125         log_bug(NULL);
126 }
127
128
129 void
130 md_putchar( MD_HANDLE *a, int c )
131 {
132     if( a->algo == DIGEST_ALGO_MD5 )
133         md5_putchar( a->u.md5, c );
134     else if( a->algo == DIGEST_ALGO_RMD160 )
135         rmd160_putchar( a->u.rmd, c );
136     else if( a->algo == DIGEST_ALGO_SHA1 )
137         sha1_putchar( a->u.sha1, c );
138     else
139         log_bug(NULL);
140 }
141
142
143 byte *
144 md_final(MD_HANDLE *a)
145 {
146     if( a->algo == DIGEST_ALGO_MD5 ) {
147         if( !a->datalen ) {
148             md5_final( a->u.md5 );
149             memcpy(a->data, md5_read( a->u.md5 ), 16);
150             a->datalen = 16;
151         }
152         return a->data;
153     }
154     else if( a->algo == DIGEST_ALGO_RMD160 ) {
155         if( !a->datalen ) {
156             memcpy(a->data, rmd160_final( a->u.rmd  ), 20 );
157             a->datalen = 20;
158         }
159         return a->data;
160     }
161     else if( a->algo == DIGEST_ALGO_SHA1 ) {
162         if( !a->datalen ) {
163             memcpy(a->data, sha1_final( a->u.sha1  ), 20 );
164             a->datalen = 20;
165         }
166         return a->data;
167     }
168     else
169         log_bug(NULL);
170 }
171
172