Branch data Line data Source code
1 : : /* crypto/asn1/evp_asn1.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 : : #include <stdio.h>
60 : : #include "cryptlib.h"
61 : : #include <openssl/asn1.h>
62 : : #include <openssl/asn1_mac.h>
63 : :
64 : 23 : int ASN1_TYPE_set_octetstring(ASN1_TYPE *a, unsigned char *data, int len)
65 : : {
66 : : ASN1_STRING *os;
67 : :
68 [ + - ]: 23 : if ((os=M_ASN1_OCTET_STRING_new()) == NULL) return(0);
69 [ - + ]: 23 : if (!M_ASN1_OCTET_STRING_set(os,data,len))
70 : : {
71 : 0 : M_ASN1_OCTET_STRING_free(os);
72 : 0 : return 0;
73 : : }
74 : 23 : ASN1_TYPE_set(a,V_ASN1_OCTET_STRING,os);
75 : 23 : return(1);
76 : : }
77 : :
78 : : /* int max_len: for returned value */
79 : 23 : int ASN1_TYPE_get_octetstring(ASN1_TYPE *a, unsigned char *data,
80 : : int max_len)
81 : : {
82 : : int ret,num;
83 : : unsigned char *p;
84 : :
85 [ + - ][ - + ]: 23 : if ((a->type != V_ASN1_OCTET_STRING) || (a->value.octet_string == NULL))
86 : : {
87 : 0 : ASN1err(ASN1_F_ASN1_TYPE_GET_OCTETSTRING,ASN1_R_DATA_IS_WRONG);
88 : 0 : return(-1);
89 : : }
90 : 23 : p=M_ASN1_STRING_data(a->value.octet_string);
91 : 23 : ret=M_ASN1_STRING_length(a->value.octet_string);
92 [ + - ]: 23 : if (ret < max_len)
93 : : num=ret;
94 : : else
95 : 23 : num=max_len;
96 : 23 : memcpy(data,p,num);
97 : 23 : return(ret);
98 : : }
99 : :
100 : 2 : int ASN1_TYPE_set_int_octetstring(ASN1_TYPE *a, long num, unsigned char *data,
101 : : int len)
102 : : {
103 : : int n,size;
104 : : ASN1_OCTET_STRING os,*osp;
105 : : ASN1_INTEGER in;
106 : : unsigned char *p;
107 : : unsigned char buf[32]; /* when they have 256bit longs,
108 : : * I'll be in trouble */
109 : 2 : in.data=buf;
110 : 2 : in.length=32;
111 : 2 : os.data=data;
112 : 2 : os.type=V_ASN1_OCTET_STRING;
113 : 2 : os.length=len;
114 : 2 : ASN1_INTEGER_set(&in,num);
115 : 2 : n = i2d_ASN1_INTEGER(&in,NULL);
116 : 2 : n+=M_i2d_ASN1_OCTET_STRING(&os,NULL);
117 : :
118 : 2 : size=ASN1_object_size(1,n,V_ASN1_SEQUENCE);
119 : :
120 [ + - ]: 2 : if ((osp=ASN1_STRING_new()) == NULL) return(0);
121 : : /* Grow the 'string' */
122 [ - + ]: 2 : if (!ASN1_STRING_set(osp,NULL,size))
123 : : {
124 : 0 : ASN1_STRING_free(osp);
125 : 0 : return(0);
126 : : }
127 : :
128 : 2 : M_ASN1_STRING_length_set(osp, size);
129 : 2 : p=M_ASN1_STRING_data(osp);
130 : :
131 : 2 : ASN1_put_object(&p,1,n,V_ASN1_SEQUENCE,V_ASN1_UNIVERSAL);
132 : 2 : i2d_ASN1_INTEGER(&in,&p);
133 : 2 : M_i2d_ASN1_OCTET_STRING(&os,&p);
134 : :
135 : 2 : ASN1_TYPE_set(a,V_ASN1_SEQUENCE,osp);
136 : 2 : return(1);
137 : : }
138 : :
139 : : /* we return the actual length..., num may be missing, in which
140 : : * case, set it to zero */
141 : : /* int max_len: for returned value */
142 : 2 : int ASN1_TYPE_get_int_octetstring(ASN1_TYPE *a, long *num, unsigned char *data,
143 : : int max_len)
144 : : {
145 : 2 : int ret= -1,n;
146 : 2 : ASN1_INTEGER *ai=NULL;
147 : 2 : ASN1_OCTET_STRING *os=NULL;
148 : : const unsigned char *p;
149 : : long length;
150 : : ASN1_const_CTX c;
151 : :
152 [ + - ][ + - ]: 2 : if ((a->type != V_ASN1_SEQUENCE) || (a->value.sequence == NULL))
153 : : {
154 : : goto err;
155 : : }
156 : 2 : p=M_ASN1_STRING_data(a->value.sequence);
157 : 2 : length=M_ASN1_STRING_length(a->value.sequence);
158 : :
159 : 2 : c.pp= &p;
160 : 2 : c.p=p;
161 : 2 : c.max=p+length;
162 : 2 : c.error=ASN1_R_DATA_IS_WRONG;
163 : :
164 [ - + ]: 2 : M_ASN1_D2I_start_sequence();
165 : 2 : c.q=c.p;
166 [ + - ]: 2 : if ((ai=d2i_ASN1_INTEGER(NULL,&c.p,c.slen)) == NULL) goto err;
167 : 2 : c.slen-=(c.p-c.q);
168 : 2 : c.q=c.p;
169 [ + - ]: 2 : if ((os=d2i_ASN1_OCTET_STRING(NULL,&c.p,c.slen)) == NULL) goto err;
170 : 2 : c.slen-=(c.p-c.q);
171 [ + - ][ + - ]: 2 : if (!M_ASN1_D2I_end_sequence()) goto err;
172 : :
173 [ + - ]: 2 : if (num != NULL)
174 : 2 : *num=ASN1_INTEGER_get(ai);
175 : :
176 : 2 : ret=M_ASN1_STRING_length(os);
177 [ + - ]: 2 : if (max_len > ret)
178 : : n=ret;
179 : : else
180 : 2 : n=max_len;
181 : :
182 [ + - ]: 2 : if (data != NULL)
183 : 2 : memcpy(data,M_ASN1_STRING_data(os),n);
184 : : if (0)
185 : : {
186 : : err:
187 : 0 : ASN1err(ASN1_F_ASN1_TYPE_GET_INT_OCTETSTRING,ASN1_R_DATA_IS_WRONG);
188 : : }
189 [ + - ]: 2 : if (os != NULL) M_ASN1_OCTET_STRING_free(os);
190 [ + - ]: 2 : if (ai != NULL) M_ASN1_INTEGER_free(ai);
191 : 2 : return(ret);
192 : : }
193 : :
|
