check in v3.8.1 source
This commit is contained in:
363
crypto/objects/o_names.c
Normal file
363
crypto/objects/o_names.c
Normal file
@@ -0,0 +1,363 @@
|
||||
/* $OpenBSD: o_names.c,v 1.24 2023/07/08 12:27:51 beck Exp $ */
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
|
||||
#include <openssl/opensslconf.h>
|
||||
|
||||
#include <openssl/err.h>
|
||||
#include <openssl/lhash.h>
|
||||
#include <openssl/objects.h>
|
||||
#include <openssl/safestack.h>
|
||||
|
||||
/* I use the ex_data stuff to manage the identifiers for the obj_name_types
|
||||
* that applications may define. I only really use the free function field.
|
||||
*/
|
||||
DECLARE_LHASH_OF(OBJ_NAME);
|
||||
static LHASH_OF(OBJ_NAME) *names_lh = NULL;
|
||||
static int names_type_num = OBJ_NAME_TYPE_NUM;
|
||||
|
||||
typedef struct name_funcs_st {
|
||||
unsigned long (*hash_func)(const char *name);
|
||||
int (*cmp_func)(const char *a, const char *b);
|
||||
void (*free_func)(const char *, int, const char *);
|
||||
} NAME_FUNCS;
|
||||
|
||||
DECLARE_STACK_OF(NAME_FUNCS)
|
||||
|
||||
static STACK_OF(NAME_FUNCS) *name_funcs_stack;
|
||||
|
||||
/* The LHASH callbacks now use the raw "void *" prototypes and do per-variable
|
||||
* casting in the functions. This prevents function pointer casting without the
|
||||
* need for macro-generated wrapper functions. */
|
||||
|
||||
/* static unsigned long obj_name_hash(OBJ_NAME *a); */
|
||||
static unsigned long obj_name_hash(const void *a_void);
|
||||
/* static int obj_name_cmp(OBJ_NAME *a,OBJ_NAME *b); */
|
||||
static int obj_name_cmp(const void *a_void, const void *b_void);
|
||||
|
||||
static IMPLEMENT_LHASH_HASH_FN(obj_name, OBJ_NAME)
|
||||
static IMPLEMENT_LHASH_COMP_FN(obj_name, OBJ_NAME)
|
||||
|
||||
int
|
||||
OBJ_NAME_init(void)
|
||||
{
|
||||
if (names_lh != NULL)
|
||||
return (1);
|
||||
names_lh = lh_OBJ_NAME_new();
|
||||
return (names_lh != NULL);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_init);
|
||||
|
||||
int
|
||||
OBJ_NAME_new_index(unsigned long (*hash_func)(const char *),
|
||||
int (*cmp_func)(const char *, const char *),
|
||||
void (*free_func)(const char *, int, const char *))
|
||||
{
|
||||
int ret;
|
||||
int i;
|
||||
NAME_FUNCS *name_funcs;
|
||||
|
||||
if (name_funcs_stack == NULL)
|
||||
name_funcs_stack = sk_NAME_FUNCS_new_null();
|
||||
if (name_funcs_stack == NULL)
|
||||
return (0);
|
||||
|
||||
ret = names_type_num;
|
||||
names_type_num++;
|
||||
for (i = sk_NAME_FUNCS_num(name_funcs_stack); i < names_type_num; i++) {
|
||||
name_funcs = malloc(sizeof(NAME_FUNCS));
|
||||
if (!name_funcs) {
|
||||
OBJerror(ERR_R_MALLOC_FAILURE);
|
||||
return (0);
|
||||
}
|
||||
name_funcs->hash_func = lh_strhash;
|
||||
name_funcs->cmp_func = strcmp;
|
||||
name_funcs->free_func = NULL;
|
||||
if (sk_NAME_FUNCS_push(name_funcs_stack, name_funcs) == 0) {
|
||||
free(name_funcs);
|
||||
OBJerror(ERR_R_MALLOC_FAILURE);
|
||||
return (0);
|
||||
}
|
||||
}
|
||||
name_funcs = sk_NAME_FUNCS_value(name_funcs_stack, ret);
|
||||
if (hash_func != NULL)
|
||||
name_funcs->hash_func = hash_func;
|
||||
if (cmp_func != NULL)
|
||||
name_funcs->cmp_func = cmp_func;
|
||||
if (free_func != NULL)
|
||||
name_funcs->free_func = free_func;
|
||||
return (ret);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_new_index);
|
||||
|
||||
/* static int obj_name_cmp(OBJ_NAME *a, OBJ_NAME *b) */
|
||||
static int
|
||||
obj_name_cmp(const void *a_void, const void *b_void)
|
||||
{
|
||||
int ret;
|
||||
const OBJ_NAME *a = (const OBJ_NAME *)a_void;
|
||||
const OBJ_NAME *b = (const OBJ_NAME *)b_void;
|
||||
|
||||
ret = a->type - b->type;
|
||||
if (ret == 0) {
|
||||
if ((name_funcs_stack != NULL) &&
|
||||
(sk_NAME_FUNCS_num(name_funcs_stack) > a->type)) {
|
||||
ret = sk_NAME_FUNCS_value(name_funcs_stack,
|
||||
a->type)->cmp_func(a->name, b->name);
|
||||
} else
|
||||
ret = strcmp(a->name, b->name);
|
||||
}
|
||||
return (ret);
|
||||
}
|
||||
|
||||
/* static unsigned long obj_name_hash(OBJ_NAME *a) */
|
||||
static unsigned long
|
||||
obj_name_hash(const void *a_void)
|
||||
{
|
||||
unsigned long ret;
|
||||
const OBJ_NAME *a = (const OBJ_NAME *)a_void;
|
||||
|
||||
if ((name_funcs_stack != NULL) &&
|
||||
(sk_NAME_FUNCS_num(name_funcs_stack) > a->type)) {
|
||||
ret = sk_NAME_FUNCS_value(name_funcs_stack,
|
||||
a->type)->hash_func(a->name);
|
||||
} else {
|
||||
ret = lh_strhash(a->name);
|
||||
}
|
||||
ret ^= a->type;
|
||||
return (ret);
|
||||
}
|
||||
|
||||
const char *
|
||||
OBJ_NAME_get(const char *name, int type)
|
||||
{
|
||||
OBJ_NAME on, *ret;
|
||||
int num = 0, alias;
|
||||
|
||||
if (name == NULL)
|
||||
return (NULL);
|
||||
if ((names_lh == NULL) && !OBJ_NAME_init())
|
||||
return (NULL);
|
||||
|
||||
alias = type&OBJ_NAME_ALIAS;
|
||||
type&= ~OBJ_NAME_ALIAS;
|
||||
|
||||
on.name = name;
|
||||
on.type = type;
|
||||
|
||||
for (;;) {
|
||||
ret = lh_OBJ_NAME_retrieve(names_lh, &on);
|
||||
if (ret == NULL)
|
||||
return (NULL);
|
||||
if ((ret->alias) && !alias) {
|
||||
if (++num > 10)
|
||||
return (NULL);
|
||||
on.name = ret->data;
|
||||
} else {
|
||||
return (ret->data);
|
||||
}
|
||||
}
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_get);
|
||||
|
||||
int
|
||||
OBJ_NAME_add(const char *name, int type, const char *data)
|
||||
{
|
||||
OBJ_NAME *onp, *ret;
|
||||
int alias;
|
||||
|
||||
if ((names_lh == NULL) && !OBJ_NAME_init())
|
||||
return (0);
|
||||
|
||||
alias = type & OBJ_NAME_ALIAS;
|
||||
type &= ~OBJ_NAME_ALIAS;
|
||||
|
||||
onp = malloc(sizeof(OBJ_NAME));
|
||||
if (onp == NULL) {
|
||||
/* ERROR */
|
||||
return (0);
|
||||
}
|
||||
|
||||
onp->name = name;
|
||||
onp->alias = alias;
|
||||
onp->type = type;
|
||||
onp->data = data;
|
||||
|
||||
ret = lh_OBJ_NAME_insert(names_lh, onp);
|
||||
if (ret != NULL) {
|
||||
/* free things */
|
||||
if ((name_funcs_stack != NULL) &&
|
||||
(sk_NAME_FUNCS_num(name_funcs_stack) > ret->type)) {
|
||||
/* XXX: I'm not sure I understand why the free
|
||||
* function should get three arguments...
|
||||
* -- Richard Levitte
|
||||
*/
|
||||
sk_NAME_FUNCS_value(
|
||||
name_funcs_stack, ret->type)->free_func(
|
||||
ret->name, ret->type, ret->data);
|
||||
}
|
||||
free(ret);
|
||||
} else {
|
||||
if (lh_OBJ_NAME_error(names_lh)) {
|
||||
free(onp);
|
||||
/* ERROR */
|
||||
return (0);
|
||||
}
|
||||
}
|
||||
return (1);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_add);
|
||||
|
||||
int
|
||||
OBJ_NAME_remove(const char *name, int type)
|
||||
{
|
||||
OBJ_NAME on, *ret;
|
||||
|
||||
if (names_lh == NULL)
|
||||
return (0);
|
||||
|
||||
type &= ~OBJ_NAME_ALIAS;
|
||||
on.name = name;
|
||||
on.type = type;
|
||||
ret = lh_OBJ_NAME_delete(names_lh, &on);
|
||||
if (ret != NULL) {
|
||||
/* free things */
|
||||
if ((name_funcs_stack != NULL) &&
|
||||
(sk_NAME_FUNCS_num(name_funcs_stack) > ret->type)) {
|
||||
/* XXX: I'm not sure I understand why the free
|
||||
* function should get three arguments...
|
||||
* -- Richard Levitte
|
||||
*/
|
||||
sk_NAME_FUNCS_value(
|
||||
name_funcs_stack, ret->type)->free_func(
|
||||
ret->name, ret->type, ret->data);
|
||||
}
|
||||
free(ret);
|
||||
return (1);
|
||||
} else
|
||||
return (0);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_remove);
|
||||
|
||||
struct doall {
|
||||
int type;
|
||||
void (*fn)(const OBJ_NAME *, void *arg);
|
||||
void *arg;
|
||||
};
|
||||
|
||||
static void
|
||||
do_all_fn_doall_arg(const OBJ_NAME *name, struct doall *d)
|
||||
{
|
||||
if (name->type == d->type)
|
||||
d->fn(name, d->arg);
|
||||
}
|
||||
|
||||
static IMPLEMENT_LHASH_DOALL_ARG_FN(do_all_fn, const OBJ_NAME, struct doall)
|
||||
|
||||
void
|
||||
OBJ_NAME_do_all(int type, void (*fn)(const OBJ_NAME *, void *arg), void *arg)
|
||||
{
|
||||
struct doall d;
|
||||
|
||||
d.type = type;
|
||||
d.fn = fn;
|
||||
d.arg = arg;
|
||||
|
||||
lh_OBJ_NAME_doall_arg(names_lh, LHASH_DOALL_ARG_FN(do_all_fn),
|
||||
struct doall, &d);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_do_all);
|
||||
|
||||
struct doall_sorted {
|
||||
int type;
|
||||
int n;
|
||||
const OBJ_NAME **names;
|
||||
};
|
||||
|
||||
static void
|
||||
do_all_sorted_fn(const OBJ_NAME *name, void *d_)
|
||||
{
|
||||
struct doall_sorted *d = d_;
|
||||
|
||||
if (name->type != d->type)
|
||||
return;
|
||||
|
||||
d->names[d->n++] = name;
|
||||
}
|
||||
|
||||
static int
|
||||
do_all_sorted_cmp(const void *n1_, const void *n2_)
|
||||
{
|
||||
const OBJ_NAME * const *n1 = n1_;
|
||||
const OBJ_NAME * const *n2 = n2_;
|
||||
|
||||
return strcmp((*n1)->name, (*n2)->name);
|
||||
}
|
||||
|
||||
void
|
||||
OBJ_NAME_do_all_sorted(int type, void (*fn)(const OBJ_NAME *, void *arg),
|
||||
void *arg)
|
||||
{
|
||||
struct doall_sorted d;
|
||||
int n;
|
||||
|
||||
d.type = type;
|
||||
d.names = reallocarray(NULL, lh_OBJ_NAME_num_items(names_lh),
|
||||
sizeof *d.names);
|
||||
d.n = 0;
|
||||
if (d.names != NULL) {
|
||||
OBJ_NAME_do_all(type, do_all_sorted_fn, &d);
|
||||
|
||||
qsort((void *)d.names, d.n, sizeof *d.names, do_all_sorted_cmp);
|
||||
|
||||
for (n = 0; n < d.n; ++n)
|
||||
fn(d.names[n], arg);
|
||||
|
||||
free(d.names);
|
||||
}
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_do_all_sorted);
|
||||
|
||||
static int free_type;
|
||||
|
||||
static void
|
||||
names_lh_free_doall(OBJ_NAME *onp)
|
||||
{
|
||||
if (onp == NULL)
|
||||
return;
|
||||
|
||||
if (free_type < 0 || free_type == onp->type)
|
||||
OBJ_NAME_remove(onp->name, onp->type);
|
||||
}
|
||||
|
||||
static IMPLEMENT_LHASH_DOALL_FN(names_lh_free, OBJ_NAME)
|
||||
|
||||
static void
|
||||
name_funcs_free(NAME_FUNCS *ptr)
|
||||
{
|
||||
free(ptr);
|
||||
}
|
||||
|
||||
void
|
||||
OBJ_NAME_cleanup(int type)
|
||||
{
|
||||
unsigned long down_load;
|
||||
|
||||
if (names_lh == NULL)
|
||||
return;
|
||||
|
||||
free_type = type;
|
||||
down_load = lh_OBJ_NAME_down_load(names_lh);
|
||||
lh_OBJ_NAME_down_load(names_lh) = 0;
|
||||
|
||||
lh_OBJ_NAME_doall(names_lh, LHASH_DOALL_FN(names_lh_free));
|
||||
if (type < 0) {
|
||||
lh_OBJ_NAME_free(names_lh);
|
||||
sk_NAME_FUNCS_pop_free(name_funcs_stack, name_funcs_free);
|
||||
names_lh = NULL;
|
||||
name_funcs_stack = NULL;
|
||||
} else
|
||||
lh_OBJ_NAME_down_load(names_lh) = down_load;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_NAME_cleanup);
|
704
crypto/objects/obj_dat.c
Normal file
704
crypto/objects/obj_dat.c
Normal file
@@ -0,0 +1,704 @@
|
||||
/* $OpenBSD: obj_dat.c,v 1.60 2023/08/17 09:28:43 tb Exp $ */
|
||||
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
|
||||
* All rights reserved.
|
||||
*
|
||||
* This package is an SSL implementation written
|
||||
* by Eric Young (eay@cryptsoft.com).
|
||||
* The implementation was written so as to conform with Netscapes SSL.
|
||||
*
|
||||
* This library is free for commercial and non-commercial use as long as
|
||||
* the following conditions are aheared to. The following conditions
|
||||
* apply to all code found in this distribution, be it the RC4, RSA,
|
||||
* lhash, DES, etc., code; not just the SSL code. The SSL documentation
|
||||
* included with this distribution is covered by the same copyright terms
|
||||
* except that the holder is Tim Hudson (tjh@cryptsoft.com).
|
||||
*
|
||||
* Copyright remains Eric Young's, and as such any Copyright notices in
|
||||
* the code are not to be removed.
|
||||
* If this package is used in a product, Eric Young should be given attribution
|
||||
* as the author of the parts of the library used.
|
||||
* This can be in the form of a textual message at program startup or
|
||||
* in documentation (online or textual) provided with the package.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
* 1. Redistributions of source code must retain the copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
* 3. All advertising materials mentioning features or use of this software
|
||||
* must display the following acknowledgement:
|
||||
* "This product includes cryptographic software written by
|
||||
* Eric Young (eay@cryptsoft.com)"
|
||||
* The word 'cryptographic' can be left out if the rouines from the library
|
||||
* being used are not cryptographic related :-).
|
||||
* 4. If you include any Windows specific code (or a derivative thereof) from
|
||||
* the apps directory (application code) you must include an acknowledgement:
|
||||
* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
*
|
||||
* The licence and distribution terms for any publically available version or
|
||||
* derivative of this code cannot be changed. i.e. this code cannot simply be
|
||||
* copied and put under another distribution licence
|
||||
* [including the GNU Public Licence.]
|
||||
*/
|
||||
|
||||
#include <ctype.h>
|
||||
#include <limits.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
||||
#include <openssl/opensslconf.h>
|
||||
|
||||
#include <openssl/asn1.h>
|
||||
#include <openssl/bn.h>
|
||||
#include <openssl/err.h>
|
||||
#include <openssl/lhash.h>
|
||||
#include <openssl/objects.h>
|
||||
|
||||
#include "asn1_local.h"
|
||||
|
||||
/* obj_dat.h is generated from objects.h by obj_dat.pl */
|
||||
#include "obj_dat.h"
|
||||
|
||||
static int sn_cmp_BSEARCH_CMP_FN(const void *, const void *);
|
||||
static int sn_cmp(const ASN1_OBJECT * const *, unsigned int const *);
|
||||
static unsigned int *OBJ_bsearch_sn(const ASN1_OBJECT * *key, unsigned int const *base, int num);
|
||||
static int ln_cmp_BSEARCH_CMP_FN(const void *, const void *);
|
||||
static int ln_cmp(const ASN1_OBJECT * const *, unsigned int const *);
|
||||
static unsigned int *OBJ_bsearch_ln(const ASN1_OBJECT * *key, unsigned int const *base, int num);
|
||||
static int obj_cmp_BSEARCH_CMP_FN(const void *, const void *);
|
||||
static int obj_cmp(const ASN1_OBJECT * const *, unsigned int const *);
|
||||
static unsigned int *OBJ_bsearch_obj(const ASN1_OBJECT * *key, unsigned int const *base, int num);
|
||||
|
||||
#define ADDED_DATA 0
|
||||
#define ADDED_SNAME 1
|
||||
#define ADDED_LNAME 2
|
||||
#define ADDED_NID 3
|
||||
|
||||
typedef struct added_obj_st {
|
||||
int type;
|
||||
ASN1_OBJECT *obj;
|
||||
} ADDED_OBJ;
|
||||
DECLARE_LHASH_OF(ADDED_OBJ);
|
||||
|
||||
static int new_nid = NUM_NID;
|
||||
static LHASH_OF(ADDED_OBJ) *added = NULL;
|
||||
|
||||
static int sn_cmp(const ASN1_OBJECT * const *a, const unsigned int *b)
|
||||
{
|
||||
return (strcmp((*a)->sn, nid_objs[*b].sn));
|
||||
}
|
||||
|
||||
|
||||
static int
|
||||
sn_cmp_BSEARCH_CMP_FN(const void *a_, const void *b_)
|
||||
{
|
||||
const ASN1_OBJECT * const *a = a_;
|
||||
unsigned int const *b = b_;
|
||||
return sn_cmp(a, b);
|
||||
}
|
||||
|
||||
static unsigned int *
|
||||
OBJ_bsearch_sn(const ASN1_OBJECT * *key, unsigned int const *base, int num)
|
||||
{
|
||||
return (unsigned int *)OBJ_bsearch_(key, base, num, sizeof(unsigned int),
|
||||
sn_cmp_BSEARCH_CMP_FN);
|
||||
}
|
||||
|
||||
static int ln_cmp(const ASN1_OBJECT * const *a, const unsigned int *b)
|
||||
{
|
||||
return (strcmp((*a)->ln, nid_objs[*b].ln));
|
||||
}
|
||||
|
||||
|
||||
static int
|
||||
ln_cmp_BSEARCH_CMP_FN(const void *a_, const void *b_)
|
||||
{
|
||||
const ASN1_OBJECT * const *a = a_;
|
||||
unsigned int const *b = b_;
|
||||
return ln_cmp(a, b);
|
||||
}
|
||||
|
||||
static unsigned int *
|
||||
OBJ_bsearch_ln(const ASN1_OBJECT * *key, unsigned int const *base, int num)
|
||||
{
|
||||
return (unsigned int *)OBJ_bsearch_(key, base, num, sizeof(unsigned int),
|
||||
ln_cmp_BSEARCH_CMP_FN);
|
||||
}
|
||||
|
||||
static unsigned long
|
||||
added_obj_hash(const ADDED_OBJ *ca)
|
||||
{
|
||||
const ASN1_OBJECT *a;
|
||||
int i;
|
||||
unsigned long ret = 0;
|
||||
unsigned char *p;
|
||||
|
||||
a = ca->obj;
|
||||
switch (ca->type) {
|
||||
case ADDED_DATA:
|
||||
ret = a->length << 20L;
|
||||
p = (unsigned char *)a->data;
|
||||
for (i = 0; i < a->length; i++)
|
||||
ret ^= p[i] << ((i * 3) % 24);
|
||||
break;
|
||||
case ADDED_SNAME:
|
||||
ret = lh_strhash(a->sn);
|
||||
break;
|
||||
case ADDED_LNAME:
|
||||
ret = lh_strhash(a->ln);
|
||||
break;
|
||||
case ADDED_NID:
|
||||
ret = a->nid;
|
||||
break;
|
||||
default:
|
||||
return 0;
|
||||
}
|
||||
ret &= 0x3fffffffL;
|
||||
ret |= ca->type << 30L;
|
||||
return (ret);
|
||||
}
|
||||
static IMPLEMENT_LHASH_HASH_FN(added_obj, ADDED_OBJ)
|
||||
|
||||
static int
|
||||
added_obj_cmp(const ADDED_OBJ *ca, const ADDED_OBJ *cb)
|
||||
{
|
||||
const ASN1_OBJECT *a, *b;
|
||||
int cmp;
|
||||
|
||||
if ((cmp = ca->type - cb->type) != 0)
|
||||
return cmp;
|
||||
|
||||
a = ca->obj;
|
||||
b = cb->obj;
|
||||
switch (ca->type) {
|
||||
case ADDED_DATA:
|
||||
return OBJ_cmp(a, b);
|
||||
case ADDED_SNAME:
|
||||
if (a->sn == NULL)
|
||||
return -1;
|
||||
if (b->sn == NULL)
|
||||
return 1;
|
||||
return strcmp(a->sn, b->sn);
|
||||
case ADDED_LNAME:
|
||||
if (a->ln == NULL)
|
||||
return -1;
|
||||
if (b->ln == NULL)
|
||||
return 1;
|
||||
return strcmp(a->ln, b->ln);
|
||||
case ADDED_NID:
|
||||
return a->nid - b->nid;
|
||||
default:
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
static IMPLEMENT_LHASH_COMP_FN(added_obj, ADDED_OBJ)
|
||||
|
||||
static int
|
||||
init_added(void)
|
||||
{
|
||||
if (added != NULL)
|
||||
return (1);
|
||||
added = lh_ADDED_OBJ_new();
|
||||
return (added != NULL);
|
||||
}
|
||||
|
||||
static void
|
||||
cleanup1_doall(ADDED_OBJ *a)
|
||||
{
|
||||
a->obj->nid = 0;
|
||||
a->obj->flags |= ASN1_OBJECT_FLAG_DYNAMIC |
|
||||
ASN1_OBJECT_FLAG_DYNAMIC_STRINGS |
|
||||
ASN1_OBJECT_FLAG_DYNAMIC_DATA;
|
||||
}
|
||||
|
||||
static void cleanup2_doall(ADDED_OBJ *a)
|
||||
{
|
||||
a->obj->nid++;
|
||||
}
|
||||
|
||||
static void
|
||||
cleanup3_doall(ADDED_OBJ *a)
|
||||
{
|
||||
if (--a->obj->nid == 0)
|
||||
ASN1_OBJECT_free(a->obj);
|
||||
free(a);
|
||||
}
|
||||
|
||||
static IMPLEMENT_LHASH_DOALL_FN(cleanup1, ADDED_OBJ)
|
||||
static IMPLEMENT_LHASH_DOALL_FN(cleanup2, ADDED_OBJ)
|
||||
static IMPLEMENT_LHASH_DOALL_FN(cleanup3, ADDED_OBJ)
|
||||
|
||||
/* The purpose of obj_cleanup_defer is to avoid EVP_cleanup() attempting
|
||||
* to use freed up OIDs. If necessary the actual freeing up of OIDs is
|
||||
* delayed.
|
||||
*/
|
||||
|
||||
int obj_cleanup_defer = 0;
|
||||
|
||||
void
|
||||
check_defer(int nid)
|
||||
{
|
||||
if (!obj_cleanup_defer && nid >= NUM_NID)
|
||||
obj_cleanup_defer = 1;
|
||||
}
|
||||
|
||||
void
|
||||
OBJ_cleanup(void)
|
||||
{
|
||||
if (obj_cleanup_defer) {
|
||||
obj_cleanup_defer = 2;
|
||||
return;
|
||||
}
|
||||
if (added == NULL)
|
||||
return;
|
||||
lh_ADDED_OBJ_down_load(added) = 0;
|
||||
lh_ADDED_OBJ_doall(added, LHASH_DOALL_FN(cleanup1)); /* zero counters */
|
||||
lh_ADDED_OBJ_doall(added, LHASH_DOALL_FN(cleanup2)); /* set counters */
|
||||
lh_ADDED_OBJ_doall(added, LHASH_DOALL_FN(cleanup3)); /* free objects */
|
||||
lh_ADDED_OBJ_free(added);
|
||||
added = NULL;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_cleanup);
|
||||
|
||||
int
|
||||
OBJ_new_nid(int num)
|
||||
{
|
||||
int i;
|
||||
|
||||
i = new_nid;
|
||||
new_nid += num;
|
||||
return (i);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_new_nid);
|
||||
|
||||
int
|
||||
OBJ_add_object(const ASN1_OBJECT *obj)
|
||||
{
|
||||
ASN1_OBJECT *o;
|
||||
ADDED_OBJ *ao[4] = {NULL, NULL, NULL, NULL}, *aop;
|
||||
int i;
|
||||
|
||||
if (added == NULL)
|
||||
if (!init_added())
|
||||
return (0);
|
||||
if ((o = OBJ_dup(obj)) == NULL)
|
||||
goto err;
|
||||
if (!(ao[ADDED_NID] = malloc(sizeof(ADDED_OBJ))))
|
||||
goto err2;
|
||||
if ((o->length != 0) && (obj->data != NULL))
|
||||
if (!(ao[ADDED_DATA] = malloc(sizeof(ADDED_OBJ))))
|
||||
goto err2;
|
||||
if (o->sn != NULL)
|
||||
if (!(ao[ADDED_SNAME] = malloc(sizeof(ADDED_OBJ))))
|
||||
goto err2;
|
||||
if (o->ln != NULL)
|
||||
if (!(ao[ADDED_LNAME] = malloc(sizeof(ADDED_OBJ))))
|
||||
goto err2;
|
||||
|
||||
for (i = ADDED_DATA; i <= ADDED_NID; i++) {
|
||||
if (ao[i] != NULL) {
|
||||
ao[i]->type = i;
|
||||
ao[i]->obj = o;
|
||||
aop = lh_ADDED_OBJ_insert(added, ao[i]);
|
||||
/* memory leak, but should not normally matter */
|
||||
free(aop);
|
||||
}
|
||||
}
|
||||
o->flags &= ~(ASN1_OBJECT_FLAG_DYNAMIC |
|
||||
ASN1_OBJECT_FLAG_DYNAMIC_STRINGS |
|
||||
ASN1_OBJECT_FLAG_DYNAMIC_DATA);
|
||||
|
||||
return (o->nid);
|
||||
|
||||
err2:
|
||||
OBJerror(ERR_R_MALLOC_FAILURE);
|
||||
err:
|
||||
for (i = ADDED_DATA; i <= ADDED_NID; i++)
|
||||
free(ao[i]);
|
||||
ASN1_OBJECT_free(o);
|
||||
return (NID_undef);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_add_object);
|
||||
|
||||
ASN1_OBJECT *
|
||||
OBJ_nid2obj(int n)
|
||||
{
|
||||
ADDED_OBJ ad, *adp;
|
||||
ASN1_OBJECT ob;
|
||||
|
||||
if ((n >= 0) && (n < NUM_NID)) {
|
||||
if ((n != NID_undef) && (nid_objs[n].nid == NID_undef)) {
|
||||
OBJerror(OBJ_R_UNKNOWN_NID);
|
||||
return (NULL);
|
||||
}
|
||||
return ((ASN1_OBJECT *)&(nid_objs[n]));
|
||||
} else if (added == NULL)
|
||||
return (NULL);
|
||||
else {
|
||||
ad.type = ADDED_NID;
|
||||
ad.obj = &ob;
|
||||
ob.nid = n;
|
||||
adp = lh_ADDED_OBJ_retrieve(added, &ad);
|
||||
if (adp != NULL)
|
||||
return (adp->obj);
|
||||
else {
|
||||
OBJerror(OBJ_R_UNKNOWN_NID);
|
||||
return (NULL);
|
||||
}
|
||||
}
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_nid2obj);
|
||||
|
||||
const char *
|
||||
OBJ_nid2sn(int n)
|
||||
{
|
||||
ADDED_OBJ ad, *adp;
|
||||
ASN1_OBJECT ob;
|
||||
|
||||
if ((n >= 0) && (n < NUM_NID)) {
|
||||
if ((n != NID_undef) && (nid_objs[n].nid == NID_undef)) {
|
||||
OBJerror(OBJ_R_UNKNOWN_NID);
|
||||
return (NULL);
|
||||
}
|
||||
return (nid_objs[n].sn);
|
||||
} else if (added == NULL)
|
||||
return (NULL);
|
||||
else {
|
||||
ad.type = ADDED_NID;
|
||||
ad.obj = &ob;
|
||||
ob.nid = n;
|
||||
adp = lh_ADDED_OBJ_retrieve(added, &ad);
|
||||
if (adp != NULL)
|
||||
return (adp->obj->sn);
|
||||
else {
|
||||
OBJerror(OBJ_R_UNKNOWN_NID);
|
||||
return (NULL);
|
||||
}
|
||||
}
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_nid2sn);
|
||||
|
||||
const char *
|
||||
OBJ_nid2ln(int n)
|
||||
{
|
||||
ADDED_OBJ ad, *adp;
|
||||
ASN1_OBJECT ob;
|
||||
|
||||
if ((n >= 0) && (n < NUM_NID)) {
|
||||
if ((n != NID_undef) && (nid_objs[n].nid == NID_undef)) {
|
||||
OBJerror(OBJ_R_UNKNOWN_NID);
|
||||
return (NULL);
|
||||
}
|
||||
return (nid_objs[n].ln);
|
||||
} else if (added == NULL)
|
||||
return (NULL);
|
||||
else {
|
||||
ad.type = ADDED_NID;
|
||||
ad.obj = &ob;
|
||||
ob.nid = n;
|
||||
adp = lh_ADDED_OBJ_retrieve(added, &ad);
|
||||
if (adp != NULL)
|
||||
return (adp->obj->ln);
|
||||
else {
|
||||
OBJerror(OBJ_R_UNKNOWN_NID);
|
||||
return (NULL);
|
||||
}
|
||||
}
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_nid2ln);
|
||||
|
||||
static int
|
||||
obj_cmp(const ASN1_OBJECT * const *ap, const unsigned int *bp)
|
||||
{
|
||||
const ASN1_OBJECT *a = *ap;
|
||||
const ASN1_OBJECT *b = &nid_objs[*bp];
|
||||
|
||||
return OBJ_cmp(a, b);
|
||||
}
|
||||
|
||||
static int
|
||||
obj_cmp_BSEARCH_CMP_FN(const void *a_, const void *b_)
|
||||
{
|
||||
const ASN1_OBJECT * const *a = a_;
|
||||
unsigned int const *b = b_;
|
||||
return obj_cmp(a, b);
|
||||
}
|
||||
|
||||
static unsigned int *
|
||||
OBJ_bsearch_obj(const ASN1_OBJECT * *key, unsigned int const *base, int num)
|
||||
{
|
||||
return (unsigned int *)OBJ_bsearch_(key, base, num, sizeof(unsigned int),
|
||||
obj_cmp_BSEARCH_CMP_FN);
|
||||
}
|
||||
|
||||
int
|
||||
OBJ_obj2nid(const ASN1_OBJECT *a)
|
||||
{
|
||||
const unsigned int *op;
|
||||
ADDED_OBJ ad, *adp;
|
||||
|
||||
if (a == NULL || a->length == 0)
|
||||
return (NID_undef);
|
||||
if (a->nid != NID_undef)
|
||||
return (a->nid);
|
||||
|
||||
if (added != NULL) {
|
||||
ad.type = ADDED_DATA;
|
||||
ad.obj=(ASN1_OBJECT *)a; /* XXX: ugly but harmless */
|
||||
adp = lh_ADDED_OBJ_retrieve(added, &ad);
|
||||
if (adp != NULL)
|
||||
return (adp->obj->nid);
|
||||
}
|
||||
op = OBJ_bsearch_obj(&a, obj_objs, NUM_OBJ);
|
||||
if (op == NULL)
|
||||
return (NID_undef);
|
||||
return (nid_objs[*op].nid);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_obj2nid);
|
||||
|
||||
/* Convert an object name into an ASN1_OBJECT
|
||||
* if "noname" is not set then search for short and long names first.
|
||||
* This will convert the "dotted" form into an object: unlike OBJ_txt2nid
|
||||
* it can be used with any objects, not just registered ones.
|
||||
*/
|
||||
|
||||
ASN1_OBJECT *
|
||||
OBJ_txt2obj(const char *s, int no_name)
|
||||
{
|
||||
int nid;
|
||||
|
||||
if (!no_name) {
|
||||
if (((nid = OBJ_sn2nid(s)) != NID_undef) ||
|
||||
((nid = OBJ_ln2nid(s)) != NID_undef) )
|
||||
return OBJ_nid2obj(nid);
|
||||
}
|
||||
|
||||
return t2i_ASN1_OBJECT_internal(s);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_txt2obj);
|
||||
|
||||
int
|
||||
OBJ_obj2txt(char *buf, int buf_len, const ASN1_OBJECT *aobj, int no_name)
|
||||
{
|
||||
return i2t_ASN1_OBJECT_internal(aobj, buf, buf_len, no_name);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_obj2txt);
|
||||
|
||||
int
|
||||
OBJ_txt2nid(const char *s)
|
||||
{
|
||||
ASN1_OBJECT *obj;
|
||||
int nid;
|
||||
|
||||
obj = OBJ_txt2obj(s, 0);
|
||||
nid = OBJ_obj2nid(obj);
|
||||
ASN1_OBJECT_free(obj);
|
||||
return nid;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_txt2nid);
|
||||
|
||||
int
|
||||
OBJ_ln2nid(const char *s)
|
||||
{
|
||||
ASN1_OBJECT o;
|
||||
const ASN1_OBJECT *oo = &o;
|
||||
ADDED_OBJ ad, *adp;
|
||||
const unsigned int *op;
|
||||
|
||||
o.ln = s;
|
||||
if (added != NULL) {
|
||||
ad.type = ADDED_LNAME;
|
||||
ad.obj = &o;
|
||||
adp = lh_ADDED_OBJ_retrieve(added, &ad);
|
||||
if (adp != NULL)
|
||||
return (adp->obj->nid);
|
||||
}
|
||||
op = OBJ_bsearch_ln(&oo, ln_objs, NUM_LN);
|
||||
if (op == NULL)
|
||||
return (NID_undef);
|
||||
return (nid_objs[*op].nid);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_ln2nid);
|
||||
|
||||
int
|
||||
OBJ_sn2nid(const char *s)
|
||||
{
|
||||
ASN1_OBJECT o;
|
||||
const ASN1_OBJECT *oo = &o;
|
||||
ADDED_OBJ ad, *adp;
|
||||
const unsigned int *op;
|
||||
|
||||
o.sn = s;
|
||||
if (added != NULL) {
|
||||
ad.type = ADDED_SNAME;
|
||||
ad.obj = &o;
|
||||
adp = lh_ADDED_OBJ_retrieve(added, &ad);
|
||||
if (adp != NULL)
|
||||
return (adp->obj->nid);
|
||||
}
|
||||
op = OBJ_bsearch_sn(&oo, sn_objs, NUM_SN);
|
||||
if (op == NULL)
|
||||
return (NID_undef);
|
||||
return (nid_objs[*op].nid);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_sn2nid);
|
||||
|
||||
const void *
|
||||
OBJ_bsearch_(const void *key, const void *base, int num, int size,
|
||||
int (*cmp)(const void *, const void *))
|
||||
{
|
||||
return OBJ_bsearch_ex_(key, base, num, size, cmp, 0);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_bsearch_);
|
||||
|
||||
const void *
|
||||
OBJ_bsearch_ex_(const void *key, const void *base_, int num, int size,
|
||||
int (*cmp)(const void *, const void *), int flags)
|
||||
{
|
||||
const char *base = base_;
|
||||
int l, h, i = 0, c = 0;
|
||||
const char *p = NULL;
|
||||
|
||||
if (num == 0)
|
||||
return (NULL);
|
||||
l = 0;
|
||||
h = num;
|
||||
while (l < h) {
|
||||
i = (l + h) / 2;
|
||||
p = &(base[i * size]);
|
||||
c = (*cmp)(key, p);
|
||||
if (c < 0)
|
||||
h = i;
|
||||
else if (c > 0)
|
||||
l = i + 1;
|
||||
else
|
||||
break;
|
||||
}
|
||||
if (c != 0 && !(flags & OBJ_BSEARCH_VALUE_ON_NOMATCH))
|
||||
p = NULL;
|
||||
else if (c == 0 && (flags & OBJ_BSEARCH_FIRST_VALUE_ON_MATCH)) {
|
||||
while (i > 0 && (*cmp)(key, &(base[(i - 1) * size])) == 0)
|
||||
i--;
|
||||
p = &(base[i * size]);
|
||||
}
|
||||
return (p);
|
||||
}
|
||||
|
||||
int
|
||||
OBJ_create_objects(BIO *in)
|
||||
{
|
||||
char buf[512];
|
||||
int i, num = 0;
|
||||
char *o, *s, *l = NULL;
|
||||
|
||||
for (;;) {
|
||||
s = o = NULL;
|
||||
i = BIO_gets(in, buf, 512);
|
||||
if (i <= 0)
|
||||
return (num);
|
||||
buf[i - 1] = '\0';
|
||||
if (!isalnum((unsigned char)buf[0]))
|
||||
return (num);
|
||||
o = s=buf;
|
||||
while (isdigit((unsigned char)*s) || (*s == '.'))
|
||||
s++;
|
||||
if (*s != '\0') {
|
||||
*(s++) = '\0';
|
||||
while (isspace((unsigned char)*s))
|
||||
s++;
|
||||
if (*s == '\0')
|
||||
s = NULL;
|
||||
else {
|
||||
l = s;
|
||||
while ((*l != '\0') &&
|
||||
!isspace((unsigned char)*l))
|
||||
l++;
|
||||
if (*l != '\0') {
|
||||
*(l++) = '\0';
|
||||
while (isspace((unsigned char)*l))
|
||||
l++;
|
||||
if (*l == '\0')
|
||||
l = NULL;
|
||||
} else
|
||||
l = NULL;
|
||||
}
|
||||
} else
|
||||
s = NULL;
|
||||
if ((o == NULL) || (*o == '\0'))
|
||||
return (num);
|
||||
if (!OBJ_create(o, s, l))
|
||||
return (num);
|
||||
num++;
|
||||
}
|
||||
/* return(num); */
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_create_objects);
|
||||
|
||||
int
|
||||
OBJ_create(const char *oid, const char *sn, const char *ln)
|
||||
{
|
||||
int ok = 0;
|
||||
ASN1_OBJECT *op = NULL;
|
||||
unsigned char *buf;
|
||||
int i;
|
||||
|
||||
i = a2d_ASN1_OBJECT(NULL, 0, oid, -1);
|
||||
if (i <= 0)
|
||||
return (0);
|
||||
|
||||
if ((buf = malloc(i)) == NULL) {
|
||||
OBJerror(ERR_R_MALLOC_FAILURE);
|
||||
return (0);
|
||||
}
|
||||
i = a2d_ASN1_OBJECT(buf, i, oid, -1);
|
||||
if (i == 0)
|
||||
goto err;
|
||||
op = (ASN1_OBJECT *)ASN1_OBJECT_create(OBJ_new_nid(1), buf, i, sn, ln);
|
||||
if (op == NULL)
|
||||
goto err;
|
||||
ok = OBJ_add_object(op);
|
||||
|
||||
err:
|
||||
ASN1_OBJECT_free(op);
|
||||
free(buf);
|
||||
return (ok);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_create);
|
||||
|
||||
size_t
|
||||
OBJ_length(const ASN1_OBJECT *obj)
|
||||
{
|
||||
if (obj == NULL)
|
||||
return 0;
|
||||
|
||||
if (obj->length < 0)
|
||||
return 0;
|
||||
|
||||
return obj->length;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_length);
|
||||
|
||||
const unsigned char *
|
||||
OBJ_get0_data(const ASN1_OBJECT *obj)
|
||||
{
|
||||
if (obj == NULL)
|
||||
return NULL;
|
||||
|
||||
return obj->data;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_get0_data);
|
5835
crypto/objects/obj_dat.h
Normal file
5835
crypto/objects/obj_dat.h
Normal file
File diff suppressed because it is too large
Load Diff
91
crypto/objects/obj_err.c
Normal file
91
crypto/objects/obj_err.c
Normal file
@@ -0,0 +1,91 @@
|
||||
/* $OpenBSD: obj_err.c,v 1.14 2023/07/08 12:27:51 beck Exp $ */
|
||||
/* ====================================================================
|
||||
* Copyright (c) 1999-2006 The OpenSSL Project. All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
*
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
*
|
||||
* 3. All advertising materials mentioning features or use of this
|
||||
* software must display the following acknowledgment:
|
||||
* "This product includes software developed by the OpenSSL Project
|
||||
* for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
|
||||
*
|
||||
* 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
|
||||
* endorse or promote products derived from this software without
|
||||
* prior written permission. For written permission, please contact
|
||||
* openssl-core@OpenSSL.org.
|
||||
*
|
||||
* 5. Products derived from this software may not be called "OpenSSL"
|
||||
* nor may "OpenSSL" appear in their names without prior written
|
||||
* permission of the OpenSSL Project.
|
||||
*
|
||||
* 6. Redistributions of any form whatsoever must retain the following
|
||||
* acknowledgment:
|
||||
* "This product includes software developed by the OpenSSL Project
|
||||
* for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
|
||||
* EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
||||
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
|
||||
* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
||||
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
||||
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
||||
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
||||
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
|
||||
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
* ====================================================================
|
||||
*
|
||||
* This product includes cryptographic software written by Eric Young
|
||||
* (eay@cryptsoft.com). This product includes software written by Tim
|
||||
* Hudson (tjh@cryptsoft.com).
|
||||
*
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#include <openssl/opensslconf.h>
|
||||
|
||||
#include <openssl/err.h>
|
||||
#include <openssl/objects.h>
|
||||
|
||||
#ifndef OPENSSL_NO_ERR
|
||||
|
||||
#define ERR_FUNC(func) ERR_PACK(ERR_LIB_OBJ,func,0)
|
||||
#define ERR_REASON(reason) ERR_PACK(ERR_LIB_OBJ,0,reason)
|
||||
|
||||
static ERR_STRING_DATA OBJ_str_functs[] = {
|
||||
{ERR_FUNC(0xfff), "CRYPTO_internal"},
|
||||
{0, NULL}
|
||||
};
|
||||
|
||||
static ERR_STRING_DATA OBJ_str_reasons[] = {
|
||||
{ERR_REASON(OBJ_R_MALLOC_FAILURE) , "malloc failure"},
|
||||
{ERR_REASON(OBJ_R_UNKNOWN_NID) , "unknown nid"},
|
||||
{0, NULL}
|
||||
};
|
||||
|
||||
#endif
|
||||
|
||||
void
|
||||
ERR_load_OBJ_strings(void)
|
||||
{
|
||||
#ifndef OPENSSL_NO_ERR
|
||||
if (ERR_func_error_string(OBJ_str_functs[0].error) == NULL) {
|
||||
ERR_load_strings(0, OBJ_str_functs);
|
||||
ERR_load_strings(0, OBJ_str_reasons);
|
||||
}
|
||||
#endif
|
||||
}
|
||||
LCRYPTO_ALIAS(ERR_load_OBJ_strings);
|
135
crypto/objects/obj_lib.c
Normal file
135
crypto/objects/obj_lib.c
Normal file
@@ -0,0 +1,135 @@
|
||||
/* $OpenBSD: obj_lib.c,v 1.19 2023/08/17 09:13:01 tb Exp $ */
|
||||
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
|
||||
* All rights reserved.
|
||||
*
|
||||
* This package is an SSL implementation written
|
||||
* by Eric Young (eay@cryptsoft.com).
|
||||
* The implementation was written so as to conform with Netscapes SSL.
|
||||
*
|
||||
* This library is free for commercial and non-commercial use as long as
|
||||
* the following conditions are aheared to. The following conditions
|
||||
* apply to all code found in this distribution, be it the RC4, RSA,
|
||||
* lhash, DES, etc., code; not just the SSL code. The SSL documentation
|
||||
* included with this distribution is covered by the same copyright terms
|
||||
* except that the holder is Tim Hudson (tjh@cryptsoft.com).
|
||||
*
|
||||
* Copyright remains Eric Young's, and as such any Copyright notices in
|
||||
* the code are not to be removed.
|
||||
* If this package is used in a product, Eric Young should be given attribution
|
||||
* as the author of the parts of the library used.
|
||||
* This can be in the form of a textual message at program startup or
|
||||
* in documentation (online or textual) provided with the package.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
* 1. Redistributions of source code must retain the copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
* 3. All advertising materials mentioning features or use of this software
|
||||
* must display the following acknowledgement:
|
||||
* "This product includes cryptographic software written by
|
||||
* Eric Young (eay@cryptsoft.com)"
|
||||
* The word 'cryptographic' can be left out if the rouines from the library
|
||||
* being used are not cryptographic related :-).
|
||||
* 4. If you include any Windows specific code (or a derivative thereof) from
|
||||
* the apps directory (application code) you must include an acknowledgement:
|
||||
* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
*
|
||||
* The licence and distribution terms for any publically available version or
|
||||
* derivative of this code cannot be changed. i.e. this code cannot simply be
|
||||
* copied and put under another distribution licence
|
||||
* [including the GNU Public Licence.]
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
||||
#include <openssl/err.h>
|
||||
#include <openssl/buffer.h>
|
||||
#include <openssl/lhash.h>
|
||||
#include <openssl/objects.h>
|
||||
|
||||
#include "asn1_local.h"
|
||||
|
||||
ASN1_OBJECT *
|
||||
OBJ_dup(const ASN1_OBJECT *o)
|
||||
{
|
||||
ASN1_OBJECT *r;
|
||||
char *ln = NULL, *sn = NULL;
|
||||
unsigned char *data = NULL;
|
||||
|
||||
if (o == NULL)
|
||||
return (NULL);
|
||||
if (!(o->flags & ASN1_OBJECT_FLAG_DYNAMIC))
|
||||
return((ASN1_OBJECT *)o); /* XXX: ugh! Why? What kind of
|
||||
duplication is this??? */
|
||||
|
||||
r = ASN1_OBJECT_new();
|
||||
if (r == NULL) {
|
||||
OBJerror(ERR_R_ASN1_LIB);
|
||||
return (NULL);
|
||||
}
|
||||
data = malloc(o->length);
|
||||
if (data == NULL)
|
||||
goto err;
|
||||
if (o->data != NULL)
|
||||
memcpy(data, o->data, o->length);
|
||||
/* once data attached to object it remains const */
|
||||
r->data = data;
|
||||
r->length = o->length;
|
||||
r->nid = o->nid;
|
||||
r->ln = r->sn = NULL;
|
||||
if (o->ln != NULL) {
|
||||
ln = strdup(o->ln);
|
||||
if (ln == NULL)
|
||||
goto err;
|
||||
r->ln = ln;
|
||||
}
|
||||
|
||||
if (o->sn != NULL) {
|
||||
sn = strdup(o->sn);
|
||||
if (sn == NULL)
|
||||
goto err;
|
||||
r->sn = sn;
|
||||
}
|
||||
r->flags = o->flags | (ASN1_OBJECT_FLAG_DYNAMIC |
|
||||
ASN1_OBJECT_FLAG_DYNAMIC_STRINGS | ASN1_OBJECT_FLAG_DYNAMIC_DATA);
|
||||
return (r);
|
||||
|
||||
err:
|
||||
OBJerror(ERR_R_MALLOC_FAILURE);
|
||||
free(ln);
|
||||
free(sn);
|
||||
free(data);
|
||||
free(r);
|
||||
return (NULL);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_dup);
|
||||
|
||||
int
|
||||
OBJ_cmp(const ASN1_OBJECT *a, const ASN1_OBJECT *b)
|
||||
{
|
||||
int cmp;
|
||||
|
||||
if ((cmp = a->length - b->length) != 0)
|
||||
return cmp;
|
||||
if (a->length == 0)
|
||||
return 0;
|
||||
return memcmp(a->data, b->data, a->length);
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_cmp);
|
312
crypto/objects/obj_xref.c
Normal file
312
crypto/objects/obj_xref.c
Normal file
@@ -0,0 +1,312 @@
|
||||
/* $OpenBSD: obj_xref.c,v 1.13 2023/07/28 10:25:05 tb Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 2023 Theo Buehler <tb@openbsd.org>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#include <openssl/objects.h>
|
||||
|
||||
/*
|
||||
* Map between signature nids and pairs of (hash, pkey) nids. If the hash nid
|
||||
* is NID_undef, this indicates to ASN1_item_{sign,verify}() that the pkey's
|
||||
* ASN.1 method needs to handle algorithm identifiers and part of the message
|
||||
* digest.
|
||||
*/
|
||||
|
||||
static const struct {
|
||||
int sign_nid;
|
||||
int hash_nid;
|
||||
int pkey_nid;
|
||||
} nid_triple[] = {
|
||||
{
|
||||
.sign_nid = NID_md2WithRSAEncryption,
|
||||
.hash_nid = NID_md2,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_md5WithRSAEncryption,
|
||||
.hash_nid = NID_md5,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_shaWithRSAEncryption,
|
||||
.hash_nid = NID_sha,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_sha1WithRSAEncryption,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dsaWithSHA,
|
||||
.hash_nid = NID_sha,
|
||||
.pkey_nid = NID_dsa,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dsaWithSHA1_2,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_dsa_2,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_mdc2WithRSA,
|
||||
.hash_nid = NID_mdc2,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_md5WithRSA,
|
||||
.hash_nid = NID_md5,
|
||||
.pkey_nid = NID_rsa,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dsaWithSHA1,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_dsa,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_sha1WithRSA,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_rsa,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ripemd160WithRSA,
|
||||
.hash_nid = NID_ripemd160,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_md4WithRSAEncryption,
|
||||
.hash_nid = NID_md4,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_SHA1,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_sha256WithRSAEncryption,
|
||||
.hash_nid = NID_sha256,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_sha384WithRSAEncryption,
|
||||
.hash_nid = NID_sha384,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_sha512WithRSAEncryption,
|
||||
.hash_nid = NID_sha512,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_sha224WithRSAEncryption,
|
||||
.hash_nid = NID_sha224,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_Recommended,
|
||||
.hash_nid = NID_undef,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_Specified,
|
||||
.hash_nid = NID_undef,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_SHA224,
|
||||
.hash_nid = NID_sha224,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_SHA256,
|
||||
.hash_nid = NID_sha256,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_SHA384,
|
||||
.hash_nid = NID_sha384,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_ecdsa_with_SHA512,
|
||||
.hash_nid = NID_sha512,
|
||||
.pkey_nid = NID_X9_62_id_ecPublicKey,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dsa_with_SHA224,
|
||||
.hash_nid = NID_sha224,
|
||||
.pkey_nid = NID_dsa,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dsa_with_SHA256,
|
||||
.hash_nid = NID_sha256,
|
||||
.pkey_nid = NID_dsa,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_id_GostR3411_94_with_GostR3410_2001,
|
||||
.hash_nid = NID_id_GostR3411_94,
|
||||
.pkey_nid = NID_id_GostR3410_2001,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_id_GostR3411_94_with_GostR3410_94,
|
||||
.hash_nid = NID_id_GostR3411_94,
|
||||
.pkey_nid = NID_id_GostR3410_94,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_id_GostR3411_94_with_GostR3410_94_cc,
|
||||
.hash_nid = NID_id_GostR3411_94,
|
||||
.pkey_nid = NID_id_GostR3410_94_cc,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_id_GostR3411_94_with_GostR3410_2001_cc,
|
||||
.hash_nid = NID_id_GostR3411_94,
|
||||
.pkey_nid = NID_id_GostR3410_2001_cc,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_rsassaPss,
|
||||
.hash_nid = NID_undef,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_id_tc26_signwithdigest_gost3410_2012_256,
|
||||
.hash_nid = NID_id_tc26_gost3411_2012_256,
|
||||
.pkey_nid = NID_id_GostR3410_2001,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_id_tc26_signwithdigest_gost3410_2012_512,
|
||||
.hash_nid = NID_id_tc26_gost3411_2012_512,
|
||||
.pkey_nid = NID_id_GostR3410_2001,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_Ed25519,
|
||||
.hash_nid = NID_undef,
|
||||
.pkey_nid = NID_Ed25519,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_stdDH_sha1kdf_scheme,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_dh_std_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_stdDH_sha224kdf_scheme,
|
||||
.hash_nid = NID_sha224,
|
||||
.pkey_nid = NID_dh_std_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_stdDH_sha256kdf_scheme,
|
||||
.hash_nid = NID_sha256,
|
||||
.pkey_nid = NID_dh_std_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_stdDH_sha384kdf_scheme,
|
||||
.hash_nid = NID_sha384,
|
||||
.pkey_nid = NID_dh_std_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_stdDH_sha512kdf_scheme,
|
||||
.hash_nid = NID_sha512,
|
||||
.pkey_nid = NID_dh_std_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_cofactorDH_sha1kdf_scheme,
|
||||
.hash_nid = NID_sha1,
|
||||
.pkey_nid = NID_dh_cofactor_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_cofactorDH_sha224kdf_scheme,
|
||||
.hash_nid = NID_sha224,
|
||||
.pkey_nid = NID_dh_cofactor_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_cofactorDH_sha256kdf_scheme,
|
||||
.hash_nid = NID_sha256,
|
||||
.pkey_nid = NID_dh_cofactor_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_cofactorDH_sha384kdf_scheme,
|
||||
.hash_nid = NID_sha384,
|
||||
.pkey_nid = NID_dh_cofactor_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_dhSinglePass_cofactorDH_sha512kdf_scheme,
|
||||
.hash_nid = NID_sha512,
|
||||
.pkey_nid = NID_dh_cofactor_kdf,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_RSA_SHA3_224,
|
||||
.hash_nid = NID_sha3_224,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_RSA_SHA3_256,
|
||||
.hash_nid = NID_sha3_256,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_RSA_SHA3_384,
|
||||
.hash_nid = NID_sha3_384,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
{
|
||||
.sign_nid = NID_RSA_SHA3_512,
|
||||
.hash_nid = NID_sha3_512,
|
||||
.pkey_nid = NID_rsaEncryption,
|
||||
},
|
||||
};
|
||||
|
||||
#define N_NID_TRIPLES (sizeof(nid_triple) / sizeof(nid_triple[0]))
|
||||
|
||||
int
|
||||
OBJ_find_sigid_algs(int sign_nid, int *hash_nid, int *pkey_nid)
|
||||
{
|
||||
size_t i;
|
||||
|
||||
for (i = 0; i < N_NID_TRIPLES; i++) {
|
||||
if (sign_nid != nid_triple[i].sign_nid)
|
||||
continue;
|
||||
|
||||
if (hash_nid != NULL)
|
||||
*hash_nid = nid_triple[i].hash_nid;
|
||||
if (pkey_nid != NULL)
|
||||
*pkey_nid = nid_triple[i].pkey_nid;
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_find_sigid_algs);
|
||||
|
||||
int
|
||||
OBJ_find_sigid_by_algs(int *sign_nid, int hash_nid, int pkey_nid)
|
||||
{
|
||||
size_t i;
|
||||
|
||||
for (i = 0; i < N_NID_TRIPLES; i++) {
|
||||
if (hash_nid != nid_triple[i].hash_nid)
|
||||
continue;
|
||||
if (pkey_nid != nid_triple[i].pkey_nid)
|
||||
continue;
|
||||
|
||||
if (sign_nid != NULL)
|
||||
*sign_nid = nid_triple[i].sign_nid;
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
LCRYPTO_ALIAS(OBJ_find_sigid_by_algs);
|
Reference in New Issue
Block a user