1/*
2 * Copyright 1999-2022 The OpenSSL Project Authors. All Rights Reserved.
3 *
4 * Licensed under the OpenSSL license (the "License").  You may not use
5 * this file except in compliance with the License.  You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
8 */
9
10/* Internal tests for the asn1 module */
11
12#include <stdio.h>
13#include <string.h>
14
15#include <openssl/asn1.h>
16#include <openssl/evp.h>
17#include <openssl/objects.h>
18#include "testutil.h"
19#include "internal/nelem.h"
20
21/**********************************************************************
22 *
23 * Test of a_strnid's tbl_standard
24 *
25 ***/
26
27#include "../crypto/asn1/tbl_standard.h"
28
29static int test_tbl_standard(void)
30{
31    const ASN1_STRING_TABLE *tmp;
32    int last_nid = -1;
33    size_t i;
34
35    for (tmp = tbl_standard, i = 0; i < OSSL_NELEM(tbl_standard); i++, tmp++) {
36        if (tmp->nid < last_nid) {
37            last_nid = 0;
38            break;
39        }
40        last_nid = tmp->nid;
41    }
42
43    if (TEST_int_ne(last_nid, 0)) {
44        TEST_info("asn1 tbl_standard: Table order OK");
45        return 1;
46    }
47
48    TEST_info("asn1 tbl_standard: out of order");
49    for (tmp = tbl_standard, i = 0; i < OSSL_NELEM(tbl_standard); i++, tmp++)
50        TEST_note("asn1 tbl_standard: Index %zu, NID %d, Name=%s",
51                  i, tmp->nid, OBJ_nid2ln(tmp->nid));
52
53    return 0;
54}
55
56/**********************************************************************
57 *
58 * Test of ameth_lib's standard_methods
59 *
60 ***/
61
62#include "crypto/asn1.h"
63#include "../crypto/asn1/standard_methods.h"
64
65static int test_standard_methods(void)
66{
67    const EVP_PKEY_ASN1_METHOD **tmp;
68    int last_pkey_id = -1;
69    size_t i;
70    int ok = 1;
71
72    for (tmp = standard_methods, i = 0; i < OSSL_NELEM(standard_methods);
73         i++, tmp++) {
74        if ((*tmp)->pkey_id < last_pkey_id) {
75            last_pkey_id = 0;
76            break;
77        }
78        last_pkey_id = (*tmp)->pkey_id;
79
80        /*
81         * One of the following must be true:
82         *
83         * pem_str == NULL AND ASN1_PKEY_ALIAS is set
84         * pem_str != NULL AND ASN1_PKEY_ALIAS is clear
85         *
86         * Anything else is an error and may lead to a corrupt ASN1 method table
87         */
88        if (!TEST_true(((*tmp)->pem_str == NULL && ((*tmp)->pkey_flags & ASN1_PKEY_ALIAS) != 0)
89                       || ((*tmp)->pem_str != NULL && ((*tmp)->pkey_flags & ASN1_PKEY_ALIAS) == 0))) {
90            TEST_note("asn1 standard methods: Index %zu, pkey ID %d, Name=%s",
91                      i, (*tmp)->pkey_id, OBJ_nid2sn((*tmp)->pkey_id));
92            ok = 0;
93        }
94    }
95
96    if (TEST_int_ne(last_pkey_id, 0)) {
97        TEST_info("asn1 standard methods: Table order OK");
98        return ok;
99    }
100
101    TEST_note("asn1 standard methods: out of order");
102    for (tmp = standard_methods, i = 0; i < OSSL_NELEM(standard_methods);
103         i++, tmp++)
104        TEST_note("asn1 standard methods: Index %zu, pkey ID %d, Name=%s",
105                  i, (*tmp)->pkey_id, OBJ_nid2sn((*tmp)->pkey_id));
106
107    return 0;
108}
109
110/**********************************************************************
111 *
112 * Regression test for issue where OBJ_nid2obj does not raise
113 * an error when a NID is not registered.
114 *
115 ***/
116static int test_nid2obj_nonexist(void)
117{
118    ASN1_OBJECT *obj;
119    unsigned long err;
120
121    obj = OBJ_nid2obj(INT_MAX);
122    if (!TEST_true(obj == NULL))
123        return 0;
124
125    err = ERR_get_error();
126
127    if (!TEST_int_eq(ERR_GET_FUNC(err), OBJ_F_OBJ_NID2OBJ))
128        return 0;
129
130    if (!TEST_int_eq(ERR_GET_REASON(err), OBJ_R_UNKNOWN_NID))
131        return 0;
132
133    return 1;
134}
135
136int setup_tests(void)
137{
138    ADD_TEST(test_tbl_standard);
139    ADD_TEST(test_standard_methods);
140    ADD_TEST(test_nid2obj_nonexist);
141    return 1;
142}
143