[apple/security.git] / OSX / libsecurity_apple_csp / open_ssl / cryptlib.c

/*
 * Copyright (c) 2000-2001,2011,2014 Apple Inc. All Rights Reserved.
 * 
 * The contents of this file constitute Original Code as defined in and are
 * subject to the Apple Public Source License Version 1.2 (the 'License').
 * You may not use this file except in compliance with the License. Please obtain
 * a copy of the License at http://www.apple.com/publicsource and read it before
 * using this file.
 * 
 * This Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS
 * OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, INCLUDING WITHOUT
 * LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
 * PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. Please see the License for the
 * specific language governing rights and limitations under the License.
 */


/* crypto/cryptlib.c */
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
 * All rights reserved.
 *
 * This package is an SSL implementation written
 * by Eric Young (eay@cryptsoft.com).
 * The implementation was written so as to conform with Netscapes SSL.
 * 
 * This library is free for commercial and non-commercial use as long as
 * the following conditions are aheared to.  The following conditions
 * apply to all code found in this distribution, be it the RC4, RSA,
 * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
 * included with this distribution is covered by the same copyright terms
 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
 * 
 * Copyright remains Eric Young's, and as such any Copyright notices in
 * the code are not to be removed.
 * If this package is used in a product, Eric Young should be given attribution
 * as the author of the parts of the library used.
 * This can be in the form of a textual message at program startup or
 * in documentation (online or textual) provided with the package.
 * 
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *    "This product includes cryptographic software written by
 *     Eric Young (eay@cryptsoft.com)"
 *    The word 'cryptographic' can be left out if the rouines from the library
 *    being used are not cryptographic related :-).
 * 4. If you include any Windows specific code (or a derivative thereof) from 
 *    the apps directory (application code) you must include an acknowledgement:
 *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
 * 
 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 * 
 * The licence and distribution terms for any publically available version or
 * derivative of this code cannot be changed.  i.e. this code cannot simply be
 * copied and put under another distribution licence
 * [including the GNU Public Licence.]
 */

#include <stdio.h>
#include <string.h>
#include "cryptlib.h"
#include <openssl/crypto.h>

#if defined(WIN32) || defined(WIN16)
static double SSLeay_MSVC5_hack=0.0; /* and for VC1.5 */
#endif

/* real #defines in crypto.h, keep these upto date */
#if defined(LOCK_DEBUG)
static const char* const lock_names[CRYPTO_NUM_LOCKS] =
	{
	"<<ERROR>>",
	"err",
	"err_hash",
	"x509",
	"x509_info",
	"x509_pkey",
	"x509_crl",
	"x509_req",
	"dsa",
	"rsa",
	"evp_pkey",
	"x509_store",
	"ssl_ctx",
	"ssl_cert",
	"ssl_session",
	"ssl_sess_cert",
	"ssl",
	"rand",
	"debug_malloc",
	"BIO",
	"gethostbyname",
	"getservbyname",
	"readdir",
	"RSA_blinding",
	"dh",
	"debug_malloc2",
#if CRYPTO_NUM_LOCKS != 26
# error "Inconsistency between crypto.h and cryptlib.c"
#endif
	};
#endif /*LOCK_DEBUG*/

static STACK *app_locks=NULL;

#if		CRYPTO_CALLBACK_ENABLE
static void (MS_FAR *locking_callback)(int mode,int type,
	const char *file,int line)=NULL;
static int (MS_FAR *add_lock_callback)(int *pointer,int amount,
	int type,const char *file,int line)=NULL;
static unsigned long (MS_FAR *id_callback)(void)=NULL;
#endif	/* CRYPTO_CALLBACK_ENABLE */

int CRYPTO_get_new_lockid(char *name)
	{
	char *str;
	int i;

	/* A hack to make Visual C++ 5.0 work correctly when linking as
	 * a DLL using /MT. Without this, the application cannot use
	 * and floating point printf's.
	 * It also seems to be needed for Visual C 1.5 (win16) */
#if defined(WIN32) || defined(WIN16)
	SSLeay_MSVC5_hack=(double)name[0]*(double)name[1];
#endif

	if ((app_locks == NULL) && ((app_locks=sk_new_null()) == NULL))
		{
		CRYPTOerr(CRYPTO_F_CRYPTO_GET_NEW_LOCKID,ERR_R_MALLOC_FAILURE);
		return(0);
		}
	if ((str=BUF_strdup(name)) == NULL)
		return(0);
	i=sk_push(app_locks,str);
	if (!i)
		Free(str);
	else
		i+=CRYPTO_NUM_LOCKS; /* gap of one :-) */
	return(i);
	}

int CRYPTO_num_locks(void)
	{
	return CRYPTO_NUM_LOCKS;
	}

void (*CRYPTO_get_locking_callback(void))(int mode,int type,const char *file,
		int line)
	{
	#if	CRYPTO_CALLBACK_ENABLE
	return(locking_callback);
	#else
	return NULL;
	#endif
	}

int (*CRYPTO_get_add_lock_callback(void))(int *num,int mount,int type,
					  const char *file,int line)
	{
	#if	CRYPTO_CALLBACK_ENABLE
	return(add_lock_callback);
	#else
	return NULL;
	#endif
	}

void CRYPTO_set_locking_callback(void (*func)(int mode,int type,
					      const char *file,int line))
	{
	#if	CRYPTO_CALLBACK_ENABLE
	locking_callback=func;
	#endif
	}

void CRYPTO_set_add_lock_callback(int (*func)(int *num,int mount,int type,
					      const char *file,int line))
	{
	#if	CRYPTO_CALLBACK_ENABLE
	add_lock_callback=func;
	#endif
	}

unsigned long (*CRYPTO_get_id_callback(void))(void)
	{
	#if	CRYPTO_CALLBACK_ENABLE
	return(id_callback);
	#else
	return NULL;
	#endif
	}

void CRYPTO_set_id_callback(unsigned long (*func)(void))
	{
	#if	CRYPTO_CALLBACK_ENABLE
	id_callback=func;
	#endif
	}

unsigned long CRYPTO_thread_id(void)
	{
	unsigned long ret=0;

#if	CRYPTO_CALLBACK_ENABLE
	if (id_callback == NULL)
		{
#ifdef WIN16
		ret=(unsigned long)GetCurrentTask();
#elif defined(WIN32)
		ret=(unsigned long)GetCurrentThreadId();
#elif defined(GETPID_IS_MEANINGLESS)
		ret=1L;
#else
		ret=(unsigned long)getpid();
#endif
		}
	else
		ret=id_callback();
#endif	/* CRYPTO_CALLBACK_ENABLE */
	return(ret);
	}

void CRYPTO_lock(int mode, int type, const char *file, int line)
	{
#ifdef LOCK_DEBUG
		{
		char *rw_text,*operation_text;

		if (mode & CRYPTO_LOCK)
			operation_text="lock  ";
		else if (mode & CRYPTO_UNLOCK)
			operation_text="unlock";
		else
			operation_text="ERROR ";

		if (mode & CRYPTO_READ)
			rw_text="r";
		else if (mode & CRYPTO_WRITE)
			rw_text="w";
		else
			rw_text="ERROR";

		fprintf(stderr,"lock:%08lx:(%s)%s %-18s %s:%d\n",
			CRYPTO_thread_id(), rw_text, operation_text,
			CRYPTO_get_lock_name(type), file, line);
		}
#endif
#if	CRYPTO_CALLBACK_ENABLE
	if (locking_callback != NULL)
		locking_callback(mode,type,file,line);
#endif
	}

int CRYPTO_add_lock(int *pointer, int amount, int type, const char *file,
	     int line)
	{
	int ret;
#if	CRYPTO_CALLBACK_ENABLE
	if (add_lock_callback != NULL)
		{
#ifdef LOCK_DEBUG
		int before= *pointer;
#endif

		ret=add_lock_callback(pointer,amount,type,file,line);
#ifdef LOCK_DEBUG
		fprintf(stderr,"ladd:%08lx:%2d+%2d->%2d %-18s %s:%d\n",
			CRYPTO_thread_id(),
			before,amount,ret,
			CRYPTO_get_lock_name(type),
			file,line);
#endif
		*pointer=ret;
		}
	else
#endif	/* CRYPTO_CALLBACK_ENABLE */
		{
		CRYPTO_lock(CRYPTO_LOCK|CRYPTO_WRITE,type,file,line);

		ret= *pointer+amount;
#ifdef LOCK_DEBUG
		fprintf(stderr,"ladd:%08lx:%2d+%2d->%2d %-18s %s:%d\n",
			CRYPTO_thread_id(),
			*pointer,amount,ret,
			CRYPTO_get_lock_name(type),
			file,line);
#endif
		*pointer=ret;
		CRYPTO_lock(CRYPTO_UNLOCK|CRYPTO_WRITE,type,file,line);
		}
	return(ret);
	}

#ifdef LOCK_DEBUG
const char *CRYPTO_get_lock_name(int type)
	{
	if (type < 0)
		return("ERROR");
	else if (type < CRYPTO_NUM_LOCKS)
		return(lock_names[type]);
	else if (type-CRYPTO_NUM_LOCKS >= sk_num(app_locks))
		return("ERROR");
	else
		return(sk_value(app_locks,type-CRYPTO_NUM_LOCKS));
	}
#endif /*LOCK_DEBUG*/

#ifdef _DLL
#ifdef WIN32

/* All we really need to do is remove the 'error' state when a thread
 * detaches */

BOOL WINAPI DLLEntryPoint(HINSTANCE hinstDLL, DWORD fdwReason,
	     LPVOID lpvReserved)
	{
	switch(fdwReason)
		{
	case DLL_PROCESS_ATTACH:
		break;
	case DLL_THREAD_ATTACH:
		break;
	case DLL_THREAD_DETACH:
		ERR_remove_state(0);
		break;
	case DLL_PROCESS_DETACH:
		break;
		}
	return(TRUE);
	}
#endif

#endif
Commit	Line	Data
b1ab9ed8	1	/*
d8f41ccd	2	* Copyright (c) 2000-2001,2011,2014 Apple Inc. All Rights Reserved.
b1ab9ed8 A	3	*
	4	* The contents of this file constitute Original Code as defined in and are
	5	* subject to the Apple Public Source License Version 1.2 (the 'License').
	6	* You may not use this file except in compliance with the License. Please obtain
	7	* a copy of the License at http://www.apple.com/publicsource and read it before
	8	* using this file.
	9	*
	10	* This Original Code and all software distributed under the License are
	11	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS
	12	* OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, INCLUDING WITHOUT
	13	* LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
	14	* PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. Please see the License for the
	15	* specific language governing rights and limitations under the License.
	16	*/
	17
	18
	19	/* crypto/cryptlib.c */
	20	/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
	21	* All rights reserved.
	22	*
	23	* This package is an SSL implementation written
	24	* by Eric Young (eay@cryptsoft.com).
	25	* The implementation was written so as to conform with Netscapes SSL.
	26	*
	27	* This library is free for commercial and non-commercial use as long as
	28	* the following conditions are aheared to. The following conditions
	29	* apply to all code found in this distribution, be it the RC4, RSA,
	30	* lhash, DES, etc., code; not just the SSL code. The SSL documentation
	31	* included with this distribution is covered by the same copyright terms
	32	* except that the holder is Tim Hudson (tjh@cryptsoft.com).
	33	*
	34	* Copyright remains Eric Young's, and as such any Copyright notices in
	35	* the code are not to be removed.
	36	* If this package is used in a product, Eric Young should be given attribution
	37	* as the author of the parts of the library used.
	38	* This can be in the form of a textual message at program startup or
	39	* in documentation (online or textual) provided with the package.
	40	*
	41	* Redistribution and use in source and binary forms, with or without
	42	* modification, are permitted provided that the following conditions
	43	* are met:
	44	* 1. Redistributions of source code must retain the copyright
	45	* notice, this list of conditions and the following disclaimer.
	46	* 2. Redistributions in binary form must reproduce the above copyright
	47	* notice, this list of conditions and the following disclaimer in the
	48	* documentation and/or other materials provided with the distribution.
	49	* 3. All advertising materials mentioning features or use of this software
	50	* must display the following acknowledgement:
	51	* "This product includes cryptographic software written by
	52	* Eric Young (eay@cryptsoft.com)"
	53	* The word 'cryptographic' can be left out if the rouines from the library
	54	* being used are not cryptographic related :-).
	55	* 4. If you include any Windows specific code (or a derivative thereof) from
	56	* the apps directory (application code) you must include an acknowledgement:
	57	* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
	58	*
	59	* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
	60	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	61	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	62	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
	63	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	64	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	65	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	66	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
67	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
68	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
69	* SUCH DAMAGE.
70	*
71	* The licence and distribution terms for any publically available version or
72	* derivative of this code cannot be changed. i.e. this code cannot simply be
73	* copied and put under another distribution licence
74	* [including the GNU Public Licence.]
75	*/
76
77	#include <stdio.h>
78	#include <string.h>
79	#include "cryptlib.h"
80	#include <openssl/crypto.h>
81
82	#if defined(WIN32) \|\| defined(WIN16)
83	static double SSLeay_MSVC5_hack=0.0; /* and for VC1.5 */
84	#endif
85
86	/* real #defines in crypto.h, keep these upto date */
87	#if defined(LOCK_DEBUG)
88	static const char* const lock_names[CRYPTO_NUM_LOCKS] =
89	{
90	"<<ERROR>>",
91	"err",
92	"err_hash",
93	"x509",
94	"x509_info",
95	"x509_pkey",
96	"x509_crl",
97	"x509_req",
98	"dsa",
99	"rsa",
100	"evp_pkey",
101	"x509_store",
102	"ssl_ctx",
103	"ssl_cert",
104	"ssl_session",
105	"ssl_sess_cert",
106	"ssl",
107	"rand",
108	"debug_malloc",
109	"BIO",
110	"gethostbyname",
111	"getservbyname",
112	"readdir",
113	"RSA_blinding",
114	"dh",
115	"debug_malloc2",
116	#if CRYPTO_NUM_LOCKS != 26
117	# error "Inconsistency between crypto.h and cryptlib.c"
118	#endif
119	};
120	#endif /LOCK_DEBUG/
121
122	static STACK *app_locks=NULL;
123
124	#if CRYPTO_CALLBACK_ENABLE
125	static void (MS_FAR *locking_callback)(int mode,int type,
126	const char *file,int line)=NULL;
127	static int (MS_FAR add_lock_callback)(int pointer,int amount,
128	int type,const char *file,int line)=NULL;
129	static unsigned long (MS_FAR *id_callback)(void)=NULL;
130	#endif /* CRYPTO_CALLBACK_ENABLE */
131
132	int CRYPTO_get_new_lockid(char *name)
133	{
134	char *str;
135	int i;
136
137	/* A hack to make Visual C++ 5.0 work correctly when linking as
138	* a DLL using /MT. Without this, the application cannot use
139	* and floating point printf's.
140	* It also seems to be needed for Visual C 1.5 (win16) */
141	#if defined(WIN32) \|\| defined(WIN16)
142	SSLeay_MSVC5_hack=(double)name[0]*(double)name[1];
143	#endif
144
145	if ((app_locks == NULL) && ((app_locks=sk_new_null()) == NULL))
146	{
147	CRYPTOerr(CRYPTO_F_CRYPTO_GET_NEW_LOCKID,ERR_R_MALLOC_FAILURE);
148	return(0);
149	}
150	if ((str=BUF_strdup(name)) == NULL)
151	return(0);
152	i=sk_push(app_locks,str);
153	if (!i)
154	Free(str);
155	else
156	i+=CRYPTO_NUM_LOCKS; /* gap of one :-) */
157	return(i);
158	}
159
160	int CRYPTO_num_locks(void)
161	{
162	return CRYPTO_NUM_LOCKS;
163	}
164
165	void (CRYPTO_get_locking_callback(void))(int mode,int type,const char file,
166	int line)
167	{
168	#if CRYPTO_CALLBACK_ENABLE
169	return(locking_callback);
170	#else
171	return NULL;
172	#endif
173	}
174
175	int (CRYPTO_get_add_lock_callback(void))(int num,int mount,int type,
176	const char *file,int line)
177	{
178	#if CRYPTO_CALLBACK_ENABLE
179	return(add_lock_callback);
180	#else
181	return NULL;
182	#endif
183	}
184
185	void CRYPTO_set_locking_callback(void (*func)(int mode,int type,
186	const char *file,int line))
187	{
188	#if CRYPTO_CALLBACK_ENABLE
189	locking_callback=func;
190	#endif
191	}
192
193	void CRYPTO_set_add_lock_callback(int (func)(int num,int mount,int type,
194	const char *file,int line))
195	{
196	#if CRYPTO_CALLBACK_ENABLE
197	add_lock_callback=func;
198	#endif
199	}
200
201	unsigned long (*CRYPTO_get_id_callback(void))(void)
202	{
203	#if CRYPTO_CALLBACK_ENABLE
204	return(id_callback);
205	#else
206	return NULL;
207	#endif
208	}
209
210	void CRYPTO_set_id_callback(unsigned long (*func)(void))
211	{
212	#if CRYPTO_CALLBACK_ENABLE
213	id_callback=func;
214	#endif
215	}
216
217	unsigned long CRYPTO_thread_id(void)
218	{
219	unsigned long ret=0;
220
221	#if CRYPTO_CALLBACK_ENABLE
222	if (id_callback == NULL)
223	{
224	#ifdef WIN16
225	ret=(unsigned long)GetCurrentTask();
226	#elif defined(WIN32)
227	ret=(unsigned long)GetCurrentThreadId();
228	#elif defined(GETPID_IS_MEANINGLESS)
229	ret=1L;
230	#else
231	ret=(unsigned long)getpid();
232	#endif
233	}
234	else
235	ret=id_callback();
236	#endif /* CRYPTO_CALLBACK_ENABLE */
237	return(ret);
238	}
239
240	void CRYPTO_lock(int mode, int type, const char *file, int line)
241	{
242	#ifdef LOCK_DEBUG
243	{
244	char rw_text,operation_text;
245
246	if (mode & CRYPTO_LOCK)
247	operation_text="lock ";
248	else if (mode & CRYPTO_UNLOCK)
249	operation_text="unlock";
250	else
251	operation_text="ERROR ";
252
253	if (mode & CRYPTO_READ)
254	rw_text="r";
255	else if (mode & CRYPTO_WRITE)
256	rw_text="w";
257	else
258	rw_text="ERROR";
259
260	fprintf(stderr,"lock:%08lx:(%s)%s %-18s %s:%d\n",
261	CRYPTO_thread_id(), rw_text, operation_text,
262	CRYPTO_get_lock_name(type), file, line);
263	}
264	#endif
265	#if CRYPTO_CALLBACK_ENABLE
266	if (locking_callback != NULL)
267	locking_callback(mode,type,file,line);
268	#endif
269	}
270
271	int CRYPTO_add_lock(int pointer, int amount, int type, const char file,
272	int line)
273	{
274	int ret;
275	#if CRYPTO_CALLBACK_ENABLE
276	if (add_lock_callback != NULL)
277	{
278	#ifdef LOCK_DEBUG
279	int before= *pointer;
280	#endif
281
282	ret=add_lock_callback(pointer,amount,type,file,line);
283	#ifdef LOCK_DEBUG
284	fprintf(stderr,"ladd:%08lx:%2d+%2d->%2d %-18s %s:%d\n",
285	CRYPTO_thread_id(),
286	before,amount,ret,
287	CRYPTO_get_lock_name(type),
288	file,line);
289	#endif
290	*pointer=ret;
291	}
292	else
293	#endif /* CRYPTO_CALLBACK_ENABLE */
294	{
295	CRYPTO_lock(CRYPTO_LOCK\|CRYPTO_WRITE,type,file,line);
296
297	ret= *pointer+amount;
298	#ifdef LOCK_DEBUG
299	fprintf(stderr,"ladd:%08lx:%2d+%2d->%2d %-18s %s:%d\n",
300	CRYPTO_thread_id(),
301	*pointer,amount,ret,
302	CRYPTO_get_lock_name(type),
303	file,line);
304	#endif
305	*pointer=ret;
306	CRYPTO_lock(CRYPTO_UNLOCK\|CRYPTO_WRITE,type,file,line);
307	}
308	return(ret);
309	}
310
311	#ifdef LOCK_DEBUG
312	const char *CRYPTO_get_lock_name(int type)
313	{
314	if (type < 0)
315	return("ERROR");
316	else if (type < CRYPTO_NUM_LOCKS)
317	return(lock_names[type]);
318	else if (type-CRYPTO_NUM_LOCKS >= sk_num(app_locks))
319	return("ERROR");
320	else
321	return(sk_value(app_locks,type-CRYPTO_NUM_LOCKS));
322	}
323	#endif /LOCK_DEBUG/
324
325	#ifdef _DLL
326	#ifdef WIN32
327
328	/* All we really need to do is remove the 'error' state when a thread
329	* detaches */
330
331	BOOL WINAPI DLLEntryPoint(HINSTANCE hinstDLL, DWORD fdwReason,
332	LPVOID lpvReserved)
333	{
334	switch(fdwReason)
335	{
336	case DLL_PROCESS_ATTACH:
337	break;
338	case DLL_THREAD_ATTACH:
339	break;
340	case DLL_THREAD_DETACH:
341	ERR_remove_state(0);
342	break;
343	case DLL_PROCESS_DETACH:
344	break;
345	}
346	return(TRUE);
347	}
348	#endif
349
350	#endif