blob: 6082a9f4e3725a7ea643d8a5fb976396d5f5f5a3 (
plain)
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
|
// --------------------------------------------------------------------------
//
// File
// Name: SSLLib.cpp
// Purpose: Utility functions for dealing with the OpenSSL library
// Created: 2003/08/06
//
// --------------------------------------------------------------------------
#include "Box.h"
#define TLS_CLASS_IMPLEMENTATION_CPP
#include <openssl/ssl.h>
#include <openssl/err.h>
#include <openssl/rand.h>
#include "SSLLib.h"
#include "ServerException.h"
#include "MemLeakFindOn.h"
#ifndef NDEBUG
bool SSLLib__TraceErrors = false;
#endif
// --------------------------------------------------------------------------
//
// Function
// Name: SSLLib::Initialise()
// Purpose: Initialise SSL library
// Created: 2003/08/06
//
// --------------------------------------------------------------------------
void SSLLib::Initialise()
{
if(!::SSL_library_init())
{
LogError("Initialisation");
THROW_EXCEPTION(ServerException, SSLLibraryInitialisationError)
}
// More helpful error messages
::SSL_load_error_strings();
// Extra seeding over and above what's already done by the library
#ifdef HAVE_RANDOM_DEVICE
if(::RAND_load_file(RANDOM_DEVICE, 1024) != 1024)
{
THROW_EXCEPTION(ServerException, SSLRandomInitFailed)
}
#else
::fprintf(stderr, "No random device -- additional seeding of random number generator not performed.\n");
#endif
}
// --------------------------------------------------------------------------
//
// Function
// Name: SSLLib::LogError(const char *)
// Purpose: Logs an error
// Created: 2003/08/06
//
// --------------------------------------------------------------------------
void SSLLib::LogError(const char *ErrorDuringAction)
{
unsigned long errcode;
char errname[256]; // SSL docs say at least 120 bytes
while((errcode = ERR_get_error()) != 0)
{
::ERR_error_string_n(errcode, errname, sizeof(errname));
BOX_ERROR("SSL error during " << ErrorDuringAction << ": " <<
errname);
}
}
|