ElGamal funktioniert und ist default
[gnupg.git] / g10 / free-packet.c
1 /* free-packet.c - cleanup stuff for packets
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
27 #include "packet.h"
28 #include "iobuf.h"
29 #include "mpi.h"
30 #include "util.h"
31 #include "cipher.h"
32 #include "memory.h"
33
34
35 void
36 free_pubkey_enc( PKT_pubkey_enc *enc )
37 {
38     if( enc->pubkey_algo == PUBKEY_ALGO_ELGAMAL ) {
39         mpi_free( enc->d.elg.a );
40         mpi_free( enc->d.elg.b );
41     }
42     else if( enc->pubkey_algo == PUBKEY_ALGO_RSA )
43         mpi_free( enc->d.rsa.rsa_integer );
44     m_free(enc);
45 }
46
47 void
48 free_seckey_enc( PKT_signature *enc )
49 {
50     if( enc->pubkey_algo == PUBKEY_ALGO_ELGAMAL ) {
51         mpi_free( enc->d.elg.a );
52         mpi_free( enc->d.elg.b );
53     }
54     else if( enc->pubkey_algo == PUBKEY_ALGO_RSA )
55         mpi_free( enc->d.rsa.rsa_integer );
56     m_free(enc);
57 }
58
59 void
60 free_pubkey_cert( PKT_pubkey_cert *cert )
61 {
62     if( cert->pubkey_algo == PUBKEY_ALGO_ELGAMAL ) {
63         mpi_free( cert->d.elg.p );
64         mpi_free( cert->d.elg.g );
65         mpi_free( cert->d.elg.y );
66     }
67     else if( cert->pubkey_algo == PUBKEY_ALGO_RSA ) {
68         mpi_free( cert->d.rsa.rsa_n );
69         mpi_free( cert->d.rsa.rsa_e );
70     }
71     md5_close( cert->mfx.md5 );
72     rmd160_close( cert->mfx.rmd160 );
73     m_free(cert);
74 }
75
76 PKT_pubkey_cert *
77 copy_pubkey_cert( PKT_pubkey_cert *d, PKT_pubkey_cert *s )
78 {
79     if( !d )
80         d = m_alloc(sizeof *d);
81     memcpy( d, s, sizeof *d );
82     if( s->pubkey_algo == PUBKEY_ALGO_ELGAMAL ) {
83         d->d.elg.p = mpi_copy( s->d.elg.p );
84         d->d.elg.g = mpi_copy( s->d.elg.g );
85         d->d.elg.y = mpi_copy( s->d.elg.y );
86     }
87     else if( s->pubkey_algo == PUBKEY_ALGO_RSA ) {
88         d->d.rsa.rsa_n = mpi_copy( s->d.rsa.rsa_n );
89         d->d.rsa.rsa_e = mpi_copy( s->d.rsa.rsa_e );
90     }
91     d->mfx.md5 = NULL;
92     d->mfx.rmd160 =NULL;
93     return d;
94 }
95
96 void
97 free_seckey_cert( PKT_seckey_cert *cert )
98 {
99     if( cert->pubkey_algo == PUBKEY_ALGO_ELGAMAL ) {
100         mpi_free( cert->d.elg.p );
101         mpi_free( cert->d.elg.g );
102         mpi_free( cert->d.elg.y );
103         if( cert->d.rsa.is_protected )
104             m_free( cert->d.elg.x );
105         else
106             mpi_free( cert->d.elg.x );
107     }
108     else if( cert->pubkey_algo == PUBKEY_ALGO_RSA ) {
109         mpi_free( cert->d.rsa.rsa_n );
110         mpi_free( cert->d.rsa.rsa_e );
111         if( cert->d.rsa.is_protected ) {
112             m_free( cert->d.rsa.rsa_d );
113             m_free( cert->d.rsa.rsa_p );
114             m_free( cert->d.rsa.rsa_q );
115             m_free( cert->d.rsa.rsa_u );
116         }
117         else {
118             mpi_free( cert->d.rsa.rsa_d );
119             mpi_free( cert->d.rsa.rsa_p );
120             mpi_free( cert->d.rsa.rsa_q );
121             mpi_free( cert->d.rsa.rsa_u );
122         }
123     }
124     m_free(cert);
125 }
126
127 PKT_seckey_cert *
128 copy_seckey_cert( PKT_seckey_cert *d, PKT_seckey_cert *s )
129 {
130     if( !d )
131         d = m_alloc(sizeof *d);
132     memcpy( d, s, sizeof *d );
133     if( s->pubkey_algo == PUBKEY_ALGO_ELGAMAL ) {
134         d->d.elg.p = mpi_copy( s->d.elg.p );
135         d->d.elg.g = mpi_copy( s->d.elg.g );
136         d->d.elg.y = mpi_copy( s->d.elg.y );
137         d->d.elg.x = mpi_copy( s->d.elg.x );
138     }
139     else if( s->pubkey_algo == PUBKEY_ALGO_RSA ) {
140         d->d.rsa.rsa_n = mpi_copy( s->d.rsa.rsa_n );
141         d->d.rsa.rsa_e = mpi_copy( s->d.rsa.rsa_e );
142         d->d.rsa.rsa_d = mpi_copy( s->d.rsa.rsa_d );
143         d->d.rsa.rsa_p = mpi_copy( s->d.rsa.rsa_p );
144         d->d.rsa.rsa_q = mpi_copy( s->d.rsa.rsa_q );
145         d->d.rsa.rsa_u = mpi_copy( s->d.rsa.rsa_u );
146     }
147     return d;
148 }
149
150 void
151 free_comment( PKT_comment *rem )
152 {
153     m_free(rem);
154 }
155
156 void
157 free_user_id( PKT_user_id *uid )
158 {
159     m_free(uid);
160 }
161
162 void
163 free_compressed( PKT_compressed *zd )
164 {
165     if( zd->buf ) { /* have to skip some bytes */
166         /* don't have any informations about the length, so
167          * we assume this is the last packet */
168         while( iobuf_get(zd->buf) != -1 )
169             ;
170     }
171     m_free(zd);
172 }
173
174 void
175 free_encr_data( PKT_encr_data *ed )
176 {
177     if( ed->buf ) { /* have to skip some bytes */
178         if( iobuf_in_block_mode(ed->buf) ) {
179             while( iobuf_get(ed->buf) != -1 )
180                 ;
181             iobuf_set_block_mode(ed->buf, 0);
182         }
183         else {
184             for( ; ed->len; ed->len-- ) /* skip the packet */
185                 iobuf_get(ed->buf);
186         }
187     }
188     m_free(ed);
189 }
190
191
192 void
193 free_plaintext( PKT_plaintext *pt )
194 {
195     if( pt->buf ) { /* have to skip some bytes */
196         if( iobuf_in_block_mode(pt->buf) ) {
197             while( iobuf_get(pt->buf) != -1 )
198                 ;
199             iobuf_set_block_mode(pt->buf, 0);
200         }
201         else {
202             for( ; pt->len; pt->len-- ) /* skip the packet */
203                 iobuf_get(pt->buf);
204         }
205     }
206     m_free(pt);
207 }
208
209 /****************
210  * Free the packet in pkt.
211  */
212 void
213 free_packet( PACKET *pkt )
214 {
215     if( !pkt || !pkt->pkt.generic )
216         return;
217
218     if( DBG_MEMORY )
219         log_debug("free_packet() type=%d\n", pkt->pkttype );
220
221     switch( pkt->pkttype ) {
222       case PKT_SIGNATURE:
223         free_seckey_enc( pkt->pkt.signature );
224         break;
225       case PKT_PUBKEY_ENC:
226         free_pubkey_enc( pkt->pkt.pubkey_enc );
227         break;
228       case PKT_PUBKEY_CERT:
229         free_pubkey_cert( pkt->pkt.pubkey_cert );
230         break;
231       case PKT_SECKEY_CERT:
232         free_seckey_cert( pkt->pkt.seckey_cert );
233         break;
234       case PKT_COMMENT:
235         free_comment( pkt->pkt.comment );
236         break;
237       case PKT_USER_ID:
238         free_user_id( pkt->pkt.user_id );
239         break;
240       case PKT_COMPR_DATA:
241         free_compressed( pkt->pkt.compressed);
242         break;
243       case PKT_ENCR_DATA:
244         free_encr_data( pkt->pkt.encr_data );
245         break;
246       case PKT_PLAINTEXT:
247         free_plaintext( pkt->pkt.plaintext );
248         break;
249       default:
250         m_free( pkt->pkt.generic );
251         break;
252     }
253     pkt->pkt.generic = NULL;
254 }
255
256