1 /* crypto/x509/x509_cmp.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
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.
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).
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.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
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)"
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
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.]
62 #include <openssl/asn1.h>
63 #include <openssl/objects.h>
64 #include <openssl/x509.h>
65 #include <openssl/x509v3.h>
67 int X509_issuer_and_serial_cmp(const X509
*a
, const X509
*b
)
74 i
=M_ASN1_INTEGER_cmp(ai
->serialNumber
,bi
->serialNumber
);
76 return(X509_NAME_cmp(ai
->issuer
,bi
->issuer
));
79 #ifndef OPENSSL_NO_MD5
80 unsigned long X509_issuer_and_serial_hash(X509
*a
)
87 EVP_MD_CTX_init(&ctx
);
88 f
=X509_NAME_oneline(a
->cert_info
->issuer
,NULL
,0);
90 EVP_DigestInit_ex(&ctx
, EVP_md5(), NULL
);
91 EVP_DigestUpdate(&ctx
,(unsigned char *)f
,ret
);
93 EVP_DigestUpdate(&ctx
,(unsigned char *)a
->cert_info
->serialNumber
->data
,
94 (unsigned long)a
->cert_info
->serialNumber
->length
);
95 EVP_DigestFinal_ex(&ctx
,&(md
[0]),NULL
);
96 ret
=( ((unsigned long)md
[0] )|((unsigned long)md
[1]<<8L)|
97 ((unsigned long)md
[2]<<16L)|((unsigned long)md
[3]<<24L)
99 EVP_MD_CTX_cleanup(&ctx
);
104 int X509_issuer_name_cmp(const X509
*a
, const X509
*b
)
106 return(X509_NAME_cmp(a
->cert_info
->issuer
,b
->cert_info
->issuer
));
109 int X509_subject_name_cmp(const X509
*a
, const X509
*b
)
111 return(X509_NAME_cmp(a
->cert_info
->subject
,b
->cert_info
->subject
));
114 int X509_CRL_cmp(const X509_CRL
*a
, const X509_CRL
*b
)
116 return(X509_NAME_cmp(a
->crl
->issuer
,b
->crl
->issuer
));
119 X509_NAME
*X509_get_issuer_name(X509
*a
)
121 return(a
->cert_info
->issuer
);
124 unsigned long X509_issuer_name_hash(X509
*x
)
126 return(X509_NAME_hash(x
->cert_info
->issuer
));
129 X509_NAME
*X509_get_subject_name(X509
*a
)
131 return(a
->cert_info
->subject
);
134 ASN1_INTEGER
*X509_get_serialNumber(X509
*a
)
136 return(a
->cert_info
->serialNumber
);
139 unsigned long X509_subject_name_hash(X509
*x
)
141 return(X509_NAME_hash(x
->cert_info
->subject
));
144 #ifndef OPENSSL_NO_SHA
145 /* Compare two certificates: they must be identical for
146 * this to work. NB: Although "cmp" operations are generally
147 * prototyped to take "const" arguments (eg. for use in
148 * STACKs), the way X509 handling is - these operations may
149 * involve ensuring the hashes are up-to-date and ensuring
150 * certain cert information is cached. So this is the point
151 * where the "depth-first" constification tree has to halt
154 int X509_cmp(const X509
*a
, const X509
*b
)
156 /* ensure hash is valid */
157 X509_check_purpose((X509
*)a
, -1, 0);
158 X509_check_purpose((X509
*)b
, -1, 0);
160 return memcmp(a
->sha1_hash
, b
->sha1_hash
, SHA_DIGEST_LENGTH
);
165 /* Case insensitive string comparision */
166 static int nocase_cmp(const ASN1_STRING
*a
, const ASN1_STRING
*b
)
170 if (a
->length
!= b
->length
)
171 return (a
->length
- b
->length
);
173 for (i
=0; i
<a
->length
; i
++)
177 ca
= tolower(a
->data
[i
]);
178 cb
= tolower(b
->data
[i
]);
186 /* Case insensitive string comparision with space normalization
187 * Space normalization - ignore leading, trailing spaces,
188 * multiple spaces between characters are replaced by single space
190 static int nocase_spacenorm_cmp(const ASN1_STRING
*a
, const ASN1_STRING
*b
)
192 unsigned char *pa
= NULL
, *pb
= NULL
;
200 /* skip leading spaces */
201 while (la
> 0 && isspace(*pa
))
206 while (lb
> 0 && isspace(*pb
))
212 /* skip trailing spaces */
213 while (la
> 0 && isspace(pa
[la
-1]))
215 while (lb
> 0 && isspace(pb
[lb
-1]))
218 /* compare strings with space normalization */
219 while (la
> 0 && lb
> 0)
223 /* compare character */
232 if (la
<= 0 || lb
<= 0)
235 /* is white space next character ? */
236 if (isspace(*pa
) && isspace(*pb
))
238 /* skip remaining white spaces */
239 while (la
> 0 && isspace(*pa
))
244 while (lb
> 0 && isspace(*pb
))
251 if (la
> 0 || lb
> 0)
257 static int asn1_string_memcmp(ASN1_STRING
*a
, ASN1_STRING
*b
)
260 j
= a
->length
- b
->length
;
263 return memcmp(a
->data
, b
->data
, a
->length
);
266 #define STR_TYPE_CMP (B_ASN1_PRINTABLESTRING|B_ASN1_T61STRING|B_ASN1_UTF8STRING)
268 int X509_NAME_cmp(const X509_NAME
*a
, const X509_NAME
*b
)
271 X509_NAME_ENTRY
*na
,*nb
;
273 unsigned long nabit
, nbbit
;
275 j
= sk_X509_NAME_ENTRY_num(a
->entries
)
276 - sk_X509_NAME_ENTRY_num(b
->entries
);
279 for (i
=sk_X509_NAME_ENTRY_num(a
->entries
)-1; i
>=0; i
--)
281 na
=sk_X509_NAME_ENTRY_value(a
->entries
,i
);
282 nb
=sk_X509_NAME_ENTRY_value(b
->entries
,i
);
283 j
=na
->value
->type
-nb
->value
->type
;
286 nabit
= ASN1_tag2bit(na
->value
->type
);
287 nbbit
= ASN1_tag2bit(nb
->value
->type
);
288 if (!(nabit
& STR_TYPE_CMP
) ||
289 !(nbbit
& STR_TYPE_CMP
))
291 if (!asn1_string_memcmp(na
->value
, nb
->value
))
294 else if (na
->value
->type
== V_ASN1_PRINTABLESTRING
)
295 j
=nocase_spacenorm_cmp(na
->value
, nb
->value
);
296 else if (na
->value
->type
== V_ASN1_IA5STRING
297 && OBJ_obj2nid(na
->object
) == NID_pkcs9_emailAddress
)
298 j
=nocase_cmp(na
->value
, nb
->value
);
300 j
= asn1_string_memcmp(na
->value
, nb
->value
);
306 /* We will check the object types after checking the values
307 * since the values will more often be different than the object
309 for (i
=sk_X509_NAME_ENTRY_num(a
->entries
)-1; i
>=0; i
--)
311 na
=sk_X509_NAME_ENTRY_value(a
->entries
,i
);
312 nb
=sk_X509_NAME_ENTRY_value(b
->entries
,i
);
313 j
=OBJ_cmp(na
->object
,nb
->object
);
319 #ifndef OPENSSL_NO_MD5
320 /* I now DER encode the name and hash it. Since I cache the DER encoding,
321 * this is reasonably efficient. */
322 unsigned long X509_NAME_hash(X509_NAME
*x
)
325 unsigned char md
[16];
328 /* Make sure X509_NAME structure contains valid cached encoding */
329 i2d_X509_NAME(x
,NULL
);
330 EVP_MD_CTX_init(&md_ctx
);
331 EVP_MD_CTX_set_flags(&md_ctx
, EVP_MD_CTX_FLAG_NON_FIPS_ALLOW
);
332 EVP_DigestInit_ex(&md_ctx
, EVP_md5(), NULL
);
333 EVP_DigestUpdate(&md_ctx
, x
->bytes
->data
, x
->bytes
->length
);
334 EVP_DigestFinal_ex(&md_ctx
,md
,NULL
);
335 EVP_MD_CTX_cleanup(&md_ctx
);
337 ret
=( ((unsigned long)md
[0] )|((unsigned long)md
[1]<<8L)|
338 ((unsigned long)md
[2]<<16L)|((unsigned long)md
[3]<<24L)
344 /* Search a stack of X509 for a match */
345 X509
*X509_find_by_issuer_and_serial(STACK_OF(X509
) *sk
, X509_NAME
*name
,
346 ASN1_INTEGER
*serial
)
355 cinf
.serialNumber
=serial
;
358 for (i
=0; i
<sk_X509_num(sk
); i
++)
360 x509
=sk_X509_value(sk
,i
);
361 if (X509_issuer_and_serial_cmp(x509
,&x
) == 0)
367 X509
*X509_find_by_subject(STACK_OF(X509
) *sk
, X509_NAME
*name
)
372 for (i
=0; i
<sk_X509_num(sk
); i
++)
374 x509
=sk_X509_value(sk
,i
);
375 if (X509_NAME_cmp(X509_get_subject_name(x509
),name
) == 0)
381 EVP_PKEY
*X509_get_pubkey(X509
*x
)
383 if ((x
== NULL
) || (x
->cert_info
== NULL
))
385 return(X509_PUBKEY_get(x
->cert_info
->key
));
388 ASN1_BIT_STRING
*X509_get0_pubkey_bitstr(const X509
*x
)
391 return x
->cert_info
->key
->public_key
;
394 int X509_check_private_key(X509
*x
, EVP_PKEY
*k
)
399 xk
=X509_get_pubkey(x
);
400 switch (EVP_PKEY_cmp(xk
, k
))
406 X509err(X509_F_X509_CHECK_PRIVATE_KEY
,X509_R_KEY_VALUES_MISMATCH
);
409 X509err(X509_F_X509_CHECK_PRIVATE_KEY
,X509_R_KEY_TYPE_MISMATCH
);
412 #ifndef OPENSSL_NO_EC
413 if (k
->type
== EVP_PKEY_EC
)
415 X509err(X509_F_X509_CHECK_PRIVATE_KEY
, ERR_R_EC_LIB
);
419 #ifndef OPENSSL_NO_DH
420 if (k
->type
== EVP_PKEY_DH
)
423 X509err(X509_F_X509_CHECK_PRIVATE_KEY
,X509_R_CANT_CHECK_DH_KEY
);
427 X509err(X509_F_X509_CHECK_PRIVATE_KEY
,X509_R_UNKNOWN_KEY_TYPE
);