2 * Contributed to the OpenSSL Project by the American Registry for
3 * Internet Numbers ("ARIN").
5 /* ====================================================================
6 * Copyright (c) 2006 The OpenSSL Project. All rights reserved.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in
17 * the documentation and/or other materials provided with the
20 * 3. All advertising materials mentioning features or use of this
21 * software must display the following acknowledgment:
22 * "This product includes software developed by the OpenSSL Project
23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26 * endorse or promote products derived from this software without
27 * prior written permission. For written permission, please contact
28 * licensing@OpenSSL.org.
30 * 5. Products derived from this software may not be called "OpenSSL"
31 * nor may "OpenSSL" appear in their names without prior written
32 * permission of the OpenSSL Project.
34 * 6. Redistributions of any form whatsoever must retain the following
36 * "This product includes software developed by the OpenSSL Project
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50 * OF THE POSSIBILITY OF SUCH DAMAGE.
51 * ====================================================================
53 * This product includes cryptographic software written by Eric Young
54 * (eay@cryptsoft.com). This product includes software written by Tim
55 * Hudson (tjh@cryptsoft.com).
59 * Implementation of RFC 3779 section 3.2.
65 #include <openssl/conf.h>
66 #include <openssl/asn1.h>
67 #include <openssl/asn1t.h>
68 #include <openssl/x509v3.h>
69 #include <openssl/x509.h>
70 #include <openssl/bn.h>
72 #ifndef OPENSSL_NO_RFC3779
75 * OpenSSL ASN.1 template translation of RFC 3779 3.2.3.
78 ASN1_SEQUENCE(ASRange
) = {
79 ASN1_SIMPLE(ASRange
, min
, ASN1_INTEGER
),
80 ASN1_SIMPLE(ASRange
, max
, ASN1_INTEGER
)
81 } ASN1_SEQUENCE_END(ASRange
)
83 ASN1_CHOICE(ASIdOrRange
) = {
84 ASN1_SIMPLE(ASIdOrRange
, u
.id
, ASN1_INTEGER
),
85 ASN1_SIMPLE(ASIdOrRange
, u
.range
, ASRange
)
86 } ASN1_CHOICE_END(ASIdOrRange
)
88 ASN1_CHOICE(ASIdentifierChoice
) = {
89 ASN1_SIMPLE(ASIdentifierChoice
, u
.inherit
, ASN1_NULL
),
90 ASN1_SEQUENCE_OF(ASIdentifierChoice
, u
.asIdsOrRanges
, ASIdOrRange
)
91 } ASN1_CHOICE_END(ASIdentifierChoice
)
93 ASN1_SEQUENCE(ASIdentifiers
) = {
94 ASN1_EXP_OPT(ASIdentifiers
, asnum
, ASIdentifierChoice
, 0),
95 ASN1_EXP_OPT(ASIdentifiers
, rdi
, ASIdentifierChoice
, 1)
96 } ASN1_SEQUENCE_END(ASIdentifiers
)
98 IMPLEMENT_ASN1_FUNCTIONS(ASRange
)
99 IMPLEMENT_ASN1_FUNCTIONS(ASIdOrRange
)
100 IMPLEMENT_ASN1_FUNCTIONS(ASIdentifierChoice
)
101 IMPLEMENT_ASN1_FUNCTIONS(ASIdentifiers
)
104 * i2r method for an ASIdentifierChoice.
106 static int i2r_ASIdentifierChoice(BIO
*out
,
107 ASIdentifierChoice
*choice
,
108 int indent
, const char *msg
)
114 BIO_printf(out
, "%*s%s:\n", indent
, "", msg
);
115 switch (choice
->type
) {
116 case ASIdentifierChoice_inherit
:
117 BIO_printf(out
, "%*sinherit\n", indent
+ 2, "");
119 case ASIdentifierChoice_asIdsOrRanges
:
120 for (i
= 0; i
< sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
); i
++) {
122 sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
);
125 if ((s
= i2s_ASN1_INTEGER(NULL
, aor
->u
.id
)) == NULL
)
127 BIO_printf(out
, "%*s%s\n", indent
+ 2, "", s
);
130 case ASIdOrRange_range
:
131 if ((s
= i2s_ASN1_INTEGER(NULL
, aor
->u
.range
->min
)) == NULL
)
133 BIO_printf(out
, "%*s%s-", indent
+ 2, "", s
);
135 if ((s
= i2s_ASN1_INTEGER(NULL
, aor
->u
.range
->max
)) == NULL
)
137 BIO_printf(out
, "%s\n", s
);
152 * i2r method for an ASIdentifier extension.
154 static int i2r_ASIdentifiers(const X509V3_EXT_METHOD
*method
,
155 void *ext
, BIO
*out
, int indent
)
157 ASIdentifiers
*asid
= ext
;
158 return (i2r_ASIdentifierChoice(out
, asid
->asnum
, indent
,
159 "Autonomous System Numbers") &&
160 i2r_ASIdentifierChoice(out
, asid
->rdi
, indent
,
161 "Routing Domain Identifiers"));
165 * Sort comparision function for a sequence of ASIdOrRange elements.
167 static int ASIdOrRange_cmp(const ASIdOrRange
*const *a_
,
168 const ASIdOrRange
*const *b_
)
170 const ASIdOrRange
*a
= *a_
, *b
= *b_
;
172 OPENSSL_assert((a
->type
== ASIdOrRange_id
&& a
->u
.id
!= NULL
) ||
173 (a
->type
== ASIdOrRange_range
&& a
->u
.range
!= NULL
&&
174 a
->u
.range
->min
!= NULL
&& a
->u
.range
->max
!= NULL
));
176 OPENSSL_assert((b
->type
== ASIdOrRange_id
&& b
->u
.id
!= NULL
) ||
177 (b
->type
== ASIdOrRange_range
&& b
->u
.range
!= NULL
&&
178 b
->u
.range
->min
!= NULL
&& b
->u
.range
->max
!= NULL
));
180 if (a
->type
== ASIdOrRange_id
&& b
->type
== ASIdOrRange_id
)
181 return ASN1_INTEGER_cmp(a
->u
.id
, b
->u
.id
);
183 if (a
->type
== ASIdOrRange_range
&& b
->type
== ASIdOrRange_range
) {
184 int r
= ASN1_INTEGER_cmp(a
->u
.range
->min
, b
->u
.range
->min
);
185 return r
!= 0 ? r
: ASN1_INTEGER_cmp(a
->u
.range
->max
,
189 if (a
->type
== ASIdOrRange_id
)
190 return ASN1_INTEGER_cmp(a
->u
.id
, b
->u
.range
->min
);
192 return ASN1_INTEGER_cmp(a
->u
.range
->min
, b
->u
.id
);
196 * Add an inherit element.
198 int v3_asid_add_inherit(ASIdentifiers
*asid
, int which
)
200 ASIdentifierChoice
**choice
;
205 choice
= &asid
->asnum
;
213 if (*choice
== NULL
) {
214 if ((*choice
= ASIdentifierChoice_new()) == NULL
)
216 OPENSSL_assert((*choice
)->u
.inherit
== NULL
);
217 if (((*choice
)->u
.inherit
= ASN1_NULL_new()) == NULL
)
219 (*choice
)->type
= ASIdentifierChoice_inherit
;
221 return (*choice
)->type
== ASIdentifierChoice_inherit
;
225 * Add an ID or range to an ASIdentifierChoice.
227 int v3_asid_add_id_or_range(ASIdentifiers
*asid
,
228 int which
, ASN1_INTEGER
*min
, ASN1_INTEGER
*max
)
230 ASIdentifierChoice
**choice
;
236 choice
= &asid
->asnum
;
244 if (*choice
!= NULL
&& (*choice
)->type
== ASIdentifierChoice_inherit
)
246 if (*choice
== NULL
) {
247 if ((*choice
= ASIdentifierChoice_new()) == NULL
)
249 OPENSSL_assert((*choice
)->u
.asIdsOrRanges
== NULL
);
250 (*choice
)->u
.asIdsOrRanges
= sk_ASIdOrRange_new(ASIdOrRange_cmp
);
251 if ((*choice
)->u
.asIdsOrRanges
== NULL
)
253 (*choice
)->type
= ASIdentifierChoice_asIdsOrRanges
;
255 if ((aor
= ASIdOrRange_new()) == NULL
)
258 aor
->type
= ASIdOrRange_id
;
261 aor
->type
= ASIdOrRange_range
;
262 if ((aor
->u
.range
= ASRange_new()) == NULL
)
264 ASN1_INTEGER_free(aor
->u
.range
->min
);
265 aor
->u
.range
->min
= min
;
266 ASN1_INTEGER_free(aor
->u
.range
->max
);
267 aor
->u
.range
->max
= max
;
269 if (!(sk_ASIdOrRange_push((*choice
)->u
.asIdsOrRanges
, aor
)))
274 ASIdOrRange_free(aor
);
279 * Extract min and max values from an ASIdOrRange.
281 static void extract_min_max(ASIdOrRange
*aor
,
282 ASN1_INTEGER
**min
, ASN1_INTEGER
**max
)
284 OPENSSL_assert(aor
!= NULL
&& min
!= NULL
&& max
!= NULL
);
290 case ASIdOrRange_range
:
291 *min
= aor
->u
.range
->min
;
292 *max
= aor
->u
.range
->max
;
298 * Check whether an ASIdentifierChoice is in canonical form.
300 static int ASIdentifierChoice_is_canonical(ASIdentifierChoice
*choice
)
302 ASN1_INTEGER
*a_max_plus_one
= NULL
;
307 * Empty element or inheritance is canonical.
309 if (choice
== NULL
|| choice
->type
== ASIdentifierChoice_inherit
)
313 * If not a list, or if empty list, it's broken.
315 if (choice
->type
!= ASIdentifierChoice_asIdsOrRanges
||
316 sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
) == 0)
320 * It's a list, check it.
322 for (i
= 0; i
< sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
) - 1; i
++) {
323 ASIdOrRange
*a
= sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
);
324 ASIdOrRange
*b
= sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
+ 1);
325 ASN1_INTEGER
*a_min
, *a_max
, *b_min
, *b_max
;
327 extract_min_max(a
, &a_min
, &a_max
);
328 extract_min_max(b
, &b_min
, &b_max
);
331 * Punt misordered list, overlapping start, or inverted range.
333 if (ASN1_INTEGER_cmp(a_min
, b_min
) >= 0 ||
334 ASN1_INTEGER_cmp(a_min
, a_max
) > 0 ||
335 ASN1_INTEGER_cmp(b_min
, b_max
) > 0)
339 * Calculate a_max + 1 to check for adjacency.
341 if ((bn
== NULL
&& (bn
= BN_new()) == NULL
) ||
342 ASN1_INTEGER_to_BN(a_max
, bn
) == NULL
||
343 !BN_add_word(bn
, 1) ||
345 BN_to_ASN1_INTEGER(bn
, a_max_plus_one
)) == NULL
) {
346 X509V3err(X509V3_F_ASIDENTIFIERCHOICE_IS_CANONICAL
,
347 ERR_R_MALLOC_FAILURE
);
352 * Punt if adjacent or overlapping.
354 if (ASN1_INTEGER_cmp(a_max_plus_one
, b_min
) >= 0)
359 * Check for inverted range.
361 i
= sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
) - 1;
363 ASIdOrRange
*a
= sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
);
364 ASN1_INTEGER
*a_min
, *a_max
;
365 if (a
!= NULL
&& a
->type
== ASIdOrRange_range
) {
366 extract_min_max(a
, &a_min
, &a_max
);
367 if (ASN1_INTEGER_cmp(a_min
, a_max
) > 0)
375 ASN1_INTEGER_free(a_max_plus_one
);
381 * Check whether an ASIdentifier extension is in canonical form.
383 int v3_asid_is_canonical(ASIdentifiers
*asid
)
385 return (asid
== NULL
||
386 (ASIdentifierChoice_is_canonical(asid
->asnum
) &&
387 ASIdentifierChoice_is_canonical(asid
->rdi
)));
391 * Whack an ASIdentifierChoice into canonical form.
393 static int ASIdentifierChoice_canonize(ASIdentifierChoice
*choice
)
395 ASN1_INTEGER
*a_max_plus_one
= NULL
;
400 * Nothing to do for empty element or inheritance.
402 if (choice
== NULL
|| choice
->type
== ASIdentifierChoice_inherit
)
406 * If not a list, or if empty list, it's broken.
408 if (choice
->type
!= ASIdentifierChoice_asIdsOrRanges
||
409 sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
) == 0) {
410 X509V3err(X509V3_F_ASIDENTIFIERCHOICE_CANONIZE
,
411 X509V3_R_EXTENSION_VALUE_ERROR
);
416 * We have a non-empty list. Sort it.
418 sk_ASIdOrRange_sort(choice
->u
.asIdsOrRanges
);
421 * Now check for errors and suboptimal encoding, rejecting the
422 * former and fixing the latter.
424 for (i
= 0; i
< sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
) - 1; i
++) {
425 ASIdOrRange
*a
= sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
);
426 ASIdOrRange
*b
= sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
+ 1);
427 ASN1_INTEGER
*a_min
, *a_max
, *b_min
, *b_max
;
429 extract_min_max(a
, &a_min
, &a_max
);
430 extract_min_max(b
, &b_min
, &b_max
);
433 * Make sure we're properly sorted (paranoia).
435 OPENSSL_assert(ASN1_INTEGER_cmp(a_min
, b_min
) <= 0);
438 * Punt inverted ranges.
440 if (ASN1_INTEGER_cmp(a_min
, a_max
) > 0 ||
441 ASN1_INTEGER_cmp(b_min
, b_max
) > 0)
445 * Check for overlaps.
447 if (ASN1_INTEGER_cmp(a_max
, b_min
) >= 0) {
448 X509V3err(X509V3_F_ASIDENTIFIERCHOICE_CANONIZE
,
449 X509V3_R_EXTENSION_VALUE_ERROR
);
454 * Calculate a_max + 1 to check for adjacency.
456 if ((bn
== NULL
&& (bn
= BN_new()) == NULL
) ||
457 ASN1_INTEGER_to_BN(a_max
, bn
) == NULL
||
458 !BN_add_word(bn
, 1) ||
460 BN_to_ASN1_INTEGER(bn
, a_max_plus_one
)) == NULL
) {
461 X509V3err(X509V3_F_ASIDENTIFIERCHOICE_CANONIZE
,
462 ERR_R_MALLOC_FAILURE
);
467 * If a and b are adjacent, merge them.
469 if (ASN1_INTEGER_cmp(a_max_plus_one
, b_min
) == 0) {
473 if ((r
= OPENSSL_malloc(sizeof(ASRange
))) == NULL
) {
474 X509V3err(X509V3_F_ASIDENTIFIERCHOICE_CANONIZE
,
475 ERR_R_MALLOC_FAILURE
);
480 a
->type
= ASIdOrRange_range
;
483 case ASIdOrRange_range
:
484 ASN1_INTEGER_free(a
->u
.range
->max
);
485 a
->u
.range
->max
= b_max
;
492 case ASIdOrRange_range
:
493 b
->u
.range
->max
= NULL
;
497 (void)sk_ASIdOrRange_delete(choice
->u
.asIdsOrRanges
, i
+ 1);
504 * Check for final inverted range.
506 i
= sk_ASIdOrRange_num(choice
->u
.asIdsOrRanges
) - 1;
508 ASIdOrRange
*a
= sk_ASIdOrRange_value(choice
->u
.asIdsOrRanges
, i
);
509 ASN1_INTEGER
*a_min
, *a_max
;
510 if (a
!= NULL
&& a
->type
== ASIdOrRange_range
) {
511 extract_min_max(a
, &a_min
, &a_max
);
512 if (ASN1_INTEGER_cmp(a_min
, a_max
) > 0)
517 OPENSSL_assert(ASIdentifierChoice_is_canonical(choice
)); /* Paranoia */
522 ASN1_INTEGER_free(a_max_plus_one
);
528 * Whack an ASIdentifier extension into canonical form.
530 int v3_asid_canonize(ASIdentifiers
*asid
)
532 return (asid
== NULL
||
533 (ASIdentifierChoice_canonize(asid
->asnum
) &&
534 ASIdentifierChoice_canonize(asid
->rdi
)));
538 * v2i method for an ASIdentifier extension.
540 static void *v2i_ASIdentifiers(const struct v3_ext_method
*method
,
541 struct v3_ext_ctx
*ctx
,
542 STACK_OF(CONF_VALUE
) *values
)
544 ASN1_INTEGER
*min
= NULL
, *max
= NULL
;
545 ASIdentifiers
*asid
= NULL
;
548 if ((asid
= ASIdentifiers_new()) == NULL
) {
549 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
, ERR_R_MALLOC_FAILURE
);
553 for (i
= 0; i
< sk_CONF_VALUE_num(values
); i
++) {
554 CONF_VALUE
*val
= sk_CONF_VALUE_value(values
, i
);
555 int i1
, i2
, i3
, is_range
, which
;
558 * Figure out whether this is an AS or an RDI.
560 if (!name_cmp(val
->name
, "AS")) {
561 which
= V3_ASID_ASNUM
;
562 } else if (!name_cmp(val
->name
, "RDI")) {
565 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
,
566 X509V3_R_EXTENSION_NAME_ERROR
);
567 X509V3_conf_err(val
);
572 * Handle inheritance.
574 if (!strcmp(val
->value
, "inherit")) {
575 if (v3_asid_add_inherit(asid
, which
))
577 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
,
578 X509V3_R_INVALID_INHERITANCE
);
579 X509V3_conf_err(val
);
584 * Number, range, or mistake, pick it apart and figure out which.
586 i1
= strspn(val
->value
, "0123456789");
587 if (val
->value
[i1
] == '\0') {
591 i2
= i1
+ strspn(val
->value
+ i1
, " \t");
592 if (val
->value
[i2
] != '-') {
593 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
,
594 X509V3_R_INVALID_ASNUMBER
);
595 X509V3_conf_err(val
);
599 i2
= i2
+ strspn(val
->value
+ i2
, " \t");
600 i3
= i2
+ strspn(val
->value
+ i2
, "0123456789");
601 if (val
->value
[i3
] != '\0') {
602 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
,
603 X509V3_R_INVALID_ASRANGE
);
604 X509V3_conf_err(val
);
610 * Syntax is ok, read and add it.
613 if (!X509V3_get_value_int(val
, &min
)) {
614 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
, ERR_R_MALLOC_FAILURE
);
618 char *s
= BUF_strdup(val
->value
);
620 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
, ERR_R_MALLOC_FAILURE
);
624 min
= s2i_ASN1_INTEGER(NULL
, s
);
625 max
= s2i_ASN1_INTEGER(NULL
, s
+ i2
);
627 if (min
== NULL
|| max
== NULL
) {
628 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
, ERR_R_MALLOC_FAILURE
);
631 if (ASN1_INTEGER_cmp(min
, max
) > 0) {
632 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
,
633 X509V3_R_EXTENSION_VALUE_ERROR
);
637 if (!v3_asid_add_id_or_range(asid
, which
, min
, max
)) {
638 X509V3err(X509V3_F_V2I_ASIDENTIFIERS
, ERR_R_MALLOC_FAILURE
);
645 * Canonize the result, then we're done.
647 if (!v3_asid_canonize(asid
))
652 ASIdentifiers_free(asid
);
653 ASN1_INTEGER_free(min
);
654 ASN1_INTEGER_free(max
);
661 const X509V3_EXT_METHOD v3_asid
= {
662 NID_sbgp_autonomousSysNum
, /* nid */
664 ASN1_ITEM_ref(ASIdentifiers
), /* template */
665 0, 0, 0, 0, /* old functions, ignored */
669 v2i_ASIdentifiers
, /* v2i */
670 i2r_ASIdentifiers
, /* i2r */
672 NULL
/* extension-specific data */
676 * Figure out whether extension uses inheritance.
678 int v3_asid_inherits(ASIdentifiers
*asid
)
680 return (asid
!= NULL
&&
681 ((asid
->asnum
!= NULL
&&
682 asid
->asnum
->type
== ASIdentifierChoice_inherit
) ||
683 (asid
->rdi
!= NULL
&&
684 asid
->rdi
->type
== ASIdentifierChoice_inherit
)));
688 * Figure out whether parent contains child.
690 static int asid_contains(ASIdOrRanges
*parent
, ASIdOrRanges
*child
)
692 ASN1_INTEGER
*p_min
, *p_max
, *c_min
, *c_max
;
695 if (child
== NULL
|| parent
== child
)
701 for (c
= 0; c
< sk_ASIdOrRange_num(child
); c
++) {
702 extract_min_max(sk_ASIdOrRange_value(child
, c
), &c_min
, &c_max
);
704 if (p
>= sk_ASIdOrRange_num(parent
))
706 extract_min_max(sk_ASIdOrRange_value(parent
, p
), &p_min
, &p_max
);
707 if (ASN1_INTEGER_cmp(p_max
, c_max
) < 0)
709 if (ASN1_INTEGER_cmp(p_min
, c_min
) > 0)
719 * Test whether a is a subet of b.
721 int v3_asid_subset(ASIdentifiers
*a
, ASIdentifiers
*b
)
726 !v3_asid_inherits(a
) &&
727 !v3_asid_inherits(b
) &&
728 asid_contains(b
->asnum
->u
.asIdsOrRanges
,
729 a
->asnum
->u
.asIdsOrRanges
) &&
730 asid_contains(b
->rdi
->u
.asIdsOrRanges
,
731 a
->rdi
->u
.asIdsOrRanges
)));
735 * Validation error handling via callback.
737 # define validation_err(_err_) \
740 ctx->error = _err_; \
741 ctx->error_depth = i; \
742 ctx->current_cert = x; \
743 ret = ctx->verify_cb(0, ctx); \
752 * Core code for RFC 3779 3.3 path validation.
754 static int v3_asid_validate_path_internal(X509_STORE_CTX
*ctx
,
755 STACK_OF(X509
) *chain
,
758 ASIdOrRanges
*child_as
= NULL
, *child_rdi
= NULL
;
759 int i
, ret
= 1, inherit_as
= 0, inherit_rdi
= 0;
762 OPENSSL_assert(chain
!= NULL
&& sk_X509_num(chain
) > 0);
763 OPENSSL_assert(ctx
!= NULL
|| ext
!= NULL
);
764 OPENSSL_assert(ctx
== NULL
|| ctx
->verify_cb
!= NULL
);
767 * Figure out where to start. If we don't have an extension to
768 * check, we're done. Otherwise, check canonical form and
769 * set up for walking up the chain.
776 x
= sk_X509_value(chain
, i
);
777 OPENSSL_assert(x
!= NULL
);
778 if ((ext
= x
->rfc3779_asid
) == NULL
)
781 if (!v3_asid_is_canonical(ext
))
782 validation_err(X509_V_ERR_INVALID_EXTENSION
);
783 if (ext
->asnum
!= NULL
) {
784 switch (ext
->asnum
->type
) {
785 case ASIdentifierChoice_inherit
:
788 case ASIdentifierChoice_asIdsOrRanges
:
789 child_as
= ext
->asnum
->u
.asIdsOrRanges
;
793 if (ext
->rdi
!= NULL
) {
794 switch (ext
->rdi
->type
) {
795 case ASIdentifierChoice_inherit
:
798 case ASIdentifierChoice_asIdsOrRanges
:
799 child_rdi
= ext
->rdi
->u
.asIdsOrRanges
;
805 * Now walk up the chain. Extensions must be in canonical form, no
806 * cert may list resources that its parent doesn't list.
808 for (i
++; i
< sk_X509_num(chain
); i
++) {
809 x
= sk_X509_value(chain
, i
);
810 OPENSSL_assert(x
!= NULL
);
811 if (x
->rfc3779_asid
== NULL
) {
812 if (child_as
!= NULL
|| child_rdi
!= NULL
)
813 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
816 if (!v3_asid_is_canonical(x
->rfc3779_asid
))
817 validation_err(X509_V_ERR_INVALID_EXTENSION
);
818 if (x
->rfc3779_asid
->asnum
== NULL
&& child_as
!= NULL
) {
819 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
823 if (x
->rfc3779_asid
->asnum
!= NULL
&&
824 x
->rfc3779_asid
->asnum
->type
==
825 ASIdentifierChoice_asIdsOrRanges
) {
827 || asid_contains(x
->rfc3779_asid
->asnum
->u
.asIdsOrRanges
,
829 child_as
= x
->rfc3779_asid
->asnum
->u
.asIdsOrRanges
;
832 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
835 if (x
->rfc3779_asid
->rdi
== NULL
&& child_rdi
!= NULL
) {
836 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
840 if (x
->rfc3779_asid
->rdi
!= NULL
&&
841 x
->rfc3779_asid
->rdi
->type
== ASIdentifierChoice_asIdsOrRanges
) {
843 asid_contains(x
->rfc3779_asid
->rdi
->u
.asIdsOrRanges
,
845 child_rdi
= x
->rfc3779_asid
->rdi
->u
.asIdsOrRanges
;
848 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
854 * Trust anchor can't inherit.
856 OPENSSL_assert(x
!= NULL
);
857 if (x
->rfc3779_asid
!= NULL
) {
858 if (x
->rfc3779_asid
->asnum
!= NULL
&&
859 x
->rfc3779_asid
->asnum
->type
== ASIdentifierChoice_inherit
)
860 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
861 if (x
->rfc3779_asid
->rdi
!= NULL
&&
862 x
->rfc3779_asid
->rdi
->type
== ASIdentifierChoice_inherit
)
863 validation_err(X509_V_ERR_UNNESTED_RESOURCE
);
870 # undef validation_err
873 * RFC 3779 3.3 path validation -- called from X509_verify_cert().
875 int v3_asid_validate_path(X509_STORE_CTX
*ctx
)
877 return v3_asid_validate_path_internal(ctx
, ctx
->chain
, NULL
);
881 * RFC 3779 3.3 path validation of an extension.
882 * Test whether chain covers extension.
884 int v3_asid_validate_resource_set(STACK_OF(X509
) *chain
,
885 ASIdentifiers
*ext
, int allow_inheritance
)
889 if (chain
== NULL
|| sk_X509_num(chain
) == 0)
891 if (!allow_inheritance
&& v3_asid_inherits(ext
))
893 return v3_asid_validate_path_internal(NULL
, chain
, ext
);
896 #endif /* OPENSSL_NO_RFC3779 */