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