Sylvester Version
[gnupg.git] / g10 / seskey.c
1 /* seskey.c -  make sesssion keys etc.
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 <string.h>
25 #include <assert.h>
26 #include "util.h"
27 #include "cipher.h"
28 #include "mpi.h"
29 #include "main.h"
30
31
32
33 /****************
34  * Make a session key and put it into DEK
35  */
36 void
37 make_session_key( DEK *dek )
38 {
39     switch( dek->algo ) {
40       case CIPHER_ALGO_BLOWFISH:
41         dek->keylen = 20;
42         randomize_buffer( dek->key, dek->keylen, 1 );
43         break;
44
45       default: log_bug("invalid algo %d in make_session_key()\n");
46     }
47 }
48
49
50 /****************
51  * Encode the session key. NBITS is the number of bits which should be used
52  * for packing the session key.
53  * returns: A mpi with the session key (caller must free)
54  */
55 MPI
56 encode_session_key( DEK *dek, unsigned nbits )
57 {
58     int nframe = (nbits+7) / 8;
59     byte *p;
60     MPI frame;
61     int i,n,c;
62     u16 csum;
63
64     /* the current limitation is, that we can only use a session key
65      * which length is a multiple of BITS_PER_MPI_LIMB
66      * I think we can live with that.
67      */
68     if( dek->keylen + 7 > nframe ||  (nbits % BITS_PER_MPI_LIMB) || !nframe )
69         log_bug("can't encode a %d bit key in a %d bits frame\n",
70                     dek->keylen*8, nbits );
71
72     /* We encode the session key in this way:
73      *
74      *     0  2  RND(n bytes)  0  A  DEK(k bytes)  CSUM(2 bytes)
75      *
76      * RND are non-zero random bytes.
77      * A   is the cipher algorithm
78      * DEK is the encryption key (session key) length k depends on the
79      *     cipher algorithm (20 is used with blowfish).
80      * CSUM is the 16 bit checksum over the DEK
81      */
82     frame = mpi_alloc_secure( nframe / BYTES_PER_MPI_LIMB );
83     csum = 0;
84     for( p = dek->key, i=0; i < dek->keylen; i++ )
85         csum += *p++;
86     mpi_putbyte(frame, 0, csum );
87     mpi_putbyte(frame, 1, csum >> 8 );
88     for(n=2,i=dek->keylen-1, p = dek->key; i >= 0; i--, n++ )
89         mpi_putbyte(frame, n, p[i] );
90     mpi_putbyte(frame, n++, dek->algo );
91     mpi_putbyte(frame, n++, 0 );
92     while( n < nframe-2 ) {
93         while( !(c = get_random_byte(1)) )
94             ;
95         mpi_putbyte(frame, n++, c );
96     }
97     mpi_putbyte(frame, n++, 2 );
98     mpi_putbyte(frame, n++, 0 );
99     assert( n == nframe );
100     return frame;
101 }
102
103 /****************
104  * Encode a ripemd160 message digest of LEN bytes into NBITS.
105  * returns: A mpi with the session key (caller must free)
106  *  RMD160 Object ID is 1.3.36.3.2.1
107  */
108 MPI
109 encode_rmd160_value( byte *md, unsigned len, unsigned nbits )
110 {
111     static byte asn[15] =
112           { 0x30, 0x21, 0x30, 0x09, 0x06, 0x05, 0x2b, 0x24, 0x03,
113             0x02, 0x01, 0x05, 0x00, 0x04, 0x14 };
114     int nframe = (nbits+7) / 8;
115     byte *p;
116     MPI frame;
117     int i,n,c;
118
119     if( (nbits % BITS_PER_MPI_LIMB) || nframe < 42 || len != 20 )
120         log_bug("can't encode a %d bit MD into a %d bits frame\n",len*8, nbits);
121
122     /* We encode the MD in this way:
123      *
124      *     0  A PAD(n bytes)   0  ASN(15 bytes)  MD(20 bytes)
125      *
126      * PAD consists of FF bytes.
127      */
128     frame = mpi_alloc_secure( nframe / BYTES_PER_MPI_LIMB );
129     n = 0;
130     for(i=20-1; i >= 0; i--, n++ )
131         mpi_putbyte(frame, n, md[i] );
132     for( i=15-1; i >= 0; i--, n++ )
133         mpi_putbyte(frame, n, asn[i] );
134     mpi_putbyte(frame, n++, 0 );
135     while( n < nframe-2 )
136         mpi_putbyte(frame, n++, 0xff );
137     mpi_putbyte(frame, n++, DIGEST_ALGO_RMD160 );
138     mpi_putbyte(frame, n++, 0 );
139     assert( n == nframe );
140     return frame;
141 }
142
143 /****************
144  * Encode a sha-1 message digest of LEN bytes into NBITS.
145  * returns: A mpi with the session key (caller must free)
146  *  SHA-1 Objet ID is 1.3.14.3.2.26
147  */
148 MPI
149 encode_sha1_value( byte *md, unsigned len, unsigned nbits )
150 {
151     static byte asn[15] =
152           { 0x30, 0x21, 0x30, 0x09, 0x06, 0x05, 0x2b, 0x0e, 0x03,
153             0x02, 0x1a, 0x05, 0x00, 0x04, 0x14 };
154     int nframe = (nbits+7) / 8;
155     byte *p;
156     MPI frame;
157     int i,n,c;
158
159     if( (nbits % BITS_PER_MPI_LIMB) || nframe < 42 || len != 20 )
160         log_bug("can't encode a %d bit MD into a %d bits frame\n",len*8, nbits);
161
162     /* We encode the MD in this way:
163      *
164      *     0  A PAD(n bytes)   0  ASN(15 bytes)  MD(20 bytes)
165      *
166      * PAD consists of FF bytes.
167      */
168     frame = mpi_alloc_secure( nframe / BYTES_PER_MPI_LIMB );
169     n = 0;
170     for(i=20-1; i >= 0; i--, n++ )
171         mpi_putbyte(frame, n, md[i] );
172     for( i=15-1; i >= 0; i--, n++ )
173         mpi_putbyte(frame, n, asn[i] );
174     mpi_putbyte(frame, n++, 0 );
175     while( n < nframe-2 )
176         mpi_putbyte(frame, n++, 0xff );
177     mpi_putbyte(frame, n++, DIGEST_ALGO_RMD160 );
178     mpi_putbyte(frame, n++, 0 );
179     assert( n == nframe );
180     return frame;
181 }
182
183
184 /****************
185  * Encode a md5 message digest of LEN bytes into NBITS.
186  * returns: A mpi with the session key (caller must free)
187  *  MD5 Object ID is 1.2.840.113549.2.5
188  */
189 MPI
190 encode_md5_value( byte *md, unsigned len, unsigned nbits )
191 {
192     static byte asn[18] =
193           { 0x30, 0x20, 0x30, 0x0c, 0x06, 0x08, 0x2a, 0x86,0x48,
194             0x86, 0xf7, 0x0d, 0x02, 0x05, 0x05, 0x00, 0x04, 0x10 };
195     int nframe = (nbits+7) / 8;
196     byte *p;
197     MPI frame;
198     int i,n,c;
199
200     if( (nbits % BITS_PER_MPI_LIMB) || nframe < 38 || len != 16 )
201         log_bug("can't encode a %d bit MD into a %d bits frame\n",len*8, nbits);
202
203     /* We encode the MD in this way:
204      *
205      *     0  A PAD(n bytes)   0  ASN(18 bytes)  MD(16 bytes)
206      *
207      * PAD consists of FF bytes.
208      */
209     frame = mpi_alloc_secure( nframe / BYTES_PER_MPI_LIMB );
210     n = 0;
211     for(i=16-1; i >= 0; i--, n++ )
212         mpi_putbyte(frame, n, md[i] );
213     for( i=18-1; i >= 0; i--, n++ )
214         mpi_putbyte(frame, n, asn[i] );
215     mpi_putbyte(frame, n++, 0 );
216     while( n < nframe-2 )
217         mpi_putbyte(frame, n++, 0xff );
218     mpi_putbyte(frame, n++, DIGEST_ALGO_MD5 );
219     mpi_putbyte(frame, n++, 0 );
220     assert( n == nframe );
221     return frame;
222 }
223
224 MPI
225 encode_md_value( MD_HANDLE *md, unsigned nbits )
226 {
227     byte *p = md_final( md );
228     if( md->algo == DIGEST_ALGO_MD5 )
229         return encode_md5_value( p, 16, nbits );
230     else if( md->algo == DIGEST_ALGO_RMD160 )
231         return encode_rmd160_value( p, 20, nbits );
232     else if( md->algo == DIGEST_ALGO_SHA1 )
233         return encode_sha1_value( p, 20, nbits );
234     else
235         log_bug(NULL);
236 }
237