x_spki.c revision 55714
1/* crypto/asn1/x_spki.c */
2/* Copyright (C) 1995-1998 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 /* This module was send to me my Pat Richards <patr@x509.com> who
60  * wrote it.  It is under my Copyright with his permision
61  */
62
63#include <stdio.h>
64#include "cryptlib.h"
65#include <openssl/x509.h>
66#include <openssl/asn1_mac.h>
67
68int i2d_NETSCAPE_SPKAC(NETSCAPE_SPKAC *a, unsigned char **pp)
69	{
70	M_ASN1_I2D_vars(a);
71
72	M_ASN1_I2D_len(a->pubkey,	i2d_X509_PUBKEY);
73	M_ASN1_I2D_len(a->challenge,	i2d_ASN1_IA5STRING);
74
75	M_ASN1_I2D_seq_total();
76
77	M_ASN1_I2D_put(a->pubkey,	i2d_X509_PUBKEY);
78	M_ASN1_I2D_put(a->challenge,	i2d_ASN1_IA5STRING);
79
80	M_ASN1_I2D_finish();
81	}
82
83NETSCAPE_SPKAC *d2i_NETSCAPE_SPKAC(NETSCAPE_SPKAC **a, unsigned char **pp,
84	     long length)
85	{
86	M_ASN1_D2I_vars(a,NETSCAPE_SPKAC *,NETSCAPE_SPKAC_new);
87
88	M_ASN1_D2I_Init();
89	M_ASN1_D2I_start_sequence();
90	M_ASN1_D2I_get(ret->pubkey,d2i_X509_PUBKEY);
91	M_ASN1_D2I_get(ret->challenge,d2i_ASN1_IA5STRING);
92	M_ASN1_D2I_Finish(a,NETSCAPE_SPKAC_free,ASN1_F_D2I_NETSCAPE_SPKAC);
93	}
94
95NETSCAPE_SPKAC *NETSCAPE_SPKAC_new(void)
96	{
97	NETSCAPE_SPKAC *ret=NULL;
98	ASN1_CTX c;
99
100	M_ASN1_New_Malloc(ret,NETSCAPE_SPKAC);
101	M_ASN1_New(ret->pubkey,X509_PUBKEY_new);
102	M_ASN1_New(ret->challenge,ASN1_IA5STRING_new);
103	return(ret);
104	M_ASN1_New_Error(ASN1_F_NETSCAPE_SPKAC_NEW);
105	}
106
107void NETSCAPE_SPKAC_free(NETSCAPE_SPKAC *a)
108	{
109	if (a == NULL) return;
110	X509_PUBKEY_free(a->pubkey);
111	ASN1_IA5STRING_free(a->challenge);
112	Free((char *)a);
113	}
114
115int i2d_NETSCAPE_SPKI(NETSCAPE_SPKI *a, unsigned char **pp)
116	{
117	M_ASN1_I2D_vars(a);
118
119	M_ASN1_I2D_len(a->spkac,	i2d_NETSCAPE_SPKAC);
120	M_ASN1_I2D_len(a->sig_algor,	i2d_X509_ALGOR);
121	M_ASN1_I2D_len(a->signature,	i2d_ASN1_BIT_STRING);
122
123	M_ASN1_I2D_seq_total();
124
125	M_ASN1_I2D_put(a->spkac,	i2d_NETSCAPE_SPKAC);
126	M_ASN1_I2D_put(a->sig_algor,	i2d_X509_ALGOR);
127	M_ASN1_I2D_put(a->signature,	i2d_ASN1_BIT_STRING);
128
129	M_ASN1_I2D_finish();
130	}
131
132NETSCAPE_SPKI *d2i_NETSCAPE_SPKI(NETSCAPE_SPKI **a, unsigned char **pp,
133	     long length)
134	{
135	M_ASN1_D2I_vars(a,NETSCAPE_SPKI *,NETSCAPE_SPKI_new);
136
137	M_ASN1_D2I_Init();
138	M_ASN1_D2I_start_sequence();
139	M_ASN1_D2I_get(ret->spkac,d2i_NETSCAPE_SPKAC);
140	M_ASN1_D2I_get(ret->sig_algor,d2i_X509_ALGOR);
141	M_ASN1_D2I_get(ret->signature,d2i_ASN1_BIT_STRING);
142	M_ASN1_D2I_Finish(a,NETSCAPE_SPKI_free,ASN1_F_D2I_NETSCAPE_SPKI);
143	}
144
145NETSCAPE_SPKI *NETSCAPE_SPKI_new(void)
146	{
147	NETSCAPE_SPKI *ret=NULL;
148	ASN1_CTX c;
149
150	M_ASN1_New_Malloc(ret,NETSCAPE_SPKI);
151	M_ASN1_New(ret->spkac,NETSCAPE_SPKAC_new);
152	M_ASN1_New(ret->sig_algor,X509_ALGOR_new);
153	M_ASN1_New(ret->signature,ASN1_BIT_STRING_new);
154	return(ret);
155	M_ASN1_New_Error(ASN1_F_NETSCAPE_SPKI_NEW);
156	}
157
158void NETSCAPE_SPKI_free(NETSCAPE_SPKI *a)
159	{
160	if (a == NULL) return;
161	NETSCAPE_SPKAC_free(a->spkac);
162	X509_ALGOR_free(a->sig_algor);
163	ASN1_BIT_STRING_free(a->signature);
164	Free((char *)a);
165	}
166
167