1 /* crypto/x509/x509_cmp.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/objects.h> 63 #include <openssl/x509.h> 64 #include <openssl/x509v3.h> 65 66 int X509_issuer_and_serial_cmp(const X509 *a, const X509 *b) 67 { 68 int i; 69 X509_CINF *ai,*bi; 70 71 ai=a->cert_info; 72 bi=b->cert_info; 73 i=M_ASN1_INTEGER_cmp(ai->serialNumber,bi->serialNumber); 74 if (i) return(i); 75 return(X509_NAME_cmp(ai->issuer,bi->issuer)); 76 } 77 78 #ifndef NO_MD5 79 unsigned long X509_issuer_and_serial_hash(X509 *a) 80 { 81 unsigned long ret=0; 82 MD5_CTX ctx; 83 unsigned char md[16]; 84 char str[256]; 85 86 X509_NAME_oneline(a->cert_info->issuer,str,256); 87 ret=strlen(str); 88 MD5_Init(&ctx); 89 MD5_Update(&ctx,(unsigned char *)str,ret); 90 MD5_Update(&ctx,(unsigned char *)a->cert_info->serialNumber->data, 91 (unsigned long)a->cert_info->serialNumber->length); 92 MD5_Final(&(md[0]),&ctx); 93 ret=( ((unsigned long)md[0] )|((unsigned long)md[1]<<8L)| 94 ((unsigned long)md[2]<<16L)|((unsigned long)md[3]<<24L) 95 )&0xffffffffL; 96 return(ret); 97 } 98 #endif 99 100 int X509_issuer_name_cmp(const X509 *a, const X509 *b) 101 { 102 return(X509_NAME_cmp(a->cert_info->issuer,b->cert_info->issuer)); 103 } 104 105 int X509_subject_name_cmp(const X509 *a, const X509 *b) 106 { 107 return(X509_NAME_cmp(a->cert_info->subject,b->cert_info->subject)); 108 } 109 110 int X509_CRL_cmp(const X509_CRL *a, const X509_CRL *b) 111 { 112 return(X509_NAME_cmp(a->crl->issuer,b->crl->issuer)); 113 } 114 115 X509_NAME *X509_get_issuer_name(X509 *a) 116 { 117 return(a->cert_info->issuer); 118 } 119 120 unsigned long X509_issuer_name_hash(X509 *x) 121 { 122 return(X509_NAME_hash(x->cert_info->issuer)); 123 } 124 125 X509_NAME *X509_get_subject_name(X509 *a) 126 { 127 return(a->cert_info->subject); 128 } 129 130 ASN1_INTEGER *X509_get_serialNumber(X509 *a) 131 { 132 return(a->cert_info->serialNumber); 133 } 134 135 unsigned long X509_subject_name_hash(X509 *x) 136 { 137 return(X509_NAME_hash(x->cert_info->subject)); 138 } 139 140 #ifndef NO_SHA 141 /* Compare two certificates: they must be identical for 142 * this to work. NB: Although "cmp" operations are generally 143 * prototyped to take "const" arguments (eg. for use in 144 * STACKs), the way X509 handling is - these operations may 145 * involve ensuring the hashes are up-to-date and ensuring 146 * certain cert information is cached. So this is the point 147 * where the "depth-first" constification tree has to halt 148 * with an evil cast. 149 */ 150 int X509_cmp(const X509 *a, const X509 *b) 151 { 152 /* ensure hash is valid */ 153 X509_check_purpose((X509 *)a, -1, 0); 154 X509_check_purpose((X509 *)b, -1, 0); 155 156 return memcmp(a->sha1_hash, b->sha1_hash, SHA_DIGEST_LENGTH); 157 } 158 #endif 159 160 int X509_NAME_cmp(const X509_NAME *a, const X509_NAME *b) 161 { 162 int i,j; 163 X509_NAME_ENTRY *na,*nb; 164 165 if (sk_X509_NAME_ENTRY_num(a->entries) 166 != sk_X509_NAME_ENTRY_num(b->entries)) 167 return sk_X509_NAME_ENTRY_num(a->entries) 168 -sk_X509_NAME_ENTRY_num(b->entries); 169 for (i=sk_X509_NAME_ENTRY_num(a->entries)-1; i>=0; i--) 170 { 171 na=sk_X509_NAME_ENTRY_value(a->entries,i); 172 nb=sk_X509_NAME_ENTRY_value(b->entries,i); 173 j=na->value->length-nb->value->length; 174 if (j) return(j); 175 j=memcmp(na->value->data,nb->value->data, 176 na->value->length); 177 if (j) return(j); 178 j=na->set-nb->set; 179 if (j) return(j); 180 } 181 182 /* We will check the object types after checking the values 183 * since the values will more often be different than the object 184 * types. */ 185 for (i=sk_X509_NAME_ENTRY_num(a->entries)-1; i>=0; i--) 186 { 187 na=sk_X509_NAME_ENTRY_value(a->entries,i); 188 nb=sk_X509_NAME_ENTRY_value(b->entries,i); 189 j=OBJ_cmp(na->object,nb->object); 190 if (j) return(j); 191 } 192 return(0); 193 } 194 195 #ifndef NO_MD5 196 /* I now DER encode the name and hash it. Since I cache the DER encoding, 197 * this is reasonably efficient. */ 198 unsigned long X509_NAME_hash(X509_NAME *x) 199 { 200 unsigned long ret=0; 201 unsigned char md[16]; 202 203 /* Ensure cached version is up to date */ 204 i2d_X509_NAME(x,NULL); 205 /* Use cached encoding directly rather than copying: this should 206 * keep libsafe happy. 207 */ 208 MD5((unsigned char *)x->bytes->data,x->bytes->length,&(md[0])); 209 210 ret=( ((unsigned long)md[0] )|((unsigned long)md[1]<<8L)| 211 ((unsigned long)md[2]<<16L)|((unsigned long)md[3]<<24L) 212 )&0xffffffffL; 213 return(ret); 214 } 215 #endif 216 217 /* Search a stack of X509 for a match */ 218 X509 *X509_find_by_issuer_and_serial(STACK_OF(X509) *sk, X509_NAME *name, 219 ASN1_INTEGER *serial) 220 { 221 int i; 222 X509_CINF cinf; 223 X509 x,*x509=NULL; 224 225 if(!sk) return NULL; 226 227 x.cert_info= &cinf; 228 cinf.serialNumber=serial; 229 cinf.issuer=name; 230 231 for (i=0; i<sk_X509_num(sk); i++) 232 { 233 x509=sk_X509_value(sk,i); 234 if (X509_issuer_and_serial_cmp(x509,&x) == 0) 235 return(x509); 236 } 237 return(NULL); 238 } 239 240 X509 *X509_find_by_subject(STACK_OF(X509) *sk, X509_NAME *name) 241 { 242 X509 *x509; 243 int i; 244 245 for (i=0; i<sk_X509_num(sk); i++) 246 { 247 x509=sk_X509_value(sk,i); 248 if (X509_NAME_cmp(X509_get_subject_name(x509),name) == 0) 249 return(x509); 250 } 251 return(NULL); 252 } 253 254 EVP_PKEY *X509_get_pubkey(X509 *x) 255 { 256 if ((x == NULL) || (x->cert_info == NULL)) 257 return(NULL); 258 return(X509_PUBKEY_get(x->cert_info->key)); 259 } 260 261 int X509_check_private_key(X509 *x, EVP_PKEY *k) 262 { 263 EVP_PKEY *xk=NULL; 264 int ok=0; 265 266 xk=X509_get_pubkey(x); 267 if (xk->type != k->type) 268 { 269 X509err(X509_F_X509_CHECK_PRIVATE_KEY,X509_R_KEY_TYPE_MISMATCH); 270 goto err; 271 } 272 switch (k->type) 273 { 274 #ifndef NO_RSA 275 case EVP_PKEY_RSA: 276 if (BN_cmp(xk->pkey.rsa->n,k->pkey.rsa->n) != 0 277 || BN_cmp(xk->pkey.rsa->e,k->pkey.rsa->e) != 0) 278 { 279 X509err(X509_F_X509_CHECK_PRIVATE_KEY,X509_R_KEY_VALUES_MISMATCH); 280 goto err; 281 } 282 break; 283 #endif 284 #ifndef NO_DSA 285 case EVP_PKEY_DSA: 286 if (BN_cmp(xk->pkey.dsa->pub_key,k->pkey.dsa->pub_key) != 0) 287 { 288 X509err(X509_F_X509_CHECK_PRIVATE_KEY,X509_R_KEY_VALUES_MISMATCH); 289 goto err; 290 } 291 break; 292 #endif 293 #ifndef NO_DH 294 case EVP_PKEY_DH: 295 /* No idea */ 296 X509err(X509_F_X509_CHECK_PRIVATE_KEY,X509_R_CANT_CHECK_DH_KEY); 297 goto err; 298 #endif 299 default: 300 X509err(X509_F_X509_CHECK_PRIVATE_KEY,X509_R_UNKNOWN_KEY_TYPE); 301 goto err; 302 } 303 304 ok=1; 305 err: 306 EVP_PKEY_free(xk); 307 return(ok); 308 } 309