/* $NetBSD: openssl_link.c,v 1.1.4.2 2024/02/29 11:38:40 martin Exp $ */ /* * Copyright (C) Internet Systems Consortium, Inc. ("ISC") * * SPDX-License-Identifier: MPL-2.0 AND ISC * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, you can obtain one at https://mozilla.org/MPL/2.0/. * * See the COPYRIGHT file distributed with this work for additional * information regarding copyright ownership. */ /* * Copyright (C) Network Associates, Inc. * * Permission to use, copy, modify, and/or 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 ISC AND NETWORK ASSOCIATES DISCLAIMS * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC 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 #include #include #include #include #include #include #include #include #include "dst_internal.h" #include "dst_openssl.h" #if !defined(OPENSSL_NO_ENGINE) #include #endif /* if !defined(OPENSSL_NO_ENGINE) */ #if !defined(OPENSSL_NO_ENGINE) static ENGINE *e = NULL; #endif /* if !defined(OPENSSL_NO_ENGINE) */ static void enable_fips_mode(void) { #ifdef HAVE_FIPS_MODE if (FIPS_mode() != 0) { /* * FIPS mode is already enabled. */ return; } if (FIPS_mode_set(1) == 0) { dst__openssl_toresult2("FIPS_mode_set", DST_R_OPENSSLFAILURE); exit(1); } #endif /* HAVE_FIPS_MODE */ } isc_result_t dst__openssl_init(const char *engine) { isc_result_t result = ISC_R_SUCCESS; enable_fips_mode(); #if !defined(OPENSSL_NO_ENGINE) if (engine != NULL && *engine == '\0') { engine = NULL; } if (engine != NULL) { e = ENGINE_by_id(engine); if (e == NULL) { result = DST_R_NOENGINE; goto cleanup_rm; } /* This will init the engine. */ if (!ENGINE_set_default(e, ENGINE_METHOD_ALL)) { result = DST_R_NOENGINE; goto cleanup_rm; } } return (ISC_R_SUCCESS); cleanup_rm: if (e != NULL) { ENGINE_free(e); } e = NULL; #else UNUSED(engine); #endif /* if !defined(OPENSSL_NO_ENGINE) */ return (result); } void dst__openssl_destroy(void) { #if !defined(OPENSSL_NO_ENGINE) if (e != NULL) { ENGINE_free(e); } e = NULL; #endif /* if !defined(OPENSSL_NO_ENGINE) */ } static isc_result_t toresult(isc_result_t fallback) { isc_result_t result = fallback; unsigned long err = ERR_peek_error(); #if defined(ECDSA_R_RANDOM_NUMBER_GENERATION_FAILED) int lib = ERR_GET_LIB(err); #endif /* if defined(ECDSA_R_RANDOM_NUMBER_GENERATION_FAILED) */ int reason = ERR_GET_REASON(err); switch (reason) { /* * ERR_* errors are globally unique; others * are unique per sublibrary */ case ERR_R_MALLOC_FAILURE: result = ISC_R_NOMEMORY; break; default: #if defined(ECDSA_R_RANDOM_NUMBER_GENERATION_FAILED) if (lib == ERR_R_ECDSA_LIB && reason == ECDSA_R_RANDOM_NUMBER_GENERATION_FAILED) { result = ISC_R_NOENTROPY; break; } #endif /* if defined(ECDSA_R_RANDOM_NUMBER_GENERATION_FAILED) */ break; } return (result); } isc_result_t dst__openssl_toresult(isc_result_t fallback) { isc_result_t result; result = toresult(fallback); ERR_clear_error(); return (result); } isc_result_t dst__openssl_toresult2(const char *funcname, isc_result_t fallback) { return (dst__openssl_toresult3(DNS_LOGCATEGORY_GENERAL, funcname, fallback)); } isc_result_t dst__openssl_toresult3(isc_logcategory_t *category, const char *funcname, isc_result_t fallback) { isc_result_t result; unsigned long err; const char *file, *data; int line, flags; char buf[256]; result = toresult(fallback); isc_log_write(dns_lctx, category, DNS_LOGMODULE_CRYPTO, ISC_LOG_WARNING, "%s failed (%s)", funcname, isc_result_totext(result)); if (result == ISC_R_NOMEMORY) { goto done; } for (;;) { err = ERR_get_error_line_data(&file, &line, &data, &flags); if (err == 0U) { goto done; } ERR_error_string_n(err, buf, sizeof(buf)); isc_log_write(dns_lctx, category, DNS_LOGMODULE_CRYPTO, ISC_LOG_INFO, "%s:%s:%d:%s", buf, file, line, ((flags & ERR_TXT_STRING) != 0) ? data : ""); } done: ERR_clear_error(); return (result); } #if !defined(OPENSSL_NO_ENGINE) ENGINE * dst__openssl_getengine(const char *engine) { if (engine == NULL) { return (NULL); } if (e == NULL) { return (NULL); } if (strcmp(engine, ENGINE_get_id(e)) == 0) { return (e); } return (NULL); } #endif /* if !defined(OPENSSL_NO_ENGINE) */ /*! \file */