PolarSSL v1.3.4
x509_crt.c
Go to the documentation of this file.
1 /*
2  * X.509 certificate and private key decoding
3  *
4  * Copyright (C) 2006-2013, Brainspark B.V.
5  *
6  * This file is part of PolarSSL (http://www.polarssl.org)
7  * Lead Maintainer: Paul Bakker <polarssl_maintainer at polarssl.org>
8  *
9  * All rights reserved.
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License along
22  * with this program; if not, write to the Free Software Foundation, Inc.,
23  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24  */
25 /*
26  * The ITU-T X.509 standard defines a certificate format for PKI.
27  *
28  * http://www.ietf.org/rfc/rfc3279.txt
29  * http://www.ietf.org/rfc/rfc3280.txt
30  *
31  * ftp://ftp.rsasecurity.com/pub/pkcs/ascii/pkcs-1v2.asc
32  *
33  * http://www.itu.int/ITU-T/studygroups/com17/languages/X.680-0207.pdf
34  * http://www.itu.int/ITU-T/studygroups/com17/languages/X.690-0207.pdf
35  */
36 
37 #include "polarssl/config.h"
38 
39 #if defined(POLARSSL_X509_CRT_PARSE_C)
40 
41 #include "polarssl/x509_crt.h"
42 #include "polarssl/oid.h"
43 #if defined(POLARSSL_PEM_PARSE_C)
44 #include "polarssl/pem.h"
45 #endif
46 
47 #if defined(POLARSSL_MEMORY_C)
48 #include "polarssl/memory.h"
49 #else
50 #define polarssl_malloc malloc
51 #define polarssl_free free
52 #endif
53 
54 #if defined(POLARSSL_THREADING_C)
55 #include "polarssl/threading.h"
56 #endif
57 
58 #include <string.h>
59 #include <stdlib.h>
60 #if defined(_WIN32) && !defined(EFIX64) && !defined(EFI32)
61 #include <windows.h>
62 #else
63 #include <time.h>
64 #endif
65 
66 #if defined(EFIX64) || defined(EFI32)
67 #include <stdio.h>
68 #endif
69 
70 #if defined(POLARSSL_FS_IO)
71 #include <stdio.h>
72 #if !defined(_WIN32)
73 #include <sys/types.h>
74 #include <sys/stat.h>
75 #include <dirent.h>
76 #endif
77 #endif
78 
79 /*
80  * Version ::= INTEGER { v1(0), v2(1), v3(2) }
81  */
82 static int x509_get_version( unsigned char **p,
83  const unsigned char *end,
84  int *ver )
85 {
86  int ret;
87  size_t len;
88 
89  if( ( ret = asn1_get_tag( p, end, &len,
91  {
93  {
94  *ver = 0;
95  return( 0 );
96  }
97 
98  return( ret );
99  }
100 
101  end = *p + len;
102 
103  if( ( ret = asn1_get_int( p, end, ver ) ) != 0 )
104  return( POLARSSL_ERR_X509_INVALID_VERSION + ret );
105 
106  if( *p != end )
109 
110  return( 0 );
111 }
112 
113 /*
114  * Validity ::= SEQUENCE {
115  * notBefore Time,
116  * notAfter Time }
117  */
118 static int x509_get_dates( unsigned char **p,
119  const unsigned char *end,
120  x509_time *from,
121  x509_time *to )
122 {
123  int ret;
124  size_t len;
125 
126  if( ( ret = asn1_get_tag( p, end, &len,
127  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
128  return( POLARSSL_ERR_X509_INVALID_DATE + ret );
129 
130  end = *p + len;
131 
132  if( ( ret = x509_get_time( p, end, from ) ) != 0 )
133  return( ret );
134 
135  if( ( ret = x509_get_time( p, end, to ) ) != 0 )
136  return( ret );
137 
138  if( *p != end )
141 
142  return( 0 );
143 }
144 
145 /*
146  * X.509 v2/v3 unique identifier (not parsed)
147  */
148 static int x509_get_uid( unsigned char **p,
149  const unsigned char *end,
150  x509_buf *uid, int n )
151 {
152  int ret;
153 
154  if( *p == end )
155  return( 0 );
156 
157  uid->tag = **p;
158 
159  if( ( ret = asn1_get_tag( p, end, &uid->len,
160  ASN1_CONTEXT_SPECIFIC | ASN1_CONSTRUCTED | n ) ) != 0 )
161  {
163  return( 0 );
164 
165  return( ret );
166  }
167 
168  uid->p = *p;
169  *p += uid->len;
170 
171  return( 0 );
172 }
173 
174 static int x509_get_basic_constraints( unsigned char **p,
175  const unsigned char *end,
176  int *ca_istrue,
177  int *max_pathlen )
178 {
179  int ret;
180  size_t len;
181 
182  /*
183  * BasicConstraints ::= SEQUENCE {
184  * cA BOOLEAN DEFAULT FALSE,
185  * pathLenConstraint INTEGER (0..MAX) OPTIONAL }
186  */
187  *ca_istrue = 0; /* DEFAULT FALSE */
188  *max_pathlen = 0; /* endless */
189 
190  if( ( ret = asn1_get_tag( p, end, &len,
191  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
192  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
193 
194  if( *p == end )
195  return 0;
196 
197  if( ( ret = asn1_get_bool( p, end, ca_istrue ) ) != 0 )
198  {
200  ret = asn1_get_int( p, end, ca_istrue );
201 
202  if( ret != 0 )
203  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
204 
205  if( *ca_istrue != 0 )
206  *ca_istrue = 1;
207  }
208 
209  if( *p == end )
210  return 0;
211 
212  if( ( ret = asn1_get_int( p, end, max_pathlen ) ) != 0 )
213  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
214 
215  if( *p != end )
218 
219  (*max_pathlen)++;
220 
221  return 0;
222 }
223 
224 static int x509_get_ns_cert_type( unsigned char **p,
225  const unsigned char *end,
226  unsigned char *ns_cert_type)
227 {
228  int ret;
229  x509_bitstring bs = { 0, 0, NULL };
230 
231  if( ( ret = asn1_get_bitstring( p, end, &bs ) ) != 0 )
232  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
233 
234  if( bs.len != 1 )
237 
238  /* Get actual bitstring */
239  *ns_cert_type = *bs.p;
240  return 0;
241 }
242 
243 static int x509_get_key_usage( unsigned char **p,
244  const unsigned char *end,
245  unsigned char *key_usage)
246 {
247  int ret;
248  x509_bitstring bs = { 0, 0, NULL };
249 
250  if( ( ret = asn1_get_bitstring( p, end, &bs ) ) != 0 )
251  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
252 
253  if( bs.len < 1 )
256 
257  /* Get actual bitstring */
258  *key_usage = *bs.p;
259  return 0;
260 }
261 
262 /*
263  * ExtKeyUsageSyntax ::= SEQUENCE SIZE (1..MAX) OF KeyPurposeId
264  *
265  * KeyPurposeId ::= OBJECT IDENTIFIER
266  */
267 static int x509_get_ext_key_usage( unsigned char **p,
268  const unsigned char *end,
269  x509_sequence *ext_key_usage)
270 {
271  int ret;
272 
273  if( ( ret = asn1_get_sequence_of( p, end, ext_key_usage, ASN1_OID ) ) != 0 )
274  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
275 
276  /* Sequence length must be >= 1 */
277  if( ext_key_usage->buf.p == NULL )
280 
281  return 0;
282 }
283 
284 /*
285  * SubjectAltName ::= GeneralNames
286  *
287  * GeneralNames ::= SEQUENCE SIZE (1..MAX) OF GeneralName
288  *
289  * GeneralName ::= CHOICE {
290  * otherName [0] OtherName,
291  * rfc822Name [1] IA5String,
292  * dNSName [2] IA5String,
293  * x400Address [3] ORAddress,
294  * directoryName [4] Name,
295  * ediPartyName [5] EDIPartyName,
296  * uniformResourceIdentifier [6] IA5String,
297  * iPAddress [7] OCTET STRING,
298  * registeredID [8] OBJECT IDENTIFIER }
299  *
300  * OtherName ::= SEQUENCE {
301  * type-id OBJECT IDENTIFIER,
302  * value [0] EXPLICIT ANY DEFINED BY type-id }
303  *
304  * EDIPartyName ::= SEQUENCE {
305  * nameAssigner [0] DirectoryString OPTIONAL,
306  * partyName [1] DirectoryString }
307  *
308  * NOTE: PolarSSL only parses and uses dNSName at this point.
309  */
310 static int x509_get_subject_alt_name( unsigned char **p,
311  const unsigned char *end,
312  x509_sequence *subject_alt_name )
313 {
314  int ret;
315  size_t len, tag_len;
316  asn1_buf *buf;
317  unsigned char tag;
318  asn1_sequence *cur = subject_alt_name;
319 
320  /* Get main sequence tag */
321  if( ( ret = asn1_get_tag( p, end, &len,
322  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
323  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
324 
325  if( *p + len != end )
328 
329  while( *p < end )
330  {
331  if( ( end - *p ) < 1 )
334 
335  tag = **p;
336  (*p)++;
337  if( ( ret = asn1_get_len( p, end, &tag_len ) ) != 0 )
338  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
339 
340  if( ( tag & ASN1_CONTEXT_SPECIFIC ) != ASN1_CONTEXT_SPECIFIC )
343 
344  if( tag != ( ASN1_CONTEXT_SPECIFIC | 2 ) )
345  {
346  *p += tag_len;
347  continue;
348  }
349 
350  buf = &(cur->buf);
351  buf->tag = tag;
352  buf->p = *p;
353  buf->len = tag_len;
354  *p += buf->len;
355 
356  /* Allocate and assign next pointer */
357  if (*p < end)
358  {
360  sizeof( asn1_sequence ) );
361 
362  if( cur->next == NULL )
365 
366  memset( cur->next, 0, sizeof( asn1_sequence ) );
367  cur = cur->next;
368  }
369  }
370 
371  /* Set final sequence entry's next pointer to NULL */
372  cur->next = NULL;
373 
374  if( *p != end )
377 
378  return( 0 );
379 }
380 
381 /*
382  * X.509 v3 extensions
383  *
384  * TODO: Perform all of the basic constraints tests required by the RFC
385  * TODO: Set values for undetected extensions to a sane default?
386  *
387  */
388 static int x509_get_crt_ext( unsigned char **p,
389  const unsigned char *end,
390  x509_crt *crt )
391 {
392  int ret;
393  size_t len;
394  unsigned char *end_ext_data, *end_ext_octet;
395 
396  if( ( ret = x509_get_ext( p, end, &crt->v3_ext, 3 ) ) != 0 )
397  {
399  return( 0 );
400 
401  return( ret );
402  }
403 
404  while( *p < end )
405  {
406  /*
407  * Extension ::= SEQUENCE {
408  * extnID OBJECT IDENTIFIER,
409  * critical BOOLEAN DEFAULT FALSE,
410  * extnValue OCTET STRING }
411  */
412  x509_buf extn_oid = {0, 0, NULL};
413  int is_critical = 0; /* DEFAULT FALSE */
414  int ext_type = 0;
415 
416  if( ( ret = asn1_get_tag( p, end, &len,
417  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
418  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
419 
420  end_ext_data = *p + len;
421 
422  /* Get extension ID */
423  extn_oid.tag = **p;
424 
425  if( ( ret = asn1_get_tag( p, end, &extn_oid.len, ASN1_OID ) ) != 0 )
426  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
427 
428  extn_oid.p = *p;
429  *p += extn_oid.len;
430 
431  if( ( end - *p ) < 1 )
434 
435  /* Get optional critical */
436  if( ( ret = asn1_get_bool( p, end_ext_data, &is_critical ) ) != 0 &&
438  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
439 
440  /* Data should be octet string type */
441  if( ( ret = asn1_get_tag( p, end_ext_data, &len,
442  ASN1_OCTET_STRING ) ) != 0 )
443  return( POLARSSL_ERR_X509_INVALID_EXTENSIONS + ret );
444 
445  end_ext_octet = *p + len;
446 
447  if( end_ext_octet != end_ext_data )
450 
451  /*
452  * Detect supported extensions
453  */
454  ret = oid_get_x509_ext_type( &extn_oid, &ext_type );
455 
456  if( ret != 0 )
457  {
458  /* No parser found, skip extension */
459  *p = end_ext_octet;
460 
461 #if !defined(POLARSSL_X509_ALLOW_UNSUPPORTED_CRITICAL_EXTENSION)
462  if( is_critical )
463  {
464  /* Data is marked as critical: fail */
467  }
468 #endif
469  continue;
470  }
471 
472  crt->ext_types |= ext_type;
473 
474  switch( ext_type )
475  {
477  /* Parse basic constraints */
478  if( ( ret = x509_get_basic_constraints( p, end_ext_octet,
479  &crt->ca_istrue, &crt->max_pathlen ) ) != 0 )
480  return ( ret );
481  break;
482 
483  case EXT_KEY_USAGE:
484  /* Parse key usage */
485  if( ( ret = x509_get_key_usage( p, end_ext_octet,
486  &crt->key_usage ) ) != 0 )
487  return ( ret );
488  break;
489 
491  /* Parse extended key usage */
492  if( ( ret = x509_get_ext_key_usage( p, end_ext_octet,
493  &crt->ext_key_usage ) ) != 0 )
494  return ( ret );
495  break;
496 
498  /* Parse subject alt name */
499  if( ( ret = x509_get_subject_alt_name( p, end_ext_octet,
500  &crt->subject_alt_names ) ) != 0 )
501  return ( ret );
502  break;
503 
504  case EXT_NS_CERT_TYPE:
505  /* Parse netscape certificate type */
506  if( ( ret = x509_get_ns_cert_type( p, end_ext_octet,
507  &crt->ns_cert_type ) ) != 0 )
508  return ( ret );
509  break;
510 
511  default:
513  }
514  }
515 
516  if( *p != end )
519 
520  return( 0 );
521 }
522 
523 /*
524  * Parse and fill a single X.509 certificate in DER format
525  */
526 static int x509_crt_parse_der_core( x509_crt *crt, const unsigned char *buf,
527  size_t buflen )
528 {
529  int ret;
530  size_t len;
531  unsigned char *p, *end, *crt_end;
532 
533  /*
534  * Check for valid input
535  */
536  if( crt == NULL || buf == NULL )
538 
539  p = (unsigned char *) polarssl_malloc( len = buflen );
540 
541  if( p == NULL )
543 
544  memcpy( p, buf, buflen );
545 
546  crt->raw.p = p;
547  crt->raw.len = len;
548  end = p + len;
549 
550  /*
551  * Certificate ::= SEQUENCE {
552  * tbsCertificate TBSCertificate,
553  * signatureAlgorithm AlgorithmIdentifier,
554  * signatureValue BIT STRING }
555  */
556  if( ( ret = asn1_get_tag( &p, end, &len,
557  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
558  {
559  x509_crt_free( crt );
561  }
562 
563  if( len > (size_t) ( end - p ) )
564  {
565  x509_crt_free( crt );
568  }
569  crt_end = p + len;
570 
571  /*
572  * TBSCertificate ::= SEQUENCE {
573  */
574  crt->tbs.p = p;
575 
576  if( ( ret = asn1_get_tag( &p, end, &len,
577  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
578  {
579  x509_crt_free( crt );
580  return( POLARSSL_ERR_X509_INVALID_FORMAT + ret );
581  }
582 
583  end = p + len;
584  crt->tbs.len = end - crt->tbs.p;
585 
586  /*
587  * Version ::= INTEGER { v1(0), v2(1), v3(2) }
588  *
589  * CertificateSerialNumber ::= INTEGER
590  *
591  * signature AlgorithmIdentifier
592  */
593  if( ( ret = x509_get_version( &p, end, &crt->version ) ) != 0 ||
594  ( ret = x509_get_serial( &p, end, &crt->serial ) ) != 0 ||
595  ( ret = x509_get_alg_null( &p, end, &crt->sig_oid1 ) ) != 0 )
596  {
597  x509_crt_free( crt );
598  return( ret );
599  }
600 
601  crt->version++;
602 
603  if( crt->version > 3 )
604  {
605  x509_crt_free( crt );
607  }
608 
609  if( ( ret = x509_get_sig_alg( &crt->sig_oid1, &crt->sig_md,
610  &crt->sig_pk ) ) != 0 )
611  {
612  x509_crt_free( crt );
613  return( ret );
614  }
615 
616  /*
617  * issuer Name
618  */
619  crt->issuer_raw.p = p;
620 
621  if( ( ret = asn1_get_tag( &p, end, &len,
622  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
623  {
624  x509_crt_free( crt );
625  return( POLARSSL_ERR_X509_INVALID_FORMAT + ret );
626  }
627 
628  if( ( ret = x509_get_name( &p, p + len, &crt->issuer ) ) != 0 )
629  {
630  x509_crt_free( crt );
631  return( ret );
632  }
633 
634  crt->issuer_raw.len = p - crt->issuer_raw.p;
635 
636  /*
637  * Validity ::= SEQUENCE {
638  * notBefore Time,
639  * notAfter Time }
640  *
641  */
642  if( ( ret = x509_get_dates( &p, end, &crt->valid_from,
643  &crt->valid_to ) ) != 0 )
644  {
645  x509_crt_free( crt );
646  return( ret );
647  }
648 
649  /*
650  * subject Name
651  */
652  crt->subject_raw.p = p;
653 
654  if( ( ret = asn1_get_tag( &p, end, &len,
655  ASN1_CONSTRUCTED | ASN1_SEQUENCE ) ) != 0 )
656  {
657  x509_crt_free( crt );
658  return( POLARSSL_ERR_X509_INVALID_FORMAT + ret );
659  }
660 
661  if( len && ( ret = x509_get_name( &p, p + len, &crt->subject ) ) != 0 )
662  {
663  x509_crt_free( crt );
664  return( ret );
665  }
666 
667  crt->subject_raw.len = p - crt->subject_raw.p;
668 
669  /*
670  * SubjectPublicKeyInfo
671  */
672  if( ( ret = pk_parse_subpubkey( &p, end, &crt->pk ) ) != 0 )
673  {
674  x509_crt_free( crt );
675  return( ret );
676  }
677 
678  /*
679  * issuerUniqueID [1] IMPLICIT UniqueIdentifier OPTIONAL,
680  * -- If present, version shall be v2 or v3
681  * subjectUniqueID [2] IMPLICIT UniqueIdentifier OPTIONAL,
682  * -- If present, version shall be v2 or v3
683  * extensions [3] EXPLICIT Extensions OPTIONAL
684  * -- If present, version shall be v3
685  */
686  if( crt->version == 2 || crt->version == 3 )
687  {
688  ret = x509_get_uid( &p, end, &crt->issuer_id, 1 );
689  if( ret != 0 )
690  {
691  x509_crt_free( crt );
692  return( ret );
693  }
694  }
695 
696  if( crt->version == 2 || crt->version == 3 )
697  {
698  ret = x509_get_uid( &p, end, &crt->subject_id, 2 );
699  if( ret != 0 )
700  {
701  x509_crt_free( crt );
702  return( ret );
703  }
704  }
705 
706 #if !defined(POLARSSL_X509_ALLOW_EXTENSIONS_NON_V3)
707  if( crt->version == 3 )
708  {
709 #endif
710  ret = x509_get_crt_ext( &p, end, crt);
711  if( ret != 0 )
712  {
713  x509_crt_free( crt );
714  return( ret );
715  }
716 #if !defined(POLARSSL_X509_ALLOW_EXTENSIONS_NON_V3)
717  }
718 #endif
719 
720  if( p != end )
721  {
722  x509_crt_free( crt );
725  }
726 
727  end = crt_end;
728 
729  /*
730  * }
731  * -- end of TBSCertificate
732  *
733  * signatureAlgorithm AlgorithmIdentifier,
734  * signatureValue BIT STRING
735  */
736  if( ( ret = x509_get_alg_null( &p, end, &crt->sig_oid2 ) ) != 0 )
737  {
738  x509_crt_free( crt );
739  return( ret );
740  }
741 
742  if( crt->sig_oid1.len != crt->sig_oid2.len ||
743  memcmp( crt->sig_oid1.p, crt->sig_oid2.p, crt->sig_oid1.len ) != 0 )
744  {
745  x509_crt_free( crt );
747  }
748 
749  if( ( ret = x509_get_sig( &p, end, &crt->sig ) ) != 0 )
750  {
751  x509_crt_free( crt );
752  return( ret );
753  }
754 
755  if( p != end )
756  {
757  x509_crt_free( crt );
760  }
761 
762  return( 0 );
763 }
764 
765 /*
766  * Parse one X.509 certificate in DER format from a buffer and add them to a
767  * chained list
768  */
769 int x509_crt_parse_der( x509_crt *chain, const unsigned char *buf,
770  size_t buflen )
771 {
772  int ret;
773  x509_crt *crt = chain, *prev = NULL;
774 
775  /*
776  * Check for valid input
777  */
778  if( crt == NULL || buf == NULL )
780 
781  while( crt->version != 0 && crt->next != NULL )
782  {
783  prev = crt;
784  crt = crt->next;
785  }
786 
787  /*
788  * Add new certificate on the end of the chain if needed.
789  */
790  if ( crt->version != 0 && crt->next == NULL)
791  {
792  crt->next = (x509_crt *) polarssl_malloc( sizeof( x509_crt ) );
793 
794  if( crt->next == NULL )
796 
797  prev = crt;
798  crt = crt->next;
799  x509_crt_init( crt );
800  }
801 
802  if( ( ret = x509_crt_parse_der_core( crt, buf, buflen ) ) != 0 )
803  {
804  if( prev )
805  prev->next = NULL;
806 
807  if( crt != chain )
808  polarssl_free( crt );
809 
810  return( ret );
811  }
812 
813  return( 0 );
814 }
815 
816 /*
817  * Parse one or more PEM certificates from a buffer and add them to the chained list
818  */
819 int x509_crt_parse( x509_crt *chain, const unsigned char *buf, size_t buflen )
820 {
821  int success = 0, first_error = 0, total_failed = 0;
822  int buf_format = X509_FORMAT_DER;
823 
824  /*
825  * Check for valid input
826  */
827  if( chain == NULL || buf == NULL )
829 
830  /*
831  * Determine buffer content. Buffer contains either one DER certificate or
832  * one or more PEM certificates.
833  */
834 #if defined(POLARSSL_PEM_PARSE_C)
835  if( strstr( (const char *) buf, "-----BEGIN CERTIFICATE-----" ) != NULL )
836  buf_format = X509_FORMAT_PEM;
837 #endif
838 
839  if( buf_format == X509_FORMAT_DER )
840  return x509_crt_parse_der( chain, buf, buflen );
841 
842 #if defined(POLARSSL_PEM_PARSE_C)
843  if( buf_format == X509_FORMAT_PEM )
844  {
845  int ret;
846  pem_context pem;
847 
848  while( buflen > 0 )
849  {
850  size_t use_len;
851  pem_init( &pem );
852 
853  ret = pem_read_buffer( &pem,
854  "-----BEGIN CERTIFICATE-----",
855  "-----END CERTIFICATE-----",
856  buf, NULL, 0, &use_len );
857 
858  if( ret == 0 )
859  {
860  /*
861  * Was PEM encoded
862  */
863  buflen -= use_len;
864  buf += use_len;
865  }
866  else if( ret == POLARSSL_ERR_PEM_BAD_INPUT_DATA )
867  {
868  return( ret );
869  }
871  {
872  pem_free( &pem );
873 
874  /*
875  * PEM header and footer were found
876  */
877  buflen -= use_len;
878  buf += use_len;
879 
880  if( first_error == 0 )
881  first_error = ret;
882 
883  continue;
884  }
885  else
886  break;
887 
888  ret = x509_crt_parse_der( chain, pem.buf, pem.buflen );
889 
890  pem_free( &pem );
891 
892  if( ret != 0 )
893  {
894  /*
895  * Quit parsing on a memory error
896  */
898  return( ret );
899 
900  if( first_error == 0 )
901  first_error = ret;
902 
903  total_failed++;
904  continue;
905  }
906 
907  success = 1;
908  }
909  }
910 #endif
911 
912  if( success )
913  return( total_failed );
914  else if( first_error )
915  return( first_error );
916  else
918 }
919 
920 #if defined(POLARSSL_FS_IO)
921 /*
922  * Load one or more certificates and add them to the chained list
923  */
924 int x509_crt_parse_file( x509_crt *chain, const char *path )
925 {
926  int ret;
927  size_t n;
928  unsigned char *buf;
929 
930  if ( ( ret = x509_load_file( path, &buf, &n ) ) != 0 )
931  return( ret );
932 
933  ret = x509_crt_parse( chain, buf, n );
934 
935  memset( buf, 0, n + 1 );
936  polarssl_free( buf );
937 
938  return( ret );
939 }
940 
941 #if defined(POLARSSL_THREADING_PTHREAD)
942 static threading_mutex_t readdir_mutex = PTHREAD_MUTEX_INITIALIZER;
943 #endif
944 
945 int x509_crt_parse_path( x509_crt *chain, const char *path )
946 {
947  int ret = 0;
948 #if defined(_WIN32) && !defined(EFIX64) && !defined(EFI32)
949  int w_ret;
950  WCHAR szDir[MAX_PATH];
951  char filename[MAX_PATH];
952  char *p;
953  int len = (int) strlen( path );
954 
955  WIN32_FIND_DATAW file_data;
956  HANDLE hFind;
957 
958  if( len > MAX_PATH - 3 )
960 
961  memset( szDir, 0, sizeof(szDir) );
962  memset( filename, 0, MAX_PATH );
963  memcpy( filename, path, len );
964  filename[len++] = '\\';
965  p = filename + len;
966  filename[len++] = '*';
967 
968  w_ret = MultiByteToWideChar( CP_ACP, 0, filename, len, szDir, MAX_PATH - 3 );
969 
970  hFind = FindFirstFileW( szDir, &file_data );
971  if (hFind == INVALID_HANDLE_VALUE)
973 
974  len = MAX_PATH - len;
975  do
976  {
977  memset( p, 0, len );
978 
979  if( file_data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY )
980  continue;
981 
982  w_ret = WideCharToMultiByte( CP_ACP, 0, file_data.cFileName,
983  lstrlenW(file_data.cFileName),
984  p, len - 1,
985  NULL, NULL );
986 
987  w_ret = x509_crt_parse_file( chain, filename );
988  if( w_ret < 0 )
989  ret++;
990  else
991  ret += w_ret;
992  }
993  while( FindNextFileW( hFind, &file_data ) != 0 );
994 
995  if (GetLastError() != ERROR_NO_MORE_FILES)
997 
998  FindClose( hFind );
999 #else /* _WIN32 */
1000  int t_ret;
1001  struct stat sb;
1002  struct dirent *entry;
1003  char entry_name[255];
1004  DIR *dir = opendir( path );
1005 
1006  if( dir == NULL)
1008 
1009 #if defined(POLARSSL_THREADING_PTHREAD)
1010  if( ( ret = polarssl_mutex_lock( &readdir_mutex ) ) != 0 )
1011  return( ret );
1012 #endif
1013 
1014  while( ( entry = readdir( dir ) ) != NULL )
1015  {
1016  snprintf( entry_name, sizeof entry_name, "%s/%s", path, entry->d_name );
1017 
1018  if( stat( entry_name, &sb ) == -1 )
1019  {
1020  closedir( dir );
1022  goto cleanup;
1023  }
1024 
1025  if( !S_ISREG( sb.st_mode ) )
1026  continue;
1027 
1028  // Ignore parse errors
1029  //
1030  t_ret = x509_crt_parse_file( chain, entry_name );
1031  if( t_ret < 0 )
1032  ret++;
1033  else
1034  ret += t_ret;
1035  }
1036  closedir( dir );
1037 
1038 cleanup:
1039 #if defined(POLARSSL_THREADING_PTHREAD)
1040  if( polarssl_mutex_unlock( &readdir_mutex ) != 0 )
1042 #endif
1043 
1044 #endif /* _WIN32 */
1045 
1046  return( ret );
1047 }
1048 #endif /* POLARSSL_FS_IO */
1049 
1050 #if defined(_MSC_VER) && !defined snprintf && !defined(EFIX64) && \
1051  !defined(EFI32)
1052 #include <stdarg.h>
1053 
1054 #if !defined vsnprintf
1055 #define vsnprintf _vsnprintf
1056 #endif // vsnprintf
1057 
1058 /*
1059  * Windows _snprintf and _vsnprintf are not compatible to linux versions.
1060  * Result value is not size of buffer needed, but -1 if no fit is possible.
1061  *
1062  * This fuction tries to 'fix' this by at least suggesting enlarging the
1063  * size by 20.
1064  */
1065 static int compat_snprintf(char *str, size_t size, const char *format, ...)
1066 {
1067  va_list ap;
1068  int res = -1;
1069 
1070  va_start( ap, format );
1071 
1072  res = vsnprintf( str, size, format, ap );
1073 
1074  va_end( ap );
1075 
1076  // No quick fix possible
1077  if ( res < 0 )
1078  return( (int) size + 20 );
1079 
1080  return res;
1081 }
1082 
1083 #define snprintf compat_snprintf
1084 #endif
1085 
1086 #define POLARSSL_ERR_DEBUG_BUF_TOO_SMALL -2
1087 
1088 #define SAFE_SNPRINTF() \
1089 { \
1090  if( ret == -1 ) \
1091  return( -1 ); \
1092  \
1093  if ( (unsigned int) ret > n ) { \
1094  p[n - 1] = '\0'; \
1095  return POLARSSL_ERR_DEBUG_BUF_TOO_SMALL;\
1096  } \
1097  \
1098  n -= (unsigned int) ret; \
1099  p += (unsigned int) ret; \
1100 }
1101 
1102 /*
1103  * Return an informational string about the certificate.
1104  */
1105 #define BEFORE_COLON 14
1106 #define BC "14"
1107 int x509_crt_info( char *buf, size_t size, const char *prefix,
1108  const x509_crt *crt )
1109 {
1110  int ret;
1111  size_t n;
1112  char *p;
1113  const char *desc = NULL;
1114  char key_size_str[BEFORE_COLON];
1115 
1116  p = buf;
1117  n = size;
1118 
1119  ret = snprintf( p, n, "%scert. version : %d\n",
1120  prefix, crt->version );
1121  SAFE_SNPRINTF();
1122  ret = snprintf( p, n, "%sserial number : ",
1123  prefix );
1124  SAFE_SNPRINTF();
1125 
1126  ret = x509_serial_gets( p, n, &crt->serial);
1127  SAFE_SNPRINTF();
1128 
1129  ret = snprintf( p, n, "\n%sissuer name : ", prefix );
1130  SAFE_SNPRINTF();
1131  ret = x509_dn_gets( p, n, &crt->issuer );
1132  SAFE_SNPRINTF();
1133 
1134  ret = snprintf( p, n, "\n%ssubject name : ", prefix );
1135  SAFE_SNPRINTF();
1136  ret = x509_dn_gets( p, n, &crt->subject );
1137  SAFE_SNPRINTF();
1138 
1139  ret = snprintf( p, n, "\n%sissued on : " \
1140  "%04d-%02d-%02d %02d:%02d:%02d", prefix,
1141  crt->valid_from.year, crt->valid_from.mon,
1142  crt->valid_from.day, crt->valid_from.hour,
1143  crt->valid_from.min, crt->valid_from.sec );
1144  SAFE_SNPRINTF();
1145 
1146  ret = snprintf( p, n, "\n%sexpires on : " \
1147  "%04d-%02d-%02d %02d:%02d:%02d", prefix,
1148  crt->valid_to.year, crt->valid_to.mon,
1149  crt->valid_to.day, crt->valid_to.hour,
1150  crt->valid_to.min, crt->valid_to.sec );
1151  SAFE_SNPRINTF();
1152 
1153  ret = snprintf( p, n, "\n%ssigned using : ", prefix );
1154  SAFE_SNPRINTF();
1155 
1156  ret = oid_get_sig_alg_desc( &crt->sig_oid1, &desc );
1157  if( ret != 0 )
1158  ret = snprintf( p, n, "???" );
1159  else
1160  ret = snprintf( p, n, "%s", desc );
1161  SAFE_SNPRINTF();
1162 
1163  if( ( ret = x509_key_size_helper( key_size_str, BEFORE_COLON,
1164  pk_get_name( &crt->pk ) ) ) != 0 )
1165  {
1166  return( ret );
1167  }
1168 
1169  ret = snprintf( p, n, "\n%s%-" BC "s: %d bits\n", prefix, key_size_str,
1170  (int) pk_get_size( &crt->pk ) );
1171  SAFE_SNPRINTF();
1172 
1173  return( (int) ( size - n ) );
1174 }
1175 
1176 #if defined(POLARSSL_X509_CRL_PARSE_C)
1177 /*
1178  * Return 1 if the certificate is revoked, or 0 otherwise.
1179  */
1180 int x509_crt_revoked( const x509_crt *crt, const x509_crl *crl )
1181 {
1182  const x509_crl_entry *cur = &crl->entry;
1183 
1184  while( cur != NULL && cur->serial.len != 0 )
1185  {
1186  if( crt->serial.len == cur->serial.len &&
1187  memcmp( crt->serial.p, cur->serial.p, crt->serial.len ) == 0 )
1188  {
1189  if( x509_time_expired( &cur->revocation_date ) )
1190  return( 1 );
1191  }
1192 
1193  cur = cur->next;
1194  }
1195 
1196  return( 0 );
1197 }
1198 
1199 /*
1200  * Check that the given certificate is valid according to the CRL.
1201  */
1202 static int x509_crt_verifycrl( x509_crt *crt, x509_crt *ca,
1203  x509_crl *crl_list)
1204 {
1205  int flags = 0;
1206  unsigned char hash[POLARSSL_MD_MAX_SIZE];
1207  const md_info_t *md_info;
1208 
1209  if( ca == NULL )
1210  return( flags );
1211 
1212  /*
1213  * TODO: What happens if no CRL is present?
1214  * Suggestion: Revocation state should be unknown if no CRL is present.
1215  * For backwards compatibility this is not yet implemented.
1216  */
1217 
1218  while( crl_list != NULL )
1219  {
1220  if( crl_list->version == 0 ||
1221  crl_list->issuer_raw.len != ca->subject_raw.len ||
1222  memcmp( crl_list->issuer_raw.p, ca->subject_raw.p,
1223  crl_list->issuer_raw.len ) != 0 )
1224  {
1225  crl_list = crl_list->next;
1226  continue;
1227  }
1228 
1229  /*
1230  * Check if CRL is correctly signed by the trusted CA
1231  */
1232  md_info = md_info_from_type( crl_list->sig_md );
1233  if( md_info == NULL )
1234  {
1235  /*
1236  * Cannot check 'unknown' hash
1237  */
1238  flags |= BADCRL_NOT_TRUSTED;
1239  break;
1240  }
1241 
1242  md( md_info, crl_list->tbs.p, crl_list->tbs.len, hash );
1243 
1244  if( pk_can_do( &ca->pk, crl_list->sig_pk ) == 0 ||
1245  pk_verify( &ca->pk, crl_list->sig_md, hash, md_info->size,
1246  crl_list->sig.p, crl_list->sig.len ) != 0 )
1247  {
1248  flags |= BADCRL_NOT_TRUSTED;
1249  break;
1250  }
1251 
1252  /*
1253  * Check for validity of CRL (Do not drop out)
1254  */
1255  if( x509_time_expired( &crl_list->next_update ) )
1256  flags |= BADCRL_EXPIRED;
1257 
1258  /*
1259  * Check if certificate is revoked
1260  */
1261  if( x509_crt_revoked(crt, crl_list) )
1262  {
1263  flags |= BADCERT_REVOKED;
1264  break;
1265  }
1266 
1267  crl_list = crl_list->next;
1268  }
1269  return flags;
1270 }
1271 #endif /* POLARSSL_X509_CRL_PARSE_C */
1272 
1273 // Equal == 0, inequal == 1
1274 static int x509_name_cmp( const void *s1, const void *s2, size_t len )
1275 {
1276  size_t i;
1277  unsigned char diff;
1278  const unsigned char *n1 = s1, *n2 = s2;
1279 
1280  for( i = 0; i < len; i++ )
1281  {
1282  diff = n1[i] ^ n2[i];
1283 
1284  if( diff == 0 )
1285  continue;
1286 
1287  if( diff == 32 &&
1288  ( ( n1[i] >= 'a' && n1[i] <= 'z' ) ||
1289  ( n1[i] >= 'A' && n1[i] <= 'Z' ) ) )
1290  {
1291  continue;
1292  }
1293 
1294  return( 1 );
1295  }
1296 
1297  return( 0 );
1298 }
1299 
1300 static int x509_wildcard_verify( const char *cn, x509_buf *name )
1301 {
1302  size_t i;
1303  size_t cn_idx = 0;
1304 
1305  if( name->len < 3 || name->p[0] != '*' || name->p[1] != '.' )
1306  return( 0 );
1307 
1308  for( i = 0; i < strlen( cn ); ++i )
1309  {
1310  if( cn[i] == '.' )
1311  {
1312  cn_idx = i;
1313  break;
1314  }
1315  }
1316 
1317  if( cn_idx == 0 )
1318  return( 0 );
1319 
1320  if( strlen( cn ) - cn_idx == name->len - 1 &&
1321  x509_name_cmp( name->p + 1, cn + cn_idx, name->len - 1 ) == 0 )
1322  {
1323  return( 1 );
1324  }
1325 
1326  return( 0 );
1327 }
1328 
1329 static int x509_crt_verify_top(
1330  x509_crt *child, x509_crt *trust_ca,
1331  x509_crl *ca_crl, int path_cnt, int *flags,
1332  int (*f_vrfy)(void *, x509_crt *, int, int *),
1333  void *p_vrfy )
1334 {
1335  int ret;
1336  int ca_flags = 0, check_path_cnt = path_cnt + 1;
1337  unsigned char hash[POLARSSL_MD_MAX_SIZE];
1338  const md_info_t *md_info;
1339 
1340  if( x509_time_expired( &child->valid_to ) )
1341  *flags |= BADCERT_EXPIRED;
1342 
1343  /*
1344  * Child is the top of the chain. Check against the trust_ca list.
1345  */
1346  *flags |= BADCERT_NOT_TRUSTED;
1347 
1348  md_info = md_info_from_type( child->sig_md );
1349  if( md_info == NULL )
1350  {
1351  /*
1352  * Cannot check 'unknown', no need to try any CA
1353  */
1354  trust_ca = NULL;
1355  }
1356  else
1357  md( md_info, child->tbs.p, child->tbs.len, hash );
1358 
1359  while( trust_ca != NULL )
1360  {
1361  if( trust_ca->version == 0 ||
1362  child->issuer_raw.len != trust_ca->subject_raw.len ||
1363  memcmp( child->issuer_raw.p, trust_ca->subject_raw.p,
1364  child->issuer_raw.len ) != 0 )
1365  {
1366  trust_ca = trust_ca->next;
1367  continue;
1368  }
1369 
1370  /*
1371  * Reduce path_len to check against if top of the chain is
1372  * the same as the trusted CA
1373  */
1374  if( child->subject_raw.len == trust_ca->subject_raw.len &&
1375  memcmp( child->subject_raw.p, trust_ca->subject_raw.p,
1376  child->issuer_raw.len ) == 0 )
1377  {
1378  check_path_cnt--;
1379  }
1380 
1381  if( trust_ca->max_pathlen > 0 &&
1382  trust_ca->max_pathlen < check_path_cnt )
1383  {
1384  trust_ca = trust_ca->next;
1385  continue;
1386  }
1387 
1388  if( pk_can_do( &trust_ca->pk, child->sig_pk ) == 0 ||
1389  pk_verify( &trust_ca->pk, child->sig_md, hash, md_info->size,
1390  child->sig.p, child->sig.len ) != 0 )
1391  {
1392  trust_ca = trust_ca->next;
1393  continue;
1394  }
1395 
1396  /*
1397  * Top of chain is signed by a trusted CA
1398  */
1399  *flags &= ~BADCERT_NOT_TRUSTED;
1400  break;
1401  }
1402 
1403  /*
1404  * If top of chain is not the same as the trusted CA send a verify request
1405  * to the callback for any issues with validity and CRL presence for the
1406  * trusted CA certificate.
1407  */
1408  if( trust_ca != NULL &&
1409  ( child->subject_raw.len != trust_ca->subject_raw.len ||
1410  memcmp( child->subject_raw.p, trust_ca->subject_raw.p,
1411  child->issuer_raw.len ) != 0 ) )
1412  {
1413 #if defined(POLARSSL_X509_CRL_PARSE_C)
1414  /* Check trusted CA's CRL for the chain's top crt */
1415  *flags |= x509_crt_verifycrl( child, trust_ca, ca_crl );
1416 #else
1417  ((void) ca_crl);
1418 #endif
1419 
1420  if( x509_time_expired( &trust_ca->valid_to ) )
1421  ca_flags |= BADCERT_EXPIRED;
1422 
1423  if( NULL != f_vrfy )
1424  {
1425  if( ( ret = f_vrfy( p_vrfy, trust_ca, path_cnt + 1, &ca_flags ) ) != 0 )
1426  return( ret );
1427  }
1428  }
1429 
1430  /* Call callback on top cert */
1431  if( NULL != f_vrfy )
1432  {
1433  if( ( ret = f_vrfy(p_vrfy, child, path_cnt, flags ) ) != 0 )
1434  return( ret );
1435  }
1436 
1437  *flags |= ca_flags;
1438 
1439  return( 0 );
1440 }
1441 
1442 static int x509_crt_verify_child(
1443  x509_crt *child, x509_crt *parent, x509_crt *trust_ca,
1444  x509_crl *ca_crl, int path_cnt, int *flags,
1445  int (*f_vrfy)(void *, x509_crt *, int, int *),
1446  void *p_vrfy )
1447 {
1448  int ret;
1449  int parent_flags = 0;
1450  unsigned char hash[POLARSSL_MD_MAX_SIZE];
1451  x509_crt *grandparent;
1452  const md_info_t *md_info;
1453 
1454  if( x509_time_expired( &child->valid_to ) )
1455  *flags |= BADCERT_EXPIRED;
1456 
1457  md_info = md_info_from_type( child->sig_md );
1458  if( md_info == NULL )
1459  {
1460  /*
1461  * Cannot check 'unknown' hash
1462  */
1463  *flags |= BADCERT_NOT_TRUSTED;
1464  }
1465  else
1466  {
1467  md( md_info, child->tbs.p, child->tbs.len, hash );
1468 
1469  if( pk_can_do( &parent->pk, child->sig_pk ) == 0 ||
1470  pk_verify( &parent->pk, child->sig_md, hash, md_info->size,
1471  child->sig.p, child->sig.len ) != 0 )
1472  {
1473  *flags |= BADCERT_NOT_TRUSTED;
1474  }
1475  }
1476 
1477 #if defined(POLARSSL_X509_CRL_PARSE_C)
1478  /* Check trusted CA's CRL for the given crt */
1479  *flags |= x509_crt_verifycrl(child, parent, ca_crl);
1480 #endif
1481 
1482  grandparent = parent->next;
1483 
1484  while( grandparent != NULL )
1485  {
1486  if( grandparent->version == 0 ||
1487  grandparent->ca_istrue == 0 ||
1488  parent->issuer_raw.len != grandparent->subject_raw.len ||
1489  memcmp( parent->issuer_raw.p, grandparent->subject_raw.p,
1490  parent->issuer_raw.len ) != 0 )
1491  {
1492  grandparent = grandparent->next;
1493  continue;
1494  }
1495  break;
1496  }
1497 
1498  if( grandparent != NULL )
1499  {
1500  /*
1501  * Part of the chain
1502  */
1503  ret = x509_crt_verify_child( parent, grandparent, trust_ca, ca_crl, path_cnt + 1, &parent_flags, f_vrfy, p_vrfy );
1504  if( ret != 0 )
1505  return( ret );
1506  }
1507  else
1508  {
1509  ret = x509_crt_verify_top( parent, trust_ca, ca_crl, path_cnt + 1, &parent_flags, f_vrfy, p_vrfy );
1510  if( ret != 0 )
1511  return( ret );
1512  }
1513 
1514  /* child is verified to be a child of the parent, call verify callback */
1515  if( NULL != f_vrfy )
1516  if( ( ret = f_vrfy( p_vrfy, child, path_cnt, flags ) ) != 0 )
1517  return( ret );
1518 
1519  *flags |= parent_flags;
1520 
1521  return( 0 );
1522 }
1523 
1524 /*
1525  * Verify the certificate validity
1526  */
1527 int x509_crt_verify( x509_crt *crt,
1528  x509_crt *trust_ca,
1529  x509_crl *ca_crl,
1530  const char *cn, int *flags,
1531  int (*f_vrfy)(void *, x509_crt *, int, int *),
1532  void *p_vrfy )
1533 {
1534  size_t cn_len;
1535  int ret;
1536  int pathlen = 0;
1537  x509_crt *parent;
1538  x509_name *name;
1539  x509_sequence *cur = NULL;
1540 
1541  *flags = 0;
1542 
1543  if( cn != NULL )
1544  {
1545  name = &crt->subject;
1546  cn_len = strlen( cn );
1547 
1548  if( crt->ext_types & EXT_SUBJECT_ALT_NAME )
1549  {
1550  cur = &crt->subject_alt_names;
1551 
1552  while( cur != NULL )
1553  {
1554  if( cur->buf.len == cn_len &&
1555  x509_name_cmp( cn, cur->buf.p, cn_len ) == 0 )
1556  break;
1557 
1558  if( cur->buf.len > 2 &&
1559  memcmp( cur->buf.p, "*.", 2 ) == 0 &&
1560  x509_wildcard_verify( cn, &cur->buf ) )
1561  break;
1562 
1563  cur = cur->next;
1564  }
1565 
1566  if( cur == NULL )
1567  *flags |= BADCERT_CN_MISMATCH;
1568  }
1569  else
1570  {
1571  while( name != NULL )
1572  {
1573  if( OID_CMP( OID_AT_CN, &name->oid ) )
1574  {
1575  if( name->val.len == cn_len &&
1576  x509_name_cmp( name->val.p, cn, cn_len ) == 0 )
1577  break;
1578 
1579  if( name->val.len > 2 &&
1580  memcmp( name->val.p, "*.", 2 ) == 0 &&
1581  x509_wildcard_verify( cn, &name->val ) )
1582  break;
1583  }
1584 
1585  name = name->next;
1586  }
1587 
1588  if( name == NULL )
1589  *flags |= BADCERT_CN_MISMATCH;
1590  }
1591  }
1592 
1593  /*
1594  * Iterate upwards in the given cert chain, to find our crt parent.
1595  * Ignore any upper cert with CA != TRUE.
1596  */
1597  parent = crt->next;
1598 
1599  while( parent != NULL && parent->version != 0 )
1600  {
1601  if( parent->ca_istrue == 0 ||
1602  crt->issuer_raw.len != parent->subject_raw.len ||
1603  memcmp( crt->issuer_raw.p, parent->subject_raw.p,
1604  crt->issuer_raw.len ) != 0 )
1605  {
1606  parent = parent->next;
1607  continue;
1608  }
1609  break;
1610  }
1611 
1612  if( parent != NULL )
1613  {
1614  /*
1615  * Part of the chain
1616  */
1617  ret = x509_crt_verify_child( crt, parent, trust_ca, ca_crl, pathlen, flags, f_vrfy, p_vrfy );
1618  if( ret != 0 )
1619  return( ret );
1620  }
1621  else
1622  {
1623  ret = x509_crt_verify_top( crt, trust_ca, ca_crl, pathlen, flags, f_vrfy, p_vrfy );
1624  if( ret != 0 )
1625  return( ret );
1626  }
1627 
1628  if( *flags != 0 )
1630 
1631  return( 0 );
1632 }
1633 
1634 /*
1635  * Initialize a certificate chain
1636  */
1637 void x509_crt_init( x509_crt *crt )
1638 {
1639  memset( crt, 0, sizeof(x509_crt) );
1640 }
1641 
1642 /*
1643  * Unallocate all certificate data
1644  */
1645 void x509_crt_free( x509_crt *crt )
1646 {
1647  x509_crt *cert_cur = crt;
1648  x509_crt *cert_prv;
1649  x509_name *name_cur;
1650  x509_name *name_prv;
1651  x509_sequence *seq_cur;
1652  x509_sequence *seq_prv;
1653 
1654  if( crt == NULL )
1655  return;
1656 
1657  do
1658  {
1659  pk_free( &cert_cur->pk );
1660 
1661  name_cur = cert_cur->issuer.next;
1662  while( name_cur != NULL )
1663  {
1664  name_prv = name_cur;
1665  name_cur = name_cur->next;
1666  memset( name_prv, 0, sizeof( x509_name ) );
1667  polarssl_free( name_prv );
1668  }
1669 
1670  name_cur = cert_cur->subject.next;
1671  while( name_cur != NULL )
1672  {
1673  name_prv = name_cur;
1674  name_cur = name_cur->next;
1675  memset( name_prv, 0, sizeof( x509_name ) );
1676  polarssl_free( name_prv );
1677  }
1678 
1679  seq_cur = cert_cur->ext_key_usage.next;
1680  while( seq_cur != NULL )
1681  {
1682  seq_prv = seq_cur;
1683  seq_cur = seq_cur->next;
1684  memset( seq_prv, 0, sizeof( x509_sequence ) );
1685  polarssl_free( seq_prv );
1686  }
1687 
1688  seq_cur = cert_cur->subject_alt_names.next;
1689  while( seq_cur != NULL )
1690  {
1691  seq_prv = seq_cur;
1692  seq_cur = seq_cur->next;
1693  memset( seq_prv, 0, sizeof( x509_sequence ) );
1694  polarssl_free( seq_prv );
1695  }
1696 
1697  if( cert_cur->raw.p != NULL )
1698  {
1699  memset( cert_cur->raw.p, 0, cert_cur->raw.len );
1700  polarssl_free( cert_cur->raw.p );
1701  }
1702 
1703  cert_cur = cert_cur->next;
1704  }
1705  while( cert_cur != NULL );
1706 
1707  cert_cur = crt;
1708  do
1709  {
1710  cert_prv = cert_cur;
1711  cert_cur = cert_cur->next;
1712 
1713  memset( cert_prv, 0, sizeof( x509_crt ) );
1714  if( cert_prv != crt )
1715  polarssl_free( cert_prv );
1716  }
1717  while( cert_cur != NULL );
1718 }
1719 
1720 #endif
int md(const md_info_t *md_info, const unsigned char *input, size_t ilen, unsigned char *output)
Output = message_digest( input buffer )
x509_buf sig
Definition: x509_crl.h:89
int x509_time_expired(const x509_time *time)
Check a given x509_time against the system time and check if it is valid.
int asn1_get_sequence_of(unsigned char **p, const unsigned char *end, asn1_sequence *cur, int tag)
Parses and splits an ASN.1 &quot;SEQUENCE OF &lt;tag&gt;&quot; Updated the pointer to immediately behind the full seq...
x509_sequence subject_alt_names
Optional list of Subject Alternative Names (Only dNSName supported).
Definition: x509_crt.h:76
#define X509_FORMAT_DER
Definition: x509.h:134
Memory allocation layer.
#define ASN1_OID
Definition: asn1.h:76
#define EXT_KEY_USAGE
Definition: x509.h:114
int(* polarssl_mutex_lock)(threading_mutex_t *mutex)
void *(* polarssl_malloc)(size_t len)
int sec
Time.
Definition: x509.h:175
int x509_get_name(unsigned char **p, const unsigned char *end, x509_name *cur)
#define POLARSSL_ERR_X509_INVALID_DATE
The date tag or value is invalid.
Definition: x509.h:55
int version
Definition: x509_crl.h:74
asn1_buf buf
Buffer containing the given ASN.1 item.
Definition: asn1.h:140
int x509_get_serial(unsigned char **p, const unsigned char *end, x509_buf *serial)
x509_buf raw
The raw certificate data (DER).
Definition: x509_crt.h:55
x509_time next_update
Definition: x509_crl.h:82
#define POLARSSL_ERR_ASN1_LENGTH_MISMATCH
Actual length differs from expected length.
Definition: asn1.h:53
int ext_types
Bit string containing detected and parsed extensions.
Definition: x509_crt.h:78
Certificate revocation list entry.
Definition: x509_crl.h:51
size_t pk_get_size(const pk_context *ctx)
Get the size in bits of the underlying key.
#define POLARSSL_ERR_X509_CERT_UNKNOWN_FORMAT
Format not recognized as DER or PEM.
Definition: x509.h:62
#define EXT_BASIC_CONSTRAINTS
Definition: x509.h:120
unsigned char ns_cert_type
Optional Netscape certificate type extension value: See the values below.
Definition: x509_crt.h:86
x509_buf issuer_raw
The raw issuer data (DER).
Definition: x509_crt.h:62
#define POLARSSL_ERR_X509_INVALID_FORMAT
The CRT/CRL/CSR format is invalid, e.g.
Definition: x509.h:50
int x509_key_size_helper(char *buf, size_t size, const char *name)
struct _x509_crl * next
Definition: x509_crl.h:93
int asn1_get_int(unsigned char **p, const unsigned char *end, int *val)
Retrieve an integer ASN.1 tag and its value.
size_t len
ASN1 length, e.g.
Definition: asn1.h:129
int x509_get_alg_null(unsigned char **p, const unsigned char *end, x509_buf *alg)
Container for date and time (precision in seconds).
Definition: x509.h:172
int x509_crt_parse(x509_crt *chain, const unsigned char *buf, size_t buflen)
Parse one or more certificates and add them to the chained list.
#define ASN1_SEQUENCE
Definition: asn1.h:78
x509_buf sig_oid2
Signature algorithm.
Definition: x509_crt.h:88
int oid_get_x509_ext_type(const asn1_buf *oid, int *ext_type)
Translate an X.509 extension OID into local values.
void x509_crt_free(x509_crt *crt)
Unallocate all certificate data.
Configuration options (set of defines)
#define OID_CMP(oid_str, oid_buf)
Compares two asn1_buf structures for the same OID.
Definition: asn1.h:100
x509_buf tbs
The raw certificate body (DER).
Definition: x509_crt.h:56
x509_buf serial
Unique id for certificate issued by a specific CA.
Definition: x509_crt.h:59
md_type_t sig_md
Internal representation of the MD algorithm of the signature algorithm, e.g.
Definition: x509_crt.h:90
int ca_istrue
Optional Basic Constraint extension value: 1 if this certificate belongs to a CA, 0 otherwise...
Definition: x509_crt.h:79
#define ASN1_CONSTRUCTED
Definition: asn1.h:88
int x509_crt_parse_der(x509_crt *chain, const unsigned char *buf, size_t buflen)
Parse a single DER formatted certificate and add it to the chained list.
int max_pathlen
Optional Basic Constraint extension value: The maximum path length to the root certificate.
Definition: x509_crt.h:80
int x509_get_sig(unsigned char **p, const unsigned char *end, x509_buf *sig)
const char * pk_get_name(const pk_context *ctx)
Access the type name.
#define BADCRL_NOT_TRUSTED
CRL is not correctly signed by the trusted CA.
Definition: x509.h:76
#define POLARSSL_ERR_ASN1_INVALID_LENGTH
Error when trying to determine the length or invalid length.
Definition: asn1.h:52
Container for ASN1 bit strings.
Definition: asn1.h:127
#define POLARSSL_ERR_X509_UNKNOWN_VERSION
CRT/CRL/CSR has an unsupported version number.
Definition: x509.h:58
Object Identifier (OID) database.
x509_buf serial
Definition: x509_crl.h:55
#define OID_AT_CN
id-at-commonName AttributeType:= {id-at 3}
Definition: oid.h:106
struct _x509_crt * next
Next certificate in the CA-chain.
Definition: x509_crt.h:93
x509_crl_entry entry
The CRL entries containing the certificate revocation times for this CA.
Definition: x509_crl.h:84
asn1_buf val
The named value.
Definition: asn1.h:151
int hour
Definition: x509.h:175
int mon
Definition: x509.h:174
Container for a sequence of ASN.1 items.
Definition: asn1.h:138
const md_info_t * md_info_from_type(md_type_t md_type)
Returns the message digest information associated with the given digest type.
int x509_get_time(unsigned char **p, const unsigned char *end, x509_time *time)
#define BADCERT_EXPIRED
The certificate validity has expired.
Definition: x509.h:72
unsigned char * p
Raw ASN1 data for the bit string.
Definition: asn1.h:131
Threading abstraction layer.
#define POLARSSL_ERR_X509_CERT_VERIFY_FAILED
Certificate verification failed, e.g.
Definition: x509.h:61
Container for an X.509 certificate.
Definition: x509_crt.h:53
Privacy Enhanced Mail (PEM) decoding.
x509_time valid_from
Start time of certificate validity.
Definition: x509_crt.h:68
int x509_dn_gets(char *buf, size_t size, const x509_name *dn)
Store the certificate DN in printable form into buf; no more than size characters will be written...
asn1_buf oid
The object identifier.
Definition: asn1.h:150
int pk_verify(pk_context *ctx, md_type_t md_alg, const unsigned char *hash, size_t hash_len, const unsigned char *sig, size_t sig_len)
Verify signature.
x509_sequence ext_key_usage
Optional list of extended key usage OIDs.
Definition: x509_crt.h:84
void x509_crt_init(x509_crt *crt)
Initialize a certificate (chain)
void(* polarssl_free)(void *ptr)
unsigned char * p
ASN1 data, e.g.
Definition: asn1.h:120
int oid_get_sig_alg_desc(const asn1_buf *oid, const char **desc)
Translate SignatureAlgorithm OID into description.
x509_name subject
The parsed subject data (named information object).
Definition: x509_crt.h:66
#define EXT_NS_CERT_TYPE
Definition: x509.h:128
int x509_crt_verify(x509_crt *crt, x509_crt *trust_ca, x509_crl *ca_crl, const char *cn, int *flags, int(*f_vrfy)(void *, x509_crt *, int, int *), void *p_vrfy)
Verify the certificate signature.
int pk_can_do(pk_context *ctx, pk_type_t type)
Tell if a context can do the operation given by type.
x509_buf tbs
The raw certificate body (DER).
Definition: x509_crl.h:72
int asn1_get_bool(unsigned char **p, const unsigned char *end, int *val)
Retrieve a boolean ASN.1 tag and its value.
x509_time valid_to
End time of certificate validity.
Definition: x509_crt.h:69
struct _x509_crl_entry * next
Definition: x509_crl.h:61
md_type_t sig_md
Internal representation of the MD algorithm of the signature algorithm, e.g.
Definition: x509_crl.h:90
X.509 certificate parsing and writing.
int day
Date.
Definition: x509.h:174
int x509_get_sig_alg(const x509_buf *sig_oid, md_type_t *md_alg, pk_type_t *pk_alg)
x509_buf sig_oid1
Signature algorithm, e.g.
Definition: x509_crt.h:60
int tag
ASN1 type, e.g.
Definition: asn1.h:118
#define POLARSSL_ERR_ASN1_OUT_OF_DATA
Out of data when parsing an ASN1 data structure.
Definition: asn1.h:50
#define EXT_EXTENDED_KEY_USAGE
Definition: x509.h:123
int pk_parse_subpubkey(unsigned char **p, const unsigned char *end, pk_context *pk)
Parse a SubjectPublicKeyInfo DER structure.
int x509_load_file(const char *path, unsigned char **buf, size_t *n)
#define POLARSSL_ERR_ASN1_MALLOC_FAILED
Memory allocation failed.
Definition: asn1.h:55
#define ASN1_CONTEXT_SPECIFIC
Definition: asn1.h:89
#define BADCERT_NOT_TRUSTED
The certificate is not correctly signed by the trusted CA.
Definition: x509.h:75
#define POLARSSL_ERR_X509_FILE_IO_ERROR
Read/write of file failed.
Definition: x509.h:65
int x509_crt_revoked(const x509_crt *crt, const x509_crl *crl)
Verify the certificate revocation status.
Container for a sequence or list of &#39;named&#39; ASN.1 data items.
Definition: asn1.h:148
Type-length-value structure that allows for ASN1 using DER.
Definition: asn1.h:116
pk_type_t sig_pk
&lt; Internal representation of the Public Key algorithm of the signature algorithm, e...
Definition: x509_crl.h:91
size_t len
ASN1 length, e.g.
Definition: asn1.h:119
x509_name issuer
The parsed issuer data (named information object).
Definition: x509_crt.h:65
#define X509_FORMAT_PEM
Definition: x509.h:135
void pk_free(pk_context *ctx)
Free a pk_context.
#define POLARSSL_MD_MAX_SIZE
Definition: md.h:67
int(* polarssl_mutex_unlock)(threading_mutex_t *mutex)
int year
Definition: x509.h:174
#define BADCERT_REVOKED
The certificate has been revoked (is on a CRL).
Definition: x509.h:73
#define BADCRL_EXPIRED
CRL is expired.
Definition: x509.h:77
int asn1_get_len(unsigned char **p, const unsigned char *end, size_t *len)
Get the length of an ASN.1 element.
#define POLARSSL_ERR_X509_FEATURE_UNAVAILABLE
Unavailable feature, e.g.
Definition: x509.h:48
int asn1_get_tag(unsigned char **p, const unsigned char *end, size_t *len, int tag)
Get the tag and length of the tag.
int x509_get_ext(unsigned char **p, const unsigned char *end, x509_buf *ext, int tag)
#define POLARSSL_ERR_X509_INVALID_VERSION
The CRT/CRL/CSR version element is invalid.
Definition: x509.h:51
Certificate revocation list structure.
Definition: x509_crl.h:69
int asn1_get_bitstring(unsigned char **p, const unsigned char *end, asn1_bitstring *bs)
Retrieve a bitstring ASN.1 tag and its value.
pk_context pk
Container for the public key context.
Definition: x509_crt.h:71
#define POLARSSL_ERR_THREADING_MUTEX_ERROR
Locking / unlocking / free failed with error code.
Definition: threading.h:40
int min
Definition: x509.h:175
struct _asn1_named_data * next
The next entry in the sequence.
Definition: asn1.h:152
int size
Output length of the digest function.
Definition: md.h:82
x509_buf issuer_id
Optional X.509 v2/v3 issuer unique identifier.
Definition: x509_crt.h:73
#define POLARSSL_ERR_X509_INVALID_EXTENSIONS
The extension tag or value is invalid.
Definition: x509.h:57
#define ASN1_OCTET_STRING
Definition: asn1.h:74
int x509_crt_parse_path(x509_crt *chain, const char *path)
Load one or more certificate files from a path and add them to the chained list.
x509_buf v3_ext
Optional X.509 v3 extensions.
Definition: x509_crt.h:75
#define POLARSSL_ERR_X509_BAD_INPUT_DATA
Input invalid.
Definition: x509.h:63
x509_buf subject_id
Optional X.509 v2/v3 subject unique identifier.
Definition: x509_crt.h:74
#define BADCERT_CN_MISMATCH
The certificate Common Name (CN) does not match with the expected CN.
Definition: x509.h:74
int version
The X.509 version.
Definition: x509_crt.h:58
#define POLARSSL_ERR_PEM_NO_HEADER_FOOTER_PRESENT
No PEM header or footer found.
Definition: pem.h:38
pk_type_t sig_pk
&lt; Internal representation of the Public Key algorithm of the signature algorithm, e...
Definition: x509_crt.h:91
x509_time revocation_date
Definition: x509_crl.h:57
x509_buf issuer_raw
The raw issuer data (DER).
Definition: x509_crl.h:77
int x509_crt_info(char *buf, size_t size, const char *prefix, const x509_crt *crt)
Returns an informational string about the certificate.
#define POLARSSL_ERR_X509_MALLOC_FAILED
Allocation of memory failed.
Definition: x509.h:64
#define POLARSSL_ERR_PEM_BAD_INPUT_DATA
Bad input parameters to function.
Definition: pem.h:46
unsigned char key_usage
Optional key usage extension value: See the values below.
Definition: x509_crt.h:82
x509_buf subject_raw
The raw subject data (DER).
Definition: x509_crt.h:63
Message digest information.
Definition: md.h:74
#define POLARSSL_ERR_ASN1_UNEXPECTED_TAG
ASN1 tag was of an unexpected value.
Definition: asn1.h:51
int x509_serial_gets(char *buf, size_t size, const x509_buf *serial)
Store the certificate serial in printable form into buf; no more than size characters will be written...
#define POLARSSL_ERR_X509_SIG_MISMATCH
Signature algorithms do not match.
Definition: x509.h:60
struct _asn1_sequence * next
The next entry in the sequence.
Definition: asn1.h:141
int x509_crt_parse_file(x509_crt *chain, const char *path)
Load one or more certificates and add them to the chained list.
x509_buf sig
Signature: hash of the tbs part signed with the private key.
Definition: x509_crt.h:89
#define EXT_SUBJECT_ALT_NAME
Definition: x509.h:117