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
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
|
/*
** JNetLib
** Copyright (C) 2000-2007 Nullsoft, Inc.
** Author: Justin Frankel
** File: util.cpp - JNL implementation of basic network utilities
** License: see jnetlib.h
*/
#include "netinc.h"
#include "util.h"
#include "foundation\error.h"
#ifdef USE_SSL
#include "wac_network_ssl_connection.h"
#ifdef _WIN32
#include <wincrypt.h>
#endif // !_WIN32
#include <openssl/rand.h>
#ifdef _WIN32
static HCRYPTPROV GetKeySet()
{
HCRYPTPROV hCryptProv;
LPCWSTR UserName = L"WinampKeyContainer"; // name of the key container
if ( CryptAcquireContext(
&hCryptProv, // handle to the CSP
UserName, // container name
NULL, // use the default provider
PROV_RSA_FULL, // provider type
0 ) ) // flag values
{
return hCryptProv;
}
else if ( CryptAcquireContext(
&hCryptProv,
UserName,
NULL,
PROV_RSA_FULL,
CRYPT_NEWKEYSET ) )
{
return hCryptProv;
}
else
return 0;
}
#endif
static void InitSSL()
{
SSL_load_error_strings();
SSL_library_init();
#ifdef _WIN32
HCRYPTPROV hCryptProv = GetKeySet();
if ( hCryptProv )
{
BYTE pbData[ 8 * sizeof( unsigned long ) ] = { 0 };
if ( CryptGenRandom( hCryptProv, 8 * sizeof( unsigned long ), pbData ) )
{
RAND_seed( pbData, 16 );
}
CryptReleaseContext( hCryptProv, 0 );
}
#endif
// sslContext = SSL_CTX_new(SSLv23_client_method());
// SSL_CTX_set_verify(sslContext, SSL_VERIFY_NONE, NULL);
// SSL_CTX_set_session_cache_mode(sslContext, SSL_SESS_CACHE_OFF);
}
static int open_ssl_initted = 0;
#endif
static int was_initted = 0;
int JNL::open_socketlib()
{
#ifdef _WIN32
if ( !was_initted )
{
WSADATA wsaData = { 0 };
if ( WSAStartup( MAKEWORD( 1, 1 ), &wsaData ) )
{
return NErr_Error;
}
}
#endif // !_WIN32
#ifdef USE_SSL
if ( !open_ssl_initted )
{
InitSSL();
open_ssl_initted = 1;
}
#endif // !USE_SSL
return NErr_Success;
}
void JNL::close_socketlib()
{
#ifdef _WIN32
if ( was_initted )
{
WSACleanup();
}
#ifdef USE_SSL
// TODO need to do some reference counting to free this correctly
//SSL_CTX_free(sslContext);
#endif // !USE_SSL
#endif // !_WIN32
}
static char *jnl_strndup( const char *str, size_t n )
{
char *o = (char *)calloc( n + 1, sizeof( char ) );
if ( !o )
return 0;
strncpy( o, str, n );
o[ n ] = 0;
return o;
}
int JNL::parse_url( const char *url, char **prot, char **host, unsigned short *port, char **req, char **lp )
{
free( *prot ); *prot = 0;
free( *host ); *host = 0;
free( *req ); *req = 0;
free( *lp ); *lp = 0;
*port = 0;
const char *p;
const char *protocol = strstr( url, "://" );
if ( protocol )
{
*prot = jnl_strndup( url, protocol - url );
p = protocol + 3;
}
else
{
p = url;
}
while ( p && *p && *p == '/' ) p++; // skip extra /
size_t end = strcspn( p, "@/" );
// check for username
if ( p[ end ] == '@' )
{
*lp = jnl_strndup( p, end );
p = p + end + 1;
end = strcspn( p, "[:/" );
}
if ( p[ 0 ] == '[' ) // IPv6 style address
{
p++;
const char *ipv6_end = strchr( p, ']' );
if ( !ipv6_end )
return NErr_Malformed;
*host = jnl_strndup( p, ipv6_end - p );
p = ipv6_end + 1;
}
else
{
end = strcspn( p, ":/" );
*host = jnl_strndup( p, end );
p += end;
}
// is there a port number?
if ( p[ 0 ] == ':' )
{
char *new_end;
*port = (unsigned short)strtoul( p + 1, &new_end, 10 );
p = new_end;
}
if ( p[ 0 ] )
{
// benski> this is here to workaround a bug with YP and NSV streams
if ( !strcmp( p, ";stream.nsv" ) )
return NErr_Success;
*req = _strdup( p );
}
return NErr_Success;
}
#if 0
unsigned long JNL::ipstr_to_addr( const char *cp )
{
return inet_addr( cp );
}
void JNL::addr_to_ipstr( unsigned long addr, char *host, int maxhostlen )
{
in_addr a; a.s_addr = addr;
sprintf( host, /*maxhostlen,*/ "%u.%u.%u.%u", a.S_un.S_un_b.s_b1, a.S_un.S_un_b.s_b2, a.S_un.S_un_b.s_b3, a.S_un.S_un_b.s_b4 );
//char *p=::inet_ntoa(a); strncpy(host,p?p:"",maxhostlen);
}
#endif
|
