OpenTLS ready
[openssl.git] / crypto / asn1 / test.c
1 /* crypto/asn1/test.c */
2 /* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
3  * All rights reserved.
4  *
5  * This package is an SSL implementation written
6  * by Eric Young (eay@cryptsoft.com).
7  * The implementation was written so as to conform with Netscapes SSL.
8  * 
9  * This library is free for commercial and non-commercial use as long as
10  * the following conditions are aheared to.  The following conditions
11  * apply to all code found in this distribution, be it the RC4, RSA,
12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
13  * included with this distribution is covered by the same copyright terms
14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15  * 
16  * Copyright remains Eric Young's, and as such any Copyright notices in
17  * the code are not to be removed.
18  * If this package is used in a product, Eric Young should be given attribution
19  * as the author of the parts of the library used.
20  * This can be in the form of a textual message at program startup or
21  * in documentation (online or textual) provided with the package.
22  * 
23  * Redistribution and use in source and binary forms, with or without
24  * modification, are permitted provided that the following conditions
25  * are met:
26  * 1. Redistributions of source code must retain the copyright
27  *    notice, this list of conditions and the following disclaimer.
28  * 2. Redistributions in binary form must reproduce the above copyright
29  *    notice, this list of conditions and the following disclaimer in the
30  *    documentation and/or other materials provided with the distribution.
31  * 3. All advertising materials mentioning features or use of this software
32  *    must display the following acknowledgement:
33  *    "This product includes cryptographic software written by
34  *     Eric Young (eay@cryptsoft.com)"
35  *    The word 'cryptographic' can be left out if the rouines from the library
36  *    being used are not cryptographic related :-).
37  * 4. If you include any Windows specific code (or a derivative thereof) from 
38  *    the apps directory (application code) you must include an acknowledgement:
39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40  * 
41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51  * SUCH DAMAGE.
52  * 
53  * The licence and distribution terms for any publically available version or
54  * derivative of this code cannot be changed.  i.e. this code cannot simply be
55  * copied and put under another distribution licence
56  * [including the GNU Public Licence.]
57  */
58
59 #include <stdio.h>
60 #include "../error/err.h"
61 #include "./asn1.h"
62 #include "rsa.h"
63 #include "../x509/x509.h"
64 #include "x509.h"
65
66 main()
67         {
68         main1();
69         main2();
70         main3();
71         main4();
72         }
73
74 main1()
75         {
76         FILE *in;
77         unsigned char buf[10240],buf2[10240],*p;
78         int num,i;
79
80         X509 *nx=NULL,*mx=NULL;
81
82         in=fopen("x.der","r");
83         if (in == NULL)
84                 {
85                 perror("x.der");
86                 exit(1);
87                 }
88         num=fread(buf,1,10240,in);
89         fclose(in);
90
91
92                 p=buf;
93                 if (d2i_X509(&nx,&p,num) == NULL) goto err;
94                 printf("num=%d p-buf=%d\n",num,p-buf);
95
96                 p=buf2;
97                 num=i2d_X509(nx,&p);
98                 printf("num=%d p-buf=%d\n",num,p-buf2);
99
100                 if (memcmp(buf,buf2,num) != 0)
101                         {
102                         fprintf(stderr,"data difference\n");
103                         for (i=0; i<num; i++)
104                                 fprintf(stderr,"%c%03d <%02X-%02X>\n",
105                                         (buf[i] == buf2[i])?' ':'*',i,
106                                         buf[i],buf2[i]);
107                         fprintf(stderr,"\n");
108                         exit(1);
109                         }
110
111                 p=buf2;
112                 if (d2i_X509(&mx,&p,num) == NULL) goto err;
113                 printf("num=%d p-buf=%d\n",num,p-buf2);
114
115         return(1);
116 err:
117         ERR_load_crypto_strings();
118         ERR_print_errors(stderr);
119         return(0);
120         }
121
122 main2()
123         {
124         FILE *in;
125         unsigned char buf[10240],buf2[10240],*p;
126         int num,i;
127
128         X509_CRL *nx=NULL,*mx=NULL;
129
130         in=fopen("crl.der","r");
131         if (in == NULL)
132                 {
133                 perror("crl.der");
134                 exit(1);
135                 }
136         num=fread(buf,1,10240,in);
137         fclose(in);
138
139
140                 p=buf;
141                 if (d2i_X509_CRL(&nx,&p,num) == NULL) goto err;
142                 printf("num=%d p-buf=%d\n",num,p-buf);
143
144                 p=buf2;
145                 num=i2d_X509_CRL(nx,&p);
146                 printf("num=%d p-buf=%d\n",num,p-buf2);
147
148                 if (memcmp(buf,buf2,num) != 0)
149                         {
150                         fprintf(stderr,"data difference\n");
151                         for (i=0; i<num; i++)
152                                 fprintf(stderr,"%c%03d <%02X-%02X>\n",
153                                         (buf[i] == buf2[i])?' ':'*',i,
154                                         buf[i],buf2[i]);
155                         fprintf(stderr,"\n");
156                         exit(1);
157                         }
158
159         return(1);
160 err:
161         ERR_load_crypto_strings();
162         ERR_print_errors(stderr);
163         return(0);
164         }
165
166 main3()
167         {
168         FILE *in;
169         unsigned char buf[10240],buf2[10240],*p;
170         int num,i;
171
172         X509_REQ *nx=NULL,*mx=NULL;
173
174         in=fopen("req.der","r");
175         if (in == NULL)
176                 {
177                 perror("req.der");
178                 exit(1);
179                 }
180         num=fread(buf,1,10240,in);
181         fclose(in);
182
183
184                 p=buf;
185                 if (d2i_X509_REQ(&nx,&p,num) == NULL) goto err;
186                 printf("num=%d p-buf=%d\n",num,p-buf);
187
188                 p=buf2;
189                 num=i2d_X509_REQ(nx,&p);
190                 printf("num=%d p-buf=%d\n",num,p-buf2);
191
192                 if (memcmp(buf,buf2,num) != 0)
193                         {
194                         fprintf(stderr,"data difference\n");
195                         for (i=0; i<num; i++)
196                                 fprintf(stderr,"%c%03d <%02X-%02X>\n",
197                                         (buf[i] == buf2[i])?' ':'*',i,
198                                         buf[i],buf2[i]);
199                         fprintf(stderr,"\n");
200                         exit(1);
201                         }
202
203         return(1);
204 err:
205         ERR_load_crypto_strings();
206         ERR_print_errors(stderr);
207         return(0);
208         }
209
210 main4()
211         {
212         FILE *in;
213         unsigned char buf[10240],buf2[10240],*p;
214         int num,i;
215
216         RSA *nx=NULL,*mx=NULL;
217
218         in=fopen("rsa.der","r");
219         if (in == NULL)
220                 {
221                 perror("rsa.der");
222                 exit(1);
223                 }
224         num=fread(buf,1,10240,in);
225         fclose(in);
226
227
228                 p=buf;
229                 if (d2i_RSAPrivateKey(&nx,&p,num) == NULL) goto err;
230                 printf("num=%d p-buf=%d\n",num,p-buf);
231
232                 p=buf2;
233                 num=i2d_RSAPrivateKey(nx,&p);
234                 printf("num=%d p-buf=%d\n",num,p-buf2);
235
236                 if (memcmp(buf,buf2,num) != 0)
237                         {
238                         fprintf(stderr,"data difference\n");
239                         for (i=0; i<num; i++)
240                                 fprintf(stderr,"%c%03d <%02X-%02X>\n",
241                                         (buf[i] == buf2[i])?' ':'*',i,
242                                         buf[i],buf2[i]);
243                         fprintf(stderr,"\n");
244                         exit(1);
245                         }
246
247         return(1);
248 err:
249         ERR_load_crypto_strings();
250         ERR_print_errors(stderr);
251         return(0);
252         }
253