1/*	$NetBSD: thread.c,v 1.2.6.1 2012/06/05 21:15:31 bouyer Exp $	*/
2
3/*
4 * Copyright (C) 2004, 2005, 2007  Internet Systems Consortium, Inc. ("ISC")
5 * Copyright (C) 1998-2001  Internet Software Consortium.
6 *
7 * Permission to use, copy, modify, and/or distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
10 *
11 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
12 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
13 * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
14 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
15 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
16 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
17 * PERFORMANCE OF THIS SOFTWARE.
18 */
19
20/* Id: thread.c,v 1.24 2007/06/19 23:47:19 tbox Exp  */
21
22#include <config.h>
23
24#include <process.h>
25
26#include <isc/thread.h>
27
28isc_result_t
29isc_thread_create(isc_threadfunc_t start, isc_threadarg_t arg,
30		  isc_thread_t *threadp)
31{
32	isc_thread_t thread;
33	unsigned int id;
34
35	thread = (isc_thread_t)_beginthreadex(NULL, 0, start, arg, 0, &id);
36	if (thread == NULL) {
37		/* XXX */
38		return (ISC_R_UNEXPECTED);
39	}
40
41	*threadp = thread;
42
43	return (ISC_R_SUCCESS);
44}
45
46isc_result_t
47isc_thread_join(isc_thread_t thread, isc_threadresult_t *rp) {
48	DWORD result;
49
50	result = WaitForSingleObject(thread, INFINITE);
51	if (result != WAIT_OBJECT_0) {
52		/* XXX */
53		return (ISC_R_UNEXPECTED);
54	}
55	if (rp != NULL && !GetExitCodeThread(thread, rp)) {
56		/* XXX */
57		return (ISC_R_UNEXPECTED);
58	}
59	(void)CloseHandle(thread);
60
61	return (ISC_R_SUCCESS);
62}
63
64void
65isc_thread_setconcurrency(unsigned int level) {
66	/*
67	 * This is unnecessary on Win32 systems, but is here so that the
68	 * call exists
69	 */
70}
71
72void *
73isc_thread_key_getspecific(isc_thread_key_t key) {
74	return(TlsGetValue(key));
75}
76
77int
78isc_thread_key_setspecific(isc_thread_key_t key, void *value) {
79	return (TlsSetValue(key, value) ? 0 : GetLastError());
80}
81
82int
83isc_thread_key_create(isc_thread_key_t *key, void (*func)(void *)) {
84	*key = TlsAlloc();
85
86	return ((*key != -1) ? 0 : GetLastError());
87}
88
89int
90isc_thread_key_delete(isc_thread_key_t key) {
91	return (TlsFree(key) ? 0 : GetLastError());
92}
93