diff options
Diffstat (limited to 'src/lib/libcrypto/dso')
| -rw-r--r-- | src/lib/libcrypto/dso/Makefile.ssl | 142 | ||||
| -rw-r--r-- | src/lib/libcrypto/dso/dso.h | 368 | ||||
| -rw-r--r-- | src/lib/libcrypto/dso/dso_dlfcn.c | 372 | ||||
| -rw-r--r-- | src/lib/libcrypto/dso/dso_err.c | 147 | ||||
| -rw-r--r-- | src/lib/libcrypto/dso/dso_lib.c | 466 | ||||
| -rw-r--r-- | src/lib/libcrypto/dso/dso_null.c | 88 | ||||
| -rw-r--r-- | src/lib/libcrypto/dso/dso_openssl.c | 81 |
7 files changed, 1664 insertions, 0 deletions
diff --git a/src/lib/libcrypto/dso/Makefile.ssl b/src/lib/libcrypto/dso/Makefile.ssl new file mode 100644 index 0000000000..c0449d184e --- /dev/null +++ b/src/lib/libcrypto/dso/Makefile.ssl | |||
| @@ -0,0 +1,142 @@ | |||
| 1 | # | ||
| 2 | # SSLeay/crypto/dso/Makefile | ||
| 3 | # | ||
| 4 | |||
| 5 | DIR= dso | ||
| 6 | TOP= ../.. | ||
| 7 | CC= cc | ||
| 8 | INCLUDES= -I.. -I$(TOP) -I../../include | ||
| 9 | CFLAG=-g | ||
| 10 | INSTALL_PREFIX= | ||
| 11 | OPENSSLDIR= /usr/local/ssl | ||
| 12 | INSTALLTOP=/usr/local/ssl | ||
| 13 | MAKE= make -f Makefile.ssl | ||
| 14 | MAKEDEPPROG= makedepend | ||
| 15 | MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG) | ||
| 16 | MAKEFILE= Makefile.ssl | ||
| 17 | AR= ar r | ||
| 18 | |||
| 19 | CFLAGS= $(INCLUDES) $(CFLAG) | ||
| 20 | |||
| 21 | GENERAL=Makefile | ||
| 22 | TEST= | ||
| 23 | APPS= | ||
| 24 | |||
| 25 | LIB=$(TOP)/libcrypto.a | ||
| 26 | LIBSRC= dso_dl.c dso_dlfcn.c dso_err.c dso_lib.c dso_null.c \ | ||
| 27 | dso_openssl.c dso_win32.c dso_vms.c | ||
| 28 | LIBOBJ= dso_dl.o dso_dlfcn.o dso_err.o dso_lib.o dso_null.o \ | ||
| 29 | dso_openssl.o dso_win32.o dso_vms.o | ||
| 30 | |||
| 31 | SRC= $(LIBSRC) | ||
| 32 | |||
| 33 | EXHEADER= dso.h | ||
| 34 | HEADER= $(EXHEADER) | ||
| 35 | |||
| 36 | ALL= $(GENERAL) $(SRC) $(HEADER) | ||
| 37 | |||
| 38 | top: | ||
| 39 | (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all) | ||
| 40 | |||
| 41 | all: lib | ||
| 42 | |||
| 43 | lib: $(LIBOBJ) | ||
| 44 | $(AR) $(LIB) $(LIBOBJ) | ||
| 45 | $(RANLIB) $(LIB) || echo Never mind. | ||
| 46 | @touch lib | ||
| 47 | |||
| 48 | files: | ||
| 49 | $(PERL) $(TOP)/util/files.pl Makefile.ssl >> $(TOP)/MINFO | ||
| 50 | |||
| 51 | links: | ||
| 52 | @sh $(TOP)/util/point.sh Makefile.ssl Makefile | ||
| 53 | @$(PERL) $(TOP)/util/mklink.pl ../../include/openssl $(EXHEADER) | ||
| 54 | @$(PERL) $(TOP)/util/mklink.pl ../../test $(TEST) | ||
| 55 | @$(PERL) $(TOP)/util/mklink.pl ../../apps $(APPS) | ||
| 56 | |||
| 57 | install: | ||
| 58 | @for i in $(EXHEADER) ; \ | ||
| 59 | do \ | ||
| 60 | (cp $$i $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i; \ | ||
| 61 | chmod 644 $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i ); \ | ||
| 62 | done; | ||
| 63 | |||
| 64 | tags: | ||
| 65 | ctags $(SRC) | ||
| 66 | |||
| 67 | tests: | ||
| 68 | |||
| 69 | lint: | ||
| 70 | lint -DLINT $(INCLUDES) $(SRC)>fluff | ||
| 71 | |||
| 72 | depend: | ||
| 73 | $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC) | ||
| 74 | |||
| 75 | dclean: | ||
| 76 | $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new | ||
| 77 | mv -f Makefile.new $(MAKEFILE) | ||
| 78 | |||
| 79 | clean: | ||
| 80 | rm -f *.o */*.o *.obj lib tags core .pure .nfs* *.old *.bak fluff | ||
| 81 | |||
| 82 | # DO NOT DELETE THIS LINE -- make depend depends on it. | ||
| 83 | |||
| 84 | dso_dl.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 85 | dso_dl.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 86 | dso_dl.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 87 | dso_dl.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 88 | dso_dl.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
| 89 | dso_dl.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
| 90 | dso_dl.o: ../../include/openssl/symhacks.h ../cryptlib.h dso_dl.c | ||
| 91 | dso_dlfcn.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 92 | dso_dlfcn.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 93 | dso_dlfcn.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 94 | dso_dlfcn.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 95 | dso_dlfcn.o: ../../include/openssl/opensslconf.h | ||
| 96 | dso_dlfcn.o: ../../include/openssl/opensslv.h ../../include/openssl/safestack.h | ||
| 97 | dso_dlfcn.o: ../../include/openssl/stack.h ../../include/openssl/symhacks.h | ||
| 98 | dso_dlfcn.o: ../cryptlib.h dso_dlfcn.c | ||
| 99 | dso_err.o: ../../include/openssl/bio.h ../../include/openssl/crypto.h | ||
| 100 | dso_err.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 101 | dso_err.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 102 | dso_err.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
| 103 | dso_err.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
| 104 | dso_err.o: ../../include/openssl/symhacks.h dso_err.c | ||
| 105 | dso_lib.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 106 | dso_lib.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 107 | dso_lib.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 108 | dso_lib.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 109 | dso_lib.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
| 110 | dso_lib.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
| 111 | dso_lib.o: ../../include/openssl/symhacks.h ../cryptlib.h dso_lib.c | ||
| 112 | dso_null.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 113 | dso_null.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 114 | dso_null.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 115 | dso_null.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 116 | dso_null.o: ../../include/openssl/opensslconf.h | ||
| 117 | dso_null.o: ../../include/openssl/opensslv.h ../../include/openssl/safestack.h | ||
| 118 | dso_null.o: ../../include/openssl/stack.h ../../include/openssl/symhacks.h | ||
| 119 | dso_null.o: ../cryptlib.h dso_null.c | ||
| 120 | dso_openssl.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 121 | dso_openssl.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 122 | dso_openssl.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 123 | dso_openssl.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 124 | dso_openssl.o: ../../include/openssl/opensslconf.h | ||
| 125 | dso_openssl.o: ../../include/openssl/opensslv.h | ||
| 126 | dso_openssl.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
| 127 | dso_openssl.o: ../../include/openssl/symhacks.h ../cryptlib.h dso_openssl.c | ||
| 128 | dso_vms.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 129 | dso_vms.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 130 | dso_vms.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 131 | dso_vms.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 132 | dso_vms.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
| 133 | dso_vms.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
| 134 | dso_vms.o: ../../include/openssl/symhacks.h ../cryptlib.h dso_vms.c | ||
| 135 | dso_win32.o: ../../e_os.h ../../include/openssl/bio.h | ||
| 136 | dso_win32.o: ../../include/openssl/buffer.h ../../include/openssl/crypto.h | ||
| 137 | dso_win32.o: ../../include/openssl/dso.h ../../include/openssl/e_os2.h | ||
| 138 | dso_win32.o: ../../include/openssl/err.h ../../include/openssl/lhash.h | ||
| 139 | dso_win32.o: ../../include/openssl/opensslconf.h | ||
| 140 | dso_win32.o: ../../include/openssl/opensslv.h ../../include/openssl/safestack.h | ||
| 141 | dso_win32.o: ../../include/openssl/stack.h ../../include/openssl/symhacks.h | ||
| 142 | dso_win32.o: ../cryptlib.h dso_win32.c | ||
diff --git a/src/lib/libcrypto/dso/dso.h b/src/lib/libcrypto/dso/dso.h new file mode 100644 index 0000000000..3e51913a72 --- /dev/null +++ b/src/lib/libcrypto/dso/dso.h | |||
| @@ -0,0 +1,368 @@ | |||
| 1 | /* dso.h -*- mode:C; c-file-style: "eay" -*- */ | ||
| 2 | /* Written by Geoff Thorpe (geoff@geoffthorpe.net) for the OpenSSL | ||
| 3 | * project 2000. | ||
| 4 | */ | ||
| 5 | /* ==================================================================== | ||
| 6 | * Copyright (c) 2000 The OpenSSL Project. All rights reserved. | ||
| 7 | * | ||
| 8 | * Redistribution and use in source and binary forms, with or without | ||
| 9 | * modification, are permitted provided that the following conditions | ||
| 10 | * are met: | ||
| 11 | * | ||
| 12 | * 1. Redistributions of source code must retain the above copyright | ||
| 13 | * notice, this list of conditions and the following disclaimer. | ||
| 14 | * | ||
| 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 | ||
| 18 | * distribution. | ||
| 19 | * | ||
| 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/)" | ||
| 24 | * | ||
| 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. | ||
| 29 | * | ||
| 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. | ||
| 33 | * | ||
| 34 | * 6. Redistributions of any form whatsoever must retain the following | ||
| 35 | * acknowledgment: | ||
| 36 | * "This product includes software developed by the OpenSSL Project | ||
| 37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
| 38 | * | ||
| 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 | * ==================================================================== | ||
| 52 | * | ||
| 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). | ||
| 56 | * | ||
| 57 | */ | ||
| 58 | |||
| 59 | #ifndef HEADER_DSO_H | ||
| 60 | #define HEADER_DSO_H | ||
| 61 | |||
| 62 | #include <openssl/crypto.h> | ||
| 63 | |||
| 64 | #ifdef __cplusplus | ||
| 65 | extern "C" { | ||
| 66 | #endif | ||
| 67 | |||
| 68 | /* These values are used as commands to DSO_ctrl() */ | ||
| 69 | #define DSO_CTRL_GET_FLAGS 1 | ||
| 70 | #define DSO_CTRL_SET_FLAGS 2 | ||
| 71 | #define DSO_CTRL_OR_FLAGS 3 | ||
| 72 | |||
| 73 | /* By default, DSO_load() will translate the provided filename into a form | ||
| 74 | * typical for the platform (more specifically the DSO_METHOD) using the | ||
| 75 | * dso_name_converter function of the method. Eg. win32 will transform "blah" | ||
| 76 | * into "blah.dll", and dlfcn will transform it into "libblah.so". The | ||
| 77 | * behaviour can be overriden by setting the name_converter callback in the DSO | ||
| 78 | * object (using DSO_set_name_converter()). This callback could even utilise | ||
| 79 | * the DSO_METHOD's converter too if it only wants to override behaviour for | ||
| 80 | * one or two possible DSO methods. However, the following flag can be set in a | ||
| 81 | * DSO to prevent *any* native name-translation at all - eg. if the caller has | ||
| 82 | * prompted the user for a path to a driver library so the filename should be | ||
| 83 | * interpreted as-is. */ | ||
| 84 | #define DSO_FLAG_NO_NAME_TRANSLATION 0x01 | ||
| 85 | /* An extra flag to give if only the extension should be added as | ||
| 86 | * translation. This is obviously only of importance on Unix and | ||
| 87 | * other operating systems where the translation also may prefix | ||
| 88 | * the name with something, like 'lib', and ignored everywhere else. | ||
| 89 | * This flag is also ignored if DSO_FLAG_NO_NAME_TRANSLATION is used | ||
| 90 | * at the same time. */ | ||
| 91 | #define DSO_FLAG_NAME_TRANSLATION_EXT_ONLY 0x02 | ||
| 92 | |||
| 93 | /* The following flag controls the translation of symbol names to upper | ||
| 94 | * case. This is currently only being implemented for OpenVMS. | ||
| 95 | */ | ||
| 96 | #define DSO_FLAG_UPCASE_SYMBOL 0x10 | ||
| 97 | |||
| 98 | /* This flag loads the library with public symbols. | ||
| 99 | * Meaning: The exported symbols of this library are public | ||
| 100 | * to all libraries loaded after this library. | ||
| 101 | * At the moment only implemented in unix. | ||
| 102 | */ | ||
| 103 | #define DSO_FLAG_GLOBAL_SYMBOLS 0x20 | ||
| 104 | |||
| 105 | |||
| 106 | typedef void (*DSO_FUNC_TYPE)(void); | ||
| 107 | |||
| 108 | typedef struct dso_st DSO; | ||
| 109 | |||
| 110 | /* The function prototype used for method functions (or caller-provided | ||
| 111 | * callbacks) that transform filenames. They are passed a DSO structure pointer | ||
| 112 | * (or NULL if they are to be used independantly of a DSO object) and a | ||
| 113 | * filename to transform. They should either return NULL (if there is an error | ||
| 114 | * condition) or a newly allocated string containing the transformed form that | ||
| 115 | * the caller will need to free with OPENSSL_free() when done. */ | ||
| 116 | typedef char* (*DSO_NAME_CONVERTER_FUNC)(DSO *, const char *); | ||
| 117 | /* The function prototype used for method functions (or caller-provided | ||
| 118 | * callbacks) that merge two file specifications. They are passed a | ||
| 119 | * DSO structure pointer (or NULL if they are to be used independantly of | ||
| 120 | * a DSO object) and two file specifications to merge. They should | ||
| 121 | * either return NULL (if there is an error condition) or a newly allocated | ||
| 122 | * string containing the result of merging that the caller will need | ||
| 123 | * to free with OPENSSL_free() when done. | ||
| 124 | * Here, merging means that bits and pieces are taken from each of the | ||
| 125 | * file specifications and added together in whatever fashion that is | ||
| 126 | * sensible for the DSO method in question. The only rule that really | ||
| 127 | * applies is that if the two specification contain pieces of the same | ||
| 128 | * type, the copy from the first string takes priority. One could see | ||
| 129 | * it as the first specification is the one given by the user and the | ||
| 130 | * second being a bunch of defaults to add on if they're missing in the | ||
| 131 | * first. */ | ||
| 132 | typedef char* (*DSO_MERGER_FUNC)(DSO *, const char *, const char *); | ||
| 133 | |||
| 134 | typedef struct dso_meth_st | ||
| 135 | { | ||
| 136 | const char *name; | ||
| 137 | /* Loads a shared library, NB: new DSO_METHODs must ensure that a | ||
| 138 | * successful load populates the loaded_filename field, and likewise a | ||
| 139 | * successful unload OPENSSL_frees and NULLs it out. */ | ||
| 140 | int (*dso_load)(DSO *dso); | ||
| 141 | /* Unloads a shared library */ | ||
| 142 | int (*dso_unload)(DSO *dso); | ||
| 143 | /* Binds a variable */ | ||
| 144 | void *(*dso_bind_var)(DSO *dso, const char *symname); | ||
| 145 | /* Binds a function - assumes a return type of DSO_FUNC_TYPE. | ||
| 146 | * This should be cast to the real function prototype by the | ||
| 147 | * caller. Platforms that don't have compatible representations | ||
| 148 | * for different prototypes (this is possible within ANSI C) | ||
| 149 | * are highly unlikely to have shared libraries at all, let | ||
| 150 | * alone a DSO_METHOD implemented for them. */ | ||
| 151 | DSO_FUNC_TYPE (*dso_bind_func)(DSO *dso, const char *symname); | ||
| 152 | |||
| 153 | /* I don't think this would actually be used in any circumstances. */ | ||
| 154 | #if 0 | ||
| 155 | /* Unbinds a variable */ | ||
| 156 | int (*dso_unbind_var)(DSO *dso, char *symname, void *symptr); | ||
| 157 | /* Unbinds a function */ | ||
| 158 | int (*dso_unbind_func)(DSO *dso, char *symname, DSO_FUNC_TYPE symptr); | ||
| 159 | #endif | ||
| 160 | /* The generic (yuck) "ctrl()" function. NB: Negative return | ||
| 161 | * values (rather than zero) indicate errors. */ | ||
| 162 | long (*dso_ctrl)(DSO *dso, int cmd, long larg, void *parg); | ||
| 163 | /* The default DSO_METHOD-specific function for converting filenames to | ||
| 164 | * a canonical native form. */ | ||
| 165 | DSO_NAME_CONVERTER_FUNC dso_name_converter; | ||
| 166 | /* The default DSO_METHOD-specific function for converting filenames to | ||
| 167 | * a canonical native form. */ | ||
| 168 | DSO_MERGER_FUNC dso_merger; | ||
| 169 | |||
| 170 | /* [De]Initialisation handlers. */ | ||
| 171 | int (*init)(DSO *dso); | ||
| 172 | int (*finish)(DSO *dso); | ||
| 173 | } DSO_METHOD; | ||
| 174 | |||
| 175 | /**********************************************************************/ | ||
| 176 | /* The low-level handle type used to refer to a loaded shared library */ | ||
| 177 | |||
| 178 | struct dso_st | ||
| 179 | { | ||
| 180 | DSO_METHOD *meth; | ||
| 181 | /* Standard dlopen uses a (void *). Win32 uses a HANDLE. VMS | ||
| 182 | * doesn't use anything but will need to cache the filename | ||
| 183 | * for use in the dso_bind handler. All in all, let each | ||
| 184 | * method control its own destiny. "Handles" and such go in | ||
| 185 | * a STACK. */ | ||
| 186 | STACK *meth_data; | ||
| 187 | int references; | ||
| 188 | int flags; | ||
| 189 | /* For use by applications etc ... use this for your bits'n'pieces, | ||
| 190 | * don't touch meth_data! */ | ||
| 191 | CRYPTO_EX_DATA ex_data; | ||
| 192 | /* If this callback function pointer is set to non-NULL, then it will | ||
| 193 | * be used in DSO_load() in place of meth->dso_name_converter. NB: This | ||
| 194 | * should normally set using DSO_set_name_converter(). */ | ||
| 195 | DSO_NAME_CONVERTER_FUNC name_converter; | ||
| 196 | /* If this callback function pointer is set to non-NULL, then it will | ||
| 197 | * be used in DSO_load() in place of meth->dso_merger. NB: This | ||
| 198 | * should normally set using DSO_set_merger(). */ | ||
| 199 | DSO_MERGER_FUNC merger; | ||
| 200 | /* This is populated with (a copy of) the platform-independant | ||
| 201 | * filename used for this DSO. */ | ||
| 202 | char *filename; | ||
| 203 | /* This is populated with (a copy of) the translated filename by which | ||
| 204 | * the DSO was actually loaded. It is NULL iff the DSO is not currently | ||
| 205 | * loaded. NB: This is here because the filename translation process | ||
| 206 | * may involve a callback being invoked more than once not only to | ||
| 207 | * convert to a platform-specific form, but also to try different | ||
| 208 | * filenames in the process of trying to perform a load. As such, this | ||
| 209 | * variable can be used to indicate (a) whether this DSO structure | ||
| 210 | * corresponds to a loaded library or not, and (b) the filename with | ||
| 211 | * which it was actually loaded. */ | ||
| 212 | char *loaded_filename; | ||
| 213 | }; | ||
| 214 | |||
| 215 | |||
| 216 | DSO * DSO_new(void); | ||
| 217 | DSO * DSO_new_method(DSO_METHOD *method); | ||
| 218 | int DSO_free(DSO *dso); | ||
| 219 | int DSO_flags(DSO *dso); | ||
| 220 | int DSO_up_ref(DSO *dso); | ||
| 221 | long DSO_ctrl(DSO *dso, int cmd, long larg, void *parg); | ||
| 222 | |||
| 223 | /* This function sets the DSO's name_converter callback. If it is non-NULL, | ||
| 224 | * then it will be used instead of the associated DSO_METHOD's function. If | ||
| 225 | * oldcb is non-NULL then it is set to the function pointer value being | ||
| 226 | * replaced. Return value is non-zero for success. */ | ||
| 227 | int DSO_set_name_converter(DSO *dso, DSO_NAME_CONVERTER_FUNC cb, | ||
| 228 | DSO_NAME_CONVERTER_FUNC *oldcb); | ||
| 229 | /* These functions can be used to get/set the platform-independant filename | ||
| 230 | * used for a DSO. NB: set will fail if the DSO is already loaded. */ | ||
| 231 | const char *DSO_get_filename(DSO *dso); | ||
| 232 | int DSO_set_filename(DSO *dso, const char *filename); | ||
| 233 | /* This function will invoke the DSO's name_converter callback to translate a | ||
| 234 | * filename, or if the callback isn't set it will instead use the DSO_METHOD's | ||
| 235 | * converter. If "filename" is NULL, the "filename" in the DSO itself will be | ||
| 236 | * used. If the DSO_FLAG_NO_NAME_TRANSLATION flag is set, then the filename is | ||
| 237 | * simply duplicated. NB: This function is usually called from within a | ||
| 238 | * DSO_METHOD during the processing of a DSO_load() call, and is exposed so that | ||
| 239 | * caller-created DSO_METHODs can do the same thing. A non-NULL return value | ||
| 240 | * will need to be OPENSSL_free()'d. */ | ||
| 241 | char *DSO_convert_filename(DSO *dso, const char *filename); | ||
| 242 | /* This function will invoke the DSO's merger callback to merge two file | ||
| 243 | * specifications, or if the callback isn't set it will instead use the | ||
| 244 | * DSO_METHOD's merger. A non-NULL return value will need to be | ||
| 245 | * OPENSSL_free()'d. */ | ||
| 246 | char *DSO_merge(DSO *dso, const char *filespec1, const char *filespec2); | ||
| 247 | /* If the DSO is currently loaded, this returns the filename that it was loaded | ||
| 248 | * under, otherwise it returns NULL. So it is also useful as a test as to | ||
| 249 | * whether the DSO is currently loaded. NB: This will not necessarily return | ||
| 250 | * the same value as DSO_convert_filename(dso, dso->filename), because the | ||
| 251 | * DSO_METHOD's load function may have tried a variety of filenames (with | ||
| 252 | * and/or without the aid of the converters) before settling on the one it | ||
| 253 | * actually loaded. */ | ||
| 254 | const char *DSO_get_loaded_filename(DSO *dso); | ||
| 255 | |||
| 256 | void DSO_set_default_method(DSO_METHOD *meth); | ||
| 257 | DSO_METHOD *DSO_get_default_method(void); | ||
| 258 | DSO_METHOD *DSO_get_method(DSO *dso); | ||
| 259 | DSO_METHOD *DSO_set_method(DSO *dso, DSO_METHOD *meth); | ||
| 260 | |||
| 261 | /* The all-singing all-dancing load function, you normally pass NULL | ||
| 262 | * for the first and third parameters. Use DSO_up and DSO_free for | ||
| 263 | * subsequent reference count handling. Any flags passed in will be set | ||
| 264 | * in the constructed DSO after its init() function but before the | ||
| 265 | * load operation. If 'dso' is non-NULL, 'flags' is ignored. */ | ||
| 266 | DSO *DSO_load(DSO *dso, const char *filename, DSO_METHOD *meth, int flags); | ||
| 267 | |||
| 268 | /* This function binds to a variable inside a shared library. */ | ||
| 269 | void *DSO_bind_var(DSO *dso, const char *symname); | ||
| 270 | |||
| 271 | /* This function binds to a function inside a shared library. */ | ||
| 272 | DSO_FUNC_TYPE DSO_bind_func(DSO *dso, const char *symname); | ||
| 273 | |||
| 274 | /* This method is the default, but will beg, borrow, or steal whatever | ||
| 275 | * method should be the default on any particular platform (including | ||
| 276 | * DSO_METH_null() if necessary). */ | ||
| 277 | DSO_METHOD *DSO_METHOD_openssl(void); | ||
| 278 | |||
| 279 | /* This method is defined for all platforms - if a platform has no | ||
| 280 | * DSO support then this will be the only method! */ | ||
| 281 | DSO_METHOD *DSO_METHOD_null(void); | ||
| 282 | |||
| 283 | /* If DSO_DLFCN is defined, the standard dlfcn.h-style functions | ||
| 284 | * (dlopen, dlclose, dlsym, etc) will be used and incorporated into | ||
| 285 | * this method. If not, this method will return NULL. */ | ||
| 286 | DSO_METHOD *DSO_METHOD_dlfcn(void); | ||
| 287 | |||
| 288 | /* If DSO_DL is defined, the standard dl.h-style functions (shl_load, | ||
| 289 | * shl_unload, shl_findsym, etc) will be used and incorporated into | ||
| 290 | * this method. If not, this method will return NULL. */ | ||
| 291 | DSO_METHOD *DSO_METHOD_dl(void); | ||
| 292 | |||
| 293 | /* If WIN32 is defined, use DLLs. If not, return NULL. */ | ||
| 294 | DSO_METHOD *DSO_METHOD_win32(void); | ||
| 295 | |||
| 296 | /* If VMS is defined, use shared images. If not, return NULL. */ | ||
| 297 | DSO_METHOD *DSO_METHOD_vms(void); | ||
| 298 | |||
| 299 | /* BEGIN ERROR CODES */ | ||
| 300 | /* The following lines are auto generated by the script mkerr.pl. Any changes | ||
| 301 | * made after this point may be overwritten when the script is next run. | ||
| 302 | */ | ||
| 303 | void ERR_load_DSO_strings(void); | ||
| 304 | |||
| 305 | /* Error codes for the DSO functions. */ | ||
| 306 | |||
| 307 | /* Function codes. */ | ||
| 308 | #define DSO_F_DLFCN_BIND_FUNC 100 | ||
| 309 | #define DSO_F_DLFCN_BIND_VAR 101 | ||
| 310 | #define DSO_F_DLFCN_LOAD 102 | ||
| 311 | #define DSO_F_DLFCN_MERGER 130 | ||
| 312 | #define DSO_F_DLFCN_NAME_CONVERTER 123 | ||
| 313 | #define DSO_F_DLFCN_UNLOAD 103 | ||
| 314 | #define DSO_F_DL_BIND_FUNC 104 | ||
| 315 | #define DSO_F_DL_BIND_VAR 105 | ||
| 316 | #define DSO_F_DL_LOAD 106 | ||
| 317 | #define DSO_F_DL_MERGER 131 | ||
| 318 | #define DSO_F_DL_NAME_CONVERTER 124 | ||
| 319 | #define DSO_F_DL_UNLOAD 107 | ||
| 320 | #define DSO_F_DSO_BIND_FUNC 108 | ||
| 321 | #define DSO_F_DSO_BIND_VAR 109 | ||
| 322 | #define DSO_F_DSO_CONVERT_FILENAME 126 | ||
| 323 | #define DSO_F_DSO_CTRL 110 | ||
| 324 | #define DSO_F_DSO_FREE 111 | ||
| 325 | #define DSO_F_DSO_GET_FILENAME 127 | ||
| 326 | #define DSO_F_DSO_GET_LOADED_FILENAME 128 | ||
| 327 | #define DSO_F_DSO_LOAD 112 | ||
| 328 | #define DSO_F_DSO_MERGE 132 | ||
| 329 | #define DSO_F_DSO_NEW_METHOD 113 | ||
| 330 | #define DSO_F_DSO_SET_FILENAME 129 | ||
| 331 | #define DSO_F_DSO_SET_NAME_CONVERTER 122 | ||
| 332 | #define DSO_F_DSO_UP_REF 114 | ||
| 333 | #define DSO_F_VMS_BIND_SYM 115 | ||
| 334 | #define DSO_F_VMS_LOAD 116 | ||
| 335 | #define DSO_F_VMS_MERGER 133 | ||
| 336 | #define DSO_F_VMS_UNLOAD 117 | ||
| 337 | #define DSO_F_WIN32_BIND_FUNC 118 | ||
| 338 | #define DSO_F_WIN32_BIND_VAR 119 | ||
| 339 | #define DSO_F_WIN32_JOINER 135 | ||
| 340 | #define DSO_F_WIN32_LOAD 120 | ||
| 341 | #define DSO_F_WIN32_MERGER 134 | ||
| 342 | #define DSO_F_WIN32_NAME_CONVERTER 125 | ||
| 343 | #define DSO_F_WIN32_SPLITTER 136 | ||
| 344 | #define DSO_F_WIN32_UNLOAD 121 | ||
| 345 | |||
| 346 | /* Reason codes. */ | ||
| 347 | #define DSO_R_CTRL_FAILED 100 | ||
| 348 | #define DSO_R_DSO_ALREADY_LOADED 110 | ||
| 349 | #define DSO_R_EMPTY_FILE_STRUCTURE 113 | ||
| 350 | #define DSO_R_FAILURE 114 | ||
| 351 | #define DSO_R_FILENAME_TOO_BIG 101 | ||
| 352 | #define DSO_R_FINISH_FAILED 102 | ||
| 353 | #define DSO_R_INCORRECT_FILE_SYNTAX 115 | ||
| 354 | #define DSO_R_LOAD_FAILED 103 | ||
| 355 | #define DSO_R_NAME_TRANSLATION_FAILED 109 | ||
| 356 | #define DSO_R_NO_FILENAME 111 | ||
| 357 | #define DSO_R_NO_FILE_SPECIFICATION 116 | ||
| 358 | #define DSO_R_NULL_HANDLE 104 | ||
| 359 | #define DSO_R_SET_FILENAME_FAILED 112 | ||
| 360 | #define DSO_R_STACK_ERROR 105 | ||
| 361 | #define DSO_R_SYM_FAILURE 106 | ||
| 362 | #define DSO_R_UNLOAD_FAILED 107 | ||
| 363 | #define DSO_R_UNSUPPORTED 108 | ||
| 364 | |||
| 365 | #ifdef __cplusplus | ||
| 366 | } | ||
| 367 | #endif | ||
| 368 | #endif | ||
diff --git a/src/lib/libcrypto/dso/dso_dlfcn.c b/src/lib/libcrypto/dso/dso_dlfcn.c new file mode 100644 index 0000000000..656cd496f8 --- /dev/null +++ b/src/lib/libcrypto/dso/dso_dlfcn.c | |||
| @@ -0,0 +1,372 @@ | |||
| 1 | /* dso_dlfcn.c -*- mode:C; c-file-style: "eay" -*- */ | ||
| 2 | /* Written by Geoff Thorpe (geoff@geoffthorpe.net) for the OpenSSL | ||
| 3 | * project 2000. | ||
| 4 | */ | ||
| 5 | /* ==================================================================== | ||
| 6 | * Copyright (c) 2000 The OpenSSL Project. All rights reserved. | ||
| 7 | * | ||
| 8 | * Redistribution and use in source and binary forms, with or without | ||
| 9 | * modification, are permitted provided that the following conditions | ||
| 10 | * are met: | ||
| 11 | * | ||
| 12 | * 1. Redistributions of source code must retain the above copyright | ||
| 13 | * notice, this list of conditions and the following disclaimer. | ||
| 14 | * | ||
| 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 | ||
| 18 | * distribution. | ||
| 19 | * | ||
| 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/)" | ||
| 24 | * | ||
| 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. | ||
| 29 | * | ||
| 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. | ||
| 33 | * | ||
| 34 | * 6. Redistributions of any form whatsoever must retain the following | ||
| 35 | * acknowledgment: | ||
| 36 | * "This product includes software developed by the OpenSSL Project | ||
| 37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
| 38 | * | ||
| 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 | * ==================================================================== | ||
| 52 | * | ||
| 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). | ||
| 56 | * | ||
| 57 | */ | ||
| 58 | |||
| 59 | #include <stdio.h> | ||
| 60 | #include "cryptlib.h" | ||
| 61 | #include <openssl/dso.h> | ||
| 62 | |||
| 63 | #ifndef DSO_DLFCN | ||
| 64 | DSO_METHOD *DSO_METHOD_dlfcn(void) | ||
| 65 | { | ||
| 66 | return NULL; | ||
| 67 | } | ||
| 68 | #else | ||
| 69 | |||
| 70 | #ifdef HAVE_DLFCN_H | ||
| 71 | #include <dlfcn.h> | ||
| 72 | #endif | ||
| 73 | |||
| 74 | /* Part of the hack in "dlfcn_load" ... */ | ||
| 75 | #define DSO_MAX_TRANSLATED_SIZE 256 | ||
| 76 | |||
| 77 | static int dlfcn_load(DSO *dso); | ||
| 78 | static int dlfcn_unload(DSO *dso); | ||
| 79 | static void *dlfcn_bind_var(DSO *dso, const char *symname); | ||
| 80 | static DSO_FUNC_TYPE dlfcn_bind_func(DSO *dso, const char *symname); | ||
| 81 | #if 0 | ||
| 82 | static int dlfcn_unbind(DSO *dso, char *symname, void *symptr); | ||
| 83 | static int dlfcn_init(DSO *dso); | ||
| 84 | static int dlfcn_finish(DSO *dso); | ||
| 85 | static long dlfcn_ctrl(DSO *dso, int cmd, long larg, void *parg); | ||
| 86 | #endif | ||
| 87 | static char *dlfcn_name_converter(DSO *dso, const char *filename); | ||
| 88 | static char *dlfcn_merger(DSO *dso, const char *filespec1, | ||
| 89 | const char *filespec2); | ||
| 90 | |||
| 91 | static DSO_METHOD dso_meth_dlfcn = { | ||
| 92 | "OpenSSL 'dlfcn' shared library method", | ||
| 93 | dlfcn_load, | ||
| 94 | dlfcn_unload, | ||
| 95 | dlfcn_bind_var, | ||
| 96 | dlfcn_bind_func, | ||
| 97 | /* For now, "unbind" doesn't exist */ | ||
| 98 | #if 0 | ||
| 99 | NULL, /* unbind_var */ | ||
| 100 | NULL, /* unbind_func */ | ||
| 101 | #endif | ||
| 102 | NULL, /* ctrl */ | ||
| 103 | dlfcn_name_converter, | ||
| 104 | dlfcn_merger, | ||
| 105 | NULL, /* init */ | ||
| 106 | NULL /* finish */ | ||
| 107 | }; | ||
| 108 | |||
| 109 | DSO_METHOD *DSO_METHOD_dlfcn(void) | ||
| 110 | { | ||
| 111 | return(&dso_meth_dlfcn); | ||
| 112 | } | ||
| 113 | |||
| 114 | /* Prior to using the dlopen() function, we should decide on the flag | ||
| 115 | * we send. There's a few different ways of doing this and it's a | ||
| 116 | * messy venn-diagram to match up which platforms support what. So | ||
| 117 | * as we don't have autoconf yet, I'm implementing a hack that could | ||
| 118 | * be hacked further relatively easily to deal with cases as we find | ||
| 119 | * them. Initially this is to cope with OpenBSD. */ | ||
| 120 | #if defined(__OpenBSD__) || defined(__NetBSD__) | ||
| 121 | # ifdef DL_LAZY | ||
| 122 | # define DLOPEN_FLAG DL_LAZY | ||
| 123 | # else | ||
| 124 | # ifdef RTLD_NOW | ||
| 125 | # define DLOPEN_FLAG RTLD_NOW | ||
| 126 | # else | ||
| 127 | # define DLOPEN_FLAG 0 | ||
| 128 | # endif | ||
| 129 | # endif | ||
| 130 | #else | ||
| 131 | # ifdef OPENSSL_SYS_SUNOS | ||
| 132 | # define DLOPEN_FLAG 1 | ||
| 133 | # else | ||
| 134 | # define DLOPEN_FLAG RTLD_NOW /* Hope this works everywhere else */ | ||
| 135 | # endif | ||
| 136 | #endif | ||
| 137 | |||
| 138 | /* For this DSO_METHOD, our meth_data STACK will contain; | ||
| 139 | * (i) the handle (void*) returned from dlopen(). | ||
| 140 | */ | ||
| 141 | |||
| 142 | static int dlfcn_load(DSO *dso) | ||
| 143 | { | ||
| 144 | void *ptr = NULL; | ||
| 145 | /* See applicable comments in dso_dl.c */ | ||
| 146 | char *filename = DSO_convert_filename(dso, NULL); | ||
| 147 | int flags = DLOPEN_FLAG; | ||
| 148 | |||
| 149 | if(filename == NULL) | ||
| 150 | { | ||
| 151 | DSOerr(DSO_F_DLFCN_LOAD,DSO_R_NO_FILENAME); | ||
| 152 | goto err; | ||
| 153 | } | ||
| 154 | |||
| 155 | #ifdef RTLD_GLOBAL | ||
| 156 | if (dso->flags & DSO_FLAG_GLOBAL_SYMBOLS) | ||
| 157 | flags |= RTLD_GLOBAL; | ||
| 158 | #endif | ||
| 159 | ptr = dlopen(filename, flags); | ||
| 160 | if(ptr == NULL) | ||
| 161 | { | ||
| 162 | DSOerr(DSO_F_DLFCN_LOAD,DSO_R_LOAD_FAILED); | ||
| 163 | ERR_add_error_data(4, "filename(", filename, "): ", dlerror()); | ||
| 164 | goto err; | ||
| 165 | } | ||
| 166 | if(!sk_push(dso->meth_data, (char *)ptr)) | ||
| 167 | { | ||
| 168 | DSOerr(DSO_F_DLFCN_LOAD,DSO_R_STACK_ERROR); | ||
| 169 | goto err; | ||
| 170 | } | ||
| 171 | /* Success */ | ||
| 172 | dso->loaded_filename = filename; | ||
| 173 | return(1); | ||
| 174 | err: | ||
| 175 | /* Cleanup! */ | ||
| 176 | if(filename != NULL) | ||
| 177 | OPENSSL_free(filename); | ||
| 178 | if(ptr != NULL) | ||
| 179 | dlclose(ptr); | ||
| 180 | return(0); | ||
| 181 | } | ||
| 182 | |||
| 183 | static int dlfcn_unload(DSO *dso) | ||
| 184 | { | ||
| 185 | void *ptr; | ||
| 186 | if(dso == NULL) | ||
| 187 | { | ||
| 188 | DSOerr(DSO_F_DLFCN_UNLOAD,ERR_R_PASSED_NULL_PARAMETER); | ||
| 189 | return(0); | ||
| 190 | } | ||
| 191 | if(sk_num(dso->meth_data) < 1) | ||
| 192 | return(1); | ||
| 193 | ptr = (void *)sk_pop(dso->meth_data); | ||
| 194 | if(ptr == NULL) | ||
| 195 | { | ||
| 196 | DSOerr(DSO_F_DLFCN_UNLOAD,DSO_R_NULL_HANDLE); | ||
| 197 | /* Should push the value back onto the stack in | ||
| 198 | * case of a retry. */ | ||
| 199 | sk_push(dso->meth_data, (char *)ptr); | ||
| 200 | return(0); | ||
| 201 | } | ||
| 202 | /* For now I'm not aware of any errors associated with dlclose() */ | ||
| 203 | dlclose(ptr); | ||
| 204 | return(1); | ||
| 205 | } | ||
| 206 | |||
| 207 | static void *dlfcn_bind_var(DSO *dso, const char *symname) | ||
| 208 | { | ||
| 209 | void *ptr, *sym; | ||
| 210 | |||
| 211 | if((dso == NULL) || (symname == NULL)) | ||
| 212 | { | ||
| 213 | DSOerr(DSO_F_DLFCN_BIND_VAR,ERR_R_PASSED_NULL_PARAMETER); | ||
| 214 | return(NULL); | ||
| 215 | } | ||
| 216 | if(sk_num(dso->meth_data) < 1) | ||
| 217 | { | ||
| 218 | DSOerr(DSO_F_DLFCN_BIND_VAR,DSO_R_STACK_ERROR); | ||
| 219 | return(NULL); | ||
| 220 | } | ||
| 221 | ptr = (void *)sk_value(dso->meth_data, sk_num(dso->meth_data) - 1); | ||
| 222 | if(ptr == NULL) | ||
| 223 | { | ||
| 224 | DSOerr(DSO_F_DLFCN_BIND_VAR,DSO_R_NULL_HANDLE); | ||
| 225 | return(NULL); | ||
| 226 | } | ||
| 227 | sym = dlsym(ptr, symname); | ||
| 228 | if(sym == NULL) | ||
| 229 | { | ||
| 230 | DSOerr(DSO_F_DLFCN_BIND_VAR,DSO_R_SYM_FAILURE); | ||
| 231 | ERR_add_error_data(4, "symname(", symname, "): ", dlerror()); | ||
| 232 | return(NULL); | ||
| 233 | } | ||
| 234 | return(sym); | ||
| 235 | } | ||
| 236 | |||
| 237 | static DSO_FUNC_TYPE dlfcn_bind_func(DSO *dso, const char *symname) | ||
| 238 | { | ||
| 239 | void *ptr; | ||
| 240 | DSO_FUNC_TYPE sym, *tsym = &sym; | ||
| 241 | |||
| 242 | if((dso == NULL) || (symname == NULL)) | ||
| 243 | { | ||
| 244 | DSOerr(DSO_F_DLFCN_BIND_FUNC,ERR_R_PASSED_NULL_PARAMETER); | ||
| 245 | return(NULL); | ||
| 246 | } | ||
| 247 | if(sk_num(dso->meth_data) < 1) | ||
| 248 | { | ||
| 249 | DSOerr(DSO_F_DLFCN_BIND_FUNC,DSO_R_STACK_ERROR); | ||
| 250 | return(NULL); | ||
| 251 | } | ||
| 252 | ptr = (void *)sk_value(dso->meth_data, sk_num(dso->meth_data) - 1); | ||
| 253 | if(ptr == NULL) | ||
| 254 | { | ||
| 255 | DSOerr(DSO_F_DLFCN_BIND_FUNC,DSO_R_NULL_HANDLE); | ||
| 256 | return(NULL); | ||
| 257 | } | ||
| 258 | *(void **)(tsym) = dlsym(ptr, symname); | ||
| 259 | if(sym == NULL) | ||
| 260 | { | ||
| 261 | DSOerr(DSO_F_DLFCN_BIND_FUNC,DSO_R_SYM_FAILURE); | ||
| 262 | ERR_add_error_data(4, "symname(", symname, "): ", dlerror()); | ||
| 263 | return(NULL); | ||
| 264 | } | ||
| 265 | return(sym); | ||
| 266 | } | ||
| 267 | |||
| 268 | static char *dlfcn_merger(DSO *dso, const char *filespec1, | ||
| 269 | const char *filespec2) | ||
| 270 | { | ||
| 271 | char *merged; | ||
| 272 | size_t len; | ||
| 273 | |||
| 274 | if(!filespec1 && !filespec2) | ||
| 275 | { | ||
| 276 | DSOerr(DSO_F_DLFCN_MERGER, | ||
| 277 | ERR_R_PASSED_NULL_PARAMETER); | ||
| 278 | return(NULL); | ||
| 279 | } | ||
| 280 | /* If the first file specification is a rooted path, it rules. | ||
| 281 | same goes if the second file specification is missing. */ | ||
| 282 | if (!filespec2 || filespec1[0] == '/') | ||
| 283 | { | ||
| 284 | len = strlen(filespec1) + 1; | ||
| 285 | merged = OPENSSL_malloc(len); | ||
| 286 | if(!merged) | ||
| 287 | { | ||
| 288 | DSOerr(DSO_F_DLFCN_MERGER, | ||
| 289 | ERR_R_MALLOC_FAILURE); | ||
| 290 | return(NULL); | ||
| 291 | } | ||
| 292 | strlcpy(merged, filespec1, len); | ||
| 293 | } | ||
| 294 | /* If the first file specification is missing, the second one rules. */ | ||
| 295 | else if (!filespec1) | ||
| 296 | { | ||
| 297 | len = strlen(filespec2) + 1; | ||
| 298 | merged = OPENSSL_malloc(strlen(filespec2) + 1); | ||
| 299 | if(!merged) | ||
| 300 | { | ||
| 301 | DSOerr(DSO_F_DLFCN_MERGER, | ||
| 302 | ERR_R_MALLOC_FAILURE); | ||
| 303 | return(NULL); | ||
| 304 | } | ||
| 305 | strlcpy(merged, filespec2, len); | ||
| 306 | } | ||
| 307 | else | ||
| 308 | /* This part isn't as trivial as it looks. It assumes that | ||
| 309 | the second file specification really is a directory, and | ||
| 310 | makes no checks whatsoever. Therefore, the result becomes | ||
| 311 | the concatenation of filespec2 followed by a slash followed | ||
| 312 | by filespec1. */ | ||
| 313 | { | ||
| 314 | int spec2len, len; | ||
| 315 | |||
| 316 | spec2len = (filespec2 ? strlen(filespec2) : 0); | ||
| 317 | len = spec2len + (filespec1 ? strlen(filespec1) : 0); | ||
| 318 | |||
| 319 | if(filespec2 && filespec2[spec2len - 1] == '/') | ||
| 320 | { | ||
| 321 | spec2len--; | ||
| 322 | len--; | ||
| 323 | } | ||
| 324 | merged = OPENSSL_malloc(len + 2); | ||
| 325 | if(!merged) | ||
| 326 | { | ||
| 327 | DSOerr(DSO_F_DLFCN_MERGER, | ||
| 328 | ERR_R_MALLOC_FAILURE); | ||
| 329 | return(NULL); | ||
| 330 | } | ||
| 331 | strlcpy(merged, filespec2, len + 2); | ||
| 332 | merged[spec2len] = '/'; | ||
| 333 | strlcpy(&merged[spec2len + 1], filespec1, len + 1 - spec2len); | ||
| 334 | } | ||
| 335 | return(merged); | ||
| 336 | } | ||
| 337 | |||
| 338 | static char *dlfcn_name_converter(DSO *dso, const char *filename) | ||
| 339 | { | ||
| 340 | char *translated; | ||
| 341 | int len, rsize, transform; | ||
| 342 | |||
| 343 | len = strlen(filename); | ||
| 344 | rsize = len + 1; | ||
| 345 | transform = (strstr(filename, "/") == NULL); | ||
| 346 | if(transform) | ||
| 347 | { | ||
| 348 | /* We will convert this to "%s.so" or "lib%s.so" */ | ||
| 349 | rsize += 3; /* The length of ".so" */ | ||
| 350 | if ((DSO_flags(dso) & DSO_FLAG_NAME_TRANSLATION_EXT_ONLY) == 0) | ||
| 351 | rsize += 3; /* The length of "lib" */ | ||
| 352 | } | ||
| 353 | translated = OPENSSL_malloc(rsize); | ||
| 354 | if(translated == NULL) | ||
| 355 | { | ||
| 356 | DSOerr(DSO_F_DLFCN_NAME_CONVERTER, | ||
| 357 | DSO_R_NAME_TRANSLATION_FAILED); | ||
| 358 | return(NULL); | ||
| 359 | } | ||
| 360 | if(transform) | ||
| 361 | { | ||
| 362 | if ((DSO_flags(dso) & DSO_FLAG_NAME_TRANSLATION_EXT_ONLY) == 0) | ||
| 363 | snprintf(translated, rsize, "lib%s.so", filename); | ||
| 364 | else | ||
| 365 | snprintf(translated, rsize, "%s.so", filename); | ||
| 366 | } | ||
| 367 | else | ||
| 368 | snprintf(translated, rsize, "%s", filename); | ||
| 369 | return(translated); | ||
| 370 | } | ||
| 371 | |||
| 372 | #endif /* DSO_DLFCN */ | ||
diff --git a/src/lib/libcrypto/dso/dso_err.c b/src/lib/libcrypto/dso/dso_err.c new file mode 100644 index 0000000000..a8b0a210de --- /dev/null +++ b/src/lib/libcrypto/dso/dso_err.c | |||
| @@ -0,0 +1,147 @@ | |||
| 1 | /* crypto/dso/dso_err.c */ | ||
| 2 | /* ==================================================================== | ||
| 3 | * Copyright (c) 1999-2005 The OpenSSL Project. All rights reserved. | ||
| 4 | * | ||
| 5 | * Redistribution and use in source and binary forms, with or without | ||
| 6 | * modification, are permitted provided that the following conditions | ||
| 7 | * are met: | ||
| 8 | * | ||
| 9 | * 1. Redistributions of source code must retain the above copyright | ||
| 10 | * notice, this list of conditions and the following disclaimer. | ||
| 11 | * | ||
| 12 | * 2. Redistributions in binary form must reproduce the above copyright | ||
| 13 | * notice, this list of conditions and the following disclaimer in | ||
| 14 | * the documentation and/or other materials provided with the | ||
| 15 | * distribution. | ||
| 16 | * | ||
| 17 | * 3. All advertising materials mentioning features or use of this | ||
| 18 | * software must display the following acknowledgment: | ||
| 19 | * "This product includes software developed by the OpenSSL Project | ||
| 20 | * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | ||
| 21 | * | ||
| 22 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
| 23 | * endorse or promote products derived from this software without | ||
| 24 | * prior written permission. For written permission, please contact | ||
| 25 | * openssl-core@OpenSSL.org. | ||
| 26 | * | ||
| 27 | * 5. Products derived from this software may not be called "OpenSSL" | ||
| 28 | * nor may "OpenSSL" appear in their names without prior written | ||
| 29 | * permission of the OpenSSL Project. | ||
| 30 | * | ||
| 31 | * 6. Redistributions of any form whatsoever must retain the following | ||
| 32 | * acknowledgment: | ||
| 33 | * "This product includes software developed by the OpenSSL Project | ||
| 34 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
| 35 | * | ||
| 36 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
| 37 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
| 38 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
| 39 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
| 40 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
| 41 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
| 42 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
| 43 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
| 44 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
| 45 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
| 46 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
| 47 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
| 48 | * ==================================================================== | ||
| 49 | * | ||
| 50 | * This product includes cryptographic software written by Eric Young | ||
| 51 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
| 52 | * Hudson (tjh@cryptsoft.com). | ||
| 53 | * | ||
| 54 | */ | ||
| 55 | |||
| 56 | /* NOTE: this file was auto generated by the mkerr.pl script: any changes | ||
| 57 | * made to it will be overwritten when the script next updates this file, | ||
| 58 | * only reason strings will be preserved. | ||
| 59 | */ | ||
| 60 | |||
| 61 | #include <stdio.h> | ||
| 62 | #include <openssl/err.h> | ||
| 63 | #include <openssl/dso.h> | ||
| 64 | |||
| 65 | /* BEGIN ERROR CODES */ | ||
| 66 | #ifndef OPENSSL_NO_ERR | ||
| 67 | |||
| 68 | #define ERR_FUNC(func) ERR_PACK(ERR_LIB_DSO,func,0) | ||
| 69 | #define ERR_REASON(reason) ERR_PACK(ERR_LIB_DSO,0,reason) | ||
| 70 | |||
| 71 | static ERR_STRING_DATA DSO_str_functs[]= | ||
| 72 | { | ||
| 73 | {ERR_FUNC(DSO_F_DLFCN_BIND_FUNC), "DLFCN_BIND_FUNC"}, | ||
| 74 | {ERR_FUNC(DSO_F_DLFCN_BIND_VAR), "DLFCN_BIND_VAR"}, | ||
| 75 | {ERR_FUNC(DSO_F_DLFCN_LOAD), "DLFCN_LOAD"}, | ||
| 76 | {ERR_FUNC(DSO_F_DLFCN_MERGER), "DLFCN_MERGER"}, | ||
| 77 | {ERR_FUNC(DSO_F_DLFCN_NAME_CONVERTER), "DLFCN_NAME_CONVERTER"}, | ||
| 78 | {ERR_FUNC(DSO_F_DLFCN_UNLOAD), "DLFCN_UNLOAD"}, | ||
| 79 | {ERR_FUNC(DSO_F_DL_BIND_FUNC), "DL_BIND_FUNC"}, | ||
| 80 | {ERR_FUNC(DSO_F_DL_BIND_VAR), "DL_BIND_VAR"}, | ||
| 81 | {ERR_FUNC(DSO_F_DL_LOAD), "DL_LOAD"}, | ||
| 82 | {ERR_FUNC(DSO_F_DL_MERGER), "DL_MERGER"}, | ||
| 83 | {ERR_FUNC(DSO_F_DL_NAME_CONVERTER), "DL_NAME_CONVERTER"}, | ||
| 84 | {ERR_FUNC(DSO_F_DL_UNLOAD), "DL_UNLOAD"}, | ||
| 85 | {ERR_FUNC(DSO_F_DSO_BIND_FUNC), "DSO_bind_func"}, | ||
| 86 | {ERR_FUNC(DSO_F_DSO_BIND_VAR), "DSO_bind_var"}, | ||
| 87 | {ERR_FUNC(DSO_F_DSO_CONVERT_FILENAME), "DSO_convert_filename"}, | ||
| 88 | {ERR_FUNC(DSO_F_DSO_CTRL), "DSO_ctrl"}, | ||
| 89 | {ERR_FUNC(DSO_F_DSO_FREE), "DSO_free"}, | ||
| 90 | {ERR_FUNC(DSO_F_DSO_GET_FILENAME), "DSO_get_filename"}, | ||
| 91 | {ERR_FUNC(DSO_F_DSO_GET_LOADED_FILENAME), "DSO_get_loaded_filename"}, | ||
| 92 | {ERR_FUNC(DSO_F_DSO_LOAD), "DSO_load"}, | ||
| 93 | {ERR_FUNC(DSO_F_DSO_MERGE), "DSO_merge"}, | ||
| 94 | {ERR_FUNC(DSO_F_DSO_NEW_METHOD), "DSO_new_method"}, | ||
| 95 | {ERR_FUNC(DSO_F_DSO_SET_FILENAME), "DSO_set_filename"}, | ||
| 96 | {ERR_FUNC(DSO_F_DSO_SET_NAME_CONVERTER), "DSO_set_name_converter"}, | ||
| 97 | {ERR_FUNC(DSO_F_DSO_UP_REF), "DSO_up_ref"}, | ||
| 98 | {ERR_FUNC(DSO_F_VMS_BIND_SYM), "VMS_BIND_SYM"}, | ||
| 99 | {ERR_FUNC(DSO_F_VMS_LOAD), "VMS_LOAD"}, | ||
| 100 | {ERR_FUNC(DSO_F_VMS_MERGER), "VMS_MERGER"}, | ||
| 101 | {ERR_FUNC(DSO_F_VMS_UNLOAD), "VMS_UNLOAD"}, | ||
| 102 | {ERR_FUNC(DSO_F_WIN32_BIND_FUNC), "WIN32_BIND_FUNC"}, | ||
| 103 | {ERR_FUNC(DSO_F_WIN32_BIND_VAR), "WIN32_BIND_VAR"}, | ||
| 104 | {ERR_FUNC(DSO_F_WIN32_JOINER), "WIN32_JOINER"}, | ||
| 105 | {ERR_FUNC(DSO_F_WIN32_LOAD), "WIN32_LOAD"}, | ||
| 106 | {ERR_FUNC(DSO_F_WIN32_MERGER), "WIN32_MERGER"}, | ||
| 107 | {ERR_FUNC(DSO_F_WIN32_NAME_CONVERTER), "WIN32_NAME_CONVERTER"}, | ||
| 108 | {ERR_FUNC(DSO_F_WIN32_SPLITTER), "WIN32_SPLITTER"}, | ||
| 109 | {ERR_FUNC(DSO_F_WIN32_UNLOAD), "WIN32_UNLOAD"}, | ||
| 110 | {0,NULL} | ||
| 111 | }; | ||
| 112 | |||
| 113 | static ERR_STRING_DATA DSO_str_reasons[]= | ||
| 114 | { | ||
| 115 | {ERR_REASON(DSO_R_CTRL_FAILED) ,"control command failed"}, | ||
| 116 | {ERR_REASON(DSO_R_DSO_ALREADY_LOADED) ,"dso already loaded"}, | ||
| 117 | {ERR_REASON(DSO_R_EMPTY_FILE_STRUCTURE) ,"empty file structure"}, | ||
| 118 | {ERR_REASON(DSO_R_FAILURE) ,"failure"}, | ||
| 119 | {ERR_REASON(DSO_R_FILENAME_TOO_BIG) ,"filename too big"}, | ||
| 120 | {ERR_REASON(DSO_R_FINISH_FAILED) ,"cleanup method function failed"}, | ||
| 121 | {ERR_REASON(DSO_R_INCORRECT_FILE_SYNTAX) ,"incorrect file syntax"}, | ||
| 122 | {ERR_REASON(DSO_R_LOAD_FAILED) ,"could not load the shared library"}, | ||
| 123 | {ERR_REASON(DSO_R_NAME_TRANSLATION_FAILED),"name translation failed"}, | ||
| 124 | {ERR_REASON(DSO_R_NO_FILENAME) ,"no filename"}, | ||
| 125 | {ERR_REASON(DSO_R_NO_FILE_SPECIFICATION) ,"no file specification"}, | ||
| 126 | {ERR_REASON(DSO_R_NULL_HANDLE) ,"a null shared library handle was used"}, | ||
| 127 | {ERR_REASON(DSO_R_SET_FILENAME_FAILED) ,"set filename failed"}, | ||
| 128 | {ERR_REASON(DSO_R_STACK_ERROR) ,"the meth_data stack is corrupt"}, | ||
| 129 | {ERR_REASON(DSO_R_SYM_FAILURE) ,"could not bind to the requested symbol name"}, | ||
| 130 | {ERR_REASON(DSO_R_UNLOAD_FAILED) ,"could not unload the shared library"}, | ||
| 131 | {ERR_REASON(DSO_R_UNSUPPORTED) ,"functionality not supported"}, | ||
| 132 | {0,NULL} | ||
| 133 | }; | ||
| 134 | |||
| 135 | #endif | ||
| 136 | |||
| 137 | void ERR_load_DSO_strings(void) | ||
| 138 | { | ||
| 139 | #ifndef OPENSSL_NO_ERR | ||
| 140 | |||
| 141 | if (ERR_func_error_string(DSO_str_functs[0].error) == NULL) | ||
| 142 | { | ||
| 143 | ERR_load_strings(0,DSO_str_functs); | ||
| 144 | ERR_load_strings(0,DSO_str_reasons); | ||
| 145 | } | ||
| 146 | #endif | ||
| 147 | } | ||
diff --git a/src/lib/libcrypto/dso/dso_lib.c b/src/lib/libcrypto/dso/dso_lib.c new file mode 100644 index 0000000000..49bdd71309 --- /dev/null +++ b/src/lib/libcrypto/dso/dso_lib.c | |||
| @@ -0,0 +1,466 @@ | |||
| 1 | /* dso_lib.c -*- mode:C; c-file-style: "eay" -*- */ | ||
| 2 | /* Written by Geoff Thorpe (geoff@geoffthorpe.net) for the OpenSSL | ||
| 3 | * project 2000. | ||
| 4 | */ | ||
| 5 | /* ==================================================================== | ||
| 6 | * Copyright (c) 2000 The OpenSSL Project. All rights reserved. | ||
| 7 | * | ||
| 8 | * Redistribution and use in source and binary forms, with or without | ||
| 9 | * modification, are permitted provided that the following conditions | ||
| 10 | * are met: | ||
| 11 | * | ||
| 12 | * 1. Redistributions of source code must retain the above copyright | ||
| 13 | * notice, this list of conditions and the following disclaimer. | ||
| 14 | * | ||
| 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 | ||
| 18 | * distribution. | ||
| 19 | * | ||
| 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/)" | ||
| 24 | * | ||
| 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. | ||
| 29 | * | ||
| 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. | ||
| 33 | * | ||
| 34 | * 6. Redistributions of any form whatsoever must retain the following | ||
| 35 | * acknowledgment: | ||
| 36 | * "This product includes software developed by the OpenSSL Project | ||
| 37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
| 38 | * | ||
| 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 | * ==================================================================== | ||
| 52 | * | ||
| 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). | ||
| 56 | * | ||
| 57 | */ | ||
| 58 | |||
| 59 | #include <stdio.h> | ||
| 60 | #include <openssl/crypto.h> | ||
| 61 | #include "cryptlib.h" | ||
| 62 | #include <openssl/dso.h> | ||
| 63 | |||
| 64 | static DSO_METHOD *default_DSO_meth = NULL; | ||
| 65 | |||
| 66 | DSO *DSO_new(void) | ||
| 67 | { | ||
| 68 | return(DSO_new_method(NULL)); | ||
| 69 | } | ||
| 70 | |||
| 71 | void DSO_set_default_method(DSO_METHOD *meth) | ||
| 72 | { | ||
| 73 | default_DSO_meth = meth; | ||
| 74 | } | ||
| 75 | |||
| 76 | DSO_METHOD *DSO_get_default_method(void) | ||
| 77 | { | ||
| 78 | return(default_DSO_meth); | ||
| 79 | } | ||
| 80 | |||
| 81 | DSO_METHOD *DSO_get_method(DSO *dso) | ||
| 82 | { | ||
| 83 | return(dso->meth); | ||
| 84 | } | ||
| 85 | |||
| 86 | DSO_METHOD *DSO_set_method(DSO *dso, DSO_METHOD *meth) | ||
| 87 | { | ||
| 88 | DSO_METHOD *mtmp; | ||
| 89 | mtmp = dso->meth; | ||
| 90 | dso->meth = meth; | ||
| 91 | return(mtmp); | ||
| 92 | } | ||
| 93 | |||
| 94 | DSO *DSO_new_method(DSO_METHOD *meth) | ||
| 95 | { | ||
| 96 | DSO *ret; | ||
| 97 | |||
| 98 | if(default_DSO_meth == NULL) | ||
| 99 | /* We default to DSO_METH_openssl() which in turn defaults | ||
| 100 | * to stealing the "best available" method. Will fallback | ||
| 101 | * to DSO_METH_null() in the worst case. */ | ||
| 102 | default_DSO_meth = DSO_METHOD_openssl(); | ||
| 103 | ret = (DSO *)OPENSSL_malloc(sizeof(DSO)); | ||
| 104 | if(ret == NULL) | ||
| 105 | { | ||
| 106 | DSOerr(DSO_F_DSO_NEW_METHOD,ERR_R_MALLOC_FAILURE); | ||
| 107 | return(NULL); | ||
| 108 | } | ||
| 109 | memset(ret, 0, sizeof(DSO)); | ||
| 110 | ret->meth_data = sk_new_null(); | ||
| 111 | if(ret->meth_data == NULL) | ||
| 112 | { | ||
| 113 | /* sk_new doesn't generate any errors so we do */ | ||
| 114 | DSOerr(DSO_F_DSO_NEW_METHOD,ERR_R_MALLOC_FAILURE); | ||
| 115 | OPENSSL_free(ret); | ||
| 116 | return(NULL); | ||
| 117 | } | ||
| 118 | if(meth == NULL) | ||
| 119 | ret->meth = default_DSO_meth; | ||
| 120 | else | ||
| 121 | ret->meth = meth; | ||
| 122 | ret->references = 1; | ||
| 123 | if((ret->meth->init != NULL) && !ret->meth->init(ret)) | ||
| 124 | { | ||
| 125 | OPENSSL_free(ret); | ||
| 126 | ret=NULL; | ||
| 127 | } | ||
| 128 | return(ret); | ||
| 129 | } | ||
| 130 | |||
| 131 | int DSO_free(DSO *dso) | ||
| 132 | { | ||
| 133 | int i; | ||
| 134 | |||
| 135 | if(dso == NULL) | ||
| 136 | { | ||
| 137 | DSOerr(DSO_F_DSO_FREE,ERR_R_PASSED_NULL_PARAMETER); | ||
| 138 | return(0); | ||
| 139 | } | ||
| 140 | |||
| 141 | i=CRYPTO_add(&dso->references,-1,CRYPTO_LOCK_DSO); | ||
| 142 | #ifdef REF_PRINT | ||
| 143 | REF_PRINT("DSO",dso); | ||
| 144 | #endif | ||
| 145 | if(i > 0) return(1); | ||
| 146 | #ifdef REF_CHECK | ||
| 147 | if(i < 0) | ||
| 148 | { | ||
| 149 | fprintf(stderr,"DSO_free, bad reference count\n"); | ||
| 150 | abort(); | ||
| 151 | } | ||
| 152 | #endif | ||
| 153 | |||
| 154 | if((dso->meth->dso_unload != NULL) && !dso->meth->dso_unload(dso)) | ||
| 155 | { | ||
| 156 | DSOerr(DSO_F_DSO_FREE,DSO_R_UNLOAD_FAILED); | ||
| 157 | return(0); | ||
| 158 | } | ||
| 159 | |||
| 160 | if((dso->meth->finish != NULL) && !dso->meth->finish(dso)) | ||
| 161 | { | ||
| 162 | DSOerr(DSO_F_DSO_FREE,DSO_R_FINISH_FAILED); | ||
| 163 | return(0); | ||
| 164 | } | ||
| 165 | |||
| 166 | sk_free(dso->meth_data); | ||
| 167 | if(dso->filename != NULL) | ||
| 168 | OPENSSL_free(dso->filename); | ||
| 169 | if(dso->loaded_filename != NULL) | ||
| 170 | OPENSSL_free(dso->loaded_filename); | ||
| 171 | |||
| 172 | OPENSSL_free(dso); | ||
| 173 | return(1); | ||
| 174 | } | ||
| 175 | |||
| 176 | int DSO_flags(DSO *dso) | ||
| 177 | { | ||
| 178 | return((dso == NULL) ? 0 : dso->flags); | ||
| 179 | } | ||
| 180 | |||
| 181 | |||
| 182 | int DSO_up_ref(DSO *dso) | ||
| 183 | { | ||
| 184 | if (dso == NULL) | ||
| 185 | { | ||
| 186 | DSOerr(DSO_F_DSO_UP_REF,ERR_R_PASSED_NULL_PARAMETER); | ||
| 187 | return(0); | ||
| 188 | } | ||
| 189 | |||
| 190 | CRYPTO_add(&dso->references,1,CRYPTO_LOCK_DSO); | ||
| 191 | return(1); | ||
| 192 | } | ||
| 193 | |||
| 194 | DSO *DSO_load(DSO *dso, const char *filename, DSO_METHOD *meth, int flags) | ||
| 195 | { | ||
| 196 | DSO *ret; | ||
| 197 | int allocated = 0; | ||
| 198 | |||
| 199 | if(dso == NULL) | ||
| 200 | { | ||
| 201 | ret = DSO_new_method(meth); | ||
| 202 | if(ret == NULL) | ||
| 203 | { | ||
| 204 | DSOerr(DSO_F_DSO_LOAD,ERR_R_MALLOC_FAILURE); | ||
| 205 | goto err; | ||
| 206 | } | ||
| 207 | allocated = 1; | ||
| 208 | /* Pass the provided flags to the new DSO object */ | ||
| 209 | if(DSO_ctrl(ret, DSO_CTRL_SET_FLAGS, flags, NULL) < 0) | ||
| 210 | { | ||
| 211 | DSOerr(DSO_F_DSO_LOAD,DSO_R_CTRL_FAILED); | ||
| 212 | goto err; | ||
| 213 | } | ||
| 214 | } | ||
| 215 | else | ||
| 216 | ret = dso; | ||
| 217 | /* Don't load if we're currently already loaded */ | ||
| 218 | if(ret->filename != NULL) | ||
| 219 | { | ||
| 220 | DSOerr(DSO_F_DSO_LOAD,DSO_R_DSO_ALREADY_LOADED); | ||
| 221 | goto err; | ||
| 222 | } | ||
| 223 | /* filename can only be NULL if we were passed a dso that already has | ||
| 224 | * one set. */ | ||
| 225 | if(filename != NULL) | ||
| 226 | if(!DSO_set_filename(ret, filename)) | ||
| 227 | { | ||
| 228 | DSOerr(DSO_F_DSO_LOAD,DSO_R_SET_FILENAME_FAILED); | ||
| 229 | goto err; | ||
| 230 | } | ||
| 231 | filename = ret->filename; | ||
| 232 | if(filename == NULL) | ||
| 233 | { | ||
| 234 | DSOerr(DSO_F_DSO_LOAD,DSO_R_NO_FILENAME); | ||
| 235 | goto err; | ||
| 236 | } | ||
| 237 | if(ret->meth->dso_load == NULL) | ||
| 238 | { | ||
| 239 | DSOerr(DSO_F_DSO_LOAD,DSO_R_UNSUPPORTED); | ||
| 240 | goto err; | ||
| 241 | } | ||
| 242 | if(!ret->meth->dso_load(ret)) | ||
| 243 | { | ||
| 244 | DSOerr(DSO_F_DSO_LOAD,DSO_R_LOAD_FAILED); | ||
| 245 | goto err; | ||
| 246 | } | ||
| 247 | /* Load succeeded */ | ||
| 248 | return(ret); | ||
| 249 | err: | ||
| 250 | if(allocated) | ||
| 251 | DSO_free(ret); | ||
| 252 | return(NULL); | ||
| 253 | } | ||
| 254 | |||
| 255 | void *DSO_bind_var(DSO *dso, const char *symname) | ||
| 256 | { | ||
| 257 | void *ret = NULL; | ||
| 258 | |||
| 259 | if((dso == NULL) || (symname == NULL)) | ||
| 260 | { | ||
| 261 | DSOerr(DSO_F_DSO_BIND_VAR,ERR_R_PASSED_NULL_PARAMETER); | ||
| 262 | return(NULL); | ||
| 263 | } | ||
| 264 | if(dso->meth->dso_bind_var == NULL) | ||
| 265 | { | ||
| 266 | DSOerr(DSO_F_DSO_BIND_VAR,DSO_R_UNSUPPORTED); | ||
| 267 | return(NULL); | ||
| 268 | } | ||
| 269 | if((ret = dso->meth->dso_bind_var(dso, symname)) == NULL) | ||
| 270 | { | ||
| 271 | DSOerr(DSO_F_DSO_BIND_VAR,DSO_R_SYM_FAILURE); | ||
| 272 | return(NULL); | ||
| 273 | } | ||
| 274 | /* Success */ | ||
| 275 | return(ret); | ||
| 276 | } | ||
| 277 | |||
| 278 | DSO_FUNC_TYPE DSO_bind_func(DSO *dso, const char *symname) | ||
| 279 | { | ||
| 280 | DSO_FUNC_TYPE ret = NULL; | ||
| 281 | |||
| 282 | if((dso == NULL) || (symname == NULL)) | ||
| 283 | { | ||
| 284 | DSOerr(DSO_F_DSO_BIND_FUNC,ERR_R_PASSED_NULL_PARAMETER); | ||
| 285 | return(NULL); | ||
| 286 | } | ||
| 287 | if(dso->meth->dso_bind_func == NULL) | ||
| 288 | { | ||
| 289 | DSOerr(DSO_F_DSO_BIND_FUNC,DSO_R_UNSUPPORTED); | ||
| 290 | return(NULL); | ||
| 291 | } | ||
| 292 | if((ret = dso->meth->dso_bind_func(dso, symname)) == NULL) | ||
| 293 | { | ||
| 294 | DSOerr(DSO_F_DSO_BIND_FUNC,DSO_R_SYM_FAILURE); | ||
| 295 | return(NULL); | ||
| 296 | } | ||
| 297 | /* Success */ | ||
| 298 | return(ret); | ||
| 299 | } | ||
| 300 | |||
| 301 | /* I don't really like these *_ctrl functions very much to be perfectly | ||
| 302 | * honest. For one thing, I think I have to return a negative value for | ||
| 303 | * any error because possible DSO_ctrl() commands may return values | ||
| 304 | * such as "size"s that can legitimately be zero (making the standard | ||
| 305 | * "if(DSO_cmd(...))" form that works almost everywhere else fail at | ||
| 306 | * odd times. I'd prefer "output" values to be passed by reference and | ||
| 307 | * the return value as success/failure like usual ... but we conform | ||
| 308 | * when we must... :-) */ | ||
| 309 | long DSO_ctrl(DSO *dso, int cmd, long larg, void *parg) | ||
| 310 | { | ||
| 311 | if(dso == NULL) | ||
| 312 | { | ||
| 313 | DSOerr(DSO_F_DSO_CTRL,ERR_R_PASSED_NULL_PARAMETER); | ||
| 314 | return(-1); | ||
| 315 | } | ||
| 316 | /* We should intercept certain generic commands and only pass control | ||
| 317 | * to the method-specific ctrl() function if it's something we don't | ||
| 318 | * handle. */ | ||
| 319 | switch(cmd) | ||
| 320 | { | ||
| 321 | case DSO_CTRL_GET_FLAGS: | ||
| 322 | return dso->flags; | ||
| 323 | case DSO_CTRL_SET_FLAGS: | ||
| 324 | dso->flags = (int)larg; | ||
| 325 | return(0); | ||
| 326 | case DSO_CTRL_OR_FLAGS: | ||
| 327 | dso->flags |= (int)larg; | ||
| 328 | return(0); | ||
| 329 | default: | ||
| 330 | break; | ||
| 331 | } | ||
| 332 | if((dso->meth == NULL) || (dso->meth->dso_ctrl == NULL)) | ||
| 333 | { | ||
| 334 | DSOerr(DSO_F_DSO_CTRL,DSO_R_UNSUPPORTED); | ||
| 335 | return(-1); | ||
| 336 | } | ||
| 337 | return(dso->meth->dso_ctrl(dso,cmd,larg,parg)); | ||
| 338 | } | ||
| 339 | |||
| 340 | int DSO_set_name_converter(DSO *dso, DSO_NAME_CONVERTER_FUNC cb, | ||
| 341 | DSO_NAME_CONVERTER_FUNC *oldcb) | ||
| 342 | { | ||
| 343 | if(dso == NULL) | ||
| 344 | { | ||
| 345 | DSOerr(DSO_F_DSO_SET_NAME_CONVERTER, | ||
| 346 | ERR_R_PASSED_NULL_PARAMETER); | ||
| 347 | return(0); | ||
| 348 | } | ||
| 349 | if(oldcb) | ||
| 350 | *oldcb = dso->name_converter; | ||
| 351 | dso->name_converter = cb; | ||
| 352 | return(1); | ||
| 353 | } | ||
| 354 | |||
| 355 | const char *DSO_get_filename(DSO *dso) | ||
| 356 | { | ||
| 357 | if(dso == NULL) | ||
| 358 | { | ||
| 359 | DSOerr(DSO_F_DSO_GET_FILENAME,ERR_R_PASSED_NULL_PARAMETER); | ||
| 360 | return(NULL); | ||
| 361 | } | ||
| 362 | return(dso->filename); | ||
| 363 | } | ||
| 364 | |||
| 365 | int DSO_set_filename(DSO *dso, const char *filename) | ||
| 366 | { | ||
| 367 | char *copied; | ||
| 368 | |||
| 369 | if((dso == NULL) || (filename == NULL)) | ||
| 370 | { | ||
| 371 | DSOerr(DSO_F_DSO_SET_FILENAME,ERR_R_PASSED_NULL_PARAMETER); | ||
| 372 | return(0); | ||
| 373 | } | ||
| 374 | if(dso->loaded_filename) | ||
| 375 | { | ||
| 376 | DSOerr(DSO_F_DSO_SET_FILENAME,DSO_R_DSO_ALREADY_LOADED); | ||
| 377 | return(0); | ||
| 378 | } | ||
| 379 | /* We'll duplicate filename */ | ||
| 380 | copied = OPENSSL_malloc(strlen(filename) + 1); | ||
| 381 | if(copied == NULL) | ||
| 382 | { | ||
| 383 | DSOerr(DSO_F_DSO_SET_FILENAME,ERR_R_MALLOC_FAILURE); | ||
| 384 | return(0); | ||
| 385 | } | ||
| 386 | BUF_strlcpy(copied, filename, strlen(filename) + 1); | ||
| 387 | if(dso->filename) | ||
| 388 | OPENSSL_free(dso->filename); | ||
| 389 | dso->filename = copied; | ||
| 390 | return(1); | ||
| 391 | } | ||
| 392 | |||
| 393 | char *DSO_merge(DSO *dso, const char *filespec1, const char *filespec2) | ||
| 394 | { | ||
| 395 | char *result = NULL; | ||
| 396 | |||
| 397 | if(dso == NULL || filespec1 == NULL) | ||
| 398 | { | ||
| 399 | DSOerr(DSO_F_DSO_MERGE,ERR_R_PASSED_NULL_PARAMETER); | ||
| 400 | return(NULL); | ||
| 401 | } | ||
| 402 | if(filespec1 == NULL) | ||
| 403 | filespec1 = dso->filename; | ||
| 404 | if(filespec1 == NULL) | ||
| 405 | { | ||
| 406 | DSOerr(DSO_F_DSO_MERGE,DSO_R_NO_FILE_SPECIFICATION); | ||
| 407 | return(NULL); | ||
| 408 | } | ||
| 409 | if((dso->flags & DSO_FLAG_NO_NAME_TRANSLATION) == 0) | ||
| 410 | { | ||
| 411 | if(dso->merger != NULL) | ||
| 412 | result = dso->merger(dso, filespec1, filespec2); | ||
| 413 | else if(dso->meth->dso_merger != NULL) | ||
| 414 | result = dso->meth->dso_merger(dso, | ||
| 415 | filespec1, filespec2); | ||
| 416 | } | ||
| 417 | return(result); | ||
| 418 | } | ||
| 419 | |||
| 420 | char *DSO_convert_filename(DSO *dso, const char *filename) | ||
| 421 | { | ||
| 422 | char *result = NULL; | ||
| 423 | |||
| 424 | if(dso == NULL) | ||
| 425 | { | ||
| 426 | DSOerr(DSO_F_DSO_CONVERT_FILENAME,ERR_R_PASSED_NULL_PARAMETER); | ||
| 427 | return(NULL); | ||
| 428 | } | ||
| 429 | if(filename == NULL) | ||
| 430 | filename = dso->filename; | ||
| 431 | if(filename == NULL) | ||
| 432 | { | ||
| 433 | DSOerr(DSO_F_DSO_CONVERT_FILENAME,DSO_R_NO_FILENAME); | ||
| 434 | return(NULL); | ||
| 435 | } | ||
| 436 | if((dso->flags & DSO_FLAG_NO_NAME_TRANSLATION) == 0) | ||
| 437 | { | ||
| 438 | if(dso->name_converter != NULL) | ||
| 439 | result = dso->name_converter(dso, filename); | ||
| 440 | else if(dso->meth->dso_name_converter != NULL) | ||
| 441 | result = dso->meth->dso_name_converter(dso, filename); | ||
| 442 | } | ||
| 443 | if(result == NULL) | ||
| 444 | { | ||
| 445 | result = OPENSSL_malloc(strlen(filename) + 1); | ||
| 446 | if(result == NULL) | ||
| 447 | { | ||
| 448 | DSOerr(DSO_F_DSO_CONVERT_FILENAME, | ||
| 449 | ERR_R_MALLOC_FAILURE); | ||
| 450 | return(NULL); | ||
| 451 | } | ||
| 452 | BUF_strlcpy(result, filename, strlen(filename) + 1); | ||
| 453 | } | ||
| 454 | return(result); | ||
| 455 | } | ||
| 456 | |||
| 457 | const char *DSO_get_loaded_filename(DSO *dso) | ||
| 458 | { | ||
| 459 | if(dso == NULL) | ||
| 460 | { | ||
| 461 | DSOerr(DSO_F_DSO_GET_LOADED_FILENAME, | ||
| 462 | ERR_R_PASSED_NULL_PARAMETER); | ||
| 463 | return(NULL); | ||
| 464 | } | ||
| 465 | return(dso->loaded_filename); | ||
| 466 | } | ||
diff --git a/src/lib/libcrypto/dso/dso_null.c b/src/lib/libcrypto/dso/dso_null.c new file mode 100644 index 0000000000..4972984651 --- /dev/null +++ b/src/lib/libcrypto/dso/dso_null.c | |||
| @@ -0,0 +1,88 @@ | |||
| 1 | /* dso_null.c */ | ||
| 2 | /* Written by Geoff Thorpe (geoff@geoffthorpe.net) for the OpenSSL | ||
| 3 | * project 2000. | ||
| 4 | */ | ||
| 5 | /* ==================================================================== | ||
| 6 | * Copyright (c) 2000 The OpenSSL Project. All rights reserved. | ||
| 7 | * | ||
| 8 | * Redistribution and use in source and binary forms, with or without | ||
| 9 | * modification, are permitted provided that the following conditions | ||
| 10 | * are met: | ||
| 11 | * | ||
| 12 | * 1. Redistributions of source code must retain the above copyright | ||
| 13 | * notice, this list of conditions and the following disclaimer. | ||
| 14 | * | ||
| 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 | ||
| 18 | * distribution. | ||
| 19 | * | ||
| 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/)" | ||
| 24 | * | ||
| 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. | ||
| 29 | * | ||
| 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. | ||
| 33 | * | ||
| 34 | * 6. Redistributions of any form whatsoever must retain the following | ||
| 35 | * acknowledgment: | ||
| 36 | * "This product includes software developed by the OpenSSL Project | ||
| 37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
| 38 | * | ||
| 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 | * ==================================================================== | ||
| 52 | * | ||
| 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). | ||
| 56 | * | ||
| 57 | */ | ||
| 58 | |||
| 59 | /* This "NULL" method is provided as the fallback for systems that have | ||
| 60 | * no appropriate support for "shared-libraries". */ | ||
| 61 | |||
| 62 | #include <stdio.h> | ||
| 63 | #include "cryptlib.h" | ||
| 64 | #include <openssl/dso.h> | ||
| 65 | |||
| 66 | static DSO_METHOD dso_meth_null = { | ||
| 67 | "NULL shared library method", | ||
| 68 | NULL, /* load */ | ||
| 69 | NULL, /* unload */ | ||
| 70 | NULL, /* bind_var */ | ||
| 71 | NULL, /* bind_func */ | ||
| 72 | /* For now, "unbind" doesn't exist */ | ||
| 73 | #if 0 | ||
| 74 | NULL, /* unbind_var */ | ||
| 75 | NULL, /* unbind_func */ | ||
| 76 | #endif | ||
| 77 | NULL, /* ctrl */ | ||
| 78 | NULL, /* dso_name_converter */ | ||
| 79 | NULL, /* dso_merger */ | ||
| 80 | NULL, /* init */ | ||
| 81 | NULL /* finish */ | ||
| 82 | }; | ||
| 83 | |||
| 84 | DSO_METHOD *DSO_METHOD_null(void) | ||
| 85 | { | ||
| 86 | return(&dso_meth_null); | ||
| 87 | } | ||
| 88 | |||
diff --git a/src/lib/libcrypto/dso/dso_openssl.c b/src/lib/libcrypto/dso/dso_openssl.c new file mode 100644 index 0000000000..a4395ebffe --- /dev/null +++ b/src/lib/libcrypto/dso/dso_openssl.c | |||
| @@ -0,0 +1,81 @@ | |||
| 1 | /* dso_openssl.c */ | ||
| 2 | /* Written by Geoff Thorpe (geoff@geoffthorpe.net) for the OpenSSL | ||
| 3 | * project 2000. | ||
| 4 | */ | ||
| 5 | /* ==================================================================== | ||
| 6 | * Copyright (c) 2000 The OpenSSL Project. All rights reserved. | ||
| 7 | * | ||
| 8 | * Redistribution and use in source and binary forms, with or without | ||
| 9 | * modification, are permitted provided that the following conditions | ||
| 10 | * are met: | ||
| 11 | * | ||
| 12 | * 1. Redistributions of source code must retain the above copyright | ||
| 13 | * notice, this list of conditions and the following disclaimer. | ||
| 14 | * | ||
| 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 | ||
| 18 | * distribution. | ||
| 19 | * | ||
| 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/)" | ||
| 24 | * | ||
| 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. | ||
| 29 | * | ||
| 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. | ||
| 33 | * | ||
| 34 | * 6. Redistributions of any form whatsoever must retain the following | ||
| 35 | * acknowledgment: | ||
| 36 | * "This product includes software developed by the OpenSSL Project | ||
| 37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
| 38 | * | ||
| 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 | * ==================================================================== | ||
| 52 | * | ||
| 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). | ||
| 56 | * | ||
| 57 | */ | ||
| 58 | |||
| 59 | #include <stdio.h> | ||
| 60 | #include "cryptlib.h" | ||
| 61 | #include <openssl/dso.h> | ||
| 62 | |||
| 63 | /* We just pinch the method from an appropriate "default" method. */ | ||
| 64 | |||
| 65 | DSO_METHOD *DSO_METHOD_openssl(void) | ||
| 66 | { | ||
| 67 | #ifdef DEF_DSO_METHOD | ||
| 68 | return(DEF_DSO_METHOD()); | ||
| 69 | #elif defined(DSO_DLFCN) | ||
| 70 | return(DSO_METHOD_dlfcn()); | ||
| 71 | #elif defined(DSO_DL) | ||
| 72 | return(DSO_METHOD_dl()); | ||
| 73 | #elif defined(DSO_WIN32) | ||
| 74 | return(DSO_METHOD_win32()); | ||
| 75 | #elif defined(DSO_VMS) | ||
| 76 | return(DSO_METHOD_vms()); | ||
| 77 | #else | ||
| 78 | return(DSO_METHOD_null()); | ||
| 79 | #endif | ||
| 80 | } | ||
| 81 | |||
