bug fixes
[libgcrypt.git] / cipher / md.c
1 /* md.c  -  message digest dispatcher
2  *      Copyright (C) 1998 Free Software Foundation, Inc.
3  *
4  * This file is part of GNUPG.
5  *
6  * GNUPG 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  * GNUPG 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 <string.h>
25 #include <errno.h>
26 #include "util.h"
27 #include "cipher.h"
28 #include "errors.h"
29
30 /****************
31  * Open a message digest handle for use with algorithm ALGO.
32  * More algorithms may be added by md_enable(). The initial algorithm
33  * may be 0.
34  */
35 MD_HANDLE
36 md_open( int algo, int secure )
37 {
38     MD_HANDLE hd;
39
40     hd = secure ? m_alloc_secure_clear( sizeof *hd )
41                 : m_alloc_clear( sizeof *hd );
42     hd->secure = secure;
43     if( algo )
44         md_enable( hd, algo );
45     return hd;
46 }
47
48 void
49 md_enable( MD_HANDLE h, int algo )
50 {
51     if( algo == DIGEST_ALGO_MD5 ) {
52         if( !h->use_md5 )
53             md5_init( &h->md5 );
54         h->use_md5 = 1;
55     }
56     else if( algo == DIGEST_ALGO_RMD160 ) {
57         if( !h->use_rmd160 )
58             rmd160_init( &h->rmd160 );
59         h->use_rmd160 = 1;
60     }
61     else if( algo == DIGEST_ALGO_SHA1 ) {
62         if( !h->use_sha1 )
63             sha1_init( &h->sha1 );
64         h->use_sha1 = 1;
65     }
66     else
67         log_bug("md_enable(%d)", algo );
68 }
69
70
71 MD_HANDLE
72 md_copy( MD_HANDLE a )
73 {
74     MD_HANDLE b;
75
76     b = a->secure ? m_alloc_secure( sizeof *b )
77                   : m_alloc( sizeof *b );
78     memcpy( b, a, sizeof *a );
79     return b;
80 }
81
82
83 void
84 md_close(MD_HANDLE a)
85 {
86     if( !a )
87         return;
88     m_free(a);
89 }
90
91
92 void
93 md_write( MD_HANDLE a, byte *inbuf, size_t inlen)
94 {
95     if( a->debug ) {
96         if( a->bufcount && fwrite(a->buffer, a->bufcount, 1, a->debug ) != 1 )
97             BUG();
98         if( inlen && fwrite(inbuf, inlen, 1, a->debug ) != 1 )
99             BUG();
100     }
101     if( a->use_rmd160 ) {
102         rmd160_write( &a->rmd160, a->buffer, a->bufcount );
103         rmd160_write( &a->rmd160, inbuf, inlen  );
104     }
105     if( a->use_sha1 ) {
106         sha1_write( &a->sha1, a->buffer, a->bufcount );
107         sha1_write( &a->sha1, inbuf, inlen  );
108     }
109     if( a->use_md5 ) {
110         md5_write( &a->md5, a->buffer, a->bufcount );
111         md5_write( &a->md5, inbuf, inlen  );
112     }
113     a->bufcount = 0;
114 }
115
116
117
118 void
119 md_final(MD_HANDLE a)
120 {
121     if( a->bufcount )
122         md_write( a, NULL, 0 );
123     if( a->use_rmd160 ) {
124         byte *p;
125         rmd160_final( &a->rmd160 );
126         p = rmd160_read( &a->rmd160 );
127     }
128     if( a->use_sha1 )
129         sha1_final( &a->sha1 );
130     if( a->use_md5 )
131         md5_final( &a->md5 );
132 }
133
134
135 /****************
136  * if ALGO is null get the digest for the used algo (which should be only one)
137  */
138 byte *
139 md_read( MD_HANDLE a, int algo )
140 {
141     if( !algo ) {
142         if( a->use_rmd160 )
143             return rmd160_read( &a->rmd160 );
144         if( a->use_sha1 )
145             return sha1_read( &a->sha1 );
146         if( a->use_md5 )
147             return md5_read( &a->md5 );
148     }
149     else {
150         if( algo == DIGEST_ALGO_RMD160 )
151             return rmd160_read( &a->rmd160 );
152         if( algo == DIGEST_ALGO_SHA1 )
153             return sha1_read( &a->sha1 );
154         if( algo == DIGEST_ALGO_MD5 )
155             return md5_read( &a->md5 );
156     }
157     BUG();
158 }
159
160 int
161 md_get_algo( MD_HANDLE a )
162 {
163     if( a->use_rmd160 )
164         return DIGEST_ALGO_RMD160;
165     if( a->use_sha1 )
166         return DIGEST_ALGO_SHA1;
167     if( a->use_md5 )
168         return DIGEST_ALGO_MD5;
169     return 0;
170 }
171
172
173 const byte *
174 md_asn_oid( int algo, size_t *asnlen, size_t *mdlen )
175 {
176     size_t alen, mlen;
177     byte *p;
178
179     if( algo == DIGEST_ALGO_MD5 ) {
180         static byte asn[18] = /* Object ID is 1.2.840.113549.2.5 */
181                     { 0x30, 0x20, 0x30, 0x0c, 0x06, 0x08, 0x2a, 0x86,0x48,
182                       0x86, 0xf7, 0x0d, 0x02, 0x05, 0x05, 0x00, 0x04, 0x10 };
183         mlen = 16; alen = DIM(asn); p = asn;
184     }
185     else if( algo == DIGEST_ALGO_RMD160 ) {
186         static byte asn[15] = /* Object ID is 1.3.36.3.2.1 */
187           { 0x30, 0x21, 0x30, 0x09, 0x06, 0x05, 0x2b, 0x24, 0x03,
188             0x02, 0x01, 0x05, 0x00, 0x04, 0x14 };
189         mlen = 20; alen = DIM(asn); p = asn;
190     }
191     else if( algo == DIGEST_ALGO_SHA1 ) {
192         static byte asn[15] = /* Objet ID is 1.3.14.3.2.26 */
193                     { 0x30, 0x21, 0x30, 0x09, 0x06, 0x05, 0x2b, 0x0e, 0x03,
194                       0x02, 0x1a, 0x05, 0x00, 0x04, 0x14 };
195         mlen = 20; alen = DIM(asn); p = asn;
196     }
197     else
198         log_bug("md_asn_oid(%d)", algo );
199
200     if( asnlen )
201         *asnlen = alen;
202     if( mdlen )
203         *mdlen = mlen;
204     return p;
205 }
206
207