xref: /netbsd/external/bsd/ntp/dist/lib/isc/win32/thread.c (revision 6550d01e)
1 /*	$NetBSD: thread.c,v 1.1.1.1 2009/12/13 16:54:41 kardel 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 
28 isc_result_t
29 isc_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 
46 isc_result_t
47 isc_thread_join(isc_thread_t thread, isc_threadresult_t *rp) {
48 	DWORD result;
49 	DWORD threadrc;
50 
51 	result = WaitForSingleObject(thread, INFINITE);
52 	if (result != WAIT_OBJECT_0) {
53 		/* XXX */
54 		return (ISC_R_UNEXPECTED);
55 	}
56 	if (rp != NULL) {
57 		if(!GetExitCodeThread(thread, &threadrc)) {
58 			/* XXX */
59 			return (ISC_R_UNEXPECTED);
60 		}
61 		*rp = threadrc;
62 	}
63 	(void)CloseHandle(thread);
64 
65 	return (ISC_R_SUCCESS);
66 }
67 
68 void
69 isc_thread_setconcurrency(unsigned int level) {
70 	/*
71 	 * This is unnecessary on Win32 systems, but is here so that the
72 	 * call exists
73 	 */
74 }
75 
76 void *
77 isc_thread_key_getspecific(isc_thread_key_t key) {
78 	return(TlsGetValue(key));
79 }
80 
81 int
82 isc_thread_key_setspecific(isc_thread_key_t key, void *value) {
83 	return (TlsSetValue(key, value) ? 0 : GetLastError());
84 }
85 
86 int
87 isc_thread_key_create(isc_thread_key_t *key, void (*func)(void *)) {
88 	*key = TlsAlloc();
89 
90 	return ((*key != -1) ? 0 : GetLastError());
91 }
92 
93 int
94 isc_thread_key_delete(isc_thread_key_t key) {
95 	return (TlsFree(key) ? 0 : GetLastError());
96 }
97