File: RuntimeSSL.cpp

package info (click to toggle)
storm-lang 0.7.5-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 52,028 kB
  • sloc: ansic: 261,471; cpp: 140,432; sh: 14,891; perl: 9,846; python: 2,525; lisp: 2,504; asm: 860; makefile: 678; pascal: 70; java: 52; xml: 37; awk: 12
file content (111 lines) | stat: -rw-r--r-- 2,770 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
#include "stdafx.h"
#include "RuntimeSSL.h"
#include "Exception.h"
#include "Core/Convert.h"

#ifdef POSIX

#ifdef RUNTIME_OPENSSL_LINK
#include <dlfcn.h>

#include <openssl/ssl.h>
#include <openssl/conf.h>
#include <openssl/crypto.h>
#include <openssl/err.h>
#include <openssl/opensslv.h>
#include <openssl/opensslconf.h>
#include <openssl/x509v3.h>

#define SSL_FN(lib, ret, name, params, names)	\
	static ret (*ptr_ ## name) params;			\
	extern "C" ret name params {				\
		return (*ptr_ ## name)names;			\
	}
#define SSL_FN_ALT(lib, ret, name, params, names, alt)	\
	static ret (*ptr_ ## name) params;					\
	extern "C" ret name params {						\
		return (*ptr_ ## name)names;					\
	}
#include "OpenSSLFunctions.inc"
#undef SSL_FN
#undef SSL_FN_ALT

namespace ssl {

	static util::Lock initLock;
	static bool initialized = false;

	void *loadFn(void *from, const char *name, const char *altName = null) {
		void *r = dlsym(from, name);
		if (altName && !r)
			r = dlsym(from, altName);

		if (!r) {
			StrBuf *msg = new (runtime::someEngine()) StrBuf();
			*msg << S("Can not find the function ")
				 << new (msg) Str(toWChar(msg->engine(), name))
				 << S(" in the SSL or crypto library.");
			throw new (msg) SSLError(msg->toS());
		}
		return r;
	}

	void *loadLib(const char *base, int flags) {
		// Attempted names to append to the library name. If the "-dev" package is installed, the
		// symlink from ".so" to the real library is not always present, so we attempt a few known
		// good names.
		const char *options[] = {
			".so",
			".so.3",
			".so.1.1",
		};

		for (size_t i = 0; i < ARRAY_COUNT(options); i++) {
			std::string name = std::string(base) + options[i];
			void *result = dlopen(name.c_str(), flags);
			if (result)
				return result;
		}

		return null;
	}

	void initRuntimeSSL() {
		util::Lock::L z(initLock);
		if (initialized)
			return;
		initialized = true;

		void *libCrypto = loadLib("libcrypto", RTLD_NOW | RTLD_GLOBAL);
		if (!libCrypto) {
			throw new (runtime::someEngine()) SSLError(S("Unable to load libcrypto.so. Make sure it is installed. In some cases you might need to install the -dev package."));
		}

		void *libSSL = loadLib("libssl", RTLD_NOW);

		if (!libSSL) {
			dlclose(libCrypto);
			throw new (runtime::someEngine()) SSLError(S("Unable to load libssl.so. Make sure it is installed! In some cases you might need to install the -dev package."));
		}

#define SSL_FN(lib, ret, name, params, names)			\
		ptr_ ## name = (ret (*) params)loadFn(lib, #name);
#define SSL_FN_ALT(lib, ret, name, params, names, alt)			\
		ptr_ ## name = (ret (*) params)loadFn(lib, #name, alt);
#include "OpenSSLFunctions.inc"
#undef SSL_FN
#undef SSL_FN_ALT
	}
}

#else

namespace ssl {

	void initRuntimeSSL() {}

}

#endif

#endif